/[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.35 by sysadm, Thu Oct 30 03:18:56 2025 UTC Revision 1.50 by sysadm, Sat Nov 22 14:20:20 2025 UTC
# Line 1  Line 1 
1  /***************************************************************************  /* SPDX-License-Identifier: GPL-3.0-or-later */
2                                                          lml.h  -  description  /*
3                                                           -------------------   * lml
4          Copyright            : (C) 2004-2025 by Leaflet   *   - LML render
5          Email                : leaflet@leafok.com   *
6   ***************************************************************************/   * Copyright (C) 2004-2025  Leaflet <leaflet@leafok.com>
7     */
8  /***************************************************************************  
9   *                                                                         *  #ifdef HAVE_CONFIG_H
10   *   This program is free software; you can redistribute it and/or modify  *  #include "config.h"
11   *   it under the terms of the GNU General Public License as published by  *  #endif
  *   the Free Software Foundation; either version 3 of the License, or     *  
  *   (at your option) any later version.                                   *  
  *                                                                         *  
  ***************************************************************************/  
12    
13  #include "common.h"  #include "common.h"
14  #include "lml.h"  #include "lml.h"
15  #include "log.h"  #include "log.h"
16    #include "str_process.h"
17    #include <ctype.h>
18  #include <stdio.h>  #include <stdio.h>
19  #include <string.h>  #include <string.h>
20  #include <sys/param.h>  #include <sys/param.h>
21    
22  #define LML_TAG_PARAM_BUF_LEN 256  enum _lml_constant_t
23  #define LML_TAG_OUTPUT_BUF_LEN 1024  {
24            LML_TAG_PARAM_BUF_LEN = 256,
25            LML_TAG_OUTPUT_BUF_LEN = 1024,
26            LML_TAG_QUOTE_MAX_LEVEL = 10,
27    };
28    
29    clock_t lml_total_exec_duration = 0;
30    
31  typedef int (*lml_tag_filter_cb)(const char *tag_name, const char *tag_param_buf, char *tag_output_buf, size_t tag_output_buf_len, int quote_mode);  typedef int (*lml_tag_filter_cb)(const char *tag_name, const char *tag_param_buf, char *tag_output_buf, size_t tag_output_buf_len, int quote_mode);
32    
# Line 62  static int lml_tag_color_filter(const ch Line 66  static int lml_tag_color_filter(const ch
66          return 0;          return 0;
67  }  }
68    
 #define LML_TAG_QUOTE_MAX_LEVEL 10  
   
69  static const char *lml_tag_quote_color[] = {  static const char *lml_tag_quote_color[] = {
70          "\033[33m", // yellow          "\033[33m", // yellow
71          "\033[32m", // green          "\033[32m", // green
# Line 158  const LML_TAG_DEF lml_tag_def[] = { Line 160  const LML_TAG_DEF lml_tag_def[] = {
160          {"bwf", "\033[1;31m****\033[m", "", "****", NULL},          {"bwf", "\033[1;31m****\033[m", "", "****", NULL},
161  };  };
162    
163  #define LML_TAG_COUNT (sizeof(lml_tag_def) / sizeof(LML_TAG_DEF))  static const int lml_tag_count = sizeof(lml_tag_def) / sizeof(LML_TAG_DEF);
164    static int lml_tag_name_len[sizeof(lml_tag_def) / sizeof(LML_TAG_DEF)];
 static int lml_tag_name_len[LML_TAG_COUNT];  
165  static int lml_ready = 0;  static int lml_ready = 0;
166    
167  inline static void lml_init(void)  inline static void lml_init(void)
# Line 169  inline static void lml_init(void) Line 170  inline static void lml_init(void)
170    
171          if (!lml_ready)          if (!lml_ready)
172          {          {
173                  for (i = 0; i < LML_TAG_COUNT; i++)                  for (i = 0; i < lml_tag_count; i++)
174                  {                  {
175                          lml_tag_name_len[i] = (int)strlen(lml_tag_def[i].tag_name);                          lml_tag_name_len[i] = (int)strlen(lml_tag_def[i].tag_name);
176                  }                  }
# Line 178  inline static void lml_init(void) Line 179  inline static void lml_init(void)
179          }          }
180  }  }
181    
182  #define CHECK_AND_APPEND_OUTPUT(out_buf, out_buf_len, out_buf_offset, tag_out, tag_out_len)                                         \  #define CHECK_AND_APPEND_OUTPUT(out_buf, out_buf_len, out_buf_offset, tag_out, tag_out_len, line_width)                             \
183            if ((tag_out_len) > 0)                                                                                                          \
184          {                                                                                                                               \          {                                                                                                                               \
185                  if ((out_buf_offset) + (tag_out_len) >= (out_buf_len))                                                                      \                  if ((out_buf_offset) + (tag_out_len) >= (out_buf_len))                                                                      \
186                  {                                                                                                                           \                  {                                                                                                                           \
# Line 187  inline static void lml_init(void) Line 189  inline static void lml_init(void)
189                          return (out_buf_offset);                                                                                                \                          return (out_buf_offset);                                                                                                \
190                  }                                                                                                                           \                  }                                                                                                                           \
191                  memcpy((out_buf) + (out_buf_offset), (tag_out), (size_t)(tag_out_len));                                                     \                  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);                                                                                          \                  (out_buf_offset) += (tag_out_len);                                                                                          \
195          }          }
196    
197  int lml_render(const char *str_in, char *str_out, int buf_len, int quote_mode)  int lml_render(const char *str_in, char *str_out, int buf_len, int width, int quote_mode)
198  {  {
199            clock_t clock_begin;
200            clock_t clock_end;
201    
202          char c;          char c;
203          char tag_param_buf[LML_TAG_PARAM_BUF_LEN];          char tag_param_buf[LML_TAG_PARAM_BUF_LEN];
204          char tag_output_buf[LML_TAG_OUTPUT_BUF_LEN];          char tag_output_buf[LML_TAG_OUTPUT_BUF_LEN];
# Line 206  int lml_render(const char *str_in, char Line 213  int lml_render(const char *str_in, char
213          int new_line = 1;          int new_line = 1;
214          int fb_quote_level = 0;          int fb_quote_level = 0;
215          int tag_name_found;          int tag_name_found;
216            int line_width = 0;
217            char tab_spaces[TAB_SIZE + 1];
218            int tab_width = 0;
219    
220    #ifdef _DEBUG
221            size_t str_in_len = strlen(str_in);
222    #endif
223    
224            clock_begin = clock();
225    
226          lml_init();          lml_init();
227    
228          lml_tag_disabled = 0;          lml_tag_disabled = 0;
229          lml_tag_quote_level = 0;          lml_tag_quote_level = 0;
230    
231            if (width <= 0)
232            {
233                    width = INT_MAX;
234            }
235    
236          for (i = 0; str_in[i] != '\0'; i++)          for (i = 0; str_in[i] != '\0'; i++)
237          {          {
238                  if (!quote_mode && !lml_tag_disabled && new_line)  #ifdef _DEBUG
239                    if (i >= str_in_len)
240                  {                  {
241                          fb_quote_level = 0;                          log_error("Bug: i(%d) >= str_in_len(%d)\n", i, str_in_len);
242                            break;
243                    }
244    #endif
245    
246                          while (str_in[i + fb_quote_level * 2] == ':' && str_in[i + fb_quote_level * 2 + 1] == ' ') // FB2000 quote leading str                  if (!lml_tag_disabled && new_line)
247                    {
248                            while (str_in[i] == ':' && str_in[i + 1] == ' ') // FB2000 quote leading str
249                          {                          {
250                                  fb_quote_level++;                                  fb_quote_level++;
251                                    lml_tag_quote_level++;
252                                    i += 2;
253                          }                          }
254    
255                          lml_tag_quote_level += fb_quote_level;                          if (!quote_mode && lml_tag_quote_level > 0)
   
                         if (lml_tag_quote_level > 0)  
256                          {                          {
257                                  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",
258                                                                                    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]);
259                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len);                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len, line_width);
260                            }
261    
262                            for (k = 0; k < fb_quote_level; k++)
263                            {
264                                    tag_output_buf[k * 2] = ':';
265                                    tag_output_buf[k * 2 + 1] = ' ';
266                          }                          }
267                            tag_output_buf[fb_quote_level * 2] = '\0';
268                            tag_output_len = fb_quote_level * 2;
269                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len, line_width);
270    
271                          new_line = 0;                          new_line = 0;
272                            i--; // redo at current i
273                            continue;
274                    }
275    
276                    if (lml_tag_disabled && new_line)
277                    {
278                            new_line = 0;
279                  }                  }
280    
281                  if (str_in[i] == '\033' && str_in[i + 1] == '[') // Escape sequence -- copy directly                  if (!quote_mode && !lml_tag_disabled && str_in[i] == '\033' && str_in[i + 1] == '[') // Escape sequence
282                  {                  {
283                          for (k = i + 2; str_in[k] != '\0' && str_in[k] != 'm' && str_in[k] != '\033'; k++)                          for (k = i + 2; isdigit((int)str_in[k]) || str_in[k] == ';' || str_in[k] == '?'; k++)
284                                  ;                                  ;
285    
286                          if (str_in[k] != 'm') // invalid                          if (str_in[k] == 'm') // valid -- copy directly
287                            {
288                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, k - i + 1, line_width);
289                            }
290                            else if (isalpha((int)str_in[k]))
291                            {
292                                    // unsupported ANSI CSI command
293                            }
294                            else
295                          {                          {
296                                  k--;                                  k--;
297                          }                          }
298    
                         CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, k - i + 1);  
299                          i = k;                          i = k;
300                          continue;                          continue;
301                  }                  }
302    
303                  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
304                  {                  {
305                          if (tag_start_pos != -1) // tag is not closed                          if (!lml_tag_disabled && tag_start_pos != -1) // tag is not closed
306                          {                          {
307                                  tag_end_pos = i - 1;                                  if (line_width + 1 > width)
308                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  {
309                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len);                                          CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "\n", 1, line_width);
310                                            new_line = 1;
311                                            line_width = 0;
312                                            i--; // redo at current i
313                                            continue;
314                                    }
315    
316                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "[", 1, line_width);
317                                    i = tag_start_pos; // restart from tag_start_pos + 1
318                                    tag_start_pos = -1;
319                                    tag_name_pos = -1;
320                                    continue;
321                          }                          }
322    
323                          if (fb_quote_level > 0)                          if (!lml_tag_disabled && fb_quote_level > 0)
324                          {                          {
325                                  lml_tag_quote_level -= fb_quote_level;                                  lml_tag_quote_level -= fb_quote_level;
326    
327                                  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, (quote_mode ? "" : "\033[m"));
328                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len);                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len, line_width);
329    
330                                    fb_quote_level = 0;
331                            }
332    
333                            if (new_line)
334                            {
335                                    continue;
336                          }                          }
337    
338                          tag_start_pos = -1;                          tag_start_pos = -1;
339                          tag_name_pos = -1;                          tag_name_pos = -1;
340                          new_line = 1;                          new_line = 1;
341                            line_width = -1;
342                  }                  }
343                  else if (str_in[i] == '\r')                  else if (str_in[i] == '\r' || str_in[i] == '\7')
344                  {                  {
345                          continue; // ignore '\r'                          continue; // Skip special characters
346                    }
347                    else if (str_in[i] == '\t')
348                    {
349                            tab_width = TAB_SIZE - (line_width % TAB_SIZE);
350                            if (line_width + tab_width > width)
351                            {
352                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "\n", 1, line_width);
353                                    new_line = 1;
354                                    line_width = 0;
355                                    // skip current Tab
356                                    continue;
357                            }
358    
359                            for (k = 0; k < tab_width; k++)
360                            {
361                                    tab_spaces[k] = ' ';
362                            }
363                            tab_spaces[tab_width] = '\0';
364                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tab_spaces, tab_width, line_width);
365                            continue;
366                  }                  }
367    
368                  if (!lml_tag_disabled && str_in[i] == '[')                  if (!lml_tag_disabled && str_in[i] == '[')
369                  {                  {
370                          if (tag_start_pos != -1) // tag is not closed                          if (tag_start_pos != -1) // tag is not closed
371                          {                          {
372                                  tag_end_pos = i - 1;                                  if (line_width + 1 > width)
373                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  {
374                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len);                                          CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "\n", 1, line_width);
375                                            new_line = 1;
376                                            line_width = 0;
377                                            i--; // redo at current i
378                                            continue;
379                                    }
380    
381                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "[", 1, line_width);
382                                    i = tag_start_pos; // restart from tag_start_pos + 1
383                                    tag_start_pos = -1;
384                                    tag_name_pos = -1;
385                                    continue;
386                          }                          }
387    
388                          tag_start_pos = i;                          tag_start_pos = i;
# Line 298  int lml_render(const char *str_in, char Line 398  int lml_render(const char *str_in, char
398                                  tag_name_pos++;                                  tag_name_pos++;
399                          }                          }
400    
401                          for (tag_name_found = 0, k = 0; k < LML_TAG_COUNT; k++)                          for (tag_name_found = 0, k = 0; k < lml_tag_count; k++)
402                          {                          {
403                                  if (strncasecmp(lml_tag_def[k].tag_name, str_in + tag_name_pos, (size_t)lml_tag_name_len[k]) == 0)                                  if (strncasecmp(lml_tag_def[k].tag_name, str_in + tag_name_pos, (size_t)lml_tag_name_len[k]) == 0)
404                                  {                                  {
# Line 346  int lml_render(const char *str_in, char Line 446  int lml_render(const char *str_in, char
446                                                                          lml_tag_def[k].tag_name, tag_param_buf, tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, 1);                                                                          lml_tag_def[k].tag_name, tag_param_buf, tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, 1);
447                                                          }                                                          }
448                                                  }                                                  }
449                                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len);  
450                                                    if (line_width + tag_output_len > width)
451                                                    {
452                                                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "\n", 1, line_width);
453                                                            new_line = 1;
454                                                            line_width = 0;
455                                                            i--; // redo at current i
456                                                            continue;
457                                                    }
458    
459                                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len, line_width);
460                                                  break;                                                  break;
461                                          default: // tag_name not match                                          default: // tag_name not match
462                                                  continue;                                                  continue;
# Line 357  int lml_render(const char *str_in, char Line 467  int lml_render(const char *str_in, char
467    
468                          if (!tag_name_found)                          if (!tag_name_found)
469                          {                          {
470                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  if (line_width + 1 > width)
471                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len);                                  {
472                                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "\n", 1, line_width);
473                                            new_line = 1;
474                                            line_width = 0;
475                                            i--; // redo at current i
476                                            continue;
477                                    }
478    
479                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "[", 1, line_width);
480                                    i = tag_start_pos; // restart from tag_start_pos + 1
481                                    tag_start_pos = -1;
482                                    tag_name_pos = -1;
483                                    continue;
484                          }                          }
485    
486                          tag_start_pos = -1;                          tag_start_pos = -1;
# Line 366  int lml_render(const char *str_in, char Line 488  int lml_render(const char *str_in, char
488                  }                  }
489                  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
490                  {                  {
491                          if (str_in[i] & 0x80) // head of multi-byte character                          if (line_width + (str_in[i] & 0x80 ? 2 : 1) > width)
492                          {                          {
493                                  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);
494                                  {                                  new_line = 1;
495                                          log_error("Buffer is not longer enough for output string %ld >= %d\n", j + 4, buf_len);                                  line_width = 0;
496                                          str_out[j] = '\0';                                  i--; // redo at current i
497                                          return j;                                  continue;
498                                  }                          }
499    
500                            tag_output_len = 1;
501                            if (str_in[i] & 0x80) // head of multi-byte character
502                            {
503                                  c = (str_in[i] & 0x70) << 1;                                  c = (str_in[i] & 0x70) << 1;
504                                  while (c & 0x80)                                  while (c & 0x80)
505                                  {                                  {
506                                          str_out[j++] = str_in[i++];                                          if (str_in[i + tag_output_len] == '\0')
                                         if (str_in[i] == '\0')  
507                                          {                                          {
508                                                  str_out[j] = '\0';                                                  break;
                                                 return j;  
509                                          }                                          }
510                                            tag_output_len++;
511                                          c = (c & 0x7f) << 1;                                          c = (c & 0x7f) << 1;
512                                  }                                  }
513                          }                          }
514    
515                          if (j + 1 >= buf_len)                          CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, tag_output_len, line_width);
516                          {                          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];  
517                  }                  }
518                  else // in LML tag                  else // in LML tag
519                  {                  {
# Line 402  int lml_render(const char *str_in, char Line 521  int lml_render(const char *str_in, char
521                  }                  }
522          }          }
523    
524          if (tag_start_pos != -1) // tag is not closed          if (!lml_tag_disabled && tag_start_pos != -1) // tag is not closed
525          {          {
526                  tag_end_pos = i - 1;                  tag_end_pos = i - 1;
527                  tag_output_len = tag_end_pos - tag_start_pos + 1;                  tag_output_len = tag_end_pos - tag_start_pos + 1;
528                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len);                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len, line_width);
529          }          }
530    
531          if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)          if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)
532          {          {
533                  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");
534                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len);                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len, line_width);
535          }          }
536    
537          str_out[j] = '\0';          str_out[j] = '\0';
538    
539            clock_end = clock();
540            lml_total_exec_duration += (clock_end - clock_begin);
541    
542          return j;          return j;
543  }  }

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