1 /* $NetBSD: iteconfig.c,v 1.8 2003/09/27 19:35:14 mhitch Exp $ */ 2 /* 3 * Copyright (c) 1994 Christian E. Hopps 4 * All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. All advertising materials mentioning features or use of this software 15 * must display the following acknowledgement: 16 * This product includes software developed by Christian E. Hopps 17 * 4. The name of the author may not be used to endorse or promote products 18 * derived from this software without specific prior written permission 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 30 * 31 */ 32 #include <sys/cdefs.h> 33 #ifndef lint 34 __RCSID("$NetBSD: iteconfig.c,v 1.8 2003/09/27 19:35:14 mhitch Exp $"); 35 #endif 36 37 #include <sys/types.h> 38 #include <sys/stat.h> 39 #include <sys/ioctl.h> 40 #include <sys/queue.h> 41 42 #if !defined(amiga) && !defined(atari) 43 #error "This source is not suitable for this architecture!" 44 #endif 45 46 #if defined(amiga) 47 #include <amiga/dev/grfabs_reg.h> 48 #include <amiga/dev/viewioctl.h> 49 #include <amiga/dev/iteioctl.h> 50 #endif /* defined(amiga) */ 51 52 #if defined(atari) 53 #include <atari/dev/grfabs_reg.h> 54 #include <atari/dev/viewioctl.h> 55 #include <atari/dev/iteioctl.h> 56 #endif /* defined(atari) */ 57 58 #include <err.h> 59 #include <errno.h> 60 #include <fcntl.h> 61 #include <limits.h> 62 #include <stdio.h> 63 #include <stdlib.h> 64 #include <string.h> 65 #include <termios.h> 66 #include <unistd.h> 67 68 #include "pathnames.h" 69 70 int initialize __P((char *, struct itewinsize *, struct itebell *, 71 struct itewinsize *, struct itebell *)); 72 int main __P((int, char **)); 73 void printcmap __P((colormap_t *, int)); 74 void xioctl __P((int, int, void *)); 75 colormap_t *xgetcmap __P((int, int)); 76 long xstrtol __P((char *)); 77 void usage __P((void)); 78 79 int 80 main(argc, argv) 81 int argc; 82 char **argv; 83 { 84 struct itewinsize is, newis; 85 struct itebell ib, newib; 86 struct winsize ws; 87 colormap_t *cm; 88 char *file = _PATH_CONSOLE; 89 int ch, fd, i, iflag, max_colors, did_reset; 90 long val; 91 92 iflag = 0; 93 did_reset = 0; 94 95 fd = initialize(_PATH_CONSOLE, &is, &ib, &newis, &newib); 96 97 while ((ch = getopt(argc, argv, "D:H:P:T:V:W:X:Y:d:f:h:ip:t:v:w:x:y:")) 98 != -1) { 99 switch (ch) { 100 case 'D': /* undocumented backward compat */ 101 case 'd': 102 newis.depth = xstrtol(optarg); 103 break; 104 case 'f': 105 if (did_reset) 106 break; 107 if (fd != -1) 108 close(fd); 109 file = optarg; 110 fd = initialize(optarg, &is, &ib, &newis, &newib); 111 did_reset = optreset = optind = 1; 112 break; 113 case 'H': /* undocumented backward compat */ 114 case 'h': 115 newis.height = xstrtol(optarg); 116 break; 117 case 'i': 118 iflag = 1; 119 break; 120 case 'p': 121 newib.pitch = xstrtol(optarg); 122 break; 123 case 't': 124 newib.msec = xstrtol(optarg); 125 break; 126 case 'V': /* undocumented backward compat */ 127 case 'v': 128 newib.volume = xstrtol(optarg); 129 break; 130 case 'W': /* undocumented backward compat */ 131 case 'w': 132 newis.width = xstrtol(optarg); 133 break; 134 case 'X': /* undocumented backward compat */ 135 case 'x': 136 newis.x = xstrtol(optarg); 137 break; 138 case 'Y': /* undocumented backward compat */ 139 case 'y': 140 newis.y = xstrtol(optarg); 141 break; 142 case '?': 143 default: 144 usage(); 145 /* NOTREACHED */ 146 } 147 } 148 argc -= optind; 149 argv += optind; 150 if(fd == -1) 151 err(1, "open \"%s\"", file); 152 153 if (memcmp(&newis, &is, sizeof(is))) { 154 xioctl(fd, ITEIOCSWINSZ, &newis); 155 xioctl(fd, ITEIOCGWINSZ, &is); 156 } 157 if (memcmp(&newib, &ib, sizeof(ib))) { 158 xioctl(fd, ITEIOCSBELL, &newib); 159 xioctl(fd, ITEIOCGBELL, &ib); 160 } 161 162 /* 163 * get, set and get colors again 164 */ 165 i = 0; 166 max_colors = 1 << is.depth; 167 cm = xgetcmap(fd, max_colors); 168 while (argc--) { 169 val = xstrtol(*argv++); 170 if (i >= max_colors) { 171 warnx("warning: too many colors"); 172 break; 173 } 174 cm->entry[i] = val; 175 i++; 176 } 177 xioctl(fd, VIOCSCMAP, cm); 178 free(cm); 179 cm = xgetcmap(fd, max_colors); 180 181 /* do tty stuff to get it to register the changes. */ 182 xioctl(fd, TIOCGWINSZ, &ws); 183 184 if (iflag) { 185 printf("tty size: rows %d cols %d\n", ws.ws_row, ws.ws_col); 186 printf("ite size: w: %d h: %d d: %d [x: %d y: %d]\n", 187 is.width, is.height, is.depth, is.x, is.y); 188 printf("ite bell: vol: %d millisec: %d pitch: %d\n", 189 ib.volume, ib.msec, ib.pitch); 190 printcmap(cm, ws.ws_col); 191 } 192 close(fd); 193 exit(0); 194 } 195 196 void 197 xioctl(fd, cmd, addr) 198 int fd, cmd; 199 void *addr; 200 { 201 if (ioctl(fd, cmd, addr) == -1) 202 err(1, "ioctl"); 203 } 204 205 long 206 xstrtol(s) 207 char *s; 208 { 209 long rv; 210 211 errno = 0; 212 rv = strtol(s, NULL, 0); 213 if (errno == ERANGE && (rv == LONG_MIN || rv == LONG_MAX)) 214 err(1, "bad format: \"%s\"", s); 215 return(rv); 216 } 217 218 colormap_t * 219 xgetcmap(fd, ncolors) 220 int fd; 221 int ncolors; 222 { 223 colormap_t *cm; 224 225 cm = malloc(sizeof(colormap_t) + ncolors * sizeof(u_long)); 226 if (cm == NULL) 227 err(1, "malloc"); 228 cm->first = 0; 229 cm->size = ncolors; 230 cm->entry = (u_long *) & cm[1]; 231 xioctl(fd, VIOCGCMAP, cm); 232 return(cm); 233 } 234 235 void 236 printcmap(cm, ncols) 237 colormap_t *cm; 238 int ncols; 239 { 240 int i, nel; 241 242 switch (cm->type) { 243 case CM_MONO: 244 printf("monochrome"); 245 return; 246 case CM_COLOR: 247 printf("color levels: red: %d green: %d blue: %d", 248 cm->red_mask + 1, cm->green_mask + 1, cm->blue_mask + 1); 249 break; 250 case CM_GREYSCALE: 251 printf("greyscale levels: %d", cm->grey_mask + 1); 252 break; 253 } 254 printf("\n"); 255 256 nel = ncols / 11 - 1; 257 for (i = 0; i < cm->size; i++) { 258 printf("0x%08lx ", cm->entry[i]); 259 if ((i + 1) % nel == 0) 260 printf("\n"); 261 } 262 if ((i + 1) % nel) 263 printf("\n"); 264 } 265 266 int 267 initialize(file, is, ib, newis, newib) 268 char *file; 269 struct itewinsize *is, *newis; 270 struct itebell *ib, *newib; 271 { 272 int fd; 273 274 fd = open(file, O_RDONLY | O_NONBLOCK); 275 if (fd == -1) 276 return(-1); 277 278 xioctl(fd, ITEIOCGWINSZ, is); 279 xioctl(fd, ITEIOCGBELL, ib); 280 281 memcpy(newis, is, sizeof(*is)); 282 memcpy(newib, ib, sizeof(*ib)); 283 return(fd); 284 } 285 286 void 287 usage() 288 { 289 fprintf(stderr, "%s\n\t\t%s\n\t\t%s\n", 290 "usage: iteconfig [-i] [-f file] [-v volume] [-p pitch] [-t msec]", 291 "[-w width] [-h height] [-d depth] [-x off] [-y off]", 292 "[color ...]"); 293 exit(1); 294 } 295