1 /****************************************************************************
2 * Copyright (c) 2009-2010,2012 Free Software Foundation, Inc. *
4 * Permission is hereby granted, free of charge, to any person obtaining a *
5 * copy of this software and associated documentation files (the *
6 * "Software"), to deal in the Software without restriction, including *
7 * without limitation the rights to use, copy, modify, merge, publish, *
8 * distribute, distribute with modifications, sublicense, and/or sell *
9 * copies of the Software, and to permit persons to whom the Software is *
10 * furnished to do so, subject to the following conditions: *
12 * The above copyright notice and this permission notice shall be included *
13 * in all copies or substantial portions of the Software. *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS *
16 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF *
17 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. *
18 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, *
19 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR *
20 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR *
21 * THE USE OR OTHER DEALINGS IN THE SOFTWARE. *
23 * Except as contained in this notice, the name(s) of the above copyright *
24 * holders shall not be used in advertising or otherwise to promote the *
25 * sale, use or other dealings in this Software without prior written *
27 ****************************************************************************/
29 * $Id: test_addchstr.c,v 1.18 2012/12/16 00:36:27 tom Exp $
31 * Demonstrate the waddchstr() and waddch functions.
32 * Thomas Dickey - 2009/9/12
35 #include <test.priv.h>
42 #define AddNStr addchnstr
43 #define AddStr addchstr
44 #define MvAddNStr (void) mvaddchnstr
45 #define MvAddStr (void) mvaddchstr
46 #define MvWAddNStr (void) mvwaddchnstr
47 #define MvWAddStr (void) mvwaddchstr
48 #define WAddNStr waddchnstr
49 #define WAddStr waddchstr
63 static bool m_opt
= FALSE
;
64 static bool pass_ctls
= FALSE
;
65 static bool w_opt
= FALSE
;
66 static int n_opt
= -1;
68 static attr_t show_attr
;
69 static chtype
*temp_buffer
;
70 static size_t temp_length
;
72 #define TempBuffer(source_cast)
75 ChLen(const char *source
)
77 size_t result
= strlen(source
);
83 for (n
= 0; n
< result
; ++n
) {
84 const char *s
= unctrl(UChar(source
[n
]));
86 adjust
+= (strlen(s
) - 1);
95 ChStr(const char *source
)
98 size_t need
= ChLen(source
) + 1;
101 if (need
> temp_length
) {
102 temp_length
= need
* 2;
103 temp_buffer
= typeRealloc(chtype
, temp_length
, temp_buffer
);
105 failed("TempBuffer");
109 chtype ch
= UChar(*source
++);
110 if (!pass_ctls
&& (s
= unctrl(ch
)) != 0) {
112 temp_buffer
[n
++] = UChar(*s
++);
115 temp_buffer
[n
++] = ch
;
117 } while (source
[0] != 0);
119 } else if (temp_buffer
!= 0) {
127 /* color the strings drawn in the workspace */
129 ChStr2(const char *source
)
131 size_t len
= ChLen(source
);
133 chtype
*result
= ChStr(source
);
134 for (n
= 0; n
< len
; ++n
) {
135 result
[n
] |= show_attr
;
141 legend(WINDOW
*win
, int level
, Options state
, char *buffer
, int length
)
143 const char *showstate
;
151 showstate
= " (mvXXX)";
154 showstate
= " (winXXX)";
157 showstate
= " (mvwinXXX)";
163 "The Strings/Chars displays should match. Enter any characters, except:\n");
165 "down-arrow or ^N to repeat on next line, ^W for inner window, ESC to exit.\n");
167 wprintw(win
, "Level %d,%s added %d characters <%s>", level
,
168 showstate
, length
, buffer
);
172 ColOf(char *buffer
, int length
, int margin
)
177 for (n
= 0, result
= margin
+ 1; n
< length
; ++n
) {
178 int ch
= UChar(buffer
[n
]);
181 /* actually newline should clear the remainder of the line
182 * and move to the next line - but that seems a little awkward
193 result
+= (MY_TABSIZE
- (result
% MY_TABSIZE
));
208 #define LEN(n) ((length - (n) > n_opt) ? n_opt : (length - (n)))
212 static bool first
= TRUE
;
224 int margin
= (2 * MY_TABSIZE
) - 1;
225 Options option
= (Options
) ((unsigned) (m_opt
228 | (unsigned) ((w_opt
|| (level
> 0))
234 setlocale(LC_ALL
, "");
236 putenv(strcpy(cmd
, "TABSIZE=8"));
239 (void) cbreak(); /* take input chars one at a time, no wait for \n */
240 (void) noecho(); /* don't echo input */
241 keypad(stdscr
, TRUE
);
244 * Show the characters added in color, to distinguish from those that
249 init_pair(1, COLOR_WHITE
, COLOR_BLUE
);
255 look
= newwin(limit
, COLS
- (2 * (level
- 1)), 0, level
- 1);
256 work
= newwin(limit
- 2, COLS
- (2 * level
), 1, level
);
257 show
= newwin(4, COLS
, limit
+ 1, 0);
263 show
= derwin(stdscr
, 4, COLS
, limit
+ 1, 0);
267 for (col
= margin
+ 1; col
< COLS
; col
+= MY_TABSIZE
)
268 MvWVLine(work
, row
, col
, '.', limit
- 2);
270 MvWVLine(work
, row
, margin
, ACS_VLINE
, limit
- 2);
271 MvWVLine(work
, row
, margin
+ 1, ACS_VLINE
, limit
- 2);
274 MvWAddChStr(work
, 1, 2, ChStr("String"));
275 MvWAddChStr(work
, limit
+ 1, 2, ChStr("Chars"));
278 buffer
[length
= 0] = '\0';
279 legend(show
, level
, option
, buffer
, length
);
285 show_attr
= (attr_t
) COLOR_PAIR(1);
286 wbkgdset(work
, show_attr
| ' ');
288 show_attr
= A_STANDOUT
;
291 while ((ch
= read_linedata(work
)) != ERR
&& !isQUIT(ch
)) {
292 wmove(work
, row
, margin
+ 1);
295 test_adds(level
+ 1);
312 /* put the whole string in, all at once */
317 for (col
= 0; col
< length
; col
+= n_opt
) {
318 col2
= ColOf(buffer
, col
, margin
);
319 if (move(row
, col2
) != ERR
) {
320 AddNStr(ChStr2(buffer
+ col
), LEN(col
));
324 if (move(row
, col2
) != ERR
) {
325 AddStr(ChStr2(buffer
));
331 for (col
= 0; col
< length
; col
+= n_opt
) {
332 col2
= ColOf(buffer
, col
, margin
);
333 MvAddNStr(row
, col2
, ChStr2(buffer
+ col
), LEN(col
));
336 MvAddStr(row
, col2
, ChStr2(buffer
));
341 for (col
= 0; col
< length
; col
+= n_opt
) {
342 col2
= ColOf(buffer
, col
, margin
);
343 if (wmove(work
, row
, col2
) != ERR
) {
344 WAddNStr(work
, ChStr2(buffer
+ col
), LEN(col
));
348 if (wmove(work
, row
, col2
) != ERR
) {
349 WAddStr(work
, ChStr2(buffer
));
355 for (col
= 0; col
< length
; col
+= n_opt
) {
356 col2
= ColOf(buffer
, col
, margin
);
357 MvWAddNStr(work
, row
, col2
, ChStr2(buffer
+ col
),
361 MvWAddStr(work
, row
, col2
, ChStr2(buffer
));
366 /* do the corresponding single-character add */
368 for (col
= 0; col
< length
; ++col
) {
369 col2
= ColOf(buffer
, col
, margin
);
372 if (move(row2
, col2
) != ERR
) {
373 AddCh(UChar(buffer
[col
]));
377 MvAddCh(row2
, col2
, UChar(buffer
[col
]));
380 if (wmove(work
, row2
, col2
) != ERR
) {
381 WAddCh(work
, UChar(buffer
[col
]));
385 MvWAddCh(work
, row2
, col2
, UChar(buffer
[col
]));
397 if (ch
<= 0 || ch
> 255) {
401 buffer
[length
++] = (char) ch
;
402 buffer
[length
] = '\0';
404 /* put the string in, one character at a time */
405 col
= ColOf(buffer
, length
- 1, margin
);
408 if (move(row
, col
) != ERR
) {
409 AddStr(ChStr2(buffer
+ length
- 1));
413 MvAddStr(row
, col
, ChStr2(buffer
+ length
- 1));
416 if (wmove(work
, row
, col
) != ERR
) {
417 WAddStr(work
, ChStr2(buffer
+ length
- 1));
421 MvWAddStr(work
, row
, col
, ChStr2(buffer
+ length
- 1));
425 /* do the corresponding single-character add */
428 if (move(limit
+ row
, col
) != ERR
) {
433 MvAddCh(limit
+ row
, col
, UChar(ch
));
436 if (wmove(work
, limit
+ row
, col
) != ERR
) {
437 WAddCh(work
, UChar(ch
));
441 MvWAddCh(work
, limit
+ row
, col
, UChar(ch
));
447 legend(show
, level
, option
, buffer
, length
);
464 static const char *tbl
[] =
466 "Usage: test_addchstr [options]"
469 ," -f FILE read data from given file"
470 ," -n NUM limit string-adds to NUM bytes on ^N replay"
471 ," -m perform wmove/move separately from add-functions"
472 ," -p pass-thru control characters without using unctrl()"
473 ," -w use window-parameter even when stdscr would be implied"
476 for (n
= 0; n
< SIZEOF(tbl
); ++n
)
477 fprintf(stderr
, "%s\n", tbl
[n
]);
478 ExitProgram(EXIT_FAILURE
);
482 main(int argc GCC_UNUSED
, char *argv
[]GCC_UNUSED
)
486 setlocale(LC_ALL
, "");
488 while ((ch
= getopt(argc
, argv
, "f:mn:pw")) != -1) {
491 init_linedata(optarg
);
497 n_opt
= atoi(optarg
);
517 ExitProgram(EXIT_SUCCESS
);