/[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.3 by sysadm, Tue Jun 3 00:57:27 2025 UTC Revision 1.22 by sysadm, Sat Oct 18 12:06:10 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"
 #include "common.h"  
20  #include <stdio.h>  #include <stdio.h>
21  #include <string.h>  #include <string.h>
22  #include <sys/param.h>  #include <sys/param.h>
# Line 24  Line 24 
24  #define LML_TAG_PARAM_BUF_LEN 256  #define LML_TAG_PARAM_BUF_LEN 256
25  #define LML_TAG_OUTPUT_BUF_LEN 1024  #define LML_TAG_OUTPUT_BUF_LEN 1024
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);  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  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)  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  {  {
31          if (strcasecmp(tag_name, "color") == 0)          if (strcasecmp(tag_name, "color") == 0)
32          {          {
# 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    
65  const static char *LML_tag_def[][3] = {  #define LML_TAG_QUOTE_MAX_LEVEL 10
66          {"left", "[", ""},  #define LML_TAG_QUOTE_LEVEL_LOOP 3
67          {"right", "]", NULL},  
68          {"bold", "\033[1m", ""},  static const char *lml_tag_quote_color[] = {
69          {"/bold", "\033[21m", NULL},          "\033[33m", // yellow
70          {"b", "\033[1m", ""},          "\033[32m", // green
71          {"/b", "\033[21m", NULL},          "\033[35m", // magenta
         {"italic", "\033[3m", ""},  
         {"/italic", "\033[23m", NULL},  
         {"i", "\033[3m", ""},  
         {"/i", "\033[23m", NULL},  
         {"underline", "\033[4m", ""},  
         {"/underline", "\033[24m", NULL},  
         {"u", "\033[4m", ""},  
         {"/u", "\033[24m", NULL},  
         {"color", NULL, (const char *)lml_tag_color_filter},  
         {"/color", "\033[m", NULL},  
         {"url", "", ""},  
         {"/url", "(Á´½Ó: %s)", NULL},  
         {"link", "", ""},  
         {"/link", "(Á´½Ó: %s)", NULL},  
         {"email", "", ""},  
         {"/email", "(Email: %s)", NULL},  
         {"user", "", ""},  
         {"/user", "(Óû§: %s)", NULL},  
         {"article", "", ""},  
         {"/article", "(ÎÄÕÂ: %s)", NULL},  
         {"image", "(ͼƬ: %s)", ""},  
         {"flash", "(Flash: %s)", ""},  
         {"bwf", "\033[1;31m****\033[m", ""},  
72  };  };
73    
74  #define LML_TAG_COUNT 29  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_name_len[LML_TAG_COUNT];  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  static int LML_init = 0;  {
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            {"left", "[", "", "[left]", NULL},
122            {"right", "]", "", "[right]", NULL},
123            {"bold", "\033[1m", "", "", NULL}, // does not work in Fterm
124            {"/bold", "\033[22m", NULL, "", NULL},
125            {"b", "\033[1m", "", "", NULL},
126            {"/b", "\033[22m", NULL, "", NULL},
127            {"italic", "\033[5m", "", "", NULL}, // use blink instead
128            {"/italic", "\033[m", NULL, "", NULL}, // \033[25m does not work in Fterm
129            {"i", "\033[5m", "", "", NULL},
130            {"/i", "\033[m", NULL, "", NULL},
131            {"underline", "\033[4m", "", "", NULL},
132            {"/underline", "\033[m", NULL, "", NULL}, // \033[24m does not work in Fterm
133            {"u", "\033[4m", "", "", NULL},
134            {"/u", "\033[m", NULL, "", NULL},
135            {"color", NULL, NULL, "", lml_tag_color_filter},
136            {"/color", "\033[m", NULL, "", NULL},
137            {"quote", NULL, NULL, "", lml_tag_quote_filter},
138            {"/quote", NULL, NULL, "", lml_tag_quote_filter},
139            {"url", "", "", "", NULL},
140            {"/url", "（链接: %s）", NULL, "", NULL},
141            {"link", "", "", "", NULL},
142            {"/link", "（链接: %s）", NULL, "", NULL},
143            {"email", "", "", "", NULL},
144            {"/email", "（Email: %s）", NULL, "", NULL},
145            {"user", "", "", "", NULL},
146            {"/user", "（用户: %s）", NULL, "", NULL},
147            {"article", "", "", "", NULL},
148            {"/article", "（文章: %s）", NULL, "", NULL},
149            {"image", "（图片: %s）", "", "%s", NULL},
150            {"flash", "（Flash: %s）", "", "", NULL},
151            {"bwf", "\033[1;31m****\033[m", "", "****", NULL},
152    };
153    
154    #define LML_TAG_COUNT 32
155    
156    static int lml_tag_name_len[LML_TAG_COUNT];
157    static int lml_ready = 0;
158    
159  inline static void lml_init(void)  inline static void lml_init(void)
160  {  {
161          int i;          int i;
162    
163          if (!LML_init)          if (!lml_ready)
164          {          {
165                  for (i = 0; i < LML_TAG_COUNT; i++)                  for (i = 0; i < LML_TAG_COUNT; i++)
166                  {                  {
167                          LML_tag_name_len[i] = (int)strlen(LML_tag_def[i][0]);                          lml_tag_name_len[i] = (int)strlen(lml_tag_def[i].tag_name);
168                  }                  }
169    
170                  LML_init = 1;                  lml_ready = 1;
171          }          }
172  }  }
173    
174  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)
175  {  {
176            char c;
177          char tag_param_buf[LML_TAG_PARAM_BUF_LEN];          char tag_param_buf[LML_TAG_PARAM_BUF_LEN];
178          char tag_output_buf[LML_TAG_OUTPUT_BUF_LEN];          char tag_output_buf[LML_TAG_OUTPUT_BUF_LEN];
179          int i;          int i;
# Line 125  int lml_plain(const char *str_in, char * Line 183  int lml_plain(const char *str_in, char *
183          int tag_end_pos = -1;          int tag_end_pos = -1;
184          int tag_param_pos = -1;          int tag_param_pos = -1;
185          int tag_output_len;          int tag_output_len;
186            int new_line = 1;
187            int fb_quote_level = 0;
188    
189          lml_init();          lml_init();
190    
191            lml_tag_disabled = 0;
192            lml_tag_quote_level = 0;
193    
194          for (i = 0; str_in[i] != '\0'; i++)          for (i = 0; str_in[i] != '\0'; i++)
195          {          {
196                  if (str_in[i] == '[')                  if (quote_mode && !lml_tag_disabled && new_line)
197                    {
198                            if (fb_quote_level > 0)
199                            {
200                                    lml_tag_quote_level -= fb_quote_level;
201    
202                                    tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "%s",
203                                                                                      (lml_tag_quote_level > 0 ? lml_tag_quote_color[lml_tag_quote_level % LML_TAG_QUOTE_LEVEL_LOOP] : "\033[m"));
204                                    if (j + tag_output_len >= buf_len)
205                                    {
206                                            log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
207                                            str_out[j] = '\0';
208                                            return j;
209                                    }
210                                    memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);
211                                    j += tag_output_len;
212    
213                                    fb_quote_level = 0;
214                            }
215    
216                            while (str_in[i + fb_quote_level * 2] == ':' && str_in[i + fb_quote_level * 2 + 1] == ' ') // FB2000 quote leading str
217                            {
218                                    fb_quote_level++;
219                            }
220    
221                            if (fb_quote_level > 0)
222                            {
223                                    lml_tag_quote_level += fb_quote_level;
224    
225                                    tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "%s",
226                                                                                      lml_tag_quote_color[(lml_tag_quote_level) % LML_TAG_QUOTE_LEVEL_LOOP]);
227                                    if (j + tag_output_len >= buf_len)
228                                    {
229                                            log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
230                                            str_out[j] = '\0';
231                                            return j;
232                                    }
233                                    memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);
234                                    j += tag_output_len;
235                            }
236    
237                            new_line = 0;
238                    }
239    
240                    if (str_in[i] == '\033' && str_in[i + 1] == '[') // Escape sequence -- copy directly
241                    {
242                            for (k = i + 2; str_in[k] != '\0' && str_in[k] != 'm'; k++)
243                                    ;
244    
245                            if (str_in[k] == 'm') // Valid
246                            {
247                                    if (j + (k - i + 1) >= buf_len)
248                                    {
249                                            log_error("Buffer is not longer enough for output string %d >= %d\n", j + (k - i + 1), buf_len);
250                                            str_out[j] = '\0';
251                                            return j;
252                                    }
253                                    memcpy(str_out + j, str_in + i, (size_t)(k - i + 1));
254                                    j += (k - i + 1);
255                                    i = k;
256                                    continue;
257                            }
258                            else // reach end of string
259                            {
260                                    break;
261                            }
262                    }
263    
264                    if (str_in[i] == '\n')
265                    {
266                            tag_start_pos = -1; // jump out of tag at end of line
267                            new_line = 1;
268                    }
269                    else if (str_in[i] == '\r')
270                    {
271                            continue; // ignore '\r'
272                    }
273    
274                    if (!lml_tag_disabled && str_in[i] == '[')
275                  {                  {
276                          tag_start_pos = i + 1;                          tag_start_pos = i + 1;
277                  }                  }
278                  else if (str_in[i] == ']')                  else if (!lml_tag_disabled && str_in[i] == ']')
279                  {                  {
280                          if (tag_start_pos >= 0)                          if (tag_start_pos >= 0)
281                          {                          {
# Line 148  int lml_plain(const char *str_in, char * Line 289  int lml_plain(const char *str_in, char *
289    
290                                  for (k = 0; k < LML_TAG_COUNT; k++)                                  for (k = 0; k < LML_TAG_COUNT; k++)
291                                  {                                  {
292                                          if (strncasecmp(LML_tag_def[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_start_pos, (size_t)lml_tag_name_len[k]) == 0)
293                                          {                                          {
294                                                  tag_param_pos = -1;                                                  tag_param_pos = -1;
295                                                  switch (str_in[tag_start_pos + LML_tag_name_len[k]])                                                  switch (str_in[tag_start_pos + lml_tag_name_len[k]])
296                                                  {                                                  {
297                                                  case ' ':                                                  case ' ':
298                                                          tag_param_pos = tag_start_pos + LML_tag_name_len[k] + 1;                                                          tag_param_pos = tag_start_pos + lml_tag_name_len[k] + 1;
299                                                          while (str_in[tag_param_pos] == ' ')                                                          while (str_in[tag_param_pos] == ' ')
300                                                          {                                                          {
301                                                                  tag_param_pos++;                                                                  tag_param_pos++;
# Line 162  int lml_plain(const char *str_in, char * Line 303  int lml_plain(const char *str_in, char *
303                                                          strncpy(tag_param_buf, str_in + tag_param_pos, (size_t)MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_BUF_LEN));                                                          strncpy(tag_param_buf, str_in + tag_param_pos, (size_t)MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_BUF_LEN));
304                                                          tag_param_buf[MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_BUF_LEN)] = '\0';                                                          tag_param_buf[MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_BUF_LEN)] = '\0';
305                                                  case ']':                                                  case ']':
306                                                          if (tag_param_pos == -1 && LML_tag_def[k][1] != NULL && LML_tag_def[k][2] != NULL) // Apply default param if not defined                                                          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
307                                                          {                                                          {
308                                                                  strncpy(tag_param_buf, LML_tag_def[k][2], LML_TAG_PARAM_BUF_LEN - 1);                                                                  strncpy(tag_param_buf, lml_tag_def[k].default_param, LML_TAG_PARAM_BUF_LEN - 1);
309                                                                  tag_param_buf[LML_TAG_PARAM_BUF_LEN - 1] = '\0';                                                                  tag_param_buf[LML_TAG_PARAM_BUF_LEN - 1] = '\0';
310                                                          }                                                          }
311                                                          if (LML_tag_def[k][1] != NULL)                                                          if (quote_mode)
312                                                          {                                                          {
313                                                                  tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, LML_tag_def[k][1], tag_param_buf);                                                                  if (lml_tag_def[k].tag_output != NULL)
314                                                                    {
315                                                                            tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, lml_tag_def[k].tag_output, tag_param_buf);
316                                                                    }
317                                                                    else
318                                                                    {
319                                                                            tag_output_len = lml_tag_def[k].tag_filter_cb(
320                                                                                    lml_tag_def[k].tag_name, tag_param_buf, tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, quote_mode);
321                                                                    }
322                                                          }                                                          }
323                                                          else                                                          else
324                                                          {                                                          {
325                                                                  tag_output_len = ((lml_tag_filter_cb)LML_tag_def[k][2])(                                                                  if (lml_tag_def[k].quote_mode_output != NULL)
326                                                                          LML_tag_def[k][0], tag_param_buf, tag_output_buf, LML_TAG_OUTPUT_BUF_LEN);                                                                  {
327                                                                            tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, lml_tag_def[k].quote_mode_output, tag_param_buf);
328                                                                    }
329                                                                    else
330                                                                    {
331                                                                            tag_output_len = lml_tag_def[k].tag_filter_cb(
332                                                                                    lml_tag_def[k].tag_name, tag_param_buf, tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, quote_mode);
333                                                                    }
334                                                          }                                                          }
335                                                          if (j + tag_output_len >= buf_len - 1)                                                          if (j + tag_output_len >= buf_len)
336                                                          {                                                          {
337                                                                  log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len - 1);                                                                  log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
338                                                                  str_out[j] = '\0';                                                                  str_out[j] = '\0';
339                                                                  return j;                                                                  return j;
340                                                          }                                                          }
# Line 195  int lml_plain(const char *str_in, char * Line 351  int lml_plain(const char *str_in, char *
351                                  tag_start_pos = -1;                                  tag_start_pos = -1;
352                          }                          }
353                  }                  }
354                  else if (tag_start_pos == -1) // not in LML tag                  else if (lml_tag_disabled || tag_start_pos == -1) // not in LML tag
355                  {                  {
356                          if (str_in[i] < 0 || str_in[i] > 127) // GBK chinese character                          if (str_in[i] & 0x80) // head of multi-byte character
357                          {                          {
358                                  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
359                                  {                                  {
360                                          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);
361                                          str_out[j] = '\0';                                          str_out[j] = '\0';
362                                          return j;                                          return j;
363                                  }                                  }
364                                  str_out[j++] = str_in[i++];  
365                                  if (str_in[i] == '\0')                                  c = (str_in[i] & 0x70) << 1;
366                                    while (c & 0x80)
367                                  {                                  {
368                                          str_out[j] = '\0';                                          str_out[j++] = str_in[i++];
369                                          return j;                                          if (str_in[i] == '\0')
370                                            {
371                                                    str_out[j] = '\0';
372                                                    return j;
373                                            }
374                                            c = (c & 0x7f) << 1;
375                                  }                                  }
376                          }                          }
377    
378                          if (j + 1 >= buf_len - 1)                          if (j + 1 >= buf_len)
379                          {                          {
380                                  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);
381                                  str_out[j] = '\0';                                  str_out[j] = '\0';
382                                  return j;                                  return j;
383                          }                          }
# Line 227  int lml_plain(const char *str_in, char * Line 389  int lml_plain(const char *str_in, char *
389                  }                  }
390          }          }
391    
392            if (quote_mode && !lml_tag_disabled && lml_tag_quote_level > 0)
393            {
394                    tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "\033[m");
395                    if (j + tag_output_len >= buf_len)
396                    {
397                            log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
398                            str_out[j] = '\0';
399                            return j;
400                    }
401                    memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);
402                    j += tag_output_len;
403            }
404    
405          str_out[j] = '\0';          str_out[j] = '\0';
406    
407          return j;          return j;
408  }  }

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