1 /* Copyright (c) 2008, 2009
2  *      Juergen Weigert (jnweiger@immd4.informatik.uni-erlangen.de)
3  *      Michael Schroeder (mlschroe@immd4.informatik.uni-erlangen.de)
4  *      Micah Cowan (micah@cowan.name)
5  *      Sadrul Habib Chowdhury (sadrul@users.sourceforge.net)
6  * Copyright (c) 1993-2002, 2003, 2005, 2006, 2007
7  *      Juergen Weigert (jnweiger@immd4.informatik.uni-erlangen.de)
8  *      Michael Schroeder (mlschroe@immd4.informatik.uni-erlangen.de)
9  * Copyright (c) 1987 Oliver Laumann
10  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 3, or (at your option)
14  * any later version.
15  *
16  * This program is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19  * GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License
22  * along with this program (see the file COPYING); if not, see
23  * https://www.gnu.org/licenses/, or contact Free Software Foundation, Inc.,
24  * 51 Franklin Street, Fifth Floor, Boston, MA  02111-1301  USA
25  *
26  ****************************************************************
27  * $Id$ GNU
28  */
29 
30 
31 #undef IFFONT
32 #undef IFCOLOR
33 
34 #ifdef FONT
35 # define IFFONT(x) x
36 # define IFFONTX(x) x
37 #else
38 # define IFFONT(x)
39 # define IFFONTX(x)
40 #endif
41 
42 #ifdef COLOR
43 # define IFCOLOR(x) x
44 #else
45 # define IFCOLOR(x)
46 #endif
47 
48 #if defined(COLOR) && defined(COLORS16) && defined(COLORS256)
49 # define IFCOLORX(x) x
50 #else
51 # define IFCOLORX(x)
52 #endif
53 
54 #ifdef DW_CHARS
55 # define IFDWCHAR(x) x
56 #else
57 # define IFDWCHAR(x)
58 #endif
59 
60 struct mchar {
61 	 unsigned char image;
62 	 unsigned char attr;
63 IFFONT(  unsigned char font; )
64 IFFONTX( unsigned char fontx; )
65 IFCOLOR( unsigned char color; )
66 IFCOLORX(unsigned char colorx; )
67 IFDWCHAR(unsigned char mbcs; )
68 };
69 
70 struct mline {
71 	 unsigned char *image;
72 	 unsigned char *attr;
73 IFFONT(  unsigned char *font; )
74 IFFONTX( unsigned char *fontx; )
75 IFCOLOR( unsigned char *color; )
76 IFCOLORX(unsigned char *colorx; )
77 };
78 
79 
80 
81 #define save_mline(ml, n) do {						\
82 	 bcopy((char *)(ml)->image, (char *)mline_old.image, (n));	\
83 	 bcopy((char *)(ml)->attr,  (char *)mline_old.attr,  (n));	\
84 IFFONT(	 bcopy((char *)(ml)->font,  (char *)mline_old.font,  (n));    ) \
85 IFFONTX( bcopy((char *)(ml)->fontx, (char *)mline_old.fontx, (n));    ) \
86 IFCOLOR( bcopy((char *)(ml)->color, (char *)mline_old.color, (n));    ) \
87 IFCOLORX(bcopy((char *)(ml)->colorx, (char *)mline_old.colorx, (n));  ) \
88 } while (0)
89 
90 #define bcopy_mline(ml, xf, xt, n) do {					       \
91 	 bcopy((char *)(ml)->image + (xf), (char *)(ml)->image + (xt), (n));   \
92 	 bcopy((char *)(ml)->attr  + (xf), (char *)(ml)->attr  + (xt), (n));   \
93 IFFONT(	 bcopy((char *)(ml)->font  + (xf), (char *)(ml)->font  + (xt), (n)); ) \
94 IFFONTX( bcopy((char *)(ml)->fontx + (xf), (char *)(ml)->fontx + (xt), (n)); ) \
95 IFCOLOR( bcopy((char *)(ml)->color + (xf), (char *)(ml)->color + (xt), (n)); ) \
96 IFCOLORX(bcopy((char *)(ml)->colorx + (xf), (char *)(ml)->colorx + (xt), (n));) \
97 } while (0)
98 
99 #define clear_mline(ml, x, n) do {					       \
100 	 bclear((char *)(ml)->image + (x), (n));			       \
101 	 if ((ml)->attr != null) bzero((char *)(ml)->attr  + (x), (n));	       \
102 IFFONT(  if ((ml)->font != null) bzero((char *)(ml)->font  + (x), (n));      ) \
103 IFFONTX( if ((ml)->fontx != null) bzero((char *)(ml)->fontx + (x), (n));      ) \
104 IFCOLOR( if ((ml)->color!= null) bzero((char *)(ml)->color + (x), (n));      ) \
105 IFCOLORX(if ((ml)->colorx!= null) bzero((char *)(ml)->colorx + (x), (n));    ) \
106 } while (0)
107 
108 #define cmp_mline(ml1, ml2, x) (				\
109 	    (ml1)->image[x] == (ml2)->image[x]			\
110 	 && (ml1)->attr[x]  == (ml2)->attr[x]			\
111 IFFONT(	 && (ml1)->font[x]  == (ml2)->font[x]		      ) \
112 IFFONTX( && (ml1)->fontx[x] == (ml2)->fontx[x]		      ) \
113 IFCOLOR( && (ml1)->color[x] == (ml2)->color[x]		      ) \
114 IFCOLORX(&& (ml1)->colorx[x] == (ml2)->colorx[x]	      ) \
115 )
116 
117 #define cmp_mchar(mc1, mc2) (					\
118 	    (mc1)->image == (mc2)->image			\
119 	 && (mc1)->attr  == (mc2)->attr				\
120 IFFONT(	 && (mc1)->font  == (mc2)->font			      ) \
121 IFFONTX( && (mc1)->fontx == (mc2)->fontx		      ) \
122 IFCOLOR( && (mc1)->color == (mc2)->color		      ) \
123 IFCOLORX(&& (mc1)->colorx == (mc2)->colorx		      ) \
124 )
125 
126 #define cmp_mchar_mline(mc, ml, x) (				\
127 	    (mc)->image == (ml)->image[x]			\
128 	 && (mc)->attr  == (ml)->attr[x]			\
129 IFFONT(	 && (mc)->font  == (ml)->font[x]		      ) \
130 IFFONTX( && (mc)->fontx == (ml)->fontx[x]		      ) \
131 IFCOLOR( && (mc)->color == (ml)->color[x]		      ) \
132 IFCOLORX(&& (mc)->colorx == (ml)->colorx[x]		      ) \
133 )
134 
135 #define copy_mchar2mline(mc, ml, x) do {			\
136 	 (ml)->image[x] = (mc)->image;				\
137 	 (ml)->attr[x]  = (mc)->attr;				\
138 IFFONT(	 (ml)->font[x]  = (mc)->font;			      ) \
139 IFFONTX( (ml)->fontx[x] = (mc)->fontx;			      ) \
140 IFCOLOR( (ml)->color[x] = (mc)->color;			      ) \
141 IFCOLORX((ml)->colorx[x] = (mc)->colorx;		      ) \
142 } while (0)
143 
144 #define copy_mline2mchar(mc, ml, x) do {			\
145 	 (mc)->image = (ml)->image[x];				\
146 	 (mc)->attr  = (ml)->attr[x];				\
147 IFFONT(	 (mc)->font  = (ml)->font[x];			      ) \
148 IFFONTX( (mc)->fontx = (ml)->fontx[x];			      ) \
149 IFCOLOR( (mc)->color = (ml)->color[x];			      ) \
150 IFCOLORX((mc)->colorx = (ml)->colorx[x];		      ) \
151 IFDWCHAR((mc)->mbcs  = 0;				      ) \
152 } while (0)
153 
154 #ifdef COLOR
155 # ifdef COLORS16
156 #  ifdef COLORS256
157 #   define rend_getbg(mc) (((mc)->color & 0xf0) >> 4 | ((mc)->attr & A_BBG ? 0x100 : 0) | ((mc)->colorx & 0xf0))
158 #   define rend_setbg(mc, c) ((mc)->color = ((mc)->color & 0x0f) | (c << 4 & 0xf0), (mc)->colorx = ((mc)->colorx & 0x0f) | (c & 0xf0), (mc)->attr = ((mc)->attr | A_BBG) ^ (c & 0x100 ? 0 : A_BBG))
159 #   define rend_getfg(mc) (((mc)->color & 0x0f) | ((mc)->attr & A_BFG ? 0x100 : 0) | (((mc)->colorx & 0x0f) << 4))
160 #   define rend_setfg(mc, c) ((mc)->color = ((mc)->color & 0xf0) | (c & 0x0f), (mc)->colorx = ((mc)->colorx & 0xf0) | ((c & 0xf0) >> 4), (mc)->attr = ((mc)->attr | A_BFG) ^ (c & 0x100 ? 0 : A_BFG))
161 #   define rend_setdefault(mc) ((mc)->color = (mc)->colorx = 0, (mc)->attr &= ~(A_BBG|A_BFG))
162 #  else
163 #   define rend_getbg(mc) (((mc)->color & 0xf0) >> 4 | ((mc)->attr & A_BBG ? 0x100 : 0))
164 #   define rend_setbg(mc, c) ((mc)->color = ((mc)->color & 0x0f) | (c << 4 & 0xf0), (mc)->attr = ((mc)->attr | A_BBG) ^ (c & 0x100 ? 0 : A_BBG))
165 #   define rend_getfg(mc) (((mc)->color & 0x0f) | ((mc)->attr & A_BFG ? 0x100 : 0))
166 #   define rend_setfg(mc, c) ((mc)->color = ((mc)->color & 0xf0) | (c & 0x0f), (mc)->attr = ((mc)->attr | A_BFG) ^ (c & 0x100 ? 0 : A_BFG))
167 #   define rend_setdefault(mc) ((mc)->color = 0, (mc)->attr &= ~(A_BBG|A_BFG))
168 #  endif
169 #  define coli2e(c) ((((c) & 0x1f8) == 0x108 ? (c) ^ 0x108 : (c & 0xff)) ^ 9)
170 #  define cole2i(c) ((c) >= 8 && (c) < 16 ? (c) ^ 0x109 : (c) ^ 9)
171 # else
172 #  define rend_getbg(mc) (((mc)->color & 0xf0) >> 4)
173 #  define rend_setbg(mc, c) ((mc)->color = ((mc)->color & 0x0f) | (c << 4 & 0xf0))
174 #  define rend_getfg(mc) ((mc)->color & 0x0f)
175 #  define rend_setfg(mc, c) ((mc)->color = ((mc)->color & 0xf0) | (c & 0x0f))
176 #  define rend_setdefault(mc) ((mc)->color = 0)
177 #  define coli2e(c) ((c) ^ 9)
178 #  define cole2i(c) ((c) ^ 9)
179 # endif
180 #endif
181 
182 enum
183 {
184   REND_BELL = 0,
185   REND_MONITOR,
186   REND_SILENCE,
187   NUM_RENDS
188 };
189 
190