/[LeafOK_CVS]/lbbs/src/lml.c
ViewVC logotype

Diff of /lbbs/src/lml.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 1.31 by sysadm, Wed Oct 29 03:23:39 2025 UTC Revision 1.37 by sysadm, Thu Oct 30 11:15:12 2025 UTC
# Line 17  Line 17 
17  #include "common.h"  #include "common.h"
18  #include "lml.h"  #include "lml.h"
19  #include "log.h"  #include "log.h"
20    #include "str_process.h"
21    #include <ctype.h>
22  #include <stdio.h>  #include <stdio.h>
23  #include <string.h>  #include <string.h>
24  #include <sys/param.h>  #include <sys/param.h>
# Line 178  inline static void lml_init(void) Line 180  inline static void lml_init(void)
180          }          }
181  }  }
182    
183  int lml_render(const char *str_in, char *str_out, int buf_len, int quote_mode)  #define CHECK_AND_APPEND_OUTPUT(out_buf, out_buf_len, out_buf_offset, tag_out, tag_out_len, line_width)                             \
184            {                                                                                                                               \
185                    if ((out_buf_offset) + (tag_out_len) >= (out_buf_len))                                                                      \
186                    {                                                                                                                           \
187                            log_error("Buffer is not longer enough for output string %d >= %d\n", (out_buf_offset) + (tag_out_len), (out_buf_len)); \
188                            out_buf[out_buf_offset] = '\0';                                                                                         \
189                            return (out_buf_offset);                                                                                                \
190                    }                                                                                                                           \
191                    memcpy((out_buf) + (out_buf_offset), (tag_out), (size_t)(tag_out_len));                                                     \
192                    *((out_buf) + (out_buf_offset) + (size_t)(tag_out_len)) = '\0';                                                             \
193                    (line_width) += str_length((out_buf) + (out_buf_offset), 1);                                                                \
194                    (out_buf_offset) += (tag_out_len);                                                                                          \
195            }
196    
197    int lml_render(const char *str_in, char *str_out, int buf_len, int width, int quote_mode)
198  {  {
199          char c;          char c;
200          char tag_param_buf[LML_TAG_PARAM_BUF_LEN];          char tag_param_buf[LML_TAG_PARAM_BUF_LEN];
# Line 194  int lml_render(const char *str_in, char Line 210  int lml_render(const char *str_in, char
210          int new_line = 1;          int new_line = 1;
211          int fb_quote_level = 0;          int fb_quote_level = 0;
212          int tag_name_found;          int tag_name_found;
213            int line_width = 0;
214    
215          lml_init();          lml_init();
216    
217          lml_tag_disabled = 0;          lml_tag_disabled = 0;
218          lml_tag_quote_level = 0;          lml_tag_quote_level = 0;
219    
220            if (width <= 0)
221            {
222                    width = INT_MAX;
223            }
224    
225          for (i = 0; str_in[i] != '\0'; i++)          for (i = 0; str_in[i] != '\0'; i++)
226          {          {
227                  if (!quote_mode && !lml_tag_disabled && new_line)                  if (!lml_tag_disabled && new_line)
228                  {                  {
229                          if (fb_quote_level > 0)                          while (str_in[i] == ':' && str_in[i + 1] == ' ') // FB2000 quote leading str
                         {  
                                 lml_tag_quote_level -= fb_quote_level;  
   
                                 tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "%s",  
                                                                                   (lml_tag_quote_level > 0 ? lml_tag_quote_color[lml_tag_quote_level % LML_TAG_QUOTE_LEVEL_LOOP] : "\033[m"));  
                                 if (j + tag_output_len >= buf_len)  
                                 {  
                                         log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);  
                                         str_out[j] = '\0';  
                                         return j;  
                                 }  
                                 memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);  
                                 j += tag_output_len;  
   
                                 fb_quote_level = 0;  
                         }  
   
                         while (str_in[i + fb_quote_level * 2] == ':' && str_in[i + fb_quote_level * 2 + 1] == ' ') // FB2000 quote leading str  
230                          {                          {
231                                  fb_quote_level++;                                  fb_quote_level++;
232                                    lml_tag_quote_level++;
233                                    i += 2;
234                          }                          }
235    
236                          if (fb_quote_level > 0)                          if (!quote_mode && lml_tag_quote_level > 0)
237                          {                          {
                                 lml_tag_quote_level += fb_quote_level;  
   
238                                  tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "%s",                                  tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "%s",
239                                                                                    lml_tag_quote_color[lml_tag_quote_level % LML_TAG_QUOTE_LEVEL_LOOP]);                                                                                    lml_tag_quote_color[lml_tag_quote_level % LML_TAG_QUOTE_LEVEL_LOOP]);
240                                  if (j + tag_output_len >= buf_len)                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len, line_width);
                                 {  
                                         log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);  
                                         str_out[j] = '\0';  
                                         return j;  
                                 }  
                                 memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);  
                                 j += tag_output_len;  
241                          }                          }
242    
243                            for (k = 0; k < fb_quote_level; k++)
244                            {
245                                    tag_output_buf[k * 2] = ':';
246                                    tag_output_buf[k * 2 + 1] = ' ';
247                            }
248                            tag_output_buf[fb_quote_level * 2] = '\0';
249                            tag_output_len = fb_quote_level * 2;
250                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len, line_width);
251    
252                          new_line = 0;                          new_line = 0;
253                  }                  }
254    
255                  if (str_in[i] == '\033' && str_in[i + 1] == '[') // Escape sequence -- copy directly                  if (str_in[i] == '\033' && str_in[i + 1] == '[') // Escape sequence
256                  {                  {
257                          for (k = i + 2; str_in[k] != '\0' && str_in[k] != 'm'; k++)                          for (k = i + 2; isdigit(str_in[k]) || str_in[k] == ';' || str_in[k] == '?'; k++)
258                                  ;                                  ;
259    
260                          if (str_in[k] == 'm') // Valid                          if (str_in[k] == 'm') // valid -- copy directly
261                          {                          {
262                                  if (j + (k - i + 1) >= buf_len)                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, k - i + 1, line_width);
263                                  {                          }
264                                          log_error("Buffer is not longer enough for output string %d >= %d\n", j + (k - i + 1), buf_len);                          else if (isalpha(str_in[k]))
265                                          str_out[j] = '\0';                          {
266                                          return j;                                  // unsupported ANSI CSI command
                                 }  
                                 memcpy(str_out + j, str_in + i, (size_t)(k - i + 1));  
                                 j += (k - i + 1);  
                                 i = k;  
                                 continue;  
267                          }                          }
268                          else // reach end of string                          else
269                          {                          {
270                                  break;                                  k--;
271                          }                          }
272    
273                            i = k;
274                            continue;
275                  }                  }
276    
277                  if (str_in[i] == '\n') // jump out of tag at end of line                  if (str_in[i] == '\n') // jump out of tag at end of line
# Line 276  int lml_render(const char *str_in, char Line 280  int lml_render(const char *str_in, char
280                          {                          {
281                                  tag_end_pos = i - 1;                                  tag_end_pos = i - 1;
282                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  tag_output_len = tag_end_pos - tag_start_pos + 1;
283                                  if (j + tag_output_len >= buf_len)                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len, line_width);
284                                  {                          }
                                         log_error("Buffer is not longer enough for output string %ld >= %d\n", j + tag_output_len, buf_len);  
                                         str_out[j] = '\0';  
                                         return j;  
                                 }  
285    
286                                  memcpy(str_out + j, str_in + tag_start_pos, (size_t)tag_output_len);                          if (fb_quote_level > 0)
287                                  j += tag_output_len;                          {
288                                    lml_tag_quote_level -= fb_quote_level;
289    
290                                    tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, (quote_mode ? "" : "\033[m"));
291                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len, line_width);
292    
293                                    fb_quote_level = 0;
294                          }                          }
295    
296                          tag_start_pos = -1;                          tag_start_pos = -1;
297                          tag_name_pos = -1;                          tag_name_pos = -1;
298                          new_line = 1;                          new_line = 1;
299                            line_width = 0;
300                  }                  }
301                  else if (str_in[i] == '\r')                  else if (str_in[i] == '\r' || str_in[i] == '\7')
302                  {                  {
303                          continue; // ignore '\r'                          continue; // Skip special characters
304                  }                  }
305    
306                  if (!lml_tag_disabled && str_in[i] == '[')                  if (!lml_tag_disabled && str_in[i] == '[')
307                  {                  {
308                            if (tag_start_pos != -1) // tag is not closed
309                            {
310                                    tag_end_pos = i - 1;
311                                    tag_output_len = tag_end_pos - tag_start_pos + 1;
312                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len, line_width);
313                            }
314    
315                          tag_start_pos = i;                          tag_start_pos = i;
316                          tag_name_pos = i + 1;                          tag_name_pos = i + 1;
317                  }                  }
318                  else if (!lml_tag_disabled && str_in[i] == ']')                  else if (!lml_tag_disabled && str_in[i] == ']' && tag_name_pos >= 0)
319                  {                  {
320                          if (tag_name_pos >= 0)                          tag_end_pos = i;
                         {  
                                 tag_end_pos = i;  
321    
322                                  // Skip space characters                          // Skip space characters
323                                  while (str_in[tag_name_pos] == ' ')                          while (str_in[tag_name_pos] == ' ')
324                                  {                          {
325                                          tag_name_pos++;                                  tag_name_pos++;
326                                  }                          }
327    
328                                  for (tag_name_found = 0, k = 0; k < LML_TAG_COUNT; k++)                          for (tag_name_found = 0, k = 0; k < LML_TAG_COUNT; k++)
329                            {
330                                    if (strncasecmp(lml_tag_def[k].tag_name, str_in + tag_name_pos, (size_t)lml_tag_name_len[k]) == 0)
331                                  {                                  {
332                                          if (strncasecmp(lml_tag_def[k].tag_name, str_in + tag_name_pos, (size_t)lml_tag_name_len[k]) == 0)                                          tag_param_pos = -1;
333                                            switch (str_in[tag_name_pos + lml_tag_name_len[k]])
334                                          {                                          {
335                                                  tag_param_pos = -1;                                          case ' ':
336                                                  switch (str_in[tag_name_pos + lml_tag_name_len[k]])                                                  tag_name_found = 1;
337                                                    tag_param_pos = tag_name_pos + lml_tag_name_len[k] + 1;
338                                                    while (str_in[tag_param_pos] == ' ')
339                                                  {                                                  {
340                                                  case ' ':                                                          tag_param_pos++;
341                                                          tag_name_found = 1;                                                  }
342                                                          tag_param_pos = tag_name_pos + lml_tag_name_len[k] + 1;                                                  strncpy(tag_param_buf, str_in + tag_param_pos, (size_t)MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_BUF_LEN));
343                                                          while (str_in[tag_param_pos] == ' ')                                                  tag_param_buf[MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_BUF_LEN)] = '\0';
344                                                          {                                          case ']':
345                                                                  tag_param_pos++;                                                  tag_name_found = 1;
346                                                          }                                                  if (tag_param_pos == -1 && lml_tag_def[k].tag_output != NULL && lml_tag_def[k].default_param != NULL) // Apply default param if not defined
347                                                          strncpy(tag_param_buf, str_in + tag_param_pos, (size_t)MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_BUF_LEN));                                                  {
348                                                          tag_param_buf[MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_BUF_LEN)] = '\0';                                                          strncpy(tag_param_buf, lml_tag_def[k].default_param, LML_TAG_PARAM_BUF_LEN - 1);
349                                                  case ']':                                                          tag_param_buf[LML_TAG_PARAM_BUF_LEN - 1] = '\0';
350                                                          tag_name_found = 1;                                                  }
351                                                          if (tag_param_pos == -1 && lml_tag_def[k].tag_output != NULL && lml_tag_def[k].default_param != NULL) // Apply default param if not defined                                                  tag_output_len = 0;
352                                                    if (!quote_mode)
353                                                    {
354                                                            if (lml_tag_def[k].tag_output != NULL)
355                                                          {                                                          {
356                                                                  strncpy(tag_param_buf, lml_tag_def[k].default_param, LML_TAG_PARAM_BUF_LEN - 1);                                                                  tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, lml_tag_def[k].tag_output, tag_param_buf);
                                                                 tag_param_buf[LML_TAG_PARAM_BUF_LEN - 1] = '\0';  
357                                                          }                                                          }
358                                                          if (!quote_mode)                                                          else if (lml_tag_def[k].tag_filter_cb != NULL)
359                                                          {                                                          {
360                                                                  if (lml_tag_def[k].tag_output != NULL)                                                                  tag_output_len = lml_tag_def[k].tag_filter_cb(
361                                                                  {                                                                          lml_tag_def[k].tag_name, tag_param_buf, tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, 0);
                                                                         tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, lml_tag_def[k].tag_output, tag_param_buf);  
                                                                 }  
                                                                 else if (lml_tag_def[k].tag_filter_cb != NULL)  
                                                                 {  
                                                                         tag_output_len = lml_tag_def[k].tag_filter_cb(  
                                                                                 lml_tag_def[k].tag_name, tag_param_buf, tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, 0);  
                                                                 }  
                                                                 else  
                                                                 {  
                                                                         tag_output_len = 0;  
                                                                 }  
362                                                          }                                                          }
363                                                          else // if (quote_mode)                                                  }
364                                                    else // if (quote_mode)
365                                                    {
366                                                            if (lml_tag_def[k].quote_mode_output != NULL)
367                                                          {                                                          {
368                                                                  if (lml_tag_def[k].quote_mode_output != NULL)                                                                  tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, lml_tag_def[k].quote_mode_output, tag_param_buf);
                                                                 {  
                                                                         tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, lml_tag_def[k].quote_mode_output, tag_param_buf);  
                                                                 }  
                                                                 else if (lml_tag_def[k].tag_filter_cb != NULL)  
                                                                 {  
                                                                         tag_output_len = lml_tag_def[k].tag_filter_cb(  
                                                                                 lml_tag_def[k].tag_name, tag_param_buf, tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, 1);  
                                                                 }  
                                                                 else  
                                                                 {  
                                                                         tag_output_len = 0;  
                                                                 }  
369                                                          }                                                          }
370                                                          if (j + tag_output_len >= buf_len)                                                          else if (lml_tag_def[k].tag_filter_cb != NULL)
371                                                          {                                                          {
372                                                                  log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);                                                                  tag_output_len = lml_tag_def[k].tag_filter_cb(
373                                                                  str_out[j] = '\0';                                                                          lml_tag_def[k].tag_name, tag_param_buf, tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, 1);
                                                                 return j;  
374                                                          }                                                          }
                                                         memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);  
                                                         j += tag_output_len;  
                                                         break;  
                                                 default: // tag_name not match  
                                                         continue;  
375                                                  }                                                  }
376                                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len, line_width);
377                                                  break;                                                  break;
378                                            default: // tag_name not match
379                                                    continue;
380                                          }                                          }
381                                            break;
382                                  }                                  }
383                            }
384    
385                                  if (!tag_name_found)                          if (!tag_name_found)
386                                  {                          {
387                                          tag_output_len = tag_end_pos - tag_start_pos + 1;                                  tag_output_len = tag_end_pos - tag_start_pos + 1;
388                                          if (j + tag_output_len >= buf_len)                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len, line_width);
                                         {  
                                                 log_error("Buffer is not longer enough for output string %ld >= %d\n", j + tag_output_len, buf_len);  
                                                 str_out[j] = '\0';  
                                                 return j;  
                                         }  
   
                                         memcpy(str_out + j, str_in + tag_start_pos, (size_t)tag_output_len);  
                                         j += tag_output_len;  
                                 }  
   
                                 tag_start_pos = -1;  
                                 tag_name_pos = -1;  
389                          }                          }
390    
391                            tag_start_pos = -1;
392                            tag_name_pos = -1;
393                  }                  }
394                  else if (lml_tag_disabled || tag_name_pos == -1) // not in LML tag                  else if (lml_tag_disabled || tag_name_pos == -1) // not in LML tag
395                  {                  {
396                          if (str_in[i] & 0x80) // head of multi-byte character                          if (line_width + (str_in[i] & 0x80 ? 2 : 1) > width)
397                          {                          {
398                                  if (j + 4 >= buf_len) // Assuming UTF-8 CJK characters use 4 bytes, though most of them actually use 3 bytes                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "\n", 1, line_width);
399                                  {                                  new_line = 1;
400                                          log_error("Buffer is not longer enough for output string %ld >= %d\n", j + 4, buf_len);                                  line_width = 0;
401                                          str_out[j] = '\0';                                  i--; // redo at current $i
402                                          return j;                                  continue;
403                                  }                          }
404    
405                            tag_output_len = 1;
406                            if (str_in[i] & 0x80) // head of multi-byte character
407                            {
408                                  c = (str_in[i] & 0x70) << 1;                                  c = (str_in[i] & 0x70) << 1;
409                                  while (c & 0x80)                                  while (c & 0x80)
410                                  {                                  {
411                                          str_out[j++] = str_in[i++];                                          if (str_in[i + tag_output_len] == '\0')
                                         if (str_in[i] == '\0')  
412                                          {                                          {
413                                                  str_out[j] = '\0';                                                  break;
                                                 return j;  
414                                          }                                          }
415                                            tag_output_len++;
416                                          c = (c & 0x7f) << 1;                                          c = (c & 0x7f) << 1;
417                                  }                                  }
418                          }                          }
419    
420                          if (j + 1 >= buf_len)                          CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, tag_output_len, line_width);
421                          {                          i += (tag_output_len - 1);
                                 log_error("Buffer is not longer enough for output string %ld >= %d\n", j + 1, buf_len);  
                                 str_out[j] = '\0';  
                                 return j;  
                         }  
                         str_out[j++] = str_in[i];  
422                  }                  }
423                  else // in LML tag                  else // in LML tag
424                  {                  {
# Line 444  int lml_render(const char *str_in, char Line 430  int lml_render(const char *str_in, char
430          {          {
431                  tag_end_pos = i - 1;                  tag_end_pos = i - 1;
432                  tag_output_len = tag_end_pos - tag_start_pos + 1;                  tag_output_len = tag_end_pos - tag_start_pos + 1;
433                  if (j + tag_output_len >= buf_len)                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len, line_width);
                 {  
                         log_error("Buffer is not longer enough for output string %ld >= %d\n", j + tag_output_len, buf_len);  
                         str_out[j] = '\0';  
                         return j;  
                 }  
   
                 memcpy(str_out + j, str_in + tag_start_pos, (size_t)tag_output_len);  
                 j += tag_output_len;  
434          }          }
435    
436          if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)          if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)
437          {          {
438                  tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "\033[m");                  tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "\033[m");
439                  if (j + tag_output_len >= buf_len)                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len, line_width);
                 {  
                         log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);  
                         str_out[j] = '\0';  
                         return j;  
                 }  
                 memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);  
                 j += tag_output_len;  
440          }          }
441    
442          str_out[j] = '\0';          str_out[j] = '\0';

Legend:
Removed lines/characters  
Changed lines/characters
  Added lines/characters
webmaster@leafok.com
 ViewVC Help
Powered by ViewVC 1.3.0-beta1