/[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.46 by sysadm, Mon Nov 10 11:54:30 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     */
 /***************************************************************************  
  *                                                                         *  
  *   This program is free software; you can redistribute it and/or modify  *  
  *   it under the terms of the GNU General Public License as published by  *  
  *   the Free Software Foundation; either version 3 of the License, or     *  
  *   (at your option) any later version.                                   *  
  *                                                                         *  
  ***************************************************************************/  
8    
9  #include "common.h"  #include "common.h"
10  #include "lml.h"  #include "lml.h"
11  #include "log.h"  #include "log.h"
12    #include "str_process.h"
13    #include <ctype.h>
14  #include <stdio.h>  #include <stdio.h>
15  #include <string.h>  #include <string.h>
16  #include <sys/param.h>  #include <sys/param.h>
17    
18  #define LML_TAG_PARAM_BUF_LEN 256  enum _lml_constant_t
19  #define LML_TAG_OUTPUT_BUF_LEN 1024  {
20            LML_TAG_PARAM_BUF_LEN = 256,
21            LML_TAG_OUTPUT_BUF_LEN = 1024,
22            LML_TAG_QUOTE_MAX_LEVEL = 10,
23    };
24    
25    clock_t lml_total_exec_duration = 0;
26    
27  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);
28    
# Line 62  static int lml_tag_color_filter(const ch Line 62  static int lml_tag_color_filter(const ch
62          return 0;          return 0;
63  }  }
64    
 #define LML_TAG_QUOTE_MAX_LEVEL 10  
   
65  static const char *lml_tag_quote_color[] = {  static const char *lml_tag_quote_color[] = {
66          "\033[33m", // yellow          "\033[33m", // yellow
67          "\033[32m", // green          "\033[32m", // green
# Line 158  const LML_TAG_DEF lml_tag_def[] = { Line 156  const LML_TAG_DEF lml_tag_def[] = {
156          {"bwf", "\033[1;31m****\033[m", "", "****", NULL},          {"bwf", "\033[1;31m****\033[m", "", "****", NULL},
157  };  };
158    
159  #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);
160    static int lml_tag_name_len[sizeof(lml_tag_def) / sizeof(LML_TAG_DEF)];
 static int lml_tag_name_len[LML_TAG_COUNT];  
161  static int lml_ready = 0;  static int lml_ready = 0;
162    
163  inline static void lml_init(void)  inline static void lml_init(void)
# Line 169  inline static void lml_init(void) Line 166  inline static void lml_init(void)
166    
167          if (!lml_ready)          if (!lml_ready)
168          {          {
169                  for (i = 0; i < LML_TAG_COUNT; i++)                  for (i = 0; i < lml_tag_count; i++)
170                  {                  {
171                          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);
172                  }                  }
# Line 178  inline static void lml_init(void) Line 175  inline static void lml_init(void)
175          }          }
176  }  }
177    
178  #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)                             \
179          {                                                                                                                               \          {                                                                                                                               \
180                  if ((out_buf_offset) + (tag_out_len) >= (out_buf_len))                                                                      \                  if ((out_buf_offset) + (tag_out_len) >= (out_buf_len))                                                                      \
181                  {                                                                                                                           \                  {                                                                                                                           \
# Line 187  inline static void lml_init(void) Line 184  inline static void lml_init(void)
184                          return (out_buf_offset);                                                                                                \                          return (out_buf_offset);                                                                                                \
185                  }                                                                                                                           \                  }                                                                                                                           \
186                  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));                                                     \
187                    *((out_buf) + (out_buf_offset) + (size_t)(tag_out_len)) = '\0';                                                             \
188                    (line_width) += str_length((out_buf) + (out_buf_offset), 1);                                                                \
189                  (out_buf_offset) += (tag_out_len);                                                                                          \                  (out_buf_offset) += (tag_out_len);                                                                                          \
190          }          }
191    
192  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)
193  {  {
194            clock_t clock_begin;
195            clock_t clock_end;
196    
197          char c;          char c;
198          char tag_param_buf[LML_TAG_PARAM_BUF_LEN];          char tag_param_buf[LML_TAG_PARAM_BUF_LEN];
199          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 208  int lml_render(const char *str_in, char
208          int new_line = 1;          int new_line = 1;
209          int fb_quote_level = 0;          int fb_quote_level = 0;
210          int tag_name_found;          int tag_name_found;
211            int line_width = 0;
212            char tab_spaces[TAB_SIZE + 1];
213            int tab_width = 0;
214    
215            clock_begin = clock();
216    
217          lml_init();          lml_init();
218    
219          lml_tag_disabled = 0;          lml_tag_disabled = 0;
220          lml_tag_quote_level = 0;          lml_tag_quote_level = 0;
221    
222            if (width <= 0)
223            {
224                    width = INT_MAX;
225            }
226    
227          for (i = 0; str_in[i] != '\0'; i++)          for (i = 0; str_in[i] != '\0'; i++)
228          {          {
229                  if (!quote_mode && !lml_tag_disabled && new_line)                  if (!lml_tag_disabled && new_line)
230                  {                  {
231                          fb_quote_level = 0;                          while (str_in[i] == ':' && str_in[i + 1] == ' ') // FB2000 quote leading str
   
                         while (str_in[i + fb_quote_level * 2] == ':' && str_in[i + fb_quote_level * 2 + 1] == ' ') // FB2000 quote leading str  
232                          {                          {
233                                  fb_quote_level++;                                  fb_quote_level++;
234                                    lml_tag_quote_level++;
235                                    i += 2;
236                          }                          }
237    
238                          lml_tag_quote_level += fb_quote_level;                          if (!quote_mode && lml_tag_quote_level > 0)
   
                         if (lml_tag_quote_level > 0)  
239                          {                          {
240                                  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",
241                                                                                    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]);
242                                  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);
243                            }
244    
245                            for (k = 0; k < fb_quote_level; k++)
246                            {
247                                    tag_output_buf[k * 2] = ':';
248                                    tag_output_buf[k * 2 + 1] = ' ';
249                          }                          }
250                            tag_output_buf[fb_quote_level * 2] = '\0';
251                            tag_output_len = fb_quote_level * 2;
252                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len, line_width);
253    
254                          new_line = 0;                          new_line = 0;
255                  }                  }
256    
257                  if (str_in[i] == '\033' && str_in[i + 1] == '[') // Escape sequence -- copy directly                  if (lml_tag_disabled && new_line)
258                  {                  {
259                          for (k = i + 2; str_in[k] != '\0' && str_in[k] != 'm' && str_in[k] != '\033'; k++)                          new_line = 0;
260                    }
261    
262                    if (!quote_mode && !lml_tag_disabled && str_in[i] == '\033' && str_in[i + 1] == '[') // Escape sequence
263                    {
264                            for (k = i + 2; isdigit(str_in[k]) || str_in[k] == ';' || str_in[k] == '?'; k++)
265                                  ;                                  ;
266    
267                          if (str_in[k] != 'm') // invalid                          if (str_in[k] == 'm') // valid -- copy directly
268                            {
269                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, k - i + 1, line_width);
270                            }
271                            else if (isalpha(str_in[k]))
272                            {
273                                    // unsupported ANSI CSI command
274                            }
275                            else
276                          {                          {
277                                  k--;                                  k--;
278                          }                          }
279    
                         CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, k - i + 1);  
280                          i = k;                          i = k;
281                          continue;                          continue;
282                  }                  }
283    
284                  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
285                  {                  {
286                          if (tag_start_pos != -1) // tag is not closed                          if (!lml_tag_disabled && tag_start_pos != -1) // tag is not closed
287                          {                          {
288                                  tag_end_pos = i - 1;                                  if (line_width + 1 > width)
289                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  {
290                                  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);
291                                            new_line = 1;
292                                            line_width = 0;
293                                            i--; // redo at current i
294                                            continue;
295                                    }
296    
297                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "[", 1, line_width);
298                                    i = tag_start_pos; // restart from tag_start_pos + 1
299                                    tag_start_pos = -1;
300                                    tag_name_pos = -1;
301                                    continue;
302                          }                          }
303    
304                          if (fb_quote_level > 0)                          if (!lml_tag_disabled && fb_quote_level > 0)
305                          {                          {
306                                  lml_tag_quote_level -= fb_quote_level;                                  lml_tag_quote_level -= fb_quote_level;
307    
308                                  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"));
309                                  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);
310    
311                                    fb_quote_level = 0;
312                            }
313    
314                            if (new_line)
315                            {
316                                    continue;
317                          }                          }
318    
319                          tag_start_pos = -1;                          tag_start_pos = -1;
320                          tag_name_pos = -1;                          tag_name_pos = -1;
321                          new_line = 1;                          new_line = 1;
322                            line_width = -1;
323                  }                  }
324                  else if (str_in[i] == '\r')                  else if (str_in[i] == '\r' || str_in[i] == '\7')
325                  {                  {
326                          continue; // ignore '\r'                          continue; // Skip special characters
327                    }
328                    else if (str_in[i] == '\t')
329                    {
330                            tab_width = TAB_SIZE - (line_width % TAB_SIZE);
331                            if (line_width + tab_width > width)
332                            {
333                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "\n", 1, line_width);
334                                    new_line = 1;
335                                    line_width = 0;
336                                    // skip current Tab
337                                    continue;
338                            }
339    
340                            for (k = 0; k < tab_width; k++)
341                            {
342                                    tab_spaces[k] = ' ';
343                            }
344                            tab_spaces[tab_width] = '\0';
345                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tab_spaces, tab_width, line_width);
346                            continue;
347                  }                  }
348    
349                  if (!lml_tag_disabled && str_in[i] == '[')                  if (!lml_tag_disabled && str_in[i] == '[')
350                  {                  {
351                          if (tag_start_pos != -1) // tag is not closed                          if (tag_start_pos != -1) // tag is not closed
352                          {                          {
353                                  tag_end_pos = i - 1;                                  if (line_width + 1 > width)
354                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  {
355                                  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);
356                                            new_line = 1;
357                                            line_width = 0;
358                                            i--; // redo at current i
359                                            continue;
360                                    }
361    
362                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "[", 1, line_width);
363                                    i = tag_start_pos; // restart from tag_start_pos + 1
364                                    tag_start_pos = -1;
365                                    tag_name_pos = -1;
366                                    continue;
367                          }                          }
368    
369                          tag_start_pos = i;                          tag_start_pos = i;
# Line 298  int lml_render(const char *str_in, char Line 379  int lml_render(const char *str_in, char
379                                  tag_name_pos++;                                  tag_name_pos++;
380                          }                          }
381    
382                          for (tag_name_found = 0, k = 0; k < LML_TAG_COUNT; k++)                          for (tag_name_found = 0, k = 0; k < lml_tag_count; k++)
383                          {                          {
384                                  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)
385                                  {                                  {
# Line 346  int lml_render(const char *str_in, char Line 427  int lml_render(const char *str_in, char
427                                                                          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);
428                                                          }                                                          }
429                                                  }                                                  }
430                                                  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);
431                                                  break;                                                  break;
432                                          default: // tag_name not match                                          default: // tag_name not match
433                                                  continue;                                                  continue;
# Line 357  int lml_render(const char *str_in, char Line 438  int lml_render(const char *str_in, char
438    
439                          if (!tag_name_found)                          if (!tag_name_found)
440                          {                          {
441                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  if (line_width + 1 > width)
442                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len);                                  {
443                                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "\n", 1, line_width);
444                                            new_line = 1;
445                                            line_width = 0;
446                                            i--; // redo at current i
447                                            continue;
448                                    }
449    
450                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "[", 1, line_width);
451                                    i = tag_start_pos; // restart from tag_start_pos + 1
452                                    tag_start_pos = -1;
453                                    tag_name_pos = -1;
454                                    continue;
455                          }                          }
456    
457                          tag_start_pos = -1;                          tag_start_pos = -1;
# Line 366  int lml_render(const char *str_in, char Line 459  int lml_render(const char *str_in, char
459                  }                  }
460                  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
461                  {                  {
462                          if (str_in[i] & 0x80) // head of multi-byte character                          if (line_width + (str_in[i] & 0x80 ? 2 : 1) > width)
463                          {                          {
464                                  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);
465                                  {                                  new_line = 1;
466                                          log_error("Buffer is not longer enough for output string %ld >= %d\n", j + 4, buf_len);                                  line_width = 0;
467                                          str_out[j] = '\0';                                  i--; // redo at current i
468                                          return j;                                  continue;
469                                  }                          }
470    
471                            tag_output_len = 1;
472                            if (str_in[i] & 0x80) // head of multi-byte character
473                            {
474                                  c = (str_in[i] & 0x70) << 1;                                  c = (str_in[i] & 0x70) << 1;
475                                  while (c & 0x80)                                  while (c & 0x80)
476                                  {                                  {
477                                          str_out[j++] = str_in[i++];                                          if (str_in[i + tag_output_len] == '\0')
                                         if (str_in[i] == '\0')  
478                                          {                                          {
479                                                  str_out[j] = '\0';                                                  break;
                                                 return j;  
480                                          }                                          }
481                                            tag_output_len++;
482                                          c = (c & 0x7f) << 1;                                          c = (c & 0x7f) << 1;
483                                  }                                  }
484                          }                          }
485    
486                          if (j + 1 >= buf_len)                          CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, tag_output_len, line_width);
487                          {                          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];  
488                  }                  }
489                  else // in LML tag                  else // in LML tag
490                  {                  {
# Line 402  int lml_render(const char *str_in, char Line 492  int lml_render(const char *str_in, char
492                  }                  }
493          }          }
494    
495          if (tag_start_pos != -1) // tag is not closed          if (!lml_tag_disabled && tag_start_pos != -1) // tag is not closed
496          {          {
497                  tag_end_pos = i - 1;                  tag_end_pos = i - 1;
498                  tag_output_len = tag_end_pos - tag_start_pos + 1;                  tag_output_len = tag_end_pos - tag_start_pos + 1;
499                  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);
500          }          }
501    
502          if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)          if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)
503          {          {
504                  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");
505                  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);
506          }          }
507    
508          str_out[j] = '\0';          str_out[j] = '\0';
509    
510            clock_end = clock();
511            lml_total_exec_duration += (clock_end - clock_begin);
512    
513          return j;          return j;
514  }  }

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