/[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.7 by sysadm, Sat Jun 14 02:59:34 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 73  static const char *lml_tag_quote_color[] Line 73  static const char *lml_tag_quote_color[]
73    
74  static int lml_tag_quote_level = 0;  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)  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)          if (strcasecmp(tag_name, "quote") == 0)
79          {          {
# Line 81  static int lml_tag_quote_filter(const ch Line 81  static int lml_tag_quote_filter(const ch
81                  {                  {
82                          lml_tag_quote_level++;                          lml_tag_quote_level++;
83                  }                  }
84                  return snprintf(tag_output_buf, tag_output_buf_len, lml_tag_quote_color[lml_tag_quote_level % LML_TAG_QUOTE_LEVEL_LOOP]);                  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)          else if (strcasecmp(tag_name, "/quote") == 0)
88          {          {
# Line 89  static int lml_tag_quote_filter(const ch Line 90  static int lml_tag_quote_filter(const ch
90                  {                  {
91                          lml_tag_quote_level--;                          lml_tag_quote_level--;
92                  }                  }
93                  return snprintf(tag_output_buf, tag_output_buf_len,                  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"));                                                  (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;          return 0;
98  }  }
99    
100  const static char *LML_tag_def[][3] = {  static int lml_tag_disabled = 0;
101          {"left", "[", ""},  
102          {"right", "]", NULL},  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          {"bold", "\033[1m", ""}, // does not work in Fterm  {
104          {"/bold", "\033[22m", NULL},          lml_tag_disabled = 1;
105          {"b", "\033[1m", ""},  
106          {"/b", "\033[22m", NULL},          return snprintf(tag_output_buf, tag_output_buf_len, "%s", (quote_mode ? "" : "[plain]"));
107          {"italic", "\033[5m", ""},       // use blink instead  }
108          {"/italic", "\033[m", NULL}, // \033[25m does not work in Fterm  
109          {"i", "\033[5m", ""},  typedef struct lml_tag_def_t
110          {"/i", "\033[m", NULL},  {
111          {"underline", "\033[4m", ""},          const char *tag_name; // tag name
112          {"/underline", "\033[m", NULL}, // \033[24m does not work in Fterm          const char *tag_output; // output string
113          {"u", "\033[4m", ""},          const char *default_param; // default param string
114          {"/u", "\033[m", NULL},          const char *quote_mode_output; // output string in quote mode
115          {"color", NULL, (const char *)lml_tag_color_filter},          lml_tag_filter_cb tag_filter_cb; // tag filter callback
116          {"/color", "\033[m", NULL},  } LML_TAG_DEF;
117          {"quote", NULL, (const char *)lml_tag_quote_filter},  
118          {"/quote", NULL, (const char *)lml_tag_quote_filter},  const LML_TAG_DEF lml_tag_def[] = {
119          {"url", "", ""},          // Definition of tuple: {lml_tag, lml_output, default_param, quote_mode_output, lml_filter_cb}
120          {"/url", "(Á´½Ó: %s)", NULL},          {"plain", NULL, NULL, NULL, lml_tag_disable_filter},
121          {"link", "", ""},          {"left", "[", "", "[left]", NULL},
122          {"/link", "(Á´½Ó: %s)", NULL},          {"right", "]", "", "[right]", NULL},
123          {"email", "", ""},          {"bold", "\033[1m", "", "", NULL}, // does not work in Fterm
124          {"/email", "(Email: %s)", NULL},          {"/bold", "\033[22m", NULL, "", NULL},
125          {"user", "", ""},          {"b", "\033[1m", "", "", NULL},
126          {"/user", "(Óû§: %s)", NULL},          {"/b", "\033[22m", NULL, "", NULL},
127          {"article", "", ""},          {"italic", "\033[5m", "", "", NULL}, // use blink instead
128          {"/article", "(ÎÄÕÂ: %s)", NULL},          {"/italic", "\033[m", NULL, "", NULL}, // \033[25m does not work in Fterm
129          {"image", "(ͼƬ: %s)", ""},          {"i", "\033[5m", "", "", NULL},
130          {"flash", "(Flash: %s)", ""},          {"/i", "\033[m", NULL, "", NULL},
131          {"bwf", "\033[1;31m****\033[m", ""},          {"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 31  #define LML_TAG_COUNT 32
155    
156  static int LML_tag_name_len[LML_TAG_COUNT];  static int lml_tag_name_len[LML_TAG_COUNT];
157  static int LML_init = 0;  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 166  int lml_plain(const char *str_in, char * Line 188  int lml_plain(const char *str_in, char *
188    
189          lml_init();          lml_init();
190    
191            lml_tag_disabled = 0;
192          lml_tag_quote_level = 0;          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 (new_line)                  if (quote_mode && !lml_tag_disabled && new_line)
197                  {                  {
198                          if (fb_quote_level > 0)                          if (fb_quote_level > 0)
199                          {                          {
200                                  lml_tag_quote_level -= fb_quote_level;                                  lml_tag_quote_level -= fb_quote_level;
201    
202                                  tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN,                                  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"));                                                                                    (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 - 1)                                  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 - 1);                                          log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
207                                          str_out[j] = '\0';                                          str_out[j] = '\0';
208                                          return j;                                          return j;
209                                  }                                  }
# Line 199  int lml_plain(const char *str_in, char * Line 222  int lml_plain(const char *str_in, char *
222                          {                          {
223                                  lml_tag_quote_level += fb_quote_level;                                  lml_tag_quote_level += fb_quote_level;
224    
225                                  tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN,                                  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]);                                                                                    lml_tag_quote_color[(lml_tag_quote_level) % LML_TAG_QUOTE_LEVEL_LOOP]);
227                                  if (j + tag_output_len >= buf_len - 1)                                  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 - 1);                                          log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
230                                          str_out[j] = '\0';                                          str_out[j] = '\0';
231                                          return j;                                          return j;
232                                  }                                  }
# Line 214  int lml_plain(const char *str_in, char * Line 237  int lml_plain(const char *str_in, char *
237                          new_line = 0;                          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')                  if (str_in[i] == '\n')
265                  {                  {
266                          tag_start_pos = -1; // jump out of tag at end of line                          tag_start_pos = -1; // jump out of tag at end of line
# Line 224  int lml_plain(const char *str_in, char * Line 271  int lml_plain(const char *str_in, char *
271                          continue; // ignore '\r'                          continue; // ignore '\r'
272                  }                  }
273    
274                  if (str_in[i] == '[')                  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 242  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 256  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 289  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 321  int lml_plain(const char *str_in, char * Line 389  int lml_plain(const char *str_in, char *
389                  }                  }
390          }          }
391    
392          if (lml_tag_quote_level > 0)          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");                  tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "\033[m");
395                  if (j + tag_output_len >= buf_len - 1)                  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 - 1);                          log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
398                          str_out[j] = '\0';                          str_out[j] = '\0';
399                          return j;                          return j;
400                  }                  }

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