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

Contents of /lbbs/src/editor.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.56 - (show annotations)
Sat Nov 8 12:32:16 2025 UTC (4 months, 1 week ago) by sysadm
Branch: MAIN
Changes since 1.55: +62 -12 lines
Content type: text/x-csrc
Optimize column position calculation for wild-character

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

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