/[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.34 by sysadm, Wed Oct 29 14:45:43 2025 UTC Revision 1.45 by sysadm, Thu Nov 6 13:20:24 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          { \                  {                                                                                                                           \
182                  log_error("Buffer is not longer enough for output string %d >= %d\n", (out_buf_offset) + (tag_out_len), (out_buf_len)); \                          log_error("Buffer is not longer enough for output string %d >= %d\n", (out_buf_offset) + (tag_out_len), (out_buf_len)); \
183                  out_buf[out_buf_offset] = '\0'; \                          out_buf[out_buf_offset] = '\0';                                                                                         \
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_offset) += (tag_out_len); \                  *((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);                                                                                          \
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    
213            clock_begin = clock();
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                          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  
230                          {                          {
231                                  fb_quote_level++;                                  fb_quote_level++;
232                                    lml_tag_quote_level++;
233                                    i += 2;
234                          }                          }
235    
236                          lml_tag_quote_level += fb_quote_level;                          if (!quote_mode && lml_tag_quote_level > 0)
   
                         if (lml_tag_quote_level > 0)  
237                          {                          {
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                                  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);
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;
253                    }
254    
255                    if (lml_tag_disabled && new_line)
256                    {
257                          new_line = 0;                          new_line = 0;
258                  }                  }
259    
260                  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
261                  {                  {
262                          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++)
263                                  ;                                  ;
264    
265                          if (str_in[k] == 'm') // Valid                          if (str_in[k] == 'm') // valid -- copy directly
266                          {                          {
267                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, k - i + 1);                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, k - i + 1, line_width);
268                                  i = k;                          }
269                                  continue;                          else if (isalpha(str_in[k]))
270                            {
271                                    // unsupported ANSI CSI command
272                          }                          }
273                          else // reach end of string                          else
274                          {                          {
275                                  break;                                  k--;
276                          }                          }
277    
278                            i = k;
279                            continue;
280                  }                  }
281    
282                  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
283                  {                  {
284                          if (tag_start_pos != -1) // tag is not closed                          if (!lml_tag_disabled && tag_start_pos != -1) // tag is not closed
285                          {                          {
286                                  tag_end_pos = i - 1;                                  if (line_width + 1 > width)
287                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  {
288                                  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);
289                                            new_line = 1;
290                                            line_width = 0;
291                                            i--; // redo at current i
292                                            continue;
293                                    }
294    
295                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "[", 1, line_width);
296                                    i = tag_start_pos; // restart from tag_start_pos + 1
297                                    tag_start_pos = -1;
298                                    tag_name_pos = -1;
299                                    continue;
300                          }                          }
301    
302                          if (fb_quote_level > 0)                          if (!lml_tag_disabled && fb_quote_level > 0)
303                          {                          {
304                                  lml_tag_quote_level -= fb_quote_level;                                  lml_tag_quote_level -= fb_quote_level;
305    
306                                  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"));
307                                  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);
308    
309                                    fb_quote_level = 0;
310                            }
311    
312                            if (new_line)
313                            {
314                                    continue;
315                          }                          }
316    
317                          tag_start_pos = -1;                          tag_start_pos = -1;
318                          tag_name_pos = -1;                          tag_name_pos = -1;
319                          new_line = 1;                          new_line = 1;
320                            line_width = -1;
321                  }                  }
322                  else if (str_in[i] == '\r')                  else if (str_in[i] == '\r' || str_in[i] == '\7')
323                  {                  {
324                          continue; // ignore '\r'                          continue; // Skip special characters
325                  }                  }
326    
327                  if (!lml_tag_disabled && str_in[i] == '[')                  if (!lml_tag_disabled && str_in[i] == '[')
328                  {                  {
329                          if (tag_start_pos != -1) // tag is not closed                          if (tag_start_pos != -1) // tag is not closed
330                          {                          {
331                                  tag_end_pos = i - 1;                                  if (line_width + 1 > width)
332                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  {
333                                  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);
334                                            new_line = 1;
335                                            line_width = 0;
336                                            i--; // redo at current i
337                                            continue;
338                                    }
339    
340                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "[", 1, line_width);
341                                    i = tag_start_pos; // restart from tag_start_pos + 1
342                                    tag_start_pos = -1;
343                                    tag_name_pos = -1;
344                                    continue;
345                          }                          }
346    
347                          tag_start_pos = i;                          tag_start_pos = i;
# Line 300  int lml_render(const char *str_in, char Line 357  int lml_render(const char *str_in, char
357                                  tag_name_pos++;                                  tag_name_pos++;
358                          }                          }
359    
360                          for (tag_name_found = 0, k = 0; k < LML_TAG_COUNT; k++)                          for (tag_name_found = 0, k = 0; k < lml_tag_count; k++)
361                          {                          {
362                                  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)
363                                  {                                  {
# Line 348  int lml_render(const char *str_in, char Line 405  int lml_render(const char *str_in, char
405                                                                          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);
406                                                          }                                                          }
407                                                  }                                                  }
408                                                  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);
409                                                  break;                                                  break;
410                                          default: // tag_name not match                                          default: // tag_name not match
411                                                  continue;                                                  continue;
# Line 359  int lml_render(const char *str_in, char Line 416  int lml_render(const char *str_in, char
416    
417                          if (!tag_name_found)                          if (!tag_name_found)
418                          {                          {
419                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  if (line_width + 1 > width)
420                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len);                                  {
421                                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "\n", 1, line_width);
422                                            new_line = 1;
423                                            line_width = 0;
424                                            i--; // redo at current i
425                                            continue;
426                                    }
427    
428                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "[", 1, line_width);
429                                    i = tag_start_pos; // restart from tag_start_pos + 1
430                                    tag_start_pos = -1;
431                                    tag_name_pos = -1;
432                                    continue;
433                          }                          }
434    
435                          tag_start_pos = -1;                          tag_start_pos = -1;
# Line 368  int lml_render(const char *str_in, char Line 437  int lml_render(const char *str_in, char
437                  }                  }
438                  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
439                  {                  {
440                          if (str_in[i] & 0x80) // head of multi-byte character                          if (line_width + (str_in[i] & 0x80 ? 2 : 1) > width)
441                          {                          {
442                                  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);
443                                  {                                  new_line = 1;
444                                          log_error("Buffer is not longer enough for output string %ld >= %d\n", j + 4, buf_len);                                  line_width = 0;
445                                          str_out[j] = '\0';                                  i--; // redo at current i
446                                          return j;                                  continue;
447                                  }                          }
448    
449                            tag_output_len = 1;
450                            if (str_in[i] & 0x80) // head of multi-byte character
451                            {
452                                  c = (str_in[i] & 0x70) << 1;                                  c = (str_in[i] & 0x70) << 1;
453                                  while (c & 0x80)                                  while (c & 0x80)
454                                  {                                  {
455                                          str_out[j++] = str_in[i++];                                          if (str_in[i + tag_output_len] == '\0')
                                         if (str_in[i] == '\0')  
456                                          {                                          {
457                                                  str_out[j] = '\0';                                                  break;
                                                 return j;  
458                                          }                                          }
459                                            tag_output_len++;
460                                          c = (c & 0x7f) << 1;                                          c = (c & 0x7f) << 1;
461                                  }                                  }
462                          }                          }
463    
464                          if (j + 1 >= buf_len)                          CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, tag_output_len, line_width);
465                          {                          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];  
466                  }                  }
467                  else // in LML tag                  else // in LML tag
468                  {                  {
# Line 404  int lml_render(const char *str_in, char Line 470  int lml_render(const char *str_in, char
470                  }                  }
471          }          }
472    
473          if (tag_start_pos != -1) // tag is not closed          if (!lml_tag_disabled && tag_start_pos != -1) // tag is not closed
474          {          {
475                  tag_end_pos = i - 1;                  tag_end_pos = i - 1;
476                  tag_output_len = tag_end_pos - tag_start_pos + 1;                  tag_output_len = tag_end_pos - tag_start_pos + 1;
477                  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);
478          }          }
479    
480          if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)          if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)
481          {          {
482                  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");
483                  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);
484          }          }
485    
486          str_out[j] = '\0';          str_out[j] = '\0';
487    
488            clock_end = clock();
489            lml_total_exec_duration += (clock_end - clock_begin);
490    
491          return j;          return j;
492  }  }

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