1 /* $NetBSD: palette.c,v 1.5 2005/12/11 12:19:45 christos Exp $ */ 2 /* 3 * pelette - manipulate text colormap for NetBSD/x68k. 4 * author: Masaru Oki 5 * 6 * This software is in the Public Domain. 7 */ 8 9 #include <sys/cdefs.h> 10 __RCSID("$NetBSD: palette.c,v 1.5 2005/12/11 12:19:45 christos Exp $"); 11 12 #include <stdio.h> 13 #include <sys/param.h> 14 #include <sys/ioctl.h> 15 #include <sys/mman.h> 16 #include <sys/fcntl.h> 17 18 #define PALETTE_OFFSET 0x2000 /* physical addr: 0xe82000 */ 19 #define PALETTE_SIZE 0x1000 /* at least 1 page */ 20 21 int 22 main(int argc, char *argv[]) 23 { 24 int fd; 25 u_short *palette; 26 char *mapaddr; 27 int r, g, b; 28 int c = 7; 29 30 #ifdef DEBUG 31 { 32 int i; 33 printf("argc = %d\n", argc); 34 for (i = 0; i < argc; i++) 35 printf("argv[%d] = \"%s\"\n", i, argv[i]); 36 } 37 #endif 38 39 if ((fd = open("/dev/grf0", O_RDWR, 0)) < 0) { 40 perror("open"); 41 exit(1); 42 } 43 44 mapaddr = mmap(0, PALETTE_SIZE, PROT_READ | PROT_WRITE, 45 MAP_FILE | MAP_SHARED, fd, PALETTE_OFFSET); 46 if (mapaddr == (caddr_t)-1) { 47 perror("mmap"); 48 close(fd); 49 exit(1); 50 } 51 close(fd); 52 palette = (u_short *)(mapaddr + 0x0200); 53 54 if (argc == 5) { 55 c = atoi(argv[--argc]); 56 if (c > 15) { 57 printf("Usage: %s [red green blue [code]]\n", argv[0]); 58 exit(1); 59 } 60 } 61 if (argc != 4) 62 r = g = b = 31; 63 else { 64 r = atoi(argv[1]); 65 g = atoi(argv[2]); 66 b = atoi(argv[3]); 67 if (r > 31 || g > 31 || b > 31) { 68 printf("Usage: %s [red green blue [code]]\n", argv[0]); 69 r = g = b = 31; 70 } 71 } 72 #ifdef DEBUG 73 printf("color table offset = %d\n", c); 74 printf("r = %d, g = %d, b = %d\n", r, g, b); 75 #endif 76 r <<= 6; 77 g <<= 11; 78 b <<= 1; 79 80 palette[c] = r | g | b | 1; 81 82 exit(0); 83 } 84