/[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.1 by sysadm, Mon Jun 2 15:01:55 2025 UTC Revision 1.27 by sysadm, Fri Oct 24 07:27:02 2025 UTC
# Line 14  Line 14 
14   *                                                                         *   *                                                                         *
15   ***************************************************************************/   ***************************************************************************/
16    
17    #include "common.h"
18  #include "lml.h"  #include "lml.h"
19  #include "log.h"  #include "log.h"
20  #include <stdio.h>  #include <stdio.h>
21  #include <string.h>  #include <string.h>
22  #include <sys/param.h>  #include <sys/param.h>
23    
24  #define LML_TAG_PARAM_MAX_LEN 20  #define LML_TAG_PARAM_BUF_LEN 256
25  #define LML_TAG_OUTPUT_BUF_LEN 256  #define LML_TAG_OUTPUT_BUF_LEN 1024
26    
27  #define LML_TAG_COUNT 21  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    
29  const static char *LML_tag_name[][2] = {  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)
30          {"left", "["},  {
31          {"right", "]"},          if (strcasecmp(tag_name, "color") == 0)
32          {"underline", "\033[4m"},          {
33          {"/underline", "\033[24m"},                  if (strcasecmp(tag_param_buf, "red") == 0)
34          {"u", "\033[4m"},                  {
35          {"/u", "\033[24m"},                          return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;31m");
36          {"url", ""},                  }
37          {"/url", "(Á´½Ó: %s)"},                  else if (strcasecmp(tag_param_buf, "green") == 0)
38          {"link", ""},                  {
39          {"/link", "(Á´½Ó: %s)"},                          return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;32m");
40          {"email", ""},                  }
41          {"/email", "(Email: %s)"},                  else if (strcasecmp(tag_param_buf, "yellow") == 0)
42          {"user", ""},                  {
43          {"/user", "(Óû§: %s)"},                          return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;33m");
44          {"article", ""},                  }
45          {"/article", "(ÎÄÕÂ: %s)"},                  else if (strcasecmp(tag_param_buf, "blue") == 0)
46          {"hide", ""},                  {
47          {"/hide", ""},                          return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;34m");
48          {"image", "(ͼƬ: %s)"},                  }
49          {"flash", "(Flash: %s)"},                  else if (strcasecmp(tag_param_buf, "magenta") == 0)
50          {"bwf", "\033[31m****\033[m"},                  {
51                            return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;35m");
52                    }
53                    else if (strcasecmp(tag_param_buf, "cyan") == 0)
54                    {
55                            return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;36m");
56                    }
57                    else if (strcasecmp(tag_param_buf, "black") == 0)
58                    {
59                            return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;30;47m");
60                    }
61            }
62            return 0;
63    }
64    
65    #define LML_TAG_QUOTE_MAX_LEVEL 10
66    #define LML_TAG_QUOTE_LEVEL_LOOP 3
67    
68    static const char *lml_tag_quote_color[] = {
69            "\033[33m", // yellow
70            "\033[32m", // green
71            "\033[35m", // magenta
72    };
73    
74    static int lml_tag_quote_level = 0;
75    
76    static int lml_tag_quote_filter(const char *tag_name, const char *tag_param_buf, char *tag_output_buf, size_t tag_output_buf_len, int quote_mode)
77    {
78            if (strcasecmp(tag_name, "quote") == 0)
79            {
80                    if (lml_tag_quote_level <= LML_TAG_QUOTE_MAX_LEVEL)
81                    {
82                            lml_tag_quote_level++;
83                    }
84                    return snprintf(tag_output_buf, tag_output_buf_len, "%s",
85                                                    lml_tag_quote_color[lml_tag_quote_level % LML_TAG_QUOTE_LEVEL_LOOP]);
86            }
87            else if (strcasecmp(tag_name, "/quote") == 0)
88            {
89                    if (lml_tag_quote_level > 0)
90                    {
91                            lml_tag_quote_level--;
92                    }
93                    return snprintf(tag_output_buf, tag_output_buf_len, "%s",
94                                                    (lml_tag_quote_level > 0 ? lml_tag_quote_color[lml_tag_quote_level % LML_TAG_QUOTE_LEVEL_LOOP] : "\033[m"));
95            }
96    
97            return 0;
98    }
99    
100    static int lml_tag_disabled = 0;
101    
102    static int lml_tag_disable_filter(const char *tag_name, const char *tag_param_buf, char *tag_output_buf, size_t tag_output_buf_len, int quote_mode)
103    {
104            lml_tag_disabled = 1;
105    
106            return snprintf(tag_output_buf, tag_output_buf_len, "%s", (quote_mode ? "[plain]" : ""));
107    }
108    
109    typedef struct lml_tag_def_t
110    {
111            const char *tag_name;                    // tag name
112            const char *tag_output;                  // output string
113            const char *default_param;               // default param string
114            const char *quote_mode_output;   // output string in quote mode
115            lml_tag_filter_cb tag_filter_cb; // tag filter callback
116    } LML_TAG_DEF;
117    
118    const LML_TAG_DEF lml_tag_def[] = {
119            // Definition of tuple: {lml_tag, lml_output, default_param, quote_mode_output, lml_filter_cb}
120            {"plain", NULL, NULL, NULL, lml_tag_disable_filter},
121            {"nolml", "", NULL, "", NULL},
122            {"lml", "", NULL, "", NULL},
123            {"left", "[", "", "[left]", NULL},
124            {"right", "]", "", "[right]", NULL},
125            {"bold", "\033[1m", "", "", NULL}, // does not work in Fterm
126            {"/bold", "\033[22m", NULL, "", NULL},
127            {"b", "\033[1m", "", "", NULL},
128            {"/b", "\033[22m", NULL, "", NULL},
129            {"italic", "\033[5m", "", "", NULL},   // use blink instead
130            {"/italic", "\033[m", NULL, "", NULL}, // \033[25m does not work in Fterm
131            {"i", "\033[5m", "", "", NULL},
132            {"/i", "\033[m", NULL, "", NULL},
133            {"underline", "\033[4m", "", "", NULL},
134            {"/underline", "\033[m", NULL, "", NULL}, // \033[24m does not work in Fterm
135            {"u", "\033[4m", "", "", NULL},
136            {"/u", "\033[m", NULL, "", NULL},
137            {"color", NULL, NULL, "", lml_tag_color_filter},
138            {"/color", "\033[m", NULL, "", NULL},
139            {"quote", NULL, NULL, "", lml_tag_quote_filter},
140            {"/quote", NULL, NULL, "", lml_tag_quote_filter},
141            {"url", "", "", "", NULL},
142            {"/url", "（链接: %s）", NULL, "", NULL},
143            {"link", "", "", "", NULL},
144            {"/link", "（链接: %s）", NULL, "", NULL},
145            {"email", "", "", "", NULL},
146            {"/email", "（Email: %s）", NULL, "", NULL},
147            {"user", "", "", "", NULL},
148            {"/user", "（用户: %s）", NULL, "", NULL},
149            {"article", "", "", "", NULL},
150            {"/article", "（文章: %s）", NULL, "", NULL},
151            {"image", "（图片: %s）", "", "%s", NULL},
152            {"flash", "（Flash: %s）", "", "", NULL},
153            {"bwf", "\033[1;31m****\033[m", "", "****", NULL},
154  };  };
155    
156  static int LML_tag_name_len[LML_TAG_COUNT];  #define LML_TAG_COUNT (sizeof(lml_tag_def) / sizeof(LML_TAG_DEF))
157  static int LML_init = 0;  
158    static int lml_tag_name_len[LML_TAG_COUNT];
159    static int lml_ready = 0;
160    
161  inline static void lml_init(void)  inline static void lml_init(void)
162  {  {
163          int i;          int i;
164    
165          if (!LML_init)          if (!lml_ready)
166          {          {
167                  for (i = 0; i < LML_TAG_COUNT; i++)                  for (i = 0; i < LML_TAG_COUNT; i++)
168                  {                  {
169                          LML_tag_name_len[i] = (int)strlen(LML_tag_name[i][0]);                          lml_tag_name_len[i] = (int)strlen(lml_tag_def[i].tag_name);
170                  }                  }
171    
172                  LML_init = 1;                  lml_ready = 1;
173          }          }
174  }  }
175    
176  int lml_plain(const char *str_in, char *str_out, int buf_len)  int lml_render(const char *str_in, char *str_out, int buf_len, int quote_mode)
177  {  {
178          char tag_param_buf[LML_TAG_PARAM_MAX_LEN + 1];          char c;
179            char tag_param_buf[LML_TAG_PARAM_BUF_LEN];
180          char tag_output_buf[LML_TAG_OUTPUT_BUF_LEN];          char tag_output_buf[LML_TAG_OUTPUT_BUF_LEN];
181          int i;          int i;
182          int j = 0;          int j = 0;
183          int k;          int k;
184          int tag_start_pos = -1;          int tag_start_pos = -1;
185            int tag_name_pos = -1;
186          int tag_end_pos = -1;          int tag_end_pos = -1;
187          int tag_param_pos;          int tag_param_pos = -1;
188          int tag_output_len;          int tag_output_len;
189            int new_line = 1;
190            int fb_quote_level = 0;
191            int tag_name_found;
192    
193          lml_init();          lml_init();
194    
195            lml_tag_disabled = 0;
196            lml_tag_quote_level = 0;
197    
198          for (i = 0; str_in[i] != '\0'; i++)          for (i = 0; str_in[i] != '\0'; i++)
199          {          {
200                  if (str_in[i] == '[')                  if (!quote_mode && !lml_tag_disabled && new_line)
201                    {
202                            if (fb_quote_level > 0)
203                            {
204                                    lml_tag_quote_level -= fb_quote_level;
205    
206                                    tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "%s",
207                                                                                      (lml_tag_quote_level > 0 ? lml_tag_quote_color[lml_tag_quote_level % LML_TAG_QUOTE_LEVEL_LOOP] : "\033[m"));
208                                    if (j + tag_output_len >= buf_len)
209                                    {
210                                            log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
211                                            str_out[j] = '\0';
212                                            return j;
213                                    }
214                                    memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);
215                                    j += tag_output_len;
216    
217                                    fb_quote_level = 0;
218                            }
219    
220                            while (str_in[i + fb_quote_level * 2] == ':' && str_in[i + fb_quote_level * 2 + 1] == ' ') // FB2000 quote leading str
221                            {
222                                    fb_quote_level++;
223                            }
224    
225                            if (fb_quote_level > 0)
226                            {
227                                    lml_tag_quote_level += fb_quote_level;
228    
229                                    tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "%s",
230                                                                                      lml_tag_quote_color[(lml_tag_quote_level) % LML_TAG_QUOTE_LEVEL_LOOP]);
231                                    if (j + tag_output_len >= buf_len)
232                                    {
233                                            log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
234                                            str_out[j] = '\0';
235                                            return j;
236                                    }
237                                    memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);
238                                    j += tag_output_len;
239                            }
240    
241                            new_line = 0;
242                    }
243    
244                    if (str_in[i] == '\033' && str_in[i + 1] == '[') // Escape sequence -- copy directly
245                    {
246                            for (k = i + 2; str_in[k] != '\0' && str_in[k] != 'm'; k++)
247                                    ;
248    
249                            if (str_in[k] == 'm') // Valid
250                            {
251                                    if (j + (k - i + 1) >= buf_len)
252                                    {
253                                            log_error("Buffer is not longer enough for output string %d >= %d\n", j + (k - i + 1), buf_len);
254                                            str_out[j] = '\0';
255                                            return j;
256                                    }
257                                    memcpy(str_out + j, str_in + i, (size_t)(k - i + 1));
258                                    j += (k - i + 1);
259                                    i = k;
260                                    continue;
261                            }
262                            else // reach end of string
263                            {
264                                    break;
265                            }
266                    }
267    
268                    if (str_in[i] == '\n')
269                    {
270                            tag_name_pos = -1; // jump out of tag at end of line
271                            new_line = 1;
272                    }
273                    else if (str_in[i] == '\r')
274                  {                  {
275                          tag_start_pos = i + 1;                          continue; // ignore '\r'
276                  }                  }
277                  else if (str_in[i] == ']')  
278                    if (!lml_tag_disabled && str_in[i] == '[')
279                  {                  {
280                          if (tag_start_pos >= 0)                          tag_start_pos = i;
281                            tag_name_pos = i + 1;
282                    }
283                    else if (!lml_tag_disabled && str_in[i] == ']')
284                    {
285                            if (tag_name_pos >= 0)
286                          {                          {
287                                  tag_end_pos = i;                                  tag_end_pos = i;
288    
289                                  // Skip space characters                                  // Skip space characters
290                                  while (str_in[tag_start_pos] == ' ')                                  while (str_in[tag_name_pos] == ' ')
291                                  {                                  {
292                                          tag_start_pos++;                                          tag_name_pos++;
293                                  }                                  }
294    
295                                  for (k = 0; k < LML_TAG_COUNT; k++)                                  for (tag_name_found = 0, k = 0; k < LML_TAG_COUNT; k++)
296                                  {                                  {
297                                          if (strncasecmp(LML_tag_name[k][0], str_in + tag_start_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)
298                                          {                                          {
299                                                  switch (str_in[tag_start_pos + LML_tag_name_len[k]])                                                  tag_param_pos = -1;
300                                                    switch (str_in[tag_name_pos + lml_tag_name_len[k]])
301                                                  {                                                  {
302                                                  case ' ':                                                  case ' ':
303                                                          tag_param_pos = tag_start_pos + LML_tag_name_len[k] + 1;                                                          tag_name_found = 1;
304                                                            tag_param_pos = tag_name_pos + lml_tag_name_len[k] + 1;
305                                                          while (str_in[tag_param_pos] == ' ')                                                          while (str_in[tag_param_pos] == ' ')
306                                                          {                                                          {
307                                                                  tag_param_pos++;                                                                  tag_param_pos++;
308                                                          }                                                          }
309                                                          if (tag_end_pos - tag_param_pos > 0)                                                          strncpy(tag_param_buf, str_in + tag_param_pos, (size_t)MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_BUF_LEN));
310                                                            tag_param_buf[MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_BUF_LEN)] = '\0';
311                                                    case ']':
312                                                            tag_name_found = 1;
313                                                            if (tag_param_pos == -1 && lml_tag_def[k].tag_output != NULL && lml_tag_def[k].default_param != NULL) // Apply default param if not defined
314                                                            {
315                                                                    strncpy(tag_param_buf, lml_tag_def[k].default_param, LML_TAG_PARAM_BUF_LEN - 1);
316                                                                    tag_param_buf[LML_TAG_PARAM_BUF_LEN - 1] = '\0';
317                                                            }
318                                                            if (!quote_mode)
319                                                          {                                                          {
320                                                                  strncpy(tag_param_buf, str_in + tag_param_pos, (size_t)MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_MAX_LEN));                                                                  if (lml_tag_def[k].tag_output != NULL)
321                                                                  tag_param_buf[MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_MAX_LEN)] = '\0';                                                                  {
322                                                                            tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, lml_tag_def[k].tag_output, tag_param_buf);
323                                                                    }
324                                                                    else if (lml_tag_def[k].tag_filter_cb != NULL)
325                                                                    {
326                                                                            tag_output_len = lml_tag_def[k].tag_filter_cb(
327                                                                                    lml_tag_def[k].tag_name, tag_param_buf, tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, 0);
328                                                                    }
329                                                                    else
330                                                                    {
331                                                                            tag_output_len = 0;
332                                                                    }
333                                                          }                                                          }
334                                                  case ']':                                                          else // if (quote_mode)
                                                         tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, LML_tag_name[k][1], tag_param_buf);  
                                                         if (j + tag_output_len >= buf_len - 1)  
335                                                          {                                                          {
336                                                                  log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len - 1);                                                                  if (lml_tag_def[k].quote_mode_output != NULL)
337                                                                    {
338                                                                            tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, lml_tag_def[k].quote_mode_output, tag_param_buf);
339                                                                    }
340                                                                    else if (lml_tag_def[k].tag_filter_cb != NULL)
341                                                                    {
342                                                                            tag_output_len = lml_tag_def[k].tag_filter_cb(
343                                                                                    lml_tag_def[k].tag_name, tag_param_buf, tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, 1);
344                                                                    }
345                                                                    else
346                                                                    {
347                                                                            tag_output_len = 0;
348                                                                    }
349                                                            }
350                                                            if (j + tag_output_len >= buf_len)
351                                                            {
352                                                                    log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
353                                                                  str_out[j] = '\0';                                                                  str_out[j] = '\0';
354                                                                  return j;                                                                  return j;
355                                                          }                                                          }
# Line 134  int lml_plain(const char *str_in, char * Line 363  int lml_plain(const char *str_in, char *
363                                          }                                          }
364                                  }                                  }
365    
366                                    if (!tag_name_found)
367                                    {
368                                            tag_output_len = tag_end_pos - tag_start_pos + 1;
369                                            if (j + tag_output_len >= buf_len)
370                                            {
371                                                    log_error("Buffer is not longer enough for output string %ld >= %d\n", j + tag_output_len, buf_len);
372                                                    str_out[j] = '\0';
373                                                    return j;
374                                            }
375    
376                                            memcpy(str_out + j, str_in + tag_start_pos, (size_t)tag_output_len);
377                                            j += tag_output_len;
378                                    }
379    
380                                  tag_start_pos = -1;                                  tag_start_pos = -1;
381                                    tag_name_pos = -1;
382                          }                          }
383                  }                  }
384                  else if (tag_start_pos == -1) // not in LML tag                  else if (lml_tag_disabled || tag_name_pos == -1) // not in LML tag
385                  {                  {
386                          if (str_in[i] < 0 || str_in[i] > 127) // GBK chinese character                          if (str_in[i] & 0x80) // head of multi-byte character
387                          {                          {
388                                  if (j + 2 >= buf_len - 1)                                  if (j + 4 >= buf_len) // Assuming UTF-8 CJK characters use 4 bytes, though most of them actually use 3 bytes
389                                  {                                  {
390                                          log_error("Buffer is not longer enough for output string %ld >= %d\n", j + 2, buf_len - 1);                                          log_error("Buffer is not longer enough for output string %ld >= %d\n", j + 4, buf_len);
391                                          str_out[j] = '\0';                                          str_out[j] = '\0';
392                                          return j;                                          return j;
393                                  }                                  }
394                                  str_out[j++] = str_in[i++];  
395                                  if (str_in[i] == '\0')                                  c = (str_in[i] & 0x70) << 1;
396                                    while (c & 0x80)
397                                  {                                  {
398                                          str_out[j] = '\0';                                          str_out[j++] = str_in[i++];
399                                          return j;                                          if (str_in[i] == '\0')
400                                            {
401                                                    str_out[j] = '\0';
402                                                    return j;
403                                            }
404                                            c = (c & 0x7f) << 1;
405                                  }                                  }
406                          }                          }
407    
408                          if (j + 1 >= buf_len - 1)                          if (j + 1 >= buf_len)
409                          {                          {
410                                  log_error("Buffer is not longer enough for output string %ld >= %d\n", j + 1, buf_len - 1);                                  log_error("Buffer is not longer enough for output string %ld >= %d\n", j + 1, buf_len);
411                                  str_out[j] = '\0';                                  str_out[j] = '\0';
412                                  return j;                                  return j;
413                          }                          }
# Line 169  int lml_plain(const char *str_in, char * Line 419  int lml_plain(const char *str_in, char *
419                  }                  }
420          }          }
421    
422            if (tag_start_pos != -1) // tag is not closed
423            {
424                    tag_end_pos = i - 1;
425                    tag_output_len = tag_end_pos - tag_start_pos + 1;
426                    if (j + tag_output_len >= buf_len)
427                    {
428                            log_error("Buffer is not longer enough for output string %ld >= %d\n", j + tag_output_len, buf_len);
429                            str_out[j] = '\0';
430                            return j;
431                    }
432    
433                    memcpy(str_out + j, str_in + tag_start_pos, (size_t)tag_output_len);
434                    j += tag_output_len;
435            }
436    
437            if (!quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)
438            {
439                    tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "\033[m");
440                    if (j + tag_output_len >= buf_len)
441                    {
442                            log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
443                            str_out[j] = '\0';
444                            return j;
445                    }
446                    memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);
447                    j += tag_output_len;
448            }
449    
450          str_out[j] = '\0';          str_out[j] = '\0';
451    
452          return j;          return j;
453  }  }

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