/[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.10 by sysadm, Mon Jun 16 14:30:44 2025 UTC
# Line 16  Line 16 
16    
17  #include "lml.h"  #include "lml.h"
18  #include "log.h"  #include "log.h"
19    #include "common.h"
20  #include <stdio.h>  #include <stdio.h>
21  #include <string.h>  #include <string.h>
22    #include <strings.h>
23  #include <sys/param.h>  #include <sys/param.h>
24    
25  #define LML_TAG_PARAM_MAX_LEN 20  #define LML_TAG_PARAM_BUF_LEN 256
26  #define LML_TAG_OUTPUT_BUF_LEN 256  #define LML_TAG_OUTPUT_BUF_LEN 1024
27    
28  #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);
29    
30  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)
31          {"left", "["},  {
32          {"right", "]"},          if (strcasecmp(tag_name, "color") == 0)
33          {"underline", "\033[4m"},          {
34          {"/underline", "\033[24m"},                  if (strcasecmp(tag_param_buf, "red") == 0)
35          {"u", "\033[4m"},                  {
36          {"/u", "\033[24m"},                          return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;31m");
37          {"url", ""},                  }
38          {"/url", "(链接: %s)"},                  else if (strcasecmp(tag_param_buf, "green") == 0)
39          {"link", ""},                  {
40          {"/link", "(链接: %s)"},                          return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;32m");
41          {"email", ""},                  }
42          {"/email", "(Email: %s)"},                  else if (strcasecmp(tag_param_buf, "yellow") == 0)
43          {"user", ""},                  {
44          {"/user", "(用户: %s)"},                          return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;33m");
45          {"article", ""},                  }
46          {"/article", "(文章: %s)"},                  else if (strcasecmp(tag_param_buf, "blue") == 0)
47          {"hide", ""},                  {
48          {"/hide", ""},                          return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;34m");
49          {"image", "(图片: %s)"},                  }
50          {"flash", "(Flash: %s)"},                  else if (strcasecmp(tag_param_buf, "magenta") == 0)
51          {"bwf", "\033[31m****\033[m"},                  {
52                            return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;35m");
53                    }
54                    else if (strcasecmp(tag_param_buf, "cyan") == 0)
55                    {
56                            return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;36m");
57                    }
58                    else if (strcasecmp(tag_param_buf, "black") == 0)
59                    {
60                            return snprintf(tag_output_buf, tag_output_buf_len, "\033[1;30;47m");
61                    }
62            }
63            return 0;
64    }
65    
66    #define LML_TAG_QUOTE_MAX_LEVEL 10
67    #define LML_TAG_QUOTE_LEVEL_LOOP 3
68    
69    static const char *lml_tag_quote_color[] = {
70            "\033[33m", // yellow
71            "\033[32m", // green
72            "\033[35m", // magenta
73  };  };
74    
75    static int lml_tag_quote_level = 0;
76    
77    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)
78    {
79            if (strcasecmp(tag_name, "quote") == 0)
80            {
81                    if (lml_tag_quote_level <= LML_TAG_QUOTE_MAX_LEVEL)
82                    {
83                            lml_tag_quote_level++;
84                    }
85                    return snprintf(tag_output_buf, tag_output_buf_len, 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,
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    const static char *LML_tag_def[][3] = {
101            {"left", "[", ""},
102            {"right", "]", NULL},
103            {"bold", "\033[1m", ""}, // does not work in Fterm
104            {"/bold", "\033[22m", NULL},
105            {"b", "\033[1m", ""},
106            {"/b", "\033[22m", NULL},
107            {"italic", "\033[5m", ""},       // use blink instead
108            {"/italic", "\033[m", NULL}, // \033[25m does not work in Fterm
109            {"i", "\033[5m", ""},
110            {"/i", "\033[m", NULL},
111            {"underline", "\033[4m", ""},
112            {"/underline", "\033[m", NULL}, // \033[24m does not work in Fterm
113            {"u", "\033[4m", ""},
114            {"/u", "\033[m", NULL},
115            {"color", NULL, (const char *)lml_tag_color_filter},
116            {"/color", "\033[m", NULL},
117            {"quote", NULL, (const char *)lml_tag_quote_filter},
118            {"/quote", NULL, (const char *)lml_tag_quote_filter},
119            {"url", "", ""},
120            {"/url", "(链接: %s)", NULL},
121            {"link", "", ""},
122            {"/link", "(链接: %s)", NULL},
123            {"email", "", ""},
124            {"/email", "(Email: %s)", NULL},
125            {"user", "", ""},
126            {"/user", "(用户: %s)", NULL},
127            {"article", "", ""},
128            {"/article", "(文章: %s)", NULL},
129            {"image", "(图片: %s)", ""},
130            {"flash", "(Flash: %s)", ""},
131            {"bwf", "\033[1;31m****\033[m", ""},
132    };
133    
134    #define LML_TAG_COUNT 31
135    
136  static int LML_tag_name_len[LML_TAG_COUNT];  static int LML_tag_name_len[LML_TAG_COUNT];
137  static int LML_init = 0;  static int LML_init = 0;
138    
# Line 60  inline static void lml_init(void) Line 144  inline static void lml_init(void)
144          {          {
145                  for (i = 0; i < LML_TAG_COUNT; i++)                  for (i = 0; i < LML_TAG_COUNT; i++)
146                  {                  {
147                          LML_tag_name_len[i] = (int)strlen(LML_tag_name[i][0]);                          LML_tag_name_len[i] = (int)strlen(LML_tag_def[i][0]);
148                  }                  }
149    
150                  LML_init = 1;                  LML_init = 1;
# Line 69  inline static void lml_init(void) Line 153  inline static void lml_init(void)
153    
154  int lml_plain(const char *str_in, char *str_out, int buf_len)  int lml_plain(const char *str_in, char *str_out, int buf_len)
155  {  {
156          char tag_param_buf[LML_TAG_PARAM_MAX_LEN + 1];          char tag_param_buf[LML_TAG_PARAM_BUF_LEN];
157          char tag_output_buf[LML_TAG_OUTPUT_BUF_LEN];          char tag_output_buf[LML_TAG_OUTPUT_BUF_LEN];
158          int i;          int i;
159          int j = 0;          int j = 0;
160          int k;          int k;
161          int tag_start_pos = -1;          int tag_start_pos = -1;
162          int tag_end_pos = -1;          int tag_end_pos = -1;
163          int tag_param_pos;          int tag_param_pos = -1;
164          int tag_output_len;          int tag_output_len;
165            int new_line = 1;
166            int fb_quote_level = 0;
167    
168          lml_init();          lml_init();
169    
170            lml_tag_quote_level = 0;
171    
172          for (i = 0; str_in[i] != '\0'; i++)          for (i = 0; str_in[i] != '\0'; i++)
173          {          {
174                    if (new_line)
175                    {
176                            if (fb_quote_level > 0)
177                            {
178                                    lml_tag_quote_level -= fb_quote_level;
179    
180                                    tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN,
181                                                                                      (lml_tag_quote_level > 0 ? lml_tag_quote_color[lml_tag_quote_level % LML_TAG_QUOTE_LEVEL_LOOP] : "\033[m"));
182                                    if (j + tag_output_len >= buf_len)
183                                    {
184                                            log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
185                                            str_out[j] = '\0';
186                                            return j;
187                                    }
188                                    memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);
189                                    j += tag_output_len;
190    
191                                    fb_quote_level = 0;
192                            }
193    
194                            while (str_in[i + fb_quote_level * 2] == ':' && str_in[i + fb_quote_level * 2 + 1] == ' ') // FB2000 quote leading str
195                            {
196                                    fb_quote_level++;
197                            }
198    
199                            if (fb_quote_level > 0)
200                            {
201                                    lml_tag_quote_level += fb_quote_level;
202    
203                                    tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN,
204                                                                                      lml_tag_quote_color[(lml_tag_quote_level) % LML_TAG_QUOTE_LEVEL_LOOP]);
205                                    if (j + tag_output_len >= buf_len)
206                                    {
207                                            log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
208                                            str_out[j] = '\0';
209                                            return j;
210                                    }
211                                    memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);
212                                    j += tag_output_len;
213                            }
214    
215                            new_line = 0;
216                    }
217    
218                    if (str_in[i] == '\033' && str_in[i + 1] == '[') // Escape sequence -- copy directly
219                    {
220                            for (k = i + 2; str_in[k] != '\0' && str_in[k] != 'm'; k++)
221                                    ;
222    
223                            if (str_in[k] == 'm') // Valid
224                            {
225                                    if (j + (k - i + 1) >= buf_len)
226                                    {
227                                            log_error("Buffer is not longer enough for output string %d >= %d\n", j + (k - i + 1), buf_len);
228                                            str_out[j] = '\0';
229                                            return j;
230                                    }
231                                    memcpy(str_out + j, str_in + i, (size_t)(k - i + 1));
232                                    j += (k - i + 1);
233                                    i = k;
234                                    continue;
235                            }
236                            else // reach end of string
237                            {
238                                    break;
239                            }
240                    }
241    
242                    if (str_in[i] == '\n')
243                    {
244                            tag_start_pos = -1; // jump out of tag at end of line
245                            new_line = 1;
246                    }
247                    else if (str_in[i] == '\r')
248                    {
249                            continue; // ignore '\r'
250                    }
251    
252                  if (str_in[i] == '[')                  if (str_in[i] == '[')
253                  {                  {
254                          tag_start_pos = i + 1;                          tag_start_pos = i + 1;
# Line 101  int lml_plain(const char *str_in, char * Line 267  int lml_plain(const char *str_in, char *
267    
268                                  for (k = 0; k < LML_TAG_COUNT; k++)                                  for (k = 0; k < LML_TAG_COUNT; k++)
269                                  {                                  {
270                                          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][0], str_in + tag_start_pos, (size_t)LML_tag_name_len[k]) == 0)
271                                          {                                          {
272                                                    tag_param_pos = -1;
273                                                  switch (str_in[tag_start_pos + LML_tag_name_len[k]])                                                  switch (str_in[tag_start_pos + LML_tag_name_len[k]])
274                                                  {                                                  {
275                                                  case ' ':                                                  case ' ':
# Line 111  int lml_plain(const char *str_in, char * Line 278  int lml_plain(const char *str_in, char *
278                                                          {                                                          {
279                                                                  tag_param_pos++;                                                                  tag_param_pos++;
280                                                          }                                                          }
281                                                          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));
282                                                            tag_param_buf[MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_BUF_LEN)] = '\0';
283                                                    case ']':
284                                                            if (tag_param_pos == -1 && LML_tag_def[k][1] != NULL && LML_tag_def[k][2] != NULL) // Apply default param if not defined
285                                                            {
286                                                                    strncpy(tag_param_buf, LML_tag_def[k][2], LML_TAG_PARAM_BUF_LEN - 1);
287                                                                    tag_param_buf[LML_TAG_PARAM_BUF_LEN - 1] = '\0';
288                                                            }
289                                                            if (LML_tag_def[k][1] != NULL)
290                                                          {                                                          {
291                                                                  strncpy(tag_param_buf, str_in + tag_param_pos, (size_t)MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_MAX_LEN));                                                                  tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, LML_tag_def[k][1], tag_param_buf);
                                                                 tag_param_buf[MIN(tag_end_pos - tag_param_pos, LML_TAG_PARAM_MAX_LEN)] = '\0';  
292                                                          }                                                          }
293                                                  case ']':                                                          else
                                                         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)  
294                                                          {                                                          {
295                                                                  log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len - 1);                                                                  tag_output_len = ((lml_tag_filter_cb)LML_tag_def[k][2])(
296                                                                            LML_tag_def[k][0], tag_param_buf, tag_output_buf, LML_TAG_OUTPUT_BUF_LEN);
297                                                            }
298                                                            if (j + tag_output_len >= buf_len)
299                                                            {
300                                                                    log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
301                                                                  str_out[j] = '\0';                                                                  str_out[j] = '\0';
302                                                                  return j;                                                                  return j;
303                                                          }                                                          }
# Line 141  int lml_plain(const char *str_in, char * Line 318  int lml_plain(const char *str_in, char *
318                  {                  {
319                          if (str_in[i] < 0 || str_in[i] > 127) // GBK chinese character                          if (str_in[i] < 0 || str_in[i] > 127) // GBK chinese character
320                          {                          {
321                                  if (j + 2 >= buf_len - 1)                                  if (j + 2 >= buf_len)
322                                  {                                  {
323                                          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 + 2, buf_len);
324                                          str_out[j] = '\0';                                          str_out[j] = '\0';
325                                          return j;                                          return j;
326                                  }                                  }
# Line 155  int lml_plain(const char *str_in, char * Line 332  int lml_plain(const char *str_in, char *
332                                  }                                  }
333                          }                          }
334    
335                          if (j + 1 >= buf_len - 1)                          if (j + 1 >= buf_len)
336                          {                          {
337                                  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);
338                                  str_out[j] = '\0';                                  str_out[j] = '\0';
339                                  return j;                                  return j;
340                          }                          }
# Line 169  int lml_plain(const char *str_in, char * Line 346  int lml_plain(const char *str_in, char *
346                  }                  }
347          }          }
348    
349            if (lml_tag_quote_level > 0)
350            {
351                    tag_output_len = snprintf(tag_output_buf, LML_TAG_OUTPUT_BUF_LEN, "\033[m");
352                    if (j + tag_output_len >= buf_len)
353                    {
354                            log_error("Buffer is not longer enough for output string %d >= %d\n", j + tag_output_len, buf_len);
355                            str_out[j] = '\0';
356                            return j;
357                    }
358                    memcpy(str_out + j, tag_output_buf, (size_t)tag_output_len);
359                    j += tag_output_len;
360            }
361    
362          str_out[j] = '\0';          str_out[j] = '\0';
363    
364          return j;          return j;
365  }  }

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