/[LeafOK_CVS]/lbbs/src/editor.c
ViewVC logotype

Contents of /lbbs/src/editor.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.44 - (show annotations)
Wed Oct 1 11:32:50 2025 UTC (5 months, 2 weeks ago) by sysadm
Branch: MAIN
Changes since 1.43: +1 -0 lines
Content type: text/x-csrc
Add Ctrl-Q as alias of F1 in text editor

1 /***************************************************************************
2 editor.h - description
3 -------------------
4 copyright : (C) 2004-2025 by Leaflet
5 email : leaflet@leafok.com
6 ***************************************************************************/
7
8 /***************************************************************************
9 * *
10 * This program is free software; you can redistribute it and/or modify *
11 * it under the terms of the GNU General Public License as published by *
12 * the Free Software Foundation; either version 3 of the License, or *
13 * (at your option) any later version. *
14 * *
15 ***************************************************************************/
16
17 #include "bbs.h"
18 #include "common.h"
19 #include "editor.h"
20 #include "io.h"
21 #include "log.h"
22 #include "login.h"
23 #include "memory_pool.h"
24 #include "str_process.h"
25 #include <stdlib.h>
26 #include <string.h>
27 #include <sys/param.h>
28
29 #define EDITOR_ESC_DISPLAY_STR "\033[32m*\033[m"
30 #define EDITOR_MEM_POOL_LINE_PER_CHUNK 1000
31 #define EDITOR_MEM_POOL_CHUNK_LIMIT (MAX_EDITOR_DATA_LINES / EDITOR_MEM_POOL_LINE_PER_CHUNK + 1)
32
33 static MEMORY_POOL *p_mp_data_line;
34 static MEMORY_POOL *p_mp_editor_data;
35
36 int editor_memory_pool_init(void)
37 {
38 if (p_mp_data_line != NULL || p_mp_editor_data != NULL)
39 {
40 log_error("Editor mem pool already initialized\n");
41 return -1;
42 }
43
44 p_mp_data_line = memory_pool_init(MAX_EDITOR_DATA_LINE_LENGTH, EDITOR_MEM_POOL_LINE_PER_CHUNK, EDITOR_MEM_POOL_CHUNK_LIMIT);
45 if (p_mp_data_line == NULL)
46 {
47 log_error("Memory pool init error\n");
48 return -2;
49 }
50
51 p_mp_editor_data = memory_pool_init(sizeof(EDITOR_DATA), 1, 1);
52 if (p_mp_data_line == NULL)
53 {
54 log_error("Memory pool init error\n");
55 return -3;
56 }
57
58 return 0;
59 }
60
61 void editor_memory_pool_cleanup(void)
62 {
63 if (p_mp_data_line != NULL)
64 {
65 memory_pool_cleanup(p_mp_data_line);
66 p_mp_data_line = NULL;
67 }
68
69 if (p_mp_editor_data != NULL)
70 {
71 memory_pool_cleanup(p_mp_editor_data);
72 p_mp_editor_data = NULL;
73 }
74 }
75
76 EDITOR_DATA *editor_data_load(const char *p_data)
77 {
78 EDITOR_DATA *p_editor_data;
79 char *p_data_line = NULL;
80 long line_offsets[MAX_EDITOR_DATA_LINES + 1];
81 long current_data_line_length = 0;
82 long i;
83
84 if (p_data == NULL)
85 {
86 log_error("editor_data_load() error: NULL pointer\n");
87 return NULL;
88 }
89
90 p_editor_data = memory_pool_alloc(p_mp_editor_data);
91 if (p_editor_data == NULL)
92 {
93 log_error("memory_pool_alloc() error\n");
94 return NULL;
95 }
96
97 p_editor_data->display_line_total = split_data_lines(p_data, SCREEN_COLS, line_offsets, MAX_EDITOR_DATA_LINES + 1,
98 0, p_editor_data->display_line_widths);
99
100 for (i = 0; i < p_editor_data->display_line_total; i++)
101 {
102 p_editor_data->display_line_lengths[i] = line_offsets[i + 1] - line_offsets[i];
103
104 if (i == 0 ||
105 current_data_line_length + p_editor_data->display_line_lengths[i] + 1 > MAX_EDITOR_DATA_LINE_LENGTH ||
106 (p_editor_data->display_line_lengths[i - 1] > 0 && p_data[line_offsets[i - 1] + p_editor_data->display_line_lengths[i - 1] - 1] == '\n'))
107 {
108 // Allocate new data line
109 p_data_line = memory_pool_alloc(p_mp_data_line);
110 if (p_data_line == NULL)
111 {
112 log_error("memory_pool_alloc() error: i = %d\n", i);
113 // Cleanup
114 editor_data_cleanup(p_editor_data);
115 return NULL;
116 }
117
118 p_editor_data->p_display_lines[i] = p_data_line;
119 current_data_line_length = 0;
120 }
121 else
122 {
123 p_editor_data->p_display_lines[i] = p_editor_data->p_display_lines[i - 1] + p_editor_data->display_line_lengths[i - 1];
124 }
125
126 memcpy(p_editor_data->p_display_lines[i], p_data + line_offsets[i], (size_t)p_editor_data->display_line_lengths[i]);
127 current_data_line_length += p_editor_data->display_line_lengths[i];
128
129 // Trim \n from last line
130 if (i + 1 == p_editor_data->display_line_total &&
131 p_editor_data->display_line_lengths[i] > 0 &&
132 p_editor_data->p_display_lines[i][p_editor_data->display_line_lengths[i] - 1] == '\n')
133 {
134 p_editor_data->display_line_lengths[i]--;
135 p_editor_data->display_line_widths[i]--;
136 current_data_line_length--;
137 }
138 p_data_line[current_data_line_length] = '\0';
139 }
140
141 memset(p_editor_data->p_display_lines + p_editor_data->display_line_total, 0, MAX_EDITOR_DATA_LINES - (size_t)p_editor_data->display_line_total);
142
143 return p_editor_data;
144 }
145
146 long editor_data_save(const EDITOR_DATA *p_editor_data, char *p_data, size_t buf_len)
147 {
148 long current_pos = 0;
149 long i;
150
151 if (p_editor_data == NULL || p_data == NULL)
152 {
153 log_error("editor_data_save() error: NULL pointer\n");
154 return -1;
155 }
156
157 for (i = 0; i < p_editor_data->display_line_total; i++)
158 {
159 if (current_pos + p_editor_data->display_line_lengths[i] + 1 > buf_len)
160 {
161 log_error("Data buffer not longer enough %d > %d\n", current_pos + p_editor_data->display_line_lengths[i] + 1, buf_len);
162 p_data[current_pos] = '\0';
163 return -2;
164 }
165
166 memcpy(p_data + current_pos, p_editor_data->p_display_lines[i], (size_t)p_editor_data->display_line_lengths[i]);
167 current_pos += p_editor_data->display_line_lengths[i];
168 }
169
170 p_data[current_pos] = '\0';
171
172 return current_pos;
173 }
174
175 void editor_data_cleanup(EDITOR_DATA *p_editor_data)
176 {
177 char *p_data_line = NULL;
178 long i;
179
180 if (p_editor_data == NULL)
181 {
182 return;
183 }
184
185 for (i = 0; i < p_editor_data->display_line_total; i++)
186 {
187 if (p_data_line == NULL)
188 {
189 p_data_line = p_editor_data->p_display_lines[i];
190 }
191
192 if (p_editor_data->display_line_lengths[i] > 0 &&
193 p_editor_data->p_display_lines[i][p_editor_data->display_line_lengths[i] - 1] == '\n')
194 {
195 memory_pool_free(p_mp_data_line, p_data_line);
196 p_data_line = NULL;
197 }
198 }
199
200 if (p_data_line != NULL)
201 {
202 memory_pool_free(p_mp_data_line, p_data_line);
203 }
204
205 memory_pool_free(p_mp_editor_data, p_editor_data);
206 }
207
208 int editor_data_insert(EDITOR_DATA *p_editor_data, long *p_display_line, long *p_offset,
209 const char *str, int str_len, long *p_last_updated_line)
210 {
211 long display_line = *p_display_line;
212 long offset = *p_offset;
213 char *p_data_line = NULL;
214 long len_data_line;
215 long offset_data_line;
216 long last_display_line; // of data line
217 long line_offsets[MAX_EDITOR_DATA_LINE_LENGTH + 1];
218 int line_widths[MAX_EDITOR_DATA_LINE_LENGTH + 1];
219 long split_line_total;
220 long i;
221 int len;
222 int eol;
223 int display_len;
224
225 if (p_editor_data == NULL || p_last_updated_line == NULL)
226 {
227 log_error("editor_data_op() error: NULL pointer\n");
228 return -1;
229 }
230
231 // Get length of current data line
232 len_data_line = 0;
233 p_data_line = p_editor_data->p_display_lines[display_line];
234 for (i = display_line - 1; i >= 0; i--)
235 {
236 if (p_editor_data->display_line_lengths[i] > 0 &&
237 p_editor_data->p_display_lines[i][p_editor_data->display_line_lengths[i] - 1] == '\n') // reach end of prior data line
238 {
239 break;
240 }
241
242 len_data_line += p_editor_data->display_line_lengths[i];
243 p_data_line = p_editor_data->p_display_lines[i];
244 }
245 offset_data_line = len_data_line + offset;
246 last_display_line = p_editor_data->display_line_total - 1;
247 for (i = display_line; i < p_editor_data->display_line_total; i++)
248 {
249 len_data_line += p_editor_data->display_line_lengths[i];
250
251 if (p_editor_data->display_line_lengths[i] > 0 &&
252 p_editor_data->p_display_lines[i][p_editor_data->display_line_lengths[i] - 1] == '\n') // reach end of current data line
253 {
254 last_display_line = i;
255 break;
256 }
257 }
258
259 // Split current data line if over-length
260 if (len_data_line + str_len + 2 > MAX_EDITOR_DATA_LINE_LENGTH || str[0] == CR)
261 {
262 if (p_editor_data->display_line_total >= MAX_EDITOR_DATA_LINES)
263 {
264 #ifdef _DEBUG
265 log_error("Split line error, display_line_total(%ld) reach limit(%d)\n",
266 p_editor_data->display_line_total, MAX_EDITOR_DATA_LINES);
267 #endif
268
269 return -2;
270 }
271
272 // Allocate new data line
273 p_data_line = memory_pool_alloc(p_mp_data_line);
274 if (p_data_line == NULL)
275 {
276 log_error("memory_pool_alloc() error\n");
277 return -2;
278 }
279
280 if (offset_data_line + str_len + 2 >= MAX_EDITOR_DATA_LINE_LENGTH || str[0] == CR)
281 {
282 if (str[0] == CR)
283 {
284 str_len = 0;
285 }
286
287 // Copy str to new data line
288 memcpy(p_data_line, str, (size_t)str_len);
289
290 // Copy rest part of current data line to new data line
291 memcpy(p_data_line + str_len,
292 p_editor_data->p_display_lines[display_line] + offset,
293 (size_t)(len_data_line - offset_data_line));
294
295 p_data_line[str_len + len_data_line - offset_data_line] = '\0';
296
297 // Add line ending to current display line (data line)
298 p_editor_data->p_display_lines[display_line][offset] = '\n';
299 p_editor_data->p_display_lines[display_line][offset + 1] = '\0';
300 p_editor_data->display_line_lengths[display_line] = offset + 1;
301
302 *p_display_line = display_line + 1;
303 *p_offset = str_len;
304 }
305 else
306 {
307 // Copy rest part of current data line to new data line
308 memcpy(p_data_line,
309 p_editor_data->p_display_lines[display_line] + offset,
310 (size_t)(len_data_line - offset_data_line));
311
312 p_data_line[len_data_line - offset_data_line] = '\0';
313
314 // Append str to current display line
315 memcpy(p_editor_data->p_display_lines[display_line] + offset, str, (size_t)str_len);
316
317 // Add line ending to current display line (data line)
318 p_editor_data->p_display_lines[display_line][offset + str_len] = '\n';
319 p_editor_data->p_display_lines[display_line][offset + str_len + 1] = '\0';
320 p_editor_data->display_line_lengths[display_line] = offset + str_len + 1;
321
322 *p_display_line = display_line;
323 *p_offset = offset + str_len;
324 }
325
326 // Update display width of current display line
327 len = split_line(p_editor_data->p_display_lines[display_line], SCREEN_COLS, &eol, &display_len, 0);
328 p_editor_data->display_line_widths[display_line] = display_len;
329
330 split_line_total = last_display_line - display_line + 3;
331
332 // Set start display_line for spliting new data line
333 display_line++;
334
335 *p_last_updated_line = p_editor_data->display_line_total;
336 }
337 else // insert str into current data line at offset_data_line
338 {
339 memmove(p_data_line + offset_data_line + str_len, p_data_line + offset_data_line, (size_t)(len_data_line - offset_data_line));
340 memcpy(p_data_line + offset_data_line, str, (size_t)str_len);
341 p_data_line[len_data_line + str_len] = '\0';
342
343 // Set p_data_line to head of current display line
344 p_data_line = p_editor_data->p_display_lines[display_line];
345 split_line_total = last_display_line - display_line + 3;
346
347 *p_display_line = display_line;
348 *p_offset = offset + str_len;
349 }
350
351 // Split current data line since beginning of current display line
352 split_line_total = split_data_lines(p_data_line, SCREEN_COLS, line_offsets, split_line_total, 0, line_widths);
353
354 for (i = 0; i < split_line_total; i++)
355 {
356 if (display_line + i > last_display_line)
357 {
358 // Insert blank display line after last_display_line
359 if (p_editor_data->display_line_total >= MAX_EDITOR_DATA_LINES)
360 {
361 #ifdef _DEBUG
362 log_error("display_line_total over limit %d >= %d\n", p_editor_data->display_line_total, MAX_EDITOR_DATA_LINES);
363 #endif
364
365 // Terminate prior display line with \n, to avoid error on cleanup
366 if (display_line + i - 1 >= 0 && p_editor_data->display_line_lengths[display_line + i - 1] > 0)
367 {
368 len = split_line(p_editor_data->p_display_lines[display_line + i - 1], SCREEN_COLS - 1, &eol, &display_len, 0);
369 p_editor_data->p_display_lines[display_line + i - 1][len] = '\n';
370 p_editor_data->p_display_lines[display_line + i - 1][len + 1] = '\0';
371 p_editor_data->display_line_lengths[display_line + i - 1] = len + 1;
372 p_editor_data->display_line_widths[display_line + i - 1] = display_len;
373 }
374 if (*p_offset >= p_editor_data->display_line_lengths[*p_display_line])
375 {
376 *p_offset = p_editor_data->display_line_lengths[*p_display_line] - 1;
377 }
378 break;
379 }
380
381 // for (j = p_editor_data->display_line_total; j > last_display_line + 1; j--)
382 // {
383 // p_editor_data->p_display_lines[j] = p_editor_data->p_display_lines[j - 1];
384 // p_editor_data->display_line_lengths[j] = p_editor_data->display_line_lengths[j - 1];
385 // p_editor_data->display_line_widths[j] = p_editor_data->display_line_widths[j - 1];
386 // }
387 memmove(p_editor_data->p_display_lines + last_display_line + 2,
388 p_editor_data->p_display_lines + last_display_line + 1,
389 (size_t)(p_editor_data->display_line_total - last_display_line - 1) *
390 sizeof(p_editor_data->p_display_lines[last_display_line + 1]));
391 memmove(p_editor_data->display_line_lengths + last_display_line + 2,
392 p_editor_data->display_line_lengths + last_display_line + 1,
393 (size_t)(p_editor_data->display_line_total - last_display_line - 1) *
394 sizeof(p_editor_data->display_line_lengths[last_display_line + 1]));
395 memmove(p_editor_data->display_line_widths + last_display_line + 2,
396 p_editor_data->display_line_widths + last_display_line + 1,
397 (size_t)(p_editor_data->display_line_total - last_display_line - 1) *
398 sizeof(p_editor_data->display_line_widths[last_display_line + 1]));
399
400 last_display_line++;
401 *p_last_updated_line = p_editor_data->display_line_total;
402 (p_editor_data->display_line_total)++;
403 }
404
405 p_editor_data->display_line_lengths[display_line + i] = line_offsets[i + 1] - line_offsets[i];
406 p_editor_data->display_line_widths[display_line + i] = line_widths[i];
407 p_editor_data->p_display_lines[display_line + i] =
408 (i == 0
409 ? p_data_line
410 : (p_editor_data->p_display_lines[display_line + i - 1] + p_editor_data->display_line_lengths[display_line + i - 1]));
411
412 if (p_editor_data->display_line_lengths[display_line + i] > 0 &&
413 p_editor_data->p_display_lines[display_line + i][p_editor_data->display_line_lengths[display_line + i] - 1] == '\n')
414 {
415 break;
416 }
417 }
418
419 *p_last_updated_line = MAX(display_line + MIN(i, split_line_total - 1), *p_last_updated_line);
420
421 if (*p_offset >= p_editor_data->display_line_lengths[*p_display_line])
422 {
423 if (*p_display_line + 1 < p_editor_data->display_line_total)
424 {
425 *p_offset -= p_editor_data->display_line_lengths[*p_display_line];
426 (*p_display_line)++;
427 }
428 }
429
430 // Prevent the last display line from being over-length
431 if (p_editor_data->display_line_total == MAX_EDITOR_DATA_LINES)
432 {
433 len = split_line(p_editor_data->p_display_lines[p_editor_data->display_line_total - 1], SCREEN_COLS - 1, &eol, &display_len, 0);
434 p_editor_data->p_display_lines[p_editor_data->display_line_total - 1][len] = '\0';
435 p_editor_data->display_line_lengths[p_editor_data->display_line_total - 1] = len;
436 p_editor_data->display_line_widths[p_editor_data->display_line_total - 1] = display_len;
437 if (*p_display_line + 1 >= p_editor_data->display_line_total)
438 {
439 *p_offset = MIN(*p_offset, len);
440 *p_display_line = p_editor_data->display_line_total - 1;
441 }
442 }
443
444 return 0;
445 }
446
447 int editor_data_delete(EDITOR_DATA *p_editor_data, long *p_display_line, long *p_offset,
448 long *p_last_updated_line)
449 {
450 long display_line = *p_display_line;
451 long offset = *p_offset;
452 char *p_data_line = NULL;
453 long len_data_line;
454 long offset_data_line;
455 long last_display_line; // of data line
456 long line_offsets[MAX_EDITOR_DATA_LINE_LENGTH + 1];
457 int line_widths[MAX_EDITOR_DATA_LINE_LENGTH + 1];
458 long split_line_total;
459 long i, j;
460 int str_len = 0;
461 char c;
462
463 if (p_editor_data == NULL || p_last_updated_line == NULL)
464 {
465 log_error("editor_data_op() error: NULL pointer\n");
466 return -1;
467 }
468
469 // Get length of current data line
470 len_data_line = 0;
471 p_data_line = p_editor_data->p_display_lines[display_line];
472 for (i = display_line - 1; i >= 0; i--)
473 {
474 if (p_editor_data->display_line_lengths[i] > 0 &&
475 p_editor_data->p_display_lines[i][p_editor_data->display_line_lengths[i] - 1] == '\n') // reach end of prior data line
476 {
477 break;
478 }
479
480 len_data_line += p_editor_data->display_line_lengths[i];
481 p_data_line = p_editor_data->p_display_lines[i];
482 }
483 offset_data_line = len_data_line + offset;
484 last_display_line = p_editor_data->display_line_total - 1;
485 for (i = display_line; i < p_editor_data->display_line_total; i++)
486 {
487 len_data_line += p_editor_data->display_line_lengths[i];
488
489 if (p_editor_data->display_line_lengths[i] > 0 &&
490 p_editor_data->p_display_lines[i][p_editor_data->display_line_lengths[i] - 1] == '\n') // reach end of current data line
491 {
492 last_display_line = i;
493 break;
494 }
495 }
496
497 if (offset_data_line >= len_data_line) // end-of-line
498 {
499 return 0;
500 }
501
502 // Check str to be deleted
503 if (p_data_line[offset_data_line] > 0 && p_data_line[offset_data_line] < 127)
504 {
505 str_len = 1;
506 }
507 else if (p_data_line[offset_data_line] & 0b10000000) // head of multi-byte character
508 {
509 str_len = 1;
510 c = (p_data_line[offset_data_line] & 0b01110000) << 1;
511 while (c & 0b10000000)
512 {
513 str_len++;
514 c = (c & 0b01111111) << 1;
515 }
516 }
517 else
518 {
519 log_error("Some strange character at display_line %ld, offset %ld: %d %d\n",
520 display_line, offset, p_data_line[offset_data_line], p_data_line[offset_data_line + 1]);
521 str_len = 1;
522 }
523
524 // Current display line is (almost) empty
525 if (offset_data_line + str_len > len_data_line ||
526 (offset_data_line + str_len == len_data_line && p_data_line[offset_data_line] == '\n'))
527 {
528 if (display_line + 1 >= p_editor_data->display_line_total) // No additional display line (data line)
529 {
530 return 0;
531 }
532
533 len_data_line = 0; // Next data line
534 last_display_line = p_editor_data->display_line_total - 1;
535 for (i = display_line + 1; i < p_editor_data->display_line_total; i++)
536 {
537 len_data_line += p_editor_data->display_line_lengths[i];
538
539 if (p_editor_data->display_line_lengths[i] > 0 &&
540 p_editor_data->p_display_lines[i][p_editor_data->display_line_lengths[i] - 1] == '\n') // reach end of current data line
541 {
542 last_display_line = i;
543 break;
544 }
545 }
546
547 if (offset_data_line + len_data_line + 1 > MAX_EDITOR_DATA_LINE_LENGTH) // No enough buffer to merge current data line with next data line
548 {
549 return 0;
550 }
551
552 // Append next data line to current one
553 memcpy(p_data_line + offset_data_line, p_editor_data->p_display_lines[display_line + 1], (size_t)len_data_line);
554 p_data_line[offset_data_line + len_data_line] = '\0';
555
556 // Recycle next data line
557 memory_pool_free(p_mp_data_line, p_editor_data->p_display_lines[display_line + 1]);
558 }
559 else
560 {
561 memmove(p_data_line + offset_data_line, p_data_line + offset_data_line + str_len, (size_t)(len_data_line - offset_data_line - str_len));
562 p_data_line[len_data_line - str_len] = '\0';
563 len_data_line -= str_len;
564 }
565
566 // Set p_data_line to head of current display line
567 p_data_line = p_editor_data->p_display_lines[display_line];
568 split_line_total = last_display_line - display_line + 2;
569
570 // Split current data line since beginning of current display line
571 split_line_total = split_data_lines(p_data_line, SCREEN_COLS, line_offsets, split_line_total, 0, line_widths);
572
573 for (i = 0; i < split_line_total; i++)
574 {
575 p_editor_data->display_line_lengths[display_line + i] = line_offsets[i + 1] - line_offsets[i];
576 p_editor_data->display_line_widths[display_line + i] = line_widths[i];
577 p_editor_data->p_display_lines[display_line + i] =
578 (i == 0
579 ? p_data_line
580 : (p_editor_data->p_display_lines[display_line + i - 1] + p_editor_data->display_line_lengths[display_line + i - 1]));
581
582 if (p_editor_data->display_line_lengths[display_line + i] > 0 &&
583 p_editor_data->p_display_lines[display_line + i][p_editor_data->display_line_lengths[display_line + i] - 1] == '\n')
584 {
585 break;
586 }
587 }
588
589 *p_last_updated_line = display_line + MIN(i, split_line_total - 1);
590
591 if (*p_last_updated_line < last_display_line)
592 {
593 // Remove redundant display line after last_display_line
594 // for (j = last_display_line + 1; j < p_editor_data->display_line_total; j++)
595 // {
596 // p_editor_data->p_display_lines[j - (last_display_line - *p_last_updated_line)] = p_editor_data->p_display_lines[j];
597 // p_editor_data->display_line_lengths[j - (last_display_line - *p_last_updated_line)] = p_editor_data->display_line_lengths[j];
598 // p_editor_data->display_line_widths[j - (last_display_line - *p_last_updated_line)] = p_editor_data->display_line_widths[j];
599 // }
600 memmove(p_editor_data->p_display_lines + *p_last_updated_line + 1,
601 p_editor_data->p_display_lines + last_display_line + 1,
602 (size_t)(p_editor_data->display_line_total - last_display_line - 1) *
603 sizeof(p_editor_data->p_display_lines[last_display_line + 1]));
604 memmove(p_editor_data->display_line_lengths + *p_last_updated_line + 1,
605 p_editor_data->display_line_lengths + last_display_line + 1,
606 (size_t)(p_editor_data->display_line_total - last_display_line - 1) *
607 sizeof(p_editor_data->display_line_lengths[last_display_line + 1]));
608 memmove(p_editor_data->display_line_widths + *p_last_updated_line + 1,
609 p_editor_data->display_line_widths + last_display_line + 1,
610 (size_t)(p_editor_data->display_line_total - last_display_line - 1) *
611 sizeof(p_editor_data->display_line_widths[last_display_line + 1]));
612
613 j = p_editor_data->display_line_total;
614 (p_editor_data->display_line_total) -= (last_display_line - *p_last_updated_line);
615 *p_last_updated_line = MAX(j - 1, *p_last_updated_line);
616 }
617
618 // Return real offset
619 *p_offset = offset;
620
621 return str_len;
622 }
623
624 static int editor_display_key_handler(int *p_key, EDITOR_CTX *p_ctx)
625 {
626 switch (*p_key)
627 {
628 case 0: // Set msg
629 snprintf(p_ctx->msg, sizeof(p_ctx->msg),
630 "| 退出[\033[32mCtrl-W\033[33m] |");
631 break;
632 case KEY_CSI:
633 *p_key = KEY_ESC;
634 break;
635 }
636
637 return 0;
638 }
639
640 int editor_display(EDITOR_DATA *p_editor_data)
641 {
642 static int show_help = 1;
643 char buffer[MAX_EDITOR_DATA_LINE_LENGTH];
644 EDITOR_CTX ctx;
645 int ch = 0;
646 char input_str[4];
647 char c;
648 int str_len = 0;
649 int input_ok;
650 const int screen_begin_row = 1;
651 const int screen_row_total = SCREEN_ROWS - screen_begin_row;
652 int output_current_row = screen_begin_row;
653 int output_end_row = SCREEN_ROWS - 1;
654 long int line_current = 0;
655 long int len;
656 int loop;
657 int eol, display_len;
658 long row_pos = 1, col_pos = 1;
659 long display_line_in, offset_in;
660 long display_line_out, offset_out;
661 int scroll_rows;
662 long last_updated_line = 0;
663 int key_insert = 1;
664 int i, j;
665 char *p_str;
666
667 clrline(output_current_row, SCREEN_ROWS);
668
669 // update msg_ext with extended key handler
670 if (editor_display_key_handler(&ch, &ctx) != 0)
671 {
672 return ch;
673 }
674
675 for (loop = 1; !SYS_server_exit && loop;)
676 {
677 if (line_current >= p_editor_data->display_line_total || output_current_row > output_end_row)
678 {
679 ctx.line_cursor = line_current - output_current_row + row_pos + 1;
680
681 snprintf(buffer, sizeof(buffer),
682 "\033[1;44;33m[\033[32m%ld\033[33m;\033[32m%ld\033[33m] "
683 "第\033[32m%ld\033[33m/\033[32m%ld\033[33m行 [\033[32m%s\033[33m] "
684 "%s",
685 row_pos, col_pos,
686 ctx.line_cursor, p_editor_data->display_line_total,
687 key_insert ? "插入" : "替换",
688 ctx.msg);
689
690 len = split_line(buffer, SCREEN_COLS, &eol, &display_len, 1);
691 for (; display_len < SCREEN_COLS; display_len++)
692 {
693 buffer[len++] = ' ';
694 }
695 buffer[len] = '\0';
696 strncat(buffer, "\033[m", sizeof(buffer) - 1 - strnlen(buffer, sizeof(buffer)));
697
698 moveto(SCREEN_ROWS, 0);
699 prints("%s", buffer);
700
701 moveto((int)row_pos, (int)col_pos);
702 iflush();
703
704 str_len = 0;
705 ch = igetch_t(MAX_DELAY_TIME);
706 while (!SYS_server_exit)
707 {
708 // extended key handler
709 if (editor_display_key_handler(&ch, &ctx) != 0)
710 {
711 goto cleanup;
712 }
713
714 if (ch < 256 && (ch & 0b10000000)) // head of multi-byte character
715 {
716 str_len = 0;
717 c = (char)(ch & 0b11110000);
718 while (c & 0b10000000)
719 {
720 input_str[str_len] = (char)(ch - 256);
721 str_len++;
722 c = (c & 0b01111111) << 1;
723
724 if ((c & 0b10000000) == 0) // Input completed
725 {
726 break;
727 }
728
729 // Expect additional bytes of input
730 ch = igetch(100); // 0.1 second
731 if (ch == KEY_NULL || ch == KEY_TIMEOUT) // Ignore received bytes if no futher input
732 {
733 #ifdef _DEBUG
734 log_error("Ignore %d bytes of incomplete UTF8 character\n", str_len);
735 #endif
736 str_len = 0;
737 break;
738 }
739 }
740 }
741
742 if ((ch >= 32 && ch < 127) || str_len >= 2 || // Printable character or multi-byte character
743 ch == CR || ch == KEY_ESC) // Special character
744 {
745 BBS_last_access_tm = time(NULL);
746
747 // Refresh current action while user input
748 if (user_online_update(NULL) < 0)
749 {
750 log_error("user_online_update(NULL) error\n");
751 }
752
753 if (str_len == 0) // ch >= 32 && ch < 127
754 {
755 input_str[0] = (char)ch;
756 str_len = 1;
757 }
758
759 display_line_in = line_current - output_current_row + row_pos;
760 offset_in = split_line(p_editor_data->p_display_lines[display_line_in], (int)col_pos - 1, &eol, &display_len, 0);
761 display_line_out = display_line_in;
762 offset_out = offset_in;
763
764 last_updated_line = display_line_in;
765
766 if (!key_insert) // overwrite
767 {
768 if (editor_data_delete(p_editor_data, &display_line_out, &offset_out,
769 &last_updated_line) < 0)
770 {
771 log_error("editor_data_delete() error\n");
772 }
773 }
774
775 if (editor_data_insert(p_editor_data, &display_line_out, &offset_out,
776 input_str, str_len, &last_updated_line) < 0)
777 {
778 log_error("editor_data_insert(str_len=%d) error\n", str_len);
779 }
780 else
781 {
782 output_end_row = MIN(SCREEN_ROWS - 1, output_current_row + (int)(last_updated_line - line_current));
783 line_current -= (output_current_row - row_pos);
784 output_current_row = (int)row_pos;
785
786 scroll_rows = MAX(0, (int)(display_line_out - display_line_in) - (output_end_row - output_current_row));
787
788 if (scroll_rows > 0)
789 {
790 moveto(SCREEN_ROWS, 0);
791 clrtoeol();
792 for (i = 0; i < scroll_rows; i++)
793 {
794 // prints("\033[S"); // Scroll up 1 line
795 prints("\n"); // Legacy Cterm only works with this line
796 }
797
798 output_current_row -= scroll_rows;
799 if (output_current_row < screen_begin_row)
800 {
801 line_current += (screen_begin_row - output_current_row);
802 output_current_row = screen_begin_row;
803 }
804 row_pos = output_end_row;
805 }
806 else // if (scroll_lines == 0)
807 {
808 row_pos += (display_line_out - display_line_in);
809 }
810
811 if (offset_out != offset_in)
812 {
813 if (display_line_out != display_line_in)
814 {
815 col_pos = 1;
816 }
817 if (offset_out > 0)
818 {
819 col_pos += (str_len == 1 ? 1 : 2);
820 }
821 }
822 }
823
824 if (display_line_out != display_line_in) // Output on line change
825 {
826 break;
827 }
828
829 ch = igetch(0);
830 if (ch == KEY_NULL || ch == KEY_TIMEOUT) // Output if no futher input
831 {
832 break;
833 }
834
835 str_len = 0;
836 continue;
837 }
838 else if (ch == KEY_DEL || ch == BACKSPACE) // Del
839 {
840 BBS_last_access_tm = time(NULL);
841
842 // Refresh current action while user input
843 if (user_online_update(NULL) < 0)
844 {
845 log_error("user_online_update(NULL) error\n");
846 }
847
848 if (ch == BACKSPACE)
849 {
850 if (line_current - output_current_row + row_pos <= 0 && col_pos <= 1) // Forbidden
851 {
852 break; // force output prior operation result if any
853 }
854
855 offset_in = split_line(p_editor_data->p_display_lines[line_current - output_current_row + row_pos],
856 (int)col_pos - 1, &eol, &display_len, 0);
857 if (offset_in >= 1 && p_editor_data->p_display_lines[line_current - output_current_row + row_pos][offset_in - 1] < 0) // UTF8
858 {
859 col_pos = display_len - 1;
860 }
861 else
862 {
863 col_pos = display_len;
864 }
865
866 if (col_pos < 1 && line_current - output_current_row + row_pos >= 0)
867 {
868 row_pos--;
869 col_pos = MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]);
870 }
871 }
872
873 display_line_in = line_current - output_current_row + row_pos;
874 offset_in = split_line(p_editor_data->p_display_lines[display_line_in], (int)col_pos - 1, &eol, &display_len, 0);
875 display_line_out = display_line_in;
876 offset_out = offset_in;
877
878 if ((str_len = editor_data_delete(p_editor_data, &display_line_out, &offset_out,
879 &last_updated_line)) < 0)
880 {
881 log_error("editor_data_delete() error\n");
882 }
883 else
884 {
885 col_pos = display_len + 1; // Set col_pos to accurate pos
886
887 output_end_row = MIN(SCREEN_ROWS - 1, output_current_row + (int)(last_updated_line - line_current));
888 line_current -= (output_current_row - row_pos);
889 output_current_row = (int)row_pos;
890
891 if (output_current_row < screen_begin_row) // row_pos <= 0
892 {
893 output_current_row = screen_begin_row;
894 row_pos = screen_begin_row;
895 output_end_row = SCREEN_ROWS - 1;
896 }
897
898 // Exceed end
899 if (line_current + (screen_row_total - output_current_row) >= p_editor_data->display_line_total &&
900 p_editor_data->display_line_total > screen_row_total)
901 {
902 scroll_rows = (int)((line_current - (output_current_row - screen_begin_row)) -
903 (p_editor_data->display_line_total - screen_row_total));
904
905 line_current = p_editor_data->display_line_total - screen_row_total;
906 row_pos += scroll_rows;
907 output_current_row = screen_begin_row;
908 output_end_row = SCREEN_ROWS - 1;
909 }
910
911 clrline(output_current_row, output_end_row);
912 }
913
914 if (display_line_out != display_line_in) // Output on line change
915 {
916 break;
917 }
918
919 ch = igetch(0);
920 if (ch == KEY_NULL || ch == KEY_TIMEOUT) // Output if no futher input
921 {
922 break;
923 }
924
925 str_len = 0;
926 continue;
927 }
928
929 input_ok = 1;
930 switch (ch)
931 {
932 case KEY_NULL:
933 case KEY_TIMEOUT:
934 goto cleanup;
935 case Ctrl('W'):
936 case Ctrl('X'):
937 loop = 0;
938 break;
939 case Ctrl('S'): // Start of line
940 case KEY_CTRL_LEFT:
941 col_pos = 1;
942 break;
943 case Ctrl('E'): // End of line
944 case KEY_CTRL_RIGHT:
945 if (line_current - output_current_row + row_pos == p_editor_data->display_line_total - 1) // row_pos at end line
946 {
947 // last display line does NOT have \n in the end
948 col_pos = p_editor_data->display_line_widths[line_current - output_current_row + row_pos] + 1;
949 break;
950 }
951 col_pos = MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]);
952 break;
953 case Ctrl('T'): // Top of screen
954 case KEY_CTRL_UP:
955 row_pos = screen_begin_row;
956 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
957 break;
958 case Ctrl('B'): // Bottom of screen
959 case KEY_CTRL_DOWN:
960 if (p_editor_data->display_line_total < screen_row_total)
961 {
962 row_pos = p_editor_data->display_line_total;
963 }
964 else
965 {
966 row_pos = SCREEN_ROWS - 1;
967 }
968 if (line_current + (screen_row_total - (output_current_row - screen_begin_row)) >= p_editor_data->display_line_total) // Reach end
969 {
970 // last display line does NOT have \n in the end
971 col_pos = MIN(col_pos, p_editor_data->display_line_widths[line_current - output_current_row + row_pos] + 1);
972 }
973 else
974 {
975 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
976 }
977 break;
978 case KEY_INS:
979 key_insert = !key_insert;
980 break;
981 case KEY_HOME:
982 row_pos = 1;
983 col_pos = 1;
984 if (line_current - output_current_row < 0) // Reach begin
985 {
986 break;
987 }
988 line_current = 0;
989 output_current_row = screen_begin_row;
990 output_end_row = SCREEN_ROWS - 1;
991 clrline(output_current_row, SCREEN_ROWS);
992 break;
993 case KEY_END:
994 if (p_editor_data->display_line_total < screen_row_total)
995 {
996 row_pos = p_editor_data->display_line_total;
997 col_pos = p_editor_data->display_line_widths[line_current - output_current_row + row_pos] + 1;
998 break;
999 }
1000 line_current = p_editor_data->display_line_total - screen_row_total;
1001 output_current_row = screen_begin_row;
1002 output_end_row = SCREEN_ROWS - 1;
1003 row_pos = SCREEN_ROWS - 1;
1004 col_pos = p_editor_data->display_line_widths[line_current - output_current_row + row_pos] + 1;
1005 clrline(output_current_row, SCREEN_ROWS);
1006 break;
1007 case KEY_LEFT:
1008 offset_in = split_line(p_editor_data->p_display_lines[line_current - output_current_row + row_pos],
1009 (int)col_pos - 1, &eol, &display_len, 0);
1010 if (offset_in >= 1 && p_editor_data->p_display_lines[line_current - output_current_row + row_pos][offset_in - 1] < 0) // UTF8
1011 {
1012 col_pos = display_len - 1;
1013 }
1014 else
1015 {
1016 col_pos = display_len;
1017 }
1018 if (col_pos >= 1)
1019 {
1020 break;
1021 }
1022 col_pos = SCREEN_COLS; // continue to KEY_UP
1023 case KEY_UP:
1024 if (row_pos > screen_begin_row)
1025 {
1026 row_pos--;
1027 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
1028 break;
1029 }
1030 if (line_current - output_current_row < 0) // Reach begin
1031 {
1032 col_pos = 1;
1033 break;
1034 }
1035 line_current -= output_current_row;
1036 output_current_row = screen_begin_row;
1037 // screen_end_line = begin_line;
1038 // prints("\033[T"); // Scroll down 1 line
1039 output_end_row = SCREEN_ROWS - 1; // Legacy Fterm only works with this line
1040 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
1041 break;
1042 case KEY_SPACE:
1043 break;
1044 case KEY_RIGHT:
1045 offset_in = split_line(p_editor_data->p_display_lines[line_current - output_current_row + row_pos],
1046 (int)col_pos - 1, &eol, &display_len, 0);
1047 if (offset_in < p_editor_data->display_line_lengths[line_current - output_current_row + row_pos] &&
1048 p_editor_data->p_display_lines[line_current - output_current_row + row_pos][offset_in] < 0) // UTF8
1049 {
1050 col_pos = display_len + 3;
1051 }
1052 else
1053 {
1054 col_pos = display_len + 2;
1055 }
1056 if (col_pos <= p_editor_data->display_line_widths[line_current - output_current_row + row_pos])
1057 {
1058 break;
1059 }
1060 col_pos = 1; // continue to KEY_DOWN
1061 case KEY_DOWN:
1062 if (row_pos < MIN(screen_row_total, p_editor_data->display_line_total))
1063 {
1064 row_pos++;
1065 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
1066 break;
1067 }
1068 if (line_current - output_current_row + row_pos == p_editor_data->display_line_total - 1) // row_pos at end line
1069 {
1070 // last display line does NOT have \n in the end
1071 col_pos = p_editor_data->display_line_widths[line_current - output_current_row + row_pos] + 1;
1072 break;
1073 }
1074 line_current += (screen_row_total - (output_current_row - screen_begin_row));
1075 output_current_row = screen_row_total;
1076 output_end_row = SCREEN_ROWS - 1;
1077 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
1078 moveto(SCREEN_ROWS, 0);
1079 clrtoeol();
1080 // prints("\033[S"); // Scroll up 1 line
1081 prints("\n"); // Legacy Cterm only works with this line
1082 break;
1083 case KEY_PGUP:
1084 if (line_current - output_current_row < 0) // Reach begin
1085 {
1086 break;
1087 }
1088 line_current -= ((screen_row_total - 1) + (output_current_row - screen_begin_row));
1089 if (line_current < 0)
1090 {
1091 line_current = 0;
1092 }
1093 output_current_row = screen_begin_row;
1094 output_end_row = SCREEN_ROWS - 1;
1095 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
1096 clrline(output_current_row, SCREEN_ROWS);
1097 break;
1098 case KEY_PGDN:
1099 if (line_current + screen_row_total - (output_current_row - screen_begin_row) >= p_editor_data->display_line_total) // Reach end
1100 {
1101 break;
1102 }
1103 line_current += (screen_row_total - 1) - (output_current_row - screen_begin_row);
1104 if (line_current + screen_row_total > p_editor_data->display_line_total) // No enough lines to display
1105 {
1106 line_current = p_editor_data->display_line_total - screen_row_total;
1107 }
1108 output_current_row = screen_begin_row;
1109 output_end_row = SCREEN_ROWS - 1;
1110 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
1111 clrline(output_current_row, SCREEN_ROWS);
1112 break;
1113 case Ctrl('Q'):
1114 case KEY_F1:
1115 if (!show_help) // Not reentrant
1116 {
1117 break;
1118 }
1119 // Display help information
1120 show_help = 0;
1121 display_file(DATA_READ_HELP, 1);
1122 show_help = 1;
1123 case KEY_F5:
1124 // Refresh after display help information
1125 line_current -= (output_current_row - screen_begin_row);
1126 output_current_row = screen_begin_row;
1127 output_end_row = SCREEN_ROWS - 1;
1128 clrline(output_current_row, SCREEN_ROWS);
1129 break;
1130 case 0: // Refresh bottom line
1131 break;
1132 default:
1133 input_ok = 0;
1134 break;
1135 }
1136
1137 BBS_last_access_tm = time(NULL);
1138
1139 // Refresh current action while user input
1140 if (user_online_update(NULL) < 0)
1141 {
1142 log_error("user_online_update(NULL) error\n");
1143 }
1144
1145 if (input_ok)
1146 {
1147 break;
1148 }
1149
1150 ch = igetch_t(MAX_DELAY_TIME);
1151 }
1152
1153 continue;
1154 }
1155
1156 len = p_editor_data->display_line_lengths[line_current];
1157 if (len >= sizeof(buffer))
1158 {
1159 log_error("Buffer overflow: len=%ld line=%ld \n", len, line_current);
1160 len = sizeof(buffer) - 1;
1161 }
1162 else if (len < 0)
1163 {
1164 log_error("Incorrect line offsets: len=%ld line=%ld \n", len, line_current);
1165 len = 0;
1166 }
1167
1168 // memcpy(buffer, p_editor_data->p_display_lines[line_current], (size_t)len);
1169 // Replace '\033' with '*'
1170 p_str = p_editor_data->p_display_lines[line_current];
1171 for (i = 0, j = 0; i < len; i++)
1172 {
1173 if (p_str[i] == '\033')
1174 {
1175 memcpy(buffer + j, EDITOR_ESC_DISPLAY_STR, sizeof(EDITOR_ESC_DISPLAY_STR) - 1);
1176 j += (int)(sizeof(EDITOR_ESC_DISPLAY_STR) - 1);
1177 }
1178 else
1179 {
1180 buffer[j] = p_str[i];
1181 j++;
1182 }
1183 }
1184 buffer[j] = '\0';
1185
1186 moveto(output_current_row, 0);
1187 clrtoeol();
1188 prints("%s", buffer);
1189 line_current++;
1190 output_current_row++;
1191 }
1192
1193 cleanup:
1194 return ch;
1195 }

webmaster@leafok.com
ViewVC Help
Powered by ViewVC 1.3.0-beta1