/[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.42 by sysadm, Tue Nov 4 13:49:51 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 by 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>
# Line 24  Line 18 
18  #define LML_TAG_PARAM_BUF_LEN 256  #define LML_TAG_PARAM_BUF_LEN 256
19  #define LML_TAG_OUTPUT_BUF_LEN 1024  #define LML_TAG_OUTPUT_BUF_LEN 1024
20    
21    clock_t lml_total_exec_duration = 0;
22    
23  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);
24    
25  static int lml_tag_color_filter(const char *tag_name, const char *tag_param_buf, char *tag_output_buf, size_t tag_output_buf_len, int quote_mode)  static int lml_tag_color_filter(const char *tag_name, const char *tag_param_buf, char *tag_output_buf, size_t tag_output_buf_len, int quote_mode)
# Line 178  inline static void lml_init(void) Line 174  inline static void lml_init(void)
174          }          }
175  }  }
176    
177  #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)                             \
178  { \          {                                                                                                                               \
179          if ((out_buf_offset) + (tag_out_len) >= (out_buf_len)) \                  if ((out_buf_offset) + (tag_out_len) >= (out_buf_len))                                                                      \
180          { \                  {                                                                                                                           \
181                  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)); \
182                  out_buf[out_buf_offset] = '\0'; \                          out_buf[out_buf_offset] = '\0';                                                                                         \
183                  return (out_buf_offset); \                          return (out_buf_offset);                                                                                                \
184          } \                  }                                                                                                                           \
185          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));                                                     \
186          (out_buf_offset) += (tag_out_len); \                  *((out_buf) + (out_buf_offset) + (size_t)(tag_out_len)) = '\0';                                                             \
187  }                  (line_width) += str_length((out_buf) + (out_buf_offset), 1);                                                                \
188                    (out_buf_offset) += (tag_out_len);                                                                                          \
189            }
190    
191  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)
192  {  {
193            clock_t clock_begin;
194            clock_t clock_end;
195    
196          char c;          char c;
197          char tag_param_buf[LML_TAG_PARAM_BUF_LEN];          char tag_param_buf[LML_TAG_PARAM_BUF_LEN];
198          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 207  int lml_render(const char *str_in, char
207          int new_line = 1;          int new_line = 1;
208          int fb_quote_level = 0;          int fb_quote_level = 0;
209          int tag_name_found;          int tag_name_found;
210            int line_width = 0;
211    
212            clock_begin = clock();
213    
214          lml_init();          lml_init();
215    
216          lml_tag_disabled = 0;          lml_tag_disabled = 0;
217          lml_tag_quote_level = 0;          lml_tag_quote_level = 0;
218    
219            if (width <= 0)
220            {
221                    width = INT_MAX;
222            }
223    
224          for (i = 0; str_in[i] != '\0'; i++)          for (i = 0; str_in[i] != '\0'; i++)
225          {          {
226                  if (!quote_mode && !lml_tag_disabled && new_line)                  if (!lml_tag_disabled && new_line)
227                  {                  {
228                          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  
229                          {                          {
230                                  fb_quote_level++;                                  fb_quote_level++;
231                                    lml_tag_quote_level++;
232                                    i += 2;
233                          }                          }
234    
235                          lml_tag_quote_level += fb_quote_level;                          if (!quote_mode && lml_tag_quote_level > 0)
   
                         if (lml_tag_quote_level > 0)  
236                          {                          {
237                                  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",
238                                                                                    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]);
239                                  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);
240                            }
241    
242                            for (k = 0; k < fb_quote_level; k++)
243                            {
244                                    tag_output_buf[k * 2] = ':';
245                                    tag_output_buf[k * 2 + 1] = ' ';
246                          }                          }
247                            tag_output_buf[fb_quote_level * 2] = '\0';
248                            tag_output_len = fb_quote_level * 2;
249                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, tag_output_buf, tag_output_len, line_width);
250    
251                            new_line = 0;
252                    }
253    
254                    if (lml_tag_disabled && new_line)
255                    {
256                          new_line = 0;                          new_line = 0;
257                  }                  }
258    
259                  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
260                  {                  {
261                          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++)
262                                  ;                                  ;
263    
264                          if (str_in[k] == 'm') // Valid                          if (str_in[k] == 'm') // valid -- copy directly
265                          {                          {
266                                  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);
                                 i = k;  
                                 continue;  
267                          }                          }
268                          else // reach end of string                          else if (isalpha(str_in[k]))
269                          {                          {
270                                  break;                                  // unsupported ANSI CSI command
271                          }                          }
272                            else
273                            {
274                                    k--;
275                            }
276    
277                            i = k;
278                            continue;
279                  }                  }
280    
281                  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
282                  {                  {
283                          if (tag_start_pos != -1) // tag is not closed                          if (!lml_tag_disabled && tag_start_pos != -1) // tag is not closed
284                          {                          {
285                                  tag_end_pos = i - 1;                                  tag_end_pos = i - 1;
286                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  tag_output_len = tag_end_pos - tag_start_pos + 1;
287                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len);  
288                                    if (line_width + tag_output_len > width)
289                                    {
290                                            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                                    }
295                                    else
296                                    {
297                                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len, line_width);
298                                    }
299                          }                          }
300    
301                          if (fb_quote_level > 0)                          if (!lml_tag_disabled && fb_quote_level > 0)
302                          {                          {
303                                  lml_tag_quote_level -= fb_quote_level;                                  lml_tag_quote_level -= fb_quote_level;
304    
305                                  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"));
306                                  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);
307    
308                                    fb_quote_level = 0;
309                            }
310    
311                            if (new_line)
312                            {
313                                    continue;
314                          }                          }
315    
316                          tag_start_pos = -1;                          tag_start_pos = -1;
317                          tag_name_pos = -1;                          tag_name_pos = -1;
318                          new_line = 1;                          new_line = 1;
319                            line_width = -1;
320                  }                  }
321                  else if (str_in[i] == '\r')                  else if (str_in[i] == '\r' || str_in[i] == '\7')
322                  {                  {
323                          continue; // ignore '\r'                          continue; // Skip special characters
324                  }                  }
325    
326                  if (!lml_tag_disabled && str_in[i] == '[')                  if (!lml_tag_disabled && str_in[i] == '[')
# Line 284  int lml_render(const char *str_in, char Line 329  int lml_render(const char *str_in, char
329                          {                          {
330                                  tag_end_pos = i - 1;                                  tag_end_pos = i - 1;
331                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  tag_output_len = tag_end_pos - tag_start_pos + 1;
332                                  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);
333                          }                          }
334    
335                          tag_start_pos = i;                          tag_start_pos = i;
# Line 348  int lml_render(const char *str_in, char Line 393  int lml_render(const char *str_in, char
393                                                                          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);
394                                                          }                                                          }
395                                                  }                                                  }
396                                                  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);
397                                                  break;                                                  break;
398                                          default: // tag_name not match                                          default: // tag_name not match
399                                                  continue;                                                  continue;
# Line 359  int lml_render(const char *str_in, char Line 404  int lml_render(const char *str_in, char
404    
405                          if (!tag_name_found)                          if (!tag_name_found)
406                          {                          {
407                                  tag_output_len = tag_end_pos - tag_start_pos + 1;                                  if (line_width + 1 > width)
408                                  CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + tag_start_pos, tag_output_len);                                  {
409                                            CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "\n", 1, line_width);
410                                            new_line = 1;
411                                            line_width = 0;
412                                            i--; // redo at current i
413                                            continue;
414                                    }
415    
416                                    CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, "[", 1, line_width);
417                                    i = tag_start_pos; // restart from tag_start_pos + 1
418                                    tag_start_pos = -1;
419                                    tag_name_pos = -1;
420                                    continue;
421                          }                          }
422    
423                          tag_start_pos = -1;                          tag_start_pos = -1;
# Line 368  int lml_render(const char *str_in, char Line 425  int lml_render(const char *str_in, char
425                  }                  }
426                  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
427                  {                  {
428                          if (str_in[i] & 0x80) // head of multi-byte character                          if (line_width + (str_in[i] & 0x80 ? 2 : 1) > width)
429                          {                          {
430                                  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);
431                                  {                                  new_line = 1;
432                                          log_error("Buffer is not longer enough for output string %ld >= %d\n", j + 4, buf_len);                                  line_width = 0;
433                                          str_out[j] = '\0';                                  i--; // redo at current i
434                                          return j;                                  continue;
435                                  }                          }
436    
437                            tag_output_len = 1;
438                            if (str_in[i] & 0x80) // head of multi-byte character
439                            {
440                                  c = (str_in[i] & 0x70) << 1;                                  c = (str_in[i] & 0x70) << 1;
441                                  while (c & 0x80)                                  while (c & 0x80)
442                                  {                                  {
443                                          str_out[j++] = str_in[i++];                                          if (str_in[i + tag_output_len] == '\0')
                                         if (str_in[i] == '\0')  
444                                          {                                          {
445                                                  str_out[j] = '\0';                                                  break;
                                                 return j;  
446                                          }                                          }
447                                            tag_output_len++;
448                                          c = (c & 0x7f) << 1;                                          c = (c & 0x7f) << 1;
449                                  }                                  }
450                          }                          }
451    
452                          if (j + 1 >= buf_len)                          CHECK_AND_APPEND_OUTPUT(str_out, buf_len, j, str_in + i, tag_output_len, line_width);
453                          {                          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];  
454                  }                  }
455                  else // in LML tag                  else // in LML tag
456                  {                  {
# Line 404  int lml_render(const char *str_in, char Line 458  int lml_render(const char *str_in, char
458                  }                  }
459          }          }
460    
461          if (tag_start_pos != -1) // tag is not closed          if (!lml_tag_disabled && tag_start_pos != -1) // tag is not closed
462          {          {
463                  tag_end_pos = i - 1;                  tag_end_pos = i - 1;
464                  tag_output_len = tag_end_pos - tag_start_pos + 1;                  tag_output_len = tag_end_pos - tag_start_pos + 1;
465                  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);
466          }          }
467    
468          if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)          if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)
469          {          {
470                  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");
471                  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);
472          }          }
473    
474          str_out[j] = '\0';          str_out[j] = '\0';
475    
476            clock_end = clock();
477            lml_total_exec_duration += (clock_end - clock_begin);
478    
479          return j;          return j;
480  }  }

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