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

Contents of /lbbs/src/editor.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.49 - (show annotations)
Sun Oct 19 07:08:29 2025 UTC (4 months, 4 weeks ago) by sysadm
Branch: MAIN
Changes since 1.48: +24 -7 lines
Content type: text/x-csrc
Add feature to editor:
Ctrl-Y, delete current display line
Ctrl-K, delete current display line since the position of cursor

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_editor_data == 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("NULL pointer error\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("NULL pointer error\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("NULL pointer error\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, int del_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("NULL pointer error\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 (del_line)
504 {
505 str_len = (int)(p_editor_data->display_line_lengths[display_line] - offset);
506 }
507 else if (p_data_line[offset_data_line] > 0 && p_data_line[offset_data_line] < 127)
508 {
509 str_len = 1;
510 }
511 else if (p_data_line[offset_data_line] & 0x80) // head of multi-byte character
512 {
513 str_len = 1;
514 c = (p_data_line[offset_data_line] & 0x70) << 1;
515 while (c & 0x80)
516 {
517 str_len++;
518 c = (c & 0x7f) << 1;
519 }
520 }
521 else
522 {
523 log_error("Some strange character at display_line %ld, offset %ld: %d %d\n",
524 display_line, offset, p_data_line[offset_data_line], p_data_line[offset_data_line + 1]);
525 str_len = 1;
526 }
527
528 // Current display line is (almost) empty
529 if (offset_data_line + str_len > len_data_line ||
530 (offset_data_line + str_len == len_data_line &&
531 p_data_line[del_line ? len_data_line - 1 : offset_data_line] == '\n'))
532 {
533 if (display_line + 1 >= p_editor_data->display_line_total) // No additional display line (data line)
534 {
535 return 0;
536 }
537
538 len_data_line = 0; // Next data line
539 last_display_line = p_editor_data->display_line_total - 1;
540 for (i = display_line + 1; i < p_editor_data->display_line_total; i++)
541 {
542 len_data_line += p_editor_data->display_line_lengths[i];
543
544 if (p_editor_data->display_line_lengths[i] > 0 &&
545 p_editor_data->p_display_lines[i][p_editor_data->display_line_lengths[i] - 1] == '\n') // reach end of current data line
546 {
547 last_display_line = i;
548 break;
549 }
550 }
551
552 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
553 {
554 return 0;
555 }
556
557 // Append next data line to current one
558 memcpy(p_data_line + offset_data_line, p_editor_data->p_display_lines[display_line + 1], (size_t)len_data_line);
559 p_data_line[offset_data_line + len_data_line] = '\0';
560
561 // Recycle next data line
562 memory_pool_free(p_mp_data_line, p_editor_data->p_display_lines[display_line + 1]);
563 }
564 else
565 {
566 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));
567 p_data_line[len_data_line - str_len] = '\0';
568 len_data_line -= str_len;
569 }
570
571 // Set p_data_line to head of current display line
572 p_data_line = p_editor_data->p_display_lines[display_line];
573 split_line_total = last_display_line - display_line + 2;
574
575 // Split current data line since beginning of current display line
576 split_line_total = split_data_lines(p_data_line, SCREEN_COLS, line_offsets, split_line_total, 0, line_widths);
577
578 for (i = 0; i < split_line_total; i++)
579 {
580 p_editor_data->display_line_lengths[display_line + i] = line_offsets[i + 1] - line_offsets[i];
581 p_editor_data->display_line_widths[display_line + i] = line_widths[i];
582 p_editor_data->p_display_lines[display_line + i] =
583 (i == 0
584 ? p_data_line
585 : (p_editor_data->p_display_lines[display_line + i - 1] + p_editor_data->display_line_lengths[display_line + i - 1]));
586
587 if (p_editor_data->display_line_lengths[display_line + i] > 0 &&
588 p_editor_data->p_display_lines[display_line + i][p_editor_data->display_line_lengths[display_line + i] - 1] == '\n')
589 {
590 break;
591 }
592 }
593
594 *p_last_updated_line = display_line + MIN(i, split_line_total - 1);
595
596 if (*p_last_updated_line < last_display_line)
597 {
598 // Remove redundant display line after last_display_line
599 // for (j = last_display_line + 1; j < p_editor_data->display_line_total; j++)
600 // {
601 // p_editor_data->p_display_lines[j - (last_display_line - *p_last_updated_line)] = p_editor_data->p_display_lines[j];
602 // p_editor_data->display_line_lengths[j - (last_display_line - *p_last_updated_line)] = p_editor_data->display_line_lengths[j];
603 // p_editor_data->display_line_widths[j - (last_display_line - *p_last_updated_line)] = p_editor_data->display_line_widths[j];
604 // }
605 memmove(p_editor_data->p_display_lines + *p_last_updated_line + 1,
606 p_editor_data->p_display_lines + last_display_line + 1,
607 (size_t)(p_editor_data->display_line_total - last_display_line - 1) *
608 sizeof(p_editor_data->p_display_lines[last_display_line + 1]));
609 memmove(p_editor_data->display_line_lengths + *p_last_updated_line + 1,
610 p_editor_data->display_line_lengths + last_display_line + 1,
611 (size_t)(p_editor_data->display_line_total - last_display_line - 1) *
612 sizeof(p_editor_data->display_line_lengths[last_display_line + 1]));
613 memmove(p_editor_data->display_line_widths + *p_last_updated_line + 1,
614 p_editor_data->display_line_widths + last_display_line + 1,
615 (size_t)(p_editor_data->display_line_total - last_display_line - 1) *
616 sizeof(p_editor_data->display_line_widths[last_display_line + 1]));
617
618 j = p_editor_data->display_line_total;
619 (p_editor_data->display_line_total) -= (last_display_line - *p_last_updated_line);
620 *p_last_updated_line = MAX(j - 1, *p_last_updated_line);
621 }
622
623 // Return real offset
624 *p_offset = offset;
625
626 return str_len;
627 }
628
629 static int editor_display_key_handler(int *p_key, EDITOR_CTX *p_ctx)
630 {
631 switch (*p_key)
632 {
633 case 0: // Set msg
634 snprintf(p_ctx->msg, sizeof(p_ctx->msg),
635 "| 退出[\033[32mCtrl-W\033[33m] |");
636 break;
637 case KEY_CSI:
638 *p_key = KEY_ESC;
639 break;
640 }
641
642 return 0;
643 }
644
645 int editor_display(EDITOR_DATA *p_editor_data)
646 {
647 static int show_help = 1;
648 char buffer[MAX_EDITOR_DATA_LINE_LENGTH];
649 EDITOR_CTX ctx;
650 int ch = 0;
651 char input_str[4];
652 char c;
653 int str_len = 0;
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(MAX_DELAY_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 }
752
753 if ((ch >= 32 && ch < 127) || str_len >= 2 || // Printable character or multi-byte character
754 ch == CR || ch == KEY_ESC) // Special character
755 {
756 // Refresh current action while user input
757 if (user_online_update(NULL) < 0)
758 {
759 log_error("user_online_update(NULL) error\n");
760 }
761
762 if (str_len == 0) // ch >= 32 && ch < 127
763 {
764 input_str[0] = (char)ch;
765 str_len = 1;
766 }
767
768 display_line_in = line_current - output_current_row + row_pos;
769 offset_in = split_line(p_editor_data->p_display_lines[display_line_in], (int)col_pos - 1, &eol, &display_len, 0);
770 display_line_out = display_line_in;
771 offset_out = offset_in;
772
773 last_updated_line = display_line_in;
774
775 if (!key_insert) // overwrite
776 {
777 if (editor_data_delete(p_editor_data, &display_line_out, &offset_out,
778 &last_updated_line, 0) < 0)
779 {
780 log_error("editor_data_delete() error\n");
781 }
782 }
783
784 if (editor_data_insert(p_editor_data, &display_line_out, &offset_out,
785 input_str, str_len, &last_updated_line) < 0)
786 {
787 log_error("editor_data_insert(str_len=%d) error\n", str_len);
788 }
789 else
790 {
791 output_end_row = MIN(SCREEN_ROWS - 1, output_current_row + (int)(last_updated_line - line_current));
792 line_current -= (output_current_row - row_pos);
793 output_current_row = (int)row_pos;
794
795 scroll_rows = MAX(0, (int)(display_line_out - display_line_in) - (output_end_row - output_current_row));
796
797 if (scroll_rows > 0)
798 {
799 moveto(SCREEN_ROWS, 0);
800 clrtoeol();
801 for (i = 0; i < scroll_rows; i++)
802 {
803 // prints("\033[S"); // Scroll up 1 line
804 prints("\n"); // Legacy Cterm only works with this line
805 }
806
807 output_current_row -= scroll_rows;
808 if (output_current_row < screen_begin_row)
809 {
810 line_current += (screen_begin_row - output_current_row);
811 output_current_row = screen_begin_row;
812 }
813 row_pos = output_end_row;
814 }
815 else // if (scroll_lines == 0)
816 {
817 row_pos += (display_line_out - display_line_in);
818 }
819
820 if (offset_out != offset_in)
821 {
822 if (display_line_out != display_line_in)
823 {
824 col_pos = 1;
825 }
826 if (offset_out > 0)
827 {
828 col_pos += (str_len == 1 ? 1 : 2);
829 }
830 }
831 }
832
833 if (display_line_out != display_line_in) // Output on line change
834 {
835 break;
836 }
837
838 ch = igetch(0);
839 if (ch == KEY_NULL || ch == KEY_TIMEOUT) // Output if no futher input
840 {
841 break;
842 }
843
844 str_len = 0;
845 continue;
846 }
847 else if (ch == KEY_DEL || ch == BACKSPACE || ch == Ctrl('K') || ch == Ctrl('Y')) // Del
848 {
849 // Refresh current action while user input
850 if (user_online_update(NULL) < 0)
851 {
852 log_error("user_online_update(NULL) error\n");
853 }
854
855 del_line = 0;
856
857 if (ch == BACKSPACE)
858 {
859 if (line_current - output_current_row + row_pos <= 0 && col_pos <= 1) // Forbidden
860 {
861 break; // force output prior operation result if any
862 }
863
864 offset_in = split_line(p_editor_data->p_display_lines[line_current - output_current_row + row_pos],
865 (int)col_pos - 1, &eol, &display_len, 0);
866 if (offset_in >= 1 && p_editor_data->p_display_lines[line_current - output_current_row + row_pos][offset_in - 1] < 0) // UTF8
867 {
868 col_pos = display_len - 1;
869 }
870 else
871 {
872 col_pos = display_len;
873 }
874
875 if (col_pos < 1 && line_current - output_current_row + row_pos >= 0)
876 {
877 row_pos--;
878 col_pos = MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]);
879 }
880 }
881 else if (ch == Ctrl('K'))
882 {
883 del_line = 1;
884 }
885 else if (ch == Ctrl('Y'))
886 {
887 col_pos = 1;
888 del_line = 1;
889 }
890
891 display_line_in = line_current - output_current_row + row_pos;
892 offset_in = split_line(p_editor_data->p_display_lines[display_line_in], (int)col_pos - 1, &eol, &display_len, 0);
893 display_line_out = display_line_in;
894 offset_out = offset_in;
895
896 if ((str_len = editor_data_delete(p_editor_data, &display_line_out, &offset_out,
897 &last_updated_line, del_line)) < 0)
898 {
899 log_error("editor_data_delete() error: %d\n", str_len);
900 }
901 else
902 {
903 col_pos = display_len + 1; // Set col_pos to accurate pos
904
905 output_end_row = MIN(SCREEN_ROWS - 1, output_current_row + (int)(last_updated_line - line_current));
906 line_current -= (output_current_row - row_pos);
907 output_current_row = (int)row_pos;
908
909 if (output_current_row < screen_begin_row) // row_pos <= 0
910 {
911 output_current_row = screen_begin_row;
912 row_pos = screen_begin_row;
913 output_end_row = SCREEN_ROWS - 1;
914 }
915
916 // Exceed end
917 if (line_current + (screen_row_total - output_current_row) >= p_editor_data->display_line_total &&
918 p_editor_data->display_line_total > screen_row_total)
919 {
920 scroll_rows = (int)((line_current - (output_current_row - screen_begin_row)) -
921 (p_editor_data->display_line_total - screen_row_total));
922
923 line_current = p_editor_data->display_line_total - screen_row_total;
924 row_pos += scroll_rows;
925 output_current_row = screen_begin_row;
926 output_end_row = SCREEN_ROWS - 1;
927 }
928
929 clrline(output_current_row, output_end_row);
930 }
931
932 if (display_line_out != display_line_in) // Output on line change
933 {
934 break;
935 }
936
937 ch = igetch(0);
938 if (ch == KEY_NULL || ch == KEY_TIMEOUT) // Output if no futher input
939 {
940 break;
941 }
942
943 str_len = 0;
944 continue;
945 }
946
947 input_ok = 1;
948 switch (ch)
949 {
950 case KEY_NULL:
951 log_error("KEY_NULL\n");
952 goto cleanup;
953 case KEY_TIMEOUT:
954 log_error("User input timeout\n");
955 goto cleanup;
956 case Ctrl('W'):
957 case Ctrl('X'):
958 loop = 0;
959 break;
960 case Ctrl('S'): // Start of line
961 case KEY_CTRL_LEFT:
962 col_pos = 1;
963 break;
964 case Ctrl('E'): // End of line
965 case KEY_CTRL_RIGHT:
966 if (line_current - output_current_row + row_pos == p_editor_data->display_line_total - 1) // row_pos at end line
967 {
968 // last display line does NOT have \n in the end
969 col_pos = p_editor_data->display_line_widths[line_current - output_current_row + row_pos] + 1;
970 break;
971 }
972 col_pos = MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]);
973 break;
974 case Ctrl('T'): // Top of screen
975 case KEY_CTRL_UP:
976 row_pos = screen_begin_row;
977 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
978 break;
979 case Ctrl('B'): // Bottom of screen
980 case KEY_CTRL_DOWN:
981 if (p_editor_data->display_line_total < screen_row_total)
982 {
983 row_pos = p_editor_data->display_line_total;
984 }
985 else
986 {
987 row_pos = SCREEN_ROWS - 1;
988 }
989 if (line_current + (screen_row_total - (output_current_row - screen_begin_row)) >= p_editor_data->display_line_total) // Reach end
990 {
991 // last display line does NOT have \n in the end
992 col_pos = MIN(col_pos, p_editor_data->display_line_widths[line_current - output_current_row + row_pos] + 1);
993 }
994 else
995 {
996 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
997 }
998 break;
999 case KEY_INS:
1000 key_insert = !key_insert;
1001 break;
1002 case KEY_HOME:
1003 row_pos = 1;
1004 col_pos = 1;
1005 if (line_current - output_current_row < 0) // Reach begin
1006 {
1007 break;
1008 }
1009 line_current = 0;
1010 output_current_row = screen_begin_row;
1011 output_end_row = SCREEN_ROWS - 1;
1012 clrline(output_current_row, SCREEN_ROWS);
1013 break;
1014 case KEY_END:
1015 if (p_editor_data->display_line_total < screen_row_total)
1016 {
1017 row_pos = p_editor_data->display_line_total;
1018 col_pos = p_editor_data->display_line_widths[line_current - output_current_row + row_pos] + 1;
1019 break;
1020 }
1021 line_current = p_editor_data->display_line_total - screen_row_total;
1022 output_current_row = screen_begin_row;
1023 output_end_row = SCREEN_ROWS - 1;
1024 row_pos = SCREEN_ROWS - 1;
1025 col_pos = p_editor_data->display_line_widths[line_current - output_current_row + row_pos] + 1;
1026 clrline(output_current_row, SCREEN_ROWS);
1027 break;
1028 case KEY_LEFT:
1029 offset_in = split_line(p_editor_data->p_display_lines[line_current - output_current_row + row_pos],
1030 (int)col_pos - 1, &eol, &display_len, 0);
1031 if (offset_in >= 1 && p_editor_data->p_display_lines[line_current - output_current_row + row_pos][offset_in - 1] < 0) // UTF8
1032 {
1033 col_pos = display_len - 1;
1034 }
1035 else
1036 {
1037 col_pos = display_len;
1038 }
1039 if (col_pos >= 1)
1040 {
1041 break;
1042 }
1043 col_pos = SCREEN_COLS; // continue to KEY_UP
1044 case KEY_UP:
1045 if (row_pos > screen_begin_row)
1046 {
1047 row_pos--;
1048 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
1049 break;
1050 }
1051 if (line_current - output_current_row < 0) // Reach begin
1052 {
1053 col_pos = 1;
1054 break;
1055 }
1056 line_current -= output_current_row;
1057 output_current_row = screen_begin_row;
1058 // screen_end_line = begin_line;
1059 // prints("\033[T"); // Scroll down 1 line
1060 output_end_row = SCREEN_ROWS - 1; // Legacy Fterm only works with this line
1061 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
1062 break;
1063 case KEY_SPACE:
1064 break;
1065 case KEY_RIGHT:
1066 offset_in = split_line(p_editor_data->p_display_lines[line_current - output_current_row + row_pos],
1067 (int)col_pos - 1, &eol, &display_len, 0);
1068 if (offset_in < p_editor_data->display_line_lengths[line_current - output_current_row + row_pos] &&
1069 p_editor_data->p_display_lines[line_current - output_current_row + row_pos][offset_in] < 0) // UTF8
1070 {
1071 col_pos = display_len + 3;
1072 }
1073 else
1074 {
1075 col_pos = display_len + 2;
1076 }
1077 if (col_pos <= p_editor_data->display_line_widths[line_current - output_current_row + row_pos])
1078 {
1079 break;
1080 }
1081 col_pos = 1; // continue to KEY_DOWN
1082 case KEY_DOWN:
1083 if (row_pos < MIN(screen_row_total, p_editor_data->display_line_total))
1084 {
1085 row_pos++;
1086 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
1087 break;
1088 }
1089 if (line_current - output_current_row + row_pos == p_editor_data->display_line_total - 1) // row_pos at end line
1090 {
1091 // last display line does NOT have \n in the end
1092 col_pos = p_editor_data->display_line_widths[line_current - output_current_row + row_pos] + 1;
1093 break;
1094 }
1095 line_current += (screen_row_total - (output_current_row - screen_begin_row));
1096 output_current_row = screen_row_total;
1097 output_end_row = SCREEN_ROWS - 1;
1098 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
1099 moveto(SCREEN_ROWS, 0);
1100 clrtoeol();
1101 // prints("\033[S"); // Scroll up 1 line
1102 prints("\n"); // Legacy Cterm only works with this line
1103 break;
1104 case KEY_PGUP:
1105 if (line_current - output_current_row < 0) // Reach begin
1106 {
1107 break;
1108 }
1109 line_current -= ((screen_row_total - 1) + (output_current_row - screen_begin_row));
1110 if (line_current < 0)
1111 {
1112 line_current = 0;
1113 }
1114 output_current_row = screen_begin_row;
1115 output_end_row = SCREEN_ROWS - 1;
1116 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
1117 clrline(output_current_row, SCREEN_ROWS);
1118 break;
1119 case KEY_PGDN:
1120 if (line_current + screen_row_total - (output_current_row - screen_begin_row) >= p_editor_data->display_line_total) // Reach end
1121 {
1122 break;
1123 }
1124 line_current += (screen_row_total - 1) - (output_current_row - screen_begin_row);
1125 if (line_current + screen_row_total > p_editor_data->display_line_total) // No enough lines to display
1126 {
1127 line_current = p_editor_data->display_line_total - screen_row_total;
1128 }
1129 output_current_row = screen_begin_row;
1130 output_end_row = SCREEN_ROWS - 1;
1131 col_pos = MIN(col_pos, MAX(1, p_editor_data->display_line_widths[line_current - output_current_row + row_pos]));
1132 clrline(output_current_row, SCREEN_ROWS);
1133 break;
1134 case Ctrl('Q'):
1135 case KEY_F1:
1136 if (!show_help) // Not reentrant
1137 {
1138 break;
1139 }
1140 // Display help information
1141 show_help = 0;
1142 display_file(DATA_READ_HELP, 1);
1143 show_help = 1;
1144 case KEY_F5:
1145 // Refresh after display help information
1146 line_current -= (output_current_row - screen_begin_row);
1147 output_current_row = screen_begin_row;
1148 output_end_row = SCREEN_ROWS - 1;
1149 clrline(output_current_row, SCREEN_ROWS);
1150 break;
1151 case 0: // Refresh bottom line
1152 break;
1153 default:
1154 input_ok = 0;
1155 break;
1156 }
1157
1158 // Refresh current action while user input
1159 if (user_online_update(NULL) < 0)
1160 {
1161 log_error("user_online_update(NULL) error\n");
1162 }
1163
1164 if (input_ok)
1165 {
1166 break;
1167 }
1168
1169 ch = igetch_t(MAX_DELAY_TIME);
1170 }
1171
1172 continue;
1173 }
1174
1175 len = p_editor_data->display_line_lengths[line_current];
1176 if (len >= sizeof(buffer))
1177 {
1178 log_error("Buffer overflow: len=%ld line=%ld \n", len, line_current);
1179 len = sizeof(buffer) - 1;
1180 }
1181 else if (len < 0)
1182 {
1183 log_error("Incorrect line offsets: len=%ld line=%ld \n", len, line_current);
1184 len = 0;
1185 }
1186
1187 // memcpy(buffer, p_editor_data->p_display_lines[line_current], (size_t)len);
1188 // Replace '\033' with '*'
1189 p_str = p_editor_data->p_display_lines[line_current];
1190 for (i = 0, j = 0; i < len; i++)
1191 {
1192 if (p_str[i] == '\033')
1193 {
1194 memcpy(buffer + j, EDITOR_ESC_DISPLAY_STR, sizeof(EDITOR_ESC_DISPLAY_STR) - 1);
1195 j += (int)(sizeof(EDITOR_ESC_DISPLAY_STR) - 1);
1196 }
1197 else
1198 {
1199 buffer[j] = p_str[i];
1200 j++;
1201 }
1202 }
1203 buffer[j] = '\0';
1204
1205 moveto(output_current_row, 0);
1206 clrtoeol();
1207 prints("%s", buffer);
1208 line_current++;
1209 output_current_row++;
1210 }
1211
1212 cleanup:
1213 return ch;
1214 }

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