1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
|
/* $Id$ */
#include "bbs.h"
/*
* visio.c
* High-Level virtual screen input output control
*
* Author: piaip, 2008
*
* This is not the original visio.c from maple3.
* We just borrowed its file name and then
* re-implemented everything :)
*
* m3 visio = (ptt) visio+screen/term.
*
* This visio contains only high level UI element/widgets.
*
* To add API here, please...
* (1) name the API in prefix of 'v'.
* (2) use only screen.c APIs.
* (3) take care of wide screen.
* (4) utilize the colos in visio.h, and name asa VCLR_* (visio color)
*/
// ---- DEFINITION ---------------------------------------------------
#define MAX_COL (t_columns-1)
#define SAFE_MAX_COL (MAX_COL-1)
#define VBUFLEN (ANSILINELEN)
// this is a special strlen to speed up processing.
// warning: x MUST be #define x "msg".
// otherwise you need to use real strlen.
#define MACROSTRLEN(x) (sizeof(x)-1)
// ---- UTILITIES ----------------------------------------------------
inline void
outnc(int n, unsigned char c)
{
while (n-- > 0)
outc(c);
}
inline void
nblank(int n)
{
outnc(n, ' ');
}
// ---- VREF API --------------------------------------------------
/**
* vscr_save(): 傳回目前畫面的備份物件。
*/
VREFSCR
vscr_save(void)
{
// TODO optimize memory allocation someday.
screen_backup_t *o = (screen_backup_t*)malloc(sizeof(screen_backup_t));
assert(o);
scr_dump(o);
return o;
}
/**
* vscr_restore(obj): 使用並刪除畫面的備份物件。
*/
void
vscr_restore(VREFSCR obj)
{
screen_backup_t *o = (screen_backup_t*)obj;
if (o)
{
scr_restore(o);
memset(o, 0, sizeof(screen_backup_t));
free(o);
}
}
/**
* vcur_save(): 傳回目前游標的備份物件。
*/
VREFCUR
vcur_save(void)
{
// XXX 偷懶不 new object 了, pointer 夠大
int y, x;
VREFCUR v;
getyx(&y, &x);
v = ((unsigned short)y << 16) | (unsigned short)x;
return v;
}
/**
* vcur_restore(obj): 使用並刪除游標的備份物件。
*/
void
vcur_restore(VREFCUR o)
{
int y, x;
y = (unsigned int)(o);
x = (unsigned short)(y & 0xFFFF);
y = (unsigned short)(y >> 16);
move(y, x);
}
// ---- LOW LEVEL API -----------------------------------------------
/**
* vpad(n, pattern): 填滿 n 個字元 (使用的格式為 pattern)
*
* @param n 要填滿的字元數 (無法填滿時會使用空白填補)
* @param pattern 填充用的字串
*/
inline void
vpad(int n, const char *pattern)
{
int len = strlen(pattern);
// assert(len > 0);
while (n >= len)
{
outs(pattern);
n -= len;
}
if (n) nblank(n);
}
/**
* vgety(): 取得目前所在位置的行數
*
* 考慮到 ANSI 系統,getyx() 較為少用且危險。
* vgety() 安全而明確。
*/
inline int
vgety(void)
{
int y, x;
getyx(&y, &x);
return y;
}
// ---- HIGH LEVEL API -----------------------------------------------
/**
* vshowmsg(s): 在底部印出指定訊息或單純的暫停訊息
*
* @param s 指定訊息。 NULL: 任意鍵繼續。 s: 若有 \t 則後面字串靠右 (若無則顯示任意鍵)
*/
void
vshowmsg(const char *msg)
{
int w = SAFE_MAX_COL;
move(b_lines, 0); clrtoeol();
if (!msg)
{
// print default message in middle
outs(VCLR_PAUSE_PAD);
outc(' '); // initial one space
// VMSG_PAUSE MUST BE A #define STRING.
w -= MACROSTRLEN(VMSG_PAUSE); // strlen_noansi(VMSG_PAUSE);
w--; // initial space
vpad(w/2, VMSG_PAUSE_PAD);
outs(VCLR_PAUSE);
outs(VMSG_PAUSE);
outs(VCLR_PAUSE_PAD);
vpad(w - w/2, VMSG_PAUSE_PAD);
} else {
// print in left, with floating (if \t exists)
char *pfloat = strchr(msg, '\t');
int szfloat = 0;
int nmsg = 0;
// print prefix
w -= MACROSTRLEN(VMSG_MSG_PREFIX); // strlen_noansi(VMSG_MSG_PREFIX);
outs(VCLR_MSG);
outs(VMSG_MSG_PREFIX);
// if have float, calculate float size
if (pfloat) {
nmsg = pfloat - msg;
w -= strlen_noansi(msg) -1; // -1 for \t
pfloat ++; // skip \t
szfloat = strlen_noansi(pfloat);
} else {
pfloat = VMSG_MSG_FLOAT;
szfloat = MACROSTRLEN(VMSG_MSG_FLOAT); // strlen_noansi()
w -= strlen_noansi(msg) + szfloat;
}
// calculate if we can display float
if (w < 0)
{
w += szfloat;
szfloat = 0;
}
// print msg body
if (nmsg)
outns(msg, nmsg);
else
outs(msg);
// print padding for floats
if (w > 0)
nblank(w);
// able to print float?
if (szfloat)
{
outs(VCLR_MSG_FLOAT);
outs(pfloat);
}
}
// safe blank
outs(" " ANSI_RESET);
}
/**
* vans(s): 在底部印出訊息與小輸入欄,並傳回使用者的輸入(轉為小寫)。
*
* @param s 指定訊息,見 vshowmsg
*/
int
vans(const char *msg)
{
char buf[3];
// move(b_lines, 0); clrtoeol();
vget(b_lines, 0, msg, buf, sizeof(buf), LCECHO);
return (unsigned char)buf[0];
}
/**
* vansf(s, ...): 在底部印出訊息與小輸入欄,並傳回使用者的輸入(轉為小寫)。
*
* @param s 指定訊息,見 vshowmsg
*/
int
vansf(const char *fmt, ...)
{
char msg[VBUFLEN];
va_list ap;
va_start(ap, fmt);
vsnprintf(msg, sizeof(msg), fmt, ap);
va_end(ap);
return vans(msg);
}
/**
* vmsg(s): 在底部印出指定訊息或單純的暫停訊息,並傳回使用者的按鍵。
*
* @param s 指定訊息,見 vshowmsg
*/
int
vmsg(const char *msg)
{
int i = 0;
vshowmsg(msg);
// wait for key
do {
i = igetch();
} while( i == 0 );
// clear message bar
move(b_lines, 0);
clrtoeol();
return i;
}
/**
* vmsgf(s, ...): 格式化輸出暫停訊息並呼叫 vmsg)。
*
* @param s 格式化的訊息
*/
int
vmsgf(const char *fmt,...)
{
char msg[VBUFLEN];
va_list ap;
va_start(ap, fmt);
vsnprintf(msg, sizeof(msg), fmt, ap);
va_end(ap);
return vmsg(msg);
}
/**
* vbarf(s, ...): 格式化輸出左右對齊的字串 (MAX_COL)
*
* @param s 格式化字串 (\t 後的內容會對齊右端)
*/
void
vbarf(const char *s, ...)
{
char msg[VBUFLEN], *s2;
va_list ap;
va_start(ap, s);
vsnprintf(msg, sizeof(msg), s, ap);
va_end(ap);
s2 = strchr(msg, '\t');
if (s2) *s2++ = 0;
else s2 = "";
return vbarlr(msg, s2);
}
/**
* vbarlr(l, r): 左右對齊畫滿螢幕 (MAX_COL)
* 注意: 目前的實作自動認定游標已在行開頭。
*
* @param l 靠左對齊的字串 (可含 ANSI 碼)
* @param r 靠右對齊的字串 (可含 ANSI 碼,後面不會補空白)
*/
void
vbarlr(const char *l, const char *r)
{
// TODO strlen_noansi 跑兩次... 其實 l 可以邊 output 邊算。
int szl = strlen_noansi(l),
szr = strlen_noansi(r);
// assume we are already in (y, 0)
clrtoeol();
outs(l);
szl = MAX_COL - szl;
if (szl > szr)
{
nblank(szl - szr);
szl = szr;
}
if (szl == szr)
outs(r);
else if (szl > 0)
nblank(szl);
outs(ANSI_RESET);
}
// ---- THEMED FORMATTING OUTPUT -------------------------------------
/**
* vs_header(title, mid, right): 清空螢幕並輸出完整標題 (MAX_COL)
*
* @param title: 靠左的主要標題,不會被切斷。
* @param mid: 置中說明,可被切齊。
* @param right: 靠右的說明,空間夠才會顯示。
*/
void
vs_header(const char *title, const char *mid, const char *right)
{
int w = MAX_COL;
int szmid = mid ? strlen(mid) : 0;
int szright = right ? strlen(right) : 0;
clear();
outs(VCLR_HEADER);
if (title)
{
outs(VMSG_HDR_PREFIX);
outs(title);
outs(VMSG_HDR_POSTFIX);
w -= MACROSTRLEN(VMSG_HDR_PREFIX) + MACROSTRLEN(VMSG_HDR_POSTFIX);
w -= strlen(title);
}
// determine if we can display right message, and
// if if we need to truncate mid.
if (szmid + szright > w)
szright = 0;
if (szmid >= w)
szmid = w;
else {
int l = (MAX_COL-szmid)/2;
l -= (MAX_COL-w);
if (l > 0)
nblank(l), w -= l;
}
if (szmid) {
outs(VCLR_HEADER_MID);
outns(mid, szmid);
outs(VCLR_HEADER);
}
nblank(w - szmid);
if (szright) {
outs(VCLR_HEADER_RIGHT);
outs(right);
}
outs(ANSI_RESET "\n");
}
/**
* vs_hdr(title): 清空螢幕並輸出簡易的標題
*
* @param title
*/
void
vs_hdr(const char *title)
{
clear();
outs(VCLR_HDR VMSG_HDR_PREFIX);
outs(title);
outs(VMSG_HDR_POSTFIX ANSI_RESET "\n");
}
/**
* vs_footer(caption, msg): 在螢幕底部印出格式化的 caption msg (不可含 ANSI 碼)
*
* @param caption 左邊的分類字串
* @param msg 訊息字串, \t 後文字靠右、最後面會自動留一個空白。
*/
void
vs_footer(const char *caption, const char *msg)
{
int i = 0;
move(b_lines, 0); clrtoeol();
if (caption)
{
outs(VCLR_FOOTER_CAPTION);
outs(caption); i+= strlen(caption);
}
if (!msg) msg = "";
outs(VCLR_FOOTER);
while (*msg && i < SAFE_MAX_COL)
{
if (*msg == '(')
{
outs(VCLR_FOOTER_QUOTE);
}
else if (*msg == '\t')
{
// if we don't have enough space, ignore whole.
int l = strlen(++msg);
if (i + l > SAFE_MAX_COL) break;
l = SAFE_MAX_COL - l - i;
nblank(l);
i += l;
continue;
}
outc(*msg); i++;
if (*msg == ')')
outs(VCLR_FOOTER);
msg ++;
}
nblank(SAFE_MAX_COL-i);
outc(' ');
outs(ANSI_RESET);
}
|