/[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.44 by sysadm, Wed Nov 5 04:19:21 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    
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' && str_in[k] != '\033'; k++)                          for (k = i + 2; isdigit(str_in[k]) || str_in[k] == ';' || str_in[k] == '?'; k++)
263                                  ;                                  ;
264    
265                          if (str_in[k] != 'm') // invalid                          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, line_width);
268                            }
269                            else if (isalpha(str_in[k]))
270                            {
271                                    // unsupported ANSI CSI command
272                            }
273                            else
274                          {                          {
275                                  k--;                                  k--;
276                          }                          }
277    
                         CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, k - i + 1);  
278                          i = k;                          i = k;
279                          continue;                          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;                                  tag_end_pos = i - 1;
287                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  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);  
289                                    if (line_width + tag_output_len > width)
290                                    {
291                                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "\n", 1, line_width);
292                                            new_line = 1;
293                                            line_width = 0;
294                                            i--; // redo at current i
295                                    }
296                                    else
297                                    {
298                                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len, line_width);
299                                    }
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] == '[')
# Line 282  int lml_render(const char *str_in, char Line 330  int lml_render(const char *str_in, char
330                          {                          {
331                                  tag_end_pos = i - 1;                                  tag_end_pos = i - 1;
332                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  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, str_in + tag_start_pos, tag_output_len, line_width);
334                          }                          }
335    
336                          tag_start_pos = i;                          tag_start_pos = i;
# Line 298  int lml_render(const char *str_in, char Line 346  int lml_render(const char *str_in, char
346                                  tag_name_pos++;                                  tag_name_pos++;
347                          }                          }
348    
349                          for (tag_name_found = 0, k = 0; k < LML_TAG_COUNT; k++)                          for (tag_name_found = 0, k = 0; k < lml_tag_count; k++)
350                          {                          {
351                                  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)
352                                  {                                  {
# Line 346  int lml_render(const char *str_in, char Line 394  int lml_render(const char *str_in, char
394                                                                          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);
395                                                          }                                                          }
396                                                  }                                                  }
397                                                  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);
398                                                  break;                                                  break;
399                                          default: // tag_name not match                                          default: // tag_name not match
400                                                  continue;                                                  continue;
# Line 357  int lml_render(const char *str_in, char Line 405  int lml_render(const char *str_in, char
405    
406                          if (!tag_name_found)                          if (!tag_name_found)
407                          {                          {
408                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  if (line_width + 1 > width)
409                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len);                                  {
410                                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "\n", 1, line_width);
411                                            new_line = 1;
412                                            line_width = 0;
413                                            i--; // redo at current i
414                                            continue;
415                                    }
416    
417                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "[", 1, line_width);
418                                    i = tag_start_pos; // restart from tag_start_pos + 1
419                                    tag_start_pos = -1;
420                                    tag_name_pos = -1;
421                                    continue;
422                          }                          }
423    
424                          tag_start_pos = -1;                          tag_start_pos = -1;
# Line 366  int lml_render(const char *str_in, char Line 426  int lml_render(const char *str_in, char
426                  }                  }
427                  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
428                  {                  {
429                          if (str_in[i] & 0x80) // head of multi-byte character                          if (line_width + (str_in[i] & 0x80 ? 2 : 1) > width)
430                          {                          {
431                                  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);
432                                  {                                  new_line = 1;
433                                          log_error("Buffer is not longer enough for output string %ld >= %d\n", j + 4, buf_len);                                  line_width = 0;
434                                          str_out[j] = '\0';                                  i--; // redo at current i
435                                          return j;                                  continue;
436                                  }                          }
437    
438                            tag_output_len = 1;
439                            if (str_in[i] & 0x80) // head of multi-byte character
440                            {
441                                  c = (str_in[i] & 0x70) << 1;                                  c = (str_in[i] & 0x70) << 1;
442                                  while (c & 0x80)                                  while (c & 0x80)
443                                  {                                  {
444                                          str_out[j++] = str_in[i++];                                          if (str_in[i + tag_output_len] == '\0')
                                         if (str_in[i] == '\0')  
445                                          {                                          {
446                                                  str_out[j] = '\0';                                                  break;
                                                 return j;  
447                                          }                                          }
448                                            tag_output_len++;
449                                          c = (c & 0x7f) << 1;                                          c = (c & 0x7f) << 1;
450                                  }                                  }
451                          }                          }
452    
453                          if (j + 1 >= buf_len)                          CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, tag_output_len, line_width);
454                          {                          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];  
455                  }                  }
456                  else // in LML tag                  else // in LML tag
457                  {                  {
# Line 402  int lml_render(const char *str_in, char Line 459  int lml_render(const char *str_in, char
459                  }                  }
460          }          }
461    
462          if (tag_start_pos != -1) // tag is not closed          if (!lml_tag_disabled && tag_start_pos != -1) // tag is not closed
463          {          {
464                  tag_end_pos = i - 1;                  tag_end_pos = i - 1;
465                  tag_output_len = tag_end_pos - tag_start_pos + 1;                  tag_output_len = tag_end_pos - tag_start_pos + 1;
466                  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);
467          }          }
468    
469          if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)          if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)
470          {          {
471                  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");
472                  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);
473          }          }
474    
475          str_out[j] = '\0';          str_out[j] = '\0';
476    
477            clock_end = clock();
478            lml_total_exec_duration += (clock_end - clock_begin);
479    
480          return j;          return j;
481  }  }

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