fileio.c revision 1.1 1 /* $NetBSD: fileio.c,v 1.1 2008/04/14 20:38:45 jdc Exp $ */
2
3 /*-
4 * Copyright (c) 2008 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Julian Coleman.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
24 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
25 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
26 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
27 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
28 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
29 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
30 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
31 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
32 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
33 * POSSIBILITY OF SUCH DAMAGE.
34 */
35
36 #include <sys/cdefs.h>
37 #ifndef lint
38 __RCSID("$NetBSD: fileio.c,v 1.1 2008/04/14 20:38:45 jdc Exp $");
39 #endif /* not lint */
40
41 #include "curses.h"
42 #include "curses_private.h"
43 #include "fileio.h"
44 #include <stdio.h>
45 #include <stdlib.h>
46
47 #ifdef HAVE_WCHAR
48 static int __putnsp(nschar_t *, FILE *);
49 static int __getnsp(nschar_t *, FILE *);
50 #endif /* HAVE_WCHAR */
51
52 #ifdef HAVE_WCHAR
53 /*
54 * __putnsp --
55 * Write non-spacing character chain to file, consisting of:
56 * ((int) 1, (wchar_t) ch) pairs followed by (int) 0.
57 */
58 static int
59 __putnsp(nschar_t *nsp, FILE *fp)
60 {
61 int n;
62
63 n = 1;
64 while (nsp != NULL) {
65 if (fwrite(&n, sizeof(int), 1, fp) != 1)
66 return ERR;
67 if (fwrite(&nsp->ch, sizeof(wchar_t), 1, fp) != 1)
68 return ERR;
69 }
70 n = 0;
71 if (fwrite(&n, sizeof(int), 1, fp) != 1)
72 return ERR;
73
74 return OK;
75 }
76 #endif /* HAVE_WCHAR */
77
78 /*
79 * putwin --
80 * Write window data to file
81 */
82 int
83 putwin(WINDOW *win, FILE *fp)
84 {
85 int major = CURSES_LIB_MAJOR;
86 int minor = CURSES_LIB_MINOR;
87 int y, x;
88 __LDATA *sp;
89
90 #ifdef DEBUG
91 __CTRACE(__CTRACE_FILEIO, "putwin: win %p\n", win);
92 #endif
93
94 if (win == NULL)
95 return ERR;
96
97 /* win can't be a subwin */
98 if (win->orig != NULL)
99 return ERR;
100
101 /* Library version */
102 if (fwrite(&major, sizeof(int), 1, fp) != 1)
103 return ERR;
104 if (fwrite(&minor, sizeof(int), 1, fp) != 1)
105 return ERR;
106
107 /* Window parameters */
108 if (fwrite(win, sizeof(WINDOW), 1, fp) != 1)
109 return ERR;
110 #ifdef HAVE_WCHAR
111 /* Background non-spacing character */
112 if (__putnsp(win->bnsp, fp) == ERR)
113 return ERR;
114 #endif /* HAVE_WCHAR */
115
116 /* Lines and line data */
117 for (y = 0; y < win->maxy; y++)
118 for (sp = win->lines[y]->line, x = 0; x < win->maxx;
119 x++, sp++) {
120 if (fwrite(&sp->ch, sizeof(wchar_t), 1, fp) != 1)
121 return ERR;
122 if (fwrite(&sp->attr, sizeof(attr_t), 1, fp) != 1)
123 return ERR;
124 #ifdef HAVE_WCHAR
125 if (sp->nsp != NULL) {
126 if (__putnsp(win->bnsp, fp) == ERR)
127 return ERR;
128 }
129 #endif /* HAVE_WCHAR */
130 }
131
132 return OK;
133 }
134
135 #ifdef HAVE_WCHAR
136 /*
137 * __getnsp --
138 * Read non-spacing character chain from file
139 */
140 static int
141 __getnsp(nschar_t *nsp, FILE *fp)
142 {
143 int n;
144 nschar_t *onsp, *tnsp;
145
146 if (fread(&n, sizeof(int), 1, fp) != 1)
147 return ERR;
148 onsp = nsp;
149 while (n != 0) {
150 tnsp = (nschar_t *)malloc(sizeof(nschar_t));
151 if (tnsp == NULL) {
152 __cursesi_free_nsp(nsp);
153 return OK;
154 }
155 if (fread(&tnsp->ch, sizeof(wchar_t), 1, fp) != 1) {
156 __cursesi_free_nsp(nsp);
157 return OK;
158 }
159 tnsp->next = NULL;
160 onsp->next = tnsp;
161 onsp = onsp->next;
162 if (fread(&n, sizeof(int), 1, fp) != 1) {
163 __cursesi_free_nsp(nsp);
164 return ERR;
165 }
166 }
167 return OK;
168 }
169 #endif /* HAVE_WCHAR */
170
171 /*
172 * getwin --
173 * Read window data from file
174 */
175 WINDOW *
176 getwin(FILE *fp)
177 {
178 int major, minor;
179 WINDOW *wtmp, *win;
180 int y, x;
181 __LDATA *sp;
182
183 #ifdef DEBUG
184 __CTRACE(__CTRACE_FILEIO, "getwin\n");
185 #endif
186
187 /* Check library version */
188 if (fread(&major, sizeof(int), 1, fp) != 1)
189 return NULL;
190 if (fread(&minor, sizeof(int), 1, fp) != 1)
191 return NULL;
192 if(major != CURSES_LIB_MAJOR || minor != CURSES_LIB_MINOR)
193 return NULL;
194
195 /* Window parameters */
196 wtmp = (WINDOW *)malloc(sizeof(WINDOW));
197 if (wtmp == NULL)
198 return NULL;
199 if (fread(wtmp, sizeof(WINDOW), 1, fp) != 1)
200 goto error0;
201 win = __newwin(_cursesi_screen, wtmp->maxy, wtmp->maxx,
202 wtmp->begy, wtmp->begx, FALSE);
203 if (win == NULL)
204 goto error0;
205 win->cury = wtmp->cury;
206 win->curx = wtmp->curx;
207 win->reqy = wtmp->reqy;
208 win->reqx = wtmp->reqx;
209 win->flags = wtmp->flags;
210 win->delay = wtmp->delay;
211 win->wattr = wtmp->wattr;
212 win->bch = wtmp->bch;
213 win->battr = wtmp->battr;
214 win->scr_t = wtmp->scr_t;
215 win->scr_b = wtmp->scr_b;
216 free(wtmp);
217 __swflags(win);
218
219 #ifdef HAVE_WCHAR
220 if (__getnsp(win->bnsp, fp) == ERR)
221 goto error1;
222 #endif /* HAVE_WCHAR */
223
224 /* Lines and line data */
225 for (y = 0; y < win->maxy; y++) {
226 for (sp = win->lines[y]->line, x = 0; x < win->maxx;
227 x++, sp++) {
228 if (fread(&sp->ch, sizeof(wchar_t), 1, fp) != 1)
229 goto error1;
230 if (fread(&sp->attr, sizeof(attr_t), 1, fp) != 1)
231 goto error1;
232 #ifdef HAVE_WCHAR
233 if (sp->nsp != NULL) {
234 if (__getnsp(win->bnsp, fp) == ERR)
235 goto error1;
236 }
237 #endif /* HAVE_WCHAR */
238 }
239 __touchline(win, y, 0, (int) win->maxx - 1);
240 }
241 #ifdef DEBUG
242 __CTRACE(__CTRACE_FILEIO, "getwin: win = 0x%p\n", win);
243 #endif
244 return win;
245
246 error1:
247 delwin(win);
248 error0:
249 free(wtmp);
250 return NULL;
251 }
252