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
|
/****************************************************************
* *
* Copyright 2005, 2009 Fidelity Information Services, Inc *
* *
* This source code contains the intellectual property *
* of its copyright holder(s), and is made available *
* under a license. If you do not know the terms of *
* the license, please stop and do not read further. *
* *
****************************************************************/
#ifndef IOTT_EDIT_H
#define IOTT_EDIT_H
#ifdef KEEP_zOS_EBCDIC
LITREF unsigned char ebcdic_lower_to_upper_table[];
LITREF unsigned char e2a[];
# define INPUT_CHAR asc_inchar
# define GETASCII(OUTPARM, INPARM) {OUTPARM = e2a[INPARM];}
# define NATIVE_CVT2UPPER(OUTPARM, INPARM) {OUTPARM = ebcdic_lower_to_upper_table[INPARM];}
#else
# define INPUT_CHAR inchar
# define GETASCII(OUTPARM, INPARM)
# define NATIVE_CVT2UPPER(OUTPARM, INPARM) {OUTPARM = lower_to_upper_table[INPARM];}
#endif
#define GET_OFF(OFFSET) (utf8_active ? buffer_32_start[OFFSET] : buffer_start[OFFSET])
#define STORE_OFF(CHAR,OFFSET) {if (utf8_active) \
buffer_32_start[OFFSET] = CHAR; \
else \
buffer_start[OFFSET] = (unsigned char)CHAR;}
#define BUFF_ADDR(OFFSET) (utf8_active ? (char *)&buffer_32_start[OFFSET] : (char *)&buffer_start[OFFSET])
#define BUFF_CHAR_SIZE (utf8_active ? SIZEOF(wint_t) : SIZEOF(unsigned char))
#define SET_BUFF(OFFSET,CHAR,LENGTH) {if (utf8_active) \
{ int off = OFFSET; \
for ( ; off < (OFFSET + (LENGTH)); off++) \
buffer_32_start[off] = CHAR; \
} \
else \
memset(&buffer_start[OFFSET], CHAR, LENGTH);}
#define MOVE_BUFF(OFFSET,SOURCE,LENGTH) {if (utf8_active) \
memmove(&buffer_32_start[OFFSET], SOURCE, (LENGTH) * SIZEOF(wint_t)); \
else \
memmove(&buffer_start[OFFSET], SOURCE, LENGTH);}
#define IOTT_COMBINED_CHAR_CHECK \
{ \
int tmp_instr; \
\
/* It is possible that a combining character is the character under the cursor in which \
* case we need to erase it by going back "instr" as much as needed until we find \
* a non-zero width representation and from that point on repaint the display. \
*/ \
dx_next = compute_dx(BUFF_ADDR(0), instr + 1, ioptr_width, dx_start); \
if (dx_next == dx_instr) \
{ /* 0-width character (i.e. combining character). handle specially */ \
for (dx_prev = dx_instr, tmp_instr = instr; (tmp_instr != 0); ) \
{ \
tmp_instr--; \
dx_prev = compute_dx(BUFF_ADDR(0), tmp_instr, ioptr_width, dx_start); \
if (dx_prev != dx_next) \
break; \
} \
delchar_width = dx_instr - dx_prev; \
if (delchar_width) \
{ \
move_cursor_left(dx, delchar_width); \
dx = (dx - delchar_width + ioptr_width) % ioptr_width; \
write_str(BUFF_ADDR(tmp_instr), instr - tmp_instr, dx, FALSE, FALSE); \
move_cursor_right(dx, delchar_width); \
dx = (dx + delchar_width + ioptr_width) % ioptr_width; \
} \
} \
}
int iott_write_raw(int fildes, void *str832, unsigned int len);
int write_str(void *str832, unsigned int len, unsigned int start_x, boolean_t move, boolean_t multibyte);
int write_str_spaces(unsigned int len, unsigned int start_x, boolean_t move);
int move_cursor_left (int col, int num_cols);
int move_cursor_right (int col, int num_cols);
int write_loop(int fildes, unsigned char *str, int num_times);
int move_cursor(int fildes, int num_up, int num_left);
int compute_dx(void *str832, unsigned int index, unsigned int width, unsigned int dx_start);
#endif
|
