xref: /netbsd-src/usr.sbin/wsfontload/wsfontload.c (revision 4472dbe5e3bd91ef2540bada7a7ca7384627ff9b)
1 /* $NetBSD: wsfontload.c,v 1.3 2000/01/25 01:04:07 ad Exp $ */
2 
3 /*
4  * Copyright (c) 1999
5  *	Matthias Drochner.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. All advertising materials mentioning features or use of this software
16  *    must display the following acknowledgement:
17  *	This product includes software developed for the NetBSD Project
18  *	by Matthias Drochner.
19  * 4. The name of the author may not be used to endorse or promote products
20  *    derived from this software without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
31  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32  *
33  */
34 
35 #include <stdio.h>
36 #include <fcntl.h>
37 #include <unistd.h>
38 #include <sys/types.h>
39 #include <sys/ioctl.h>
40 #include <err.h>
41 #include <malloc.h>
42 
43 #include <dev/wscons/wsconsio.h>
44 
45 #define DEFDEV		"/dev/ttyEcfg"
46 #define DEFWIDTH	8
47 #define DEFHEIGHT	16
48 #define DEFENC		WSDISPLAY_FONTENC_ISO
49 #define DEFBITORDER	WSDISPLAY_FONTORDER_L2R
50 #define DEFBYTEORDER	WSDISPLAY_FONTORDER_L2R
51 
52 int main __P((int, char**));
53 static void usage __P((void));
54 static int getencoding __P((char *));
55 
56 static void
57 usage()
58 {
59 	extern char *__progname;
60 
61 	(void)fprintf(stderr,
62 		"Usage: %s [-f wsdev] [-w width] [-h height] [-e encoding]"
63 		" [-N name] [-b] [-B] [fontfile]\n",
64 		      __progname);
65 	exit(1);
66 }
67 
68 int
69 main(argc, argv)
70 	int argc;
71 	char **argv;
72 {
73 	char *wsdev;
74 	struct wsdisplay_font f;
75 	int c, res, wsfd, ffd;
76 	size_t len;
77 	void *buf;
78 
79 	wsdev = DEFDEV;
80 	f.fontwidth = DEFWIDTH;
81 	f.fontheight = DEFHEIGHT;
82 	f.firstchar = 0;
83 	f.numchars = 256;
84 	f.stride = 0;
85 	f.encoding = DEFENC;
86 	f.name = 0;
87 	f.bitorder = DEFBITORDER;
88 	f.byteorder = DEFBYTEORDER;
89 
90 	while ((c = getopt(argc, argv, "f:w:h:e:N:bB")) != -1) {
91 		switch (c) {
92 		case 'f':
93 			wsdev = optarg;
94 			break;
95 		case 'w':
96 			if (sscanf(optarg, "%d", &f.fontwidth) != 1)
97 				errx(1, "invalid font width");
98 			break;
99 		case 'h':
100 			if (sscanf(optarg, "%d", &f.fontheight) != 1)
101 				errx(1, "invalid font height");
102 			break;
103 		case 'e':
104 			f.encoding = getencoding(optarg);
105 			break;
106 		case 'N':
107 			f.name = optarg;
108 			break;
109 		case 'b':
110 			f.bitorder = WSDISPLAY_FONTORDER_R2L;
111 			break;
112 		case 'B':
113 			f.byteorder = WSDISPLAY_FONTORDER_R2L;
114 			break;
115 		case '?':
116 		default:
117 			usage();
118 			break;
119 		}
120 	}
121 	argc -= optind;
122 	argv += optind;
123 
124 	if (argc > 1)
125 		usage();
126 
127 	wsfd = open(wsdev, O_RDWR, 0);
128 	if (wsfd < 0)
129 		err(2, "open ws");
130 
131 	if (argc > 0) {
132 		ffd = open(argv[0], O_RDONLY, 0);
133 		if (ffd < 0)
134 			err(4, "open font");
135 		if (!f.name)
136 			f.name = argv[0];
137 	} else
138 		ffd = 0;
139 
140 	if (!f.stride)
141 		f.stride = (f.fontwidth + 7) / 8;
142 	len = f.fontheight * f.numchars * f.stride;
143 	if (!len)
144 		errx(1, "invalid font size");
145 
146 	buf = malloc(len);
147 	if (!buf)
148 		errx(1, "malloc");
149 	res = read(ffd, buf, len);
150 	if (res < 0)
151 		err(4, "read font");
152 	if (res != len)
153 		errx(4, "short read");
154 
155 	f.data = buf;
156 
157 	res = ioctl(wsfd, WSDISPLAYIO_LDFONT, &f);
158 	if (res < 0)
159 		err(3, "WSDISPLAYIO_LDFONT");
160 
161 	return (0);
162 }
163 
164 static struct {
165 	char *name;
166 	int val;
167 } encodings[] = {
168 	{"iso", WSDISPLAY_FONTENC_ISO},
169 	{"ibm", WSDISPLAY_FONTENC_IBM},
170 	{"pcvt", WSDISPLAY_FONTENC_PCVT},
171 };
172 
173 static int
174 getencoding(name)
175 	char *name;
176 {
177 	int i;
178 
179 	for (i = 0; i < sizeof(encodings) / sizeof(encodings[0]); i++)
180 		if (!strcmp(name, encodings[i].name))
181 			return (encodings[i].val);
182 
183 	if (sscanf(name, "%d", &i) != 1)
184 		errx(1, "invalid encoding");
185 	return (i);
186 }
187