usr.sbin/ 40755 0 0 0 7041616230 10723 5ustar rootwheelusr.sbin/fdformat/ 40755 0 0 0 7041616230 12525 5ustar rootwheelusr.sbin/fdformat/fdformat.c100644 0 0 23124 7030345341 14612 0ustar rootwheel/* * Copyright (C) 1992-1994 by Joerg Wunsch, Dresden * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE * POSSIBILITY OF SUCH DAMAGE. */ /* * FreeBSD: * format a floppy disk * * Added FD_GTYPE ioctl, verifying, proportional indicators. * Serge Vakulenko, vak@zebub.msk.su * Sat Dec 18 17:45:47 MSK 1993 * * Final adaptation, change format/verify logic, add separate * format gap/interleave values * Andrew A. Chernov, ache@astral.msk.su * Thu Jan 27 00:47:24 MSK 1994 */ #include #include #include #include #include #include #include #include #include static void format_track(int fd, int cyl, int secs, int head, int rate, int gaplen, int secsize, int fill,int interleave) { struct fd_formb f; register int i,j; int il[FD_MAX_NSEC + 1]; memset(il,0,sizeof il); for(j = 0, i = 1; i <= secs; i++) { while(il[(j%secs)+1]) j++; il[(j%secs)+1] = i; j += interleave; } f.format_version = FD_FORMAT_VERSION; f.head = head; f.cyl = cyl; f.transfer_rate = rate; f.fd_formb_secshift = secsize; f.fd_formb_nsecs = secs; f.fd_formb_gaplen = gaplen; f.fd_formb_fillbyte = fill; for(i = 0; i < secs; i++) { f.fd_formb_cylno(i) = cyl; f.fd_formb_headno(i) = head; f.fd_formb_secno(i) = il[i+1]; f.fd_formb_secsize(i) = secsize; } if(ioctl(fd, FD_FORM, (caddr_t)&f) < 0) err(1, "ioctl(FD_FORM)"); } static int verify_track(int fd, int track, int tracksize) { static char *buf = 0; static int bufsz = 0; int fdopts = -1, ofdopts, rv = 0; if (ioctl(fd, FD_GOPTS, &fdopts) < 0) warn("warning: ioctl(FD_GOPTS)"); else { ofdopts = fdopts; fdopts |= FDOPT_NORETRY; (void)ioctl(fd, FD_SOPTS, &fdopts); } if (bufsz < tracksize) { if (buf) free (buf); bufsz = tracksize; buf = 0; } if (! buf) buf = malloc (bufsz); if (! buf) errx(2, "out of memory"); if (lseek (fd, (long) track*tracksize, 0) < 0) rv = -1; /* try twice reading it, without using the normal retrier */ else if (read (fd, buf, tracksize) != tracksize && read (fd, buf, tracksize) != tracksize) rv = -1; if(fdopts != -1) (void)ioctl(fd, FD_SOPTS, &ofdopts); return (rv); } static const char * makename(const char *arg, const char *suffix) { static char namebuff[20]; /* big enough for "/dev/rfd0a"... */ memset(namebuff, 0, 20); if(*arg == '\0') /* ??? */ return arg; if(*arg == '/') /* do not convert absolute pathnames */ return arg; strcpy(namebuff, "/dev/r"); strncat(namebuff, arg, 3); strcat(namebuff, suffix); return namebuff; } static void usage (void) { fprintf(stderr, "%s\n%s\n", "usage: fdformat [-q] [-n | -v] [-f #] [-c #] [-s #] [-h #]", " [-r #] [-g #] [-i #] [-S #] [-F #] [-t #] devname"); exit(2); } static int yes (void) { char reply [256], *p; reply[sizeof(reply)-1] = 0; for (;;) { fflush(stdout); if (! fgets (reply, sizeof(reply)-1, stdin)) return (0); for (p=reply; *p==' ' || *p=='\t'; ++p) continue; if (*p=='y' || *p=='Y') return (1); if (*p=='n' || *p=='N' || *p=='\n' || *p=='\r') return (0); printf("Answer `yes' or `no': "); } } int main(int argc, char **argv) { int format = -1, cyls = -1, secs = -1, heads = -1, intleave = -1; int rate = -1, gaplen = -1, secsize = -1, steps = -1; int fill = 0xf6, quiet = 0, verify = 1, verify_only = 0; int fd, c, track, error, tracks_per_dot, bytes_per_track, errs; const char *devname, *suffix; struct fd_type fdt; int ispc98; size_t len = sizeof (ispc98); if (sysctlbyname("machdep.ispc98", &ispc98, &len, NULL, 0) == -1) ispc98 = 0; while((c = getopt(argc, argv, "f:c:s:h:r:g:S:F:t:i:qvn")) != -1) switch(c) { case 'f': /* format in kilobytes */ format = atoi(optarg); break; case 'c': /* # of cyls */ cyls = atoi(optarg); break; case 's': /* # of secs per track */ secs = atoi(optarg); break; case 'h': /* # of heads */ heads = atoi(optarg); break; case 'r': /* transfer rate, kilobyte/sec */ rate = atoi(optarg); break; case 'g': /* length of GAP3 to format with */ gaplen = atoi(optarg); break; case 'S': /* sector size shift factor (1 << S)*128 */ secsize = atoi(optarg); break; case 'F': /* fill byte, C-like notation allowed */ fill = (int)strtol(optarg, (char **)0, 0); break; case 't': /* steps per track */ steps = atoi(optarg); break; case 'i': /* interleave factor */ intleave = atoi(optarg); break; case 'q': quiet = 1; break; case 'n': verify = 0; break; case 'v': verify = 1; verify_only = 1; break; case '?': default: usage(); } if(optind != argc - 1) usage(); if (ispc98) { switch(format) { default: errx(2, "bad floppy size: %dK", format); case -1: suffix = ""; break; case 360: suffix = ".360"; break; case 720: suffix = ".720"; break; case 800: suffix = ".800"; break; case 820: suffix = ".820"; break; case 1200: suffix = ".1200"; break; case 1440: suffix = ".1440"; break; case 1480: suffix = ".1480"; break; case 1720: suffix = ".1720"; break; /* PC-98 only */ case 640: suffix = ".640"; break; case 1232: suffix = ".1232"; break; case 1280: suffix = ".1280"; break; case 1476: suffix = ".1476"; break; } } else { switch(format) { default: errx(2, "bad floppy size: %dK", format); case -1: suffix = ""; break; case 360: suffix = ".360"; break; case 720: suffix = ".720"; break; case 800: suffix = ".800"; break; case 820: suffix = ".820"; break; case 1200: suffix = ".1200"; break; case 1440: suffix = ".1440"; break; case 1480: suffix = ".1480"; break; case 1720: suffix = ".1720"; break; } } devname = makename(argv[optind], suffix); if((fd = open(devname, O_RDWR)) < 0) err(1, "%s", devname); if(ioctl(fd, FD_GTYPE, &fdt) < 0) errx(1, "not a floppy disk: %s", devname); if (ispc98) { switch(rate) { case -1: break; case 0: fdt.trans = 0; break; case 1: fdt.trans = 1; break; case 2: fdt.trans = 2; break; default: errx(2, "invalid transfer rate: %d", rate); } } else { switch(rate) { case -1: break; case 250: fdt.trans = FDC_250KBPS; break; case 300: fdt.trans = FDC_300KBPS; break; case 500: fdt.trans = FDC_500KBPS; break; default: errx(2, "invalid transfer rate: %d", rate); } } if (cyls >= 0) fdt.tracks = cyls; if (secs >= 0) fdt.sectrac = secs; if (fdt.sectrac > FD_MAX_NSEC) errx(2, "too many sectors per track, max value is %d", FD_MAX_NSEC); if (heads >= 0) fdt.heads = heads; if (gaplen >= 0) fdt.f_gap = gaplen; if (secsize >= 0) fdt.secsize = secsize; if (steps >= 0) fdt.steptrac = steps; if (intleave >= 0) fdt.f_inter = intleave; bytes_per_track = fdt.sectrac * (1< #include #include #include #include "chap_ms.h" /* unused, for documentation only */ /* only NTResp is filled in for FreeBSD */ struct MS_ChapResponse { u_char LANManResp[24]; u_char NTResp[24]; u_char UseNT; /* If 1, ignore the LANMan response field */ }; static u_char Get7Bits(u_char *input, int startBit) { register unsigned int word; word = (unsigned)input[startBit / 8] << 8; word |= (unsigned)input[startBit / 8 + 1]; word >>= 15 - (startBit % 8 + 7); return word & 0xFE; } /* IN 56 bit DES key missing parity bits OUT 64 bit DES key with parity bits added */ static void MakeKey(u_char *key, u_char *des_key) { des_key[0] = Get7Bits(key, 0); des_key[1] = Get7Bits(key, 7); des_key[2] = Get7Bits(key, 14); des_key[3] = Get7Bits(key, 21); des_key[4] = Get7Bits(key, 28); des_key[5] = Get7Bits(key, 35); des_key[6] = Get7Bits(key, 42); des_key[7] = Get7Bits(key, 49); des_set_odd_parity((des_cblock *)des_key); } static void /* IN 8 octets IN 7 octest OUT 8 octets */ DesEncrypt(u_char *clear, u_char *key, u_char *cipher) { des_cblock des_key; des_key_schedule key_schedule; MakeKey(key, des_key); des_set_key(&des_key, key_schedule); des_ecb_encrypt((des_cblock *)clear, (des_cblock *)cipher, key_schedule, 1); } static void /* IN 8 octets IN 16 octets OUT 24 octets */ ChallengeResponse(u_char *challenge, u_char *pwHash, u_char *response) { char ZPasswordHash[21]; memset(ZPasswordHash, '\0', sizeof ZPasswordHash); memcpy(ZPasswordHash, pwHash, 16); DesEncrypt(challenge, ZPasswordHash + 0, response + 0); DesEncrypt(challenge, ZPasswordHash + 7, response + 8); DesEncrypt(challenge, ZPasswordHash + 14, response + 16); } /* passwordHash 16-bytes MD4 hashed password challenge 8-bytes peer CHAP challenge since passwordHash is in a 24-byte buffer, response is written in there */ void mschap_NT(char *passwordHash, char *challenge) { u_char response[24]; ChallengeResponse(challenge, passwordHash, response); memcpy(passwordHash, response, 24); passwordHash[24] = 1; /* NT-style response */ } void mschap_LANMan(char *digest, char *challenge, char *secret) #endif /* HAVE_DES */ { static u_char salt[] = "KGS!@#$%"; /* RASAPI32.dll */ char SECRET[14], *ptr, *end; u_char hash[16]; end = SECRET + sizeof SECRET; for (ptr = SECRET; *secret && ptr < end; ptr++, secret++) *ptr = toupper(*secret); if (ptr < end) memset(ptr, '\0', end - ptr); DesEncrypt(salt, SECRET, hash); DesEncrypt(salt, SECRET + 7, hash + 8); ChallengeResponse(challenge, hash, digest); } usr.sbin/tzsetup/ 40755 0 0 0 7041616230 12441 5ustar rootwheelusr.sbin/tzsetup/Makefile100644 0 0 1211 7030345341 14171 0ustar rootwheel# $FreeBSD: src/usr.sbin/tzsetup/Makefile,v 1.7.2.1 1999/08/29 15:48:49 peter Exp $ PROG= tzsetup MAN8= tzsetup.8 CFLAGS+= -I${.CURDIR} .if ${MACHINE} == "pc98" CFLAGS+= -DKANJI .if defined(MAKEOBJDIRPREFIX) LDADD+= -L${MAKEOBJDIRPREFIX}${.CURDIR}/../../release/libdialogj -ldialogj LDADD+= -L${MAKEOBJDIRPREFIX}${.CURDIR}/../../release/libncursesj -lncursesj -lmytinfo .else LDADD+= -L/usr/obj/${.CURDIR}/../../release/libdialogj -ldialogj LDADD+= -L/usr/obj/${.CURDIR}/../../release/libncursesj -lncursesj -lmytinfo .endif .else LDADD+= -ldialog -lncurses -lmytinfo .endif DPADD+= ${LIBDIALOG} ${LIBNCURSES} ${LIBMYTINFO} .include usr.sbin/tzsetup/tzsetup.c100644 0 0 46501 7030345341 14446 0ustar rootwheel/* * Copyright 1996 Massachusetts Institute of Technology * * Permission to use, copy, modify, and distribute this software and * its documentation for any purpose and without fee is hereby * granted, provided that both the above copyright notice and this * permission notice appear in all copies, that both the above * copyright notice and this permission notice appear in all * supporting documentation, and that the name of M.I.T. not be used * in advertising or publicity pertaining to distribution of the * software without specific, written prior permission. M.I.T. makes * no representations about the suitability of this software for any * purpose. It is provided "as is" without express or implied * warranty. * * THIS SOFTWARE IS PROVIDED BY M.I.T. ``AS IS''. M.I.T. DISCLAIMS * ALL EXPRESS OR IMPLIED WARRANTIES WITH REGARD TO THIS SOFTWARE, * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT * SHALL M.I.T. BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ /* * Second attempt at a `tzmenu' program, using the separate description * files provided in newer tzdata releases. */ #ifndef lint static const char rcsid[] = "$FreeBSD: src/usr.sbin/tzsetup/tzsetup.c,v 1.11.2.3 1999/08/29 15:48:49 peter Exp $"; #endif /* not lint */ #include #include #include #include #include #include #include #include #include #include #include #include "paths.h" #ifdef KANJI static int kanji; static char *kanji_message; static char *kanji_message2; #define KANJI_MESSAGE(A) kanji_message = A #define KANJI_MESSAGE2(A) kanji_message2 = A #define KM(A) ((kanji) ? kanji_message : A) #define KM2(A) ((kanji) ? kanji_message2 : A) #endif /* KANJI */ static int reallydoit = 1; static int continent_country_menu(dialogMenuItem *); static int set_zone_multi(dialogMenuItem *); static int set_zone_whole_country(dialogMenuItem *); static int set_zone_menu(dialogMenuItem *); struct continent { dialogMenuItem *menu; int nitems; int ch; int sc; }; static struct continent africa, america, antarctica, arctic, asia, atlantic; static struct continent australia, europe, indian, pacific; static struct continent_names { char *name; struct continent *continent; } continent_names[] = { { "Africa", &africa }, { "America", &america }, { "Antarctica", &antarctica }, { "Arctic", &arctic }, { "Asia", &asia }, { "Atlantic", &atlantic }, { "Australia", &australia }, { "Europe", &europe }, { "Indian", &indian }, { "Pacific", &pacific } }; static dialogMenuItem continents[] = { { "1", "Africa", 0, continent_country_menu, 0, &africa }, { "2", "America -- North and South", 0, continent_country_menu, 0, &america }, { "3", "Antarctica", 0, continent_country_menu, 0, &antarctica }, { "4", "Arctic Ocean", 0, continent_country_menu, 0, &arctic }, { "5", "Asia", 0, continent_country_menu, 0, &asia }, { "6", "Atlantic Ocean", 0, continent_country_menu, 0, &atlantic }, { "7", "Australia", 0, continent_country_menu, 0, &australia }, { "8", "Europe", 0, continent_country_menu, 0, &europe }, { "9", "Indian Ocean", 0, continent_country_menu, 0, &indian }, { "0", "Pacific Ocean", 0, continent_country_menu, 0, &pacific } }; #ifdef KANJI static dialogMenuItem continents_j[] = { { "1", "¥¢¥Õ¥ê¥«", 0, continent_country_menu, 0, &africa }, { "2", "¥¢¥á¥ê¥« -- ÆîË̤Ȥâ", 0, continent_country_menu, 0, &america }, { "3", "Æî¶Ë", 0, continent_country_menu, 0, &antarctica }, { "4", "Ë̶˳¤", 0, continent_country_menu, 0, &arctic }, { "5", "¥¢¥¸¥¢", 0, continent_country_menu, 0, &asia }, { "6", "ÂçÀ¾ÍÎ", 0, continent_country_menu, 0, &atlantic }, { "7", "¥ª¡¼¥¹¥È¥é¥ê¥¢", 0, continent_country_menu, 0, &australia }, { "8", "¥è¡¼¥í¥Ã¥Ñ", 0, continent_country_menu, 0, &europe }, { "9", "¥¤¥ó¥ÉÍÎ", 0, continent_country_menu, 0, &indian }, { "0", "ÂÀÊ¿ÍÎ", 0, continent_country_menu, 0, &pacific } }; #endif /* KANJI */ #define NCONTINENTS ((sizeof continents)/(sizeof continents[0])) #define OCEANP(x) ((x) == 3 || (x) == 5 || (x) == 8 || (x) == 9) static int continent_country_menu(dialogMenuItem *continent) { int rv; struct continent *contp = continent->data; char title[256]; int isocean = OCEANP(continent - continents); int menulen; /* Short cut -- if there's only one country, don't post a menu. */ if (contp->nitems == 1) { return set_zone_menu(&contp->menu[0]); } /* It's amazing how much good grammar really matters... */ if (!isocean) { KANJI_MESSAGE("%s ¤Ë¤¢¤ë¹ñ"); snprintf(title, sizeof title, KM("Countries in %s"), continent->title); } else { KANJI_MESSAGE("%s ¤Ë¤¢¤ëÅç¡¢½ôÅç"); snprintf(title, sizeof title, KM("Islands and groups in the %s"), continent->title); } menulen = contp->nitems < 16 ? contp->nitems : 16; KANJI_MESSAGE("Åç¡¢½ôÅç¤òÁªÂò¤·¤Æ²¼¤µ¤¤"); KANJI_MESSAGE2("¹ñ¤òÁªÂò¤·¤Æ²¼¤µ¤¤"); rv = dialog_menu(title, (isocean ? KM("Select an island or group") : KM2("Select a country")), -1, -1, menulen, -contp->nitems, contp->menu, 0, &contp->ch, &contp->sc); if (rv == 0) return DITEM_LEAVE_MENU; return DITEM_RECREATE; } static struct continent * find_continent(const char *name) { int i; for (i = 0; i < NCONTINENTS; i++) { if (strcmp(name, continent_names[i].name) == 0) return continent_names[i].continent; } return 0; } struct country { char *name; char *tlc; int nzones; char *filename; /* use iff nzones < 0 */ struct continent *continent; /* use iff nzones < 0 */ TAILQ_HEAD(, zone) zones; /* use iff nzones > 0 */ dialogMenuItem *submenu; /* use iff nzones > 0 */ }; struct zone { TAILQ_ENTRY(zone) link; char *descr; char *filename; struct continent *continent; }; /* * This is the easiest organization... we use ISO 3166 country codes, * of the two-letter variety, so we just size this array to suit. * Beats worrying about dynamic allocation. */ #define NCOUNTRIES (26*26) static struct country countries[NCOUNTRIES]; #define CODE2INT(s) ((s[0] - 'A') * 26 + (s[1] - 'A')) /* * Read the ISO 3166 country code database in _PATH_ISO3166 * (/usr/share/misc/iso3166). On error, exit via err(3). */ static void read_iso3166_table(void) { FILE *fp; char *s, *t, *name; size_t len; int lineno; struct country *cp; fp = fopen(_PATH_ISO3166, "r"); if (!fp) err(1, _PATH_ISO3166); lineno = 0; while ((s = fgetln(fp, &len)) != 0) { lineno++; if (s[len - 1] != '\n') errx(1, _PATH_ISO3166 ":%d: invalid format", lineno); s[len - 1] = '\0'; if (s[0] == '#' || strspn(s, " \t") == len - 1) continue; /* Isolate the two-letter code. */ t = strsep(&s, "\t"); if (t == 0 || strlen(t) != 2) errx(1, _PATH_ISO3166 ":%d: invalid format", lineno); if (t[0] < 'A' || t[0] > 'Z' || t[1] < 'A' || t[1] > 'Z') errx(1, _PATH_ISO3166 ":%d: invalid code `%s'", lineno, t); /* Now skip past the three-letter and numeric codes. */ name = strsep(&s, "\t"); /* 3-let */ if (name == 0 || strlen(name) != 3) errx(1, _PATH_ISO3166 ":%d: invalid format", lineno); name = strsep(&s, "\t"); /* numeric */ if (name == 0 || strlen(name) != 3) errx(1, _PATH_ISO3166 ":%d: invalid format", lineno); name = s; cp = &countries[CODE2INT(t)]; if (cp->name) errx(1, _PATH_ISO3166 ":%d: country code `%s' multiply defined: %s", lineno, t, cp->name); cp->name = strdup(name); cp->tlc = strdup(t); } fclose(fp); } static void add_zone_to_country(int lineno, const char *tlc, const char *descr, const char *file, struct continent *cont) { struct zone *zp; struct country *cp; if (tlc[0] < 'A' || tlc[0] > 'Z' || tlc[1] < 'A' || tlc[1] > 'Z') errx(1, _PATH_ZONETAB ":%d: country code `%s' invalid", lineno, tlc); cp = &countries[CODE2INT(tlc)]; if (cp->name == 0) errx(1, _PATH_ZONETAB ":%d: country code `%s' unknown", lineno, tlc); if (descr) { if (cp->nzones < 0) errx(1, _PATH_ZONETAB ":%d: conflicting zone definition", lineno); zp = malloc(sizeof *zp); if (zp == 0) err(1, "malloc(%lu)", (unsigned long)sizeof *zp); if (cp->nzones == 0) TAILQ_INIT(&cp->zones); zp->descr = strdup(descr); zp->filename = strdup(file); zp->continent = cont; TAILQ_INSERT_TAIL(&cp->zones, zp, link); cp->nzones++; } else { if (cp->nzones > 0) errx(1, _PATH_ZONETAB ":%d: zone must have description", lineno); if (cp->nzones < 0) errx(1, _PATH_ZONETAB ":%d: zone multiply defined", lineno); cp->nzones = -1; cp->filename = strdup(file); cp->continent = cont; } } /* * This comparison function intentionally sorts all of the null-named * ``countries''---i.e., the codes that don't correspond to a real * country---to the end. Everything else is lexical by country name. */ static int compare_countries(const void *xa, const void *xb) { const struct country *a = xa, *b = xb; if (a->name == 0 && b->name == 0) return 0; if (a->name == 0 && b->name != 0) return 1; if (b->name == 0) return -1; return strcmp(a->name, b->name); } /* * This must be done AFTER all zone descriptions are read, since it breaks * CODE2INT(). */ static void sort_countries(void) { qsort(countries, NCOUNTRIES, sizeof countries[0], compare_countries); } static void read_zones(void) { FILE *fp; char *line; size_t len; int lineno; char *tlc, *coord, *file, *descr, *p; char contbuf[16]; struct continent *cont; fp = fopen(_PATH_ZONETAB, "r"); if (!fp) err(1, _PATH_ZONETAB); lineno = 0; while ((line = fgetln(fp, &len)) != 0) { lineno++; if (line[len - 1] != '\n') errx(1, _PATH_ZONETAB ":%d: invalid format", lineno); line[len - 1] = '\0'; if (line[0] == '#') continue; tlc = strsep(&line, "\t"); if (strlen(tlc) != 2) errx(1, _PATH_ZONETAB ":%d: invalid country code `%s'", lineno, tlc); coord = strsep(&line, "\t"); file = strsep(&line, "\t"); p = strchr(file, '/'); if (p == 0) errx(1, _PATH_ZONETAB ":%d: invalid zone name `%s'", lineno, file); contbuf[0] = '\0'; strncat(contbuf, file, p - file); cont = find_continent(contbuf); if (!cont) errx(1, _PATH_ZONETAB ":%d: invalid region `%s'", lineno, contbuf); descr = (line && *line) ? line : 0; add_zone_to_country(lineno, tlc, descr, file, cont); } fclose(fp); } static void make_menus(void) { struct country *cp; struct zone *zp, *zp2; struct continent *cont; dialogMenuItem *dmi; int i; /* * First, count up all the countries in each continent/ocean. * Be careful to count those countries which have multiple zones * only once for each. NB: some countries are in multiple * continents/oceans. */ for (cp = countries; cp->name; cp++) { if (cp->nzones == 0) continue; if (cp->nzones < 0) { cp->continent->nitems++; } else { for (zp = cp->zones.tqh_first; zp; zp = zp->link.tqe_next) { cont = zp->continent; for (zp2 = cp->zones.tqh_first; zp2->continent != cont; zp2 = zp2->link.tqe_next) ; if (zp2 == zp) zp->continent->nitems++; } } } /* * Now allocate memory for the country menus. We set * nitems back to zero so that we can use it for counting * again when we actually build the menus. */ for (i = 0; i < NCONTINENTS; i++) { continent_names[i].continent->menu = malloc(sizeof(dialogMenuItem) * continent_names[i].continent->nitems); if (continent_names[i].continent->menu == 0) err(1, "malloc for continent menu"); continent_names[i].continent->nitems = 0; } /* * Now that memory is allocated, create the menu items for * each continent. For multiple-zone countries, also create * the country's zone submenu. */ for (cp = countries; cp->name; cp++) { if (cp->nzones == 0) continue; if (cp->nzones < 0) { dmi = &cp->continent->menu[cp->continent->nitems]; memset(dmi, 0, sizeof *dmi); asprintf(&dmi->prompt, "%d", ++cp->continent->nitems); dmi->title = cp->name; dmi->checked = 0; dmi->fire = set_zone_whole_country; dmi->selected = 0; dmi->data = cp; } else { cp->submenu = malloc(cp->nzones * sizeof *dmi); if (cp->submenu == 0) err(1, "malloc for submenu"); cp->nzones = 0; for (zp = cp->zones.tqh_first; zp; zp = zp->link.tqe_next) { cont = zp->continent; dmi = &cp->submenu[cp->nzones]; memset(dmi, 0, sizeof *dmi); asprintf(&dmi->prompt, "%d", ++cp->nzones); dmi->title = zp->descr; dmi->checked = 0; dmi->fire = set_zone_multi; dmi->selected = 0; dmi->data = zp; for (zp2 = cp->zones.tqh_first; zp2->continent != cont; zp2 = zp2->link.tqe_next) ; if (zp2 != zp) continue; dmi = &cont->menu[cont->nitems]; memset(dmi, 0, sizeof *dmi); asprintf(&dmi->prompt, "%d", ++cont->nitems); dmi->title = cp->name; dmi->checked = 0; dmi->fire = set_zone_menu; dmi->selected = 0; dmi->data = cp; } } } } static int set_zone_menu(dialogMenuItem *dmi) { int rv; char buf[256]; struct country *cp = dmi->data; int menulen; snprintf(buf, sizeof buf, "%s Time Zones", cp->name); menulen = cp->nzones < 16 ? cp->nzones : 16; KANJI_MESSAGE("¤¢¤Ê¤¿¤Î¾ì½ê¤ÈƱ¤¸»þ´ÖÂӤˤ¢¤ëÃÏ°è¤ò" "ÁªÂò¤·¤Æ²¼¤µ¤¤"); rv = dialog_menu(buf, KM("Select a zone which observes the same time as " "your locality."), -1, -1, menulen, -cp->nzones, cp->submenu, 0, 0, 0); if (rv != 0) return DITEM_RECREATE; return DITEM_LEAVE_MENU; } static int install_zone_file(const char *filename) { struct stat sb; int fd1, fd2; int copymode; char *msg; ssize_t len; char buf[1024]; if (lstat(_PATH_LOCALTIME, &sb) < 0) /* Nothing there yet... */ copymode = 1; else if(S_ISLNK(sb.st_mode)) copymode = 0; else copymode = 1; #ifdef VERBOSE if (copymode) asprintf(&msg, "Copying %s to " _PATH_LOCALTIME, filename); else asprintf(&msg, "Creating symbolic link " _PATH_LOCALTIME " to %s", filename); dialog_notify(msg); free(msg); #endif if (reallydoit) { if (copymode) { fd1 = open(filename, O_RDONLY, 0); if (fd1 < 0) { asprintf(&msg, "Could not open %s: %s", filename, strerror(errno)); dialog_mesgbox("Error", msg, 8, 72); free(msg); return DITEM_FAILURE | DITEM_RECREATE; } unlink(_PATH_LOCALTIME); fd2 = open(_PATH_LOCALTIME, O_CREAT|O_EXCL|O_WRONLY, S_IRUSR|S_IRGRP|S_IROTH); if (fd2 < 0) { asprintf(&msg, "Could not open " _PATH_LOCALTIME ": %s", strerror(errno)); dialog_mesgbox("Error", msg, 8, 72); free(msg); return DITEM_FAILURE | DITEM_RECREATE; } while ((len = read(fd1, buf, sizeof buf)) > 0) len = write(fd2, buf, len); if (len == -1) { asprintf(&msg, "Error copying %s to " _PATH_LOCALTIME ": %s", filename, strerror(errno)); dialog_mesgbox("Error", msg, 8, 72); free(msg); /* Better to leave none than a corrupt one. */ unlink(_PATH_LOCALTIME); return DITEM_FAILURE | DITEM_RECREATE; } close(fd1); close(fd2); } else { if (access(filename, R_OK) != 0) { asprintf(&msg, "Cannot access %s: %s", filename, strerror(errno)); dialog_mesgbox("Error", msg, 8, 72); free(msg); return DITEM_FAILURE | DITEM_RECREATE; } unlink(_PATH_LOCALTIME); if (symlink(filename, _PATH_LOCALTIME) < 0) { asprintf(&msg, "Cannot create symbolic link " _PATH_LOCALTIME " to %s: %s", filename, strerror(errno)); dialog_mesgbox("Error", msg, 8, 72); free(msg); return DITEM_FAILURE | DITEM_RECREATE; } } } #ifdef VERBOSE if (copymode) asprintf(&msg, "Copied timezone file from %s to " _PATH_LOCALTIME, filename); else asprintf(&msg, "Created symbolic link from " _PATH_LOCALTIME " to %s", filename); dialog_mesgbox("Done", msg, 8, 72); free(msg); #endif return DITEM_LEAVE_MENU; } static int confirm_zone(const char *filename) { char *msg; struct tm *tm; time_t t = time(0); int rv; setenv("TZ", filename, 1); tzset(); tm = localtime(&t); KANJI_MESSAGE("¾Êά·Á¡Ö%s¡×¤ÇŬÅö¤Ç¤·¤ç¤¦¤«¡©"); asprintf(&msg, KM("Does the abbreviation `%s' look reasonable?"), tm->tm_zone); rv = !dialog_yesno("Confirmation", msg, 5, 72); free(msg); return rv; } static int set_zone_multi(dialogMenuItem *dmi) { char *fn; struct zone *zp = dmi->data; int rv; if (!confirm_zone(zp->filename)) return DITEM_FAILURE | DITEM_RECREATE; asprintf(&fn, "%s/%s", _PATH_ZONEINFO, zp->filename); rv = install_zone_file(fn); free(fn); return rv; } static int set_zone_whole_country(dialogMenuItem *dmi) { char *fn; struct country *cp = dmi->data; int rv; if (!confirm_zone(cp->filename)) return DITEM_FAILURE | DITEM_RECREATE; asprintf(&fn, "%s/%s", _PATH_ZONEINFO, cp->filename); rv = install_zone_file(fn); free(fn); return rv; } static void usage() { fprintf(stderr, "usage: tzsetup [-n]\n"); exit(1); } int main(int argc, char **argv) { int c, fd; #ifdef KANJI char *p; int ispc98; size_t len = sizeof (ispc98); if ((p=getenv("LANG")) && strcmp(p, "ja_JP.EUC") == 0) kanji = 1; /* ´Á»úɽ¼¨¥â¡¼¥É¤Ç¥Þ¥·¥ó¤¬ PC98 ¤Ç TERM ¤¬ cons25 ¤Ê¤é cons25w ¤Ë¤¹¤ë */ if (sysctlbyname("machdep.ispc98", &ispc98, &len, NULL, 0) == -1) ispc98 = 0; if (kanji && ispc98) { p = getenv("TERM"); if (p && strcmp(p, "cons25") == 0) putenv("TERM=cons25w"); } #endif /* KANJI */ while ((c = getopt(argc, argv, "n")) != -1) { switch(c) { case 'n': reallydoit = 0; break; default: usage(); } } if (argc - optind > 1) usage(); /* Override the user-supplied umask. */ (void)umask(S_IWGRP|S_IWOTH); read_iso3166_table(); read_zones(); sort_countries(); make_menus(); init_dialog(); /* KANJI_MESSAGE("³Îǧ¤·¤Æ²¼¤µ¤¤"); */ KANJI_MESSAGE("ÃÏ°è or UTC(¶¨ÄêÀ¤³¦»þ)¥¯¥í¥Ã¥¯ÁªÂò"); KANJI_MESSAGE2( "¤³¤Î¥Þ¥·¥ó¤Î CMOS ¥¯¥í¥Ã¥¯¤ò UTC (¶¨ÄêÀ¤³¦»þ) ¤Ë¹ç¤ï¤»¤¿¾õÂ֤ǻÈÍÑ\n" "¤·¤Þ¤¹¤«¡©\n" "¤â¤·¤½¤¦¤Ç¤Ï¤Ê¤¯, ¤½¤ÎÃÏ°è¤Î»þ¹ï¤Ë¤·¤Æ¤ª¤­¤¿¤¤¾ì¹ç¡¢Ëô¤Ï¤è¤¯¤ï¤«¤é\n" "¤Ê¤¤¤Ê¤é, ¤³¤³¤Ç¡ÖNO¡×¤òÁªÂò¤·¤Æ²¼¤µ¤¤ (Windows ¤Ê¤É¤ÈƱ°ì¥Þ¥·¥ó¤Ç\n" "¶¦Â¸¤µ¤»¤ë¾ì¹ç¤Ï¤³¤ÎÀßÄ꤬¤ª´«¤á¤Ç¤¹)"); if (!dialog_yesno(KM("Select local or UTC (Greenwich Mean Time) clock"), KM2("Is this machine's CMOS clock set to UTC? If it is set to local time,\n" "or you don't know, please choose NO here!"), -1, -1)) { if (reallydoit) unlink(_PATH_WALL_CMOS_CLOCK); } else { if (reallydoit) { fd = open(_PATH_WALL_CMOS_CLOCK, O_WRONLY|O_CREAT|O_TRUNC, S_IRUSR|S_IRGRP|S_IROTH); if (fd < 0) err(1, "create %s", _PATH_WALL_CMOS_CLOCK); close(fd); } } dialog_clear_norefresh(); if (optind == argc - 1) { char *msg; asprintf(&msg, "\nUse the default `%s' zone?", argv[optind]); if (!dialog_yesno("Default timezone provided", msg, 7, 72)) { install_zone_file(argv[optind]); dialog_clear(); end_dialog(); return 0; } free(msg); dialog_clear_norefresh(); } KANJI_MESSAGE("¥¿¥¤¥à¥¾¡¼¥óÁªÂò"); KANJI_MESSAGE2("ÃÏ°è¤òÁªÂò¤·¤Æ²¼¤µ¤¤"); dialog_menu(KM("Time Zone Selector"), KM2("Select a region"), -1, -1, NCONTINENTS, -NCONTINENTS, continents, 0, NULL, NULL); dialog_clear(); end_dialog(); return 0; } usr.sbin/vidcontrol/ 40755 0 0 0 7041616230 13106 5ustar rootwheelusr.sbin/vidcontrol/Makefile100644 0 0 210 7030345341 14614 0ustar rootwheelPROG= vidcontrol SRCS= vidcontrol.c decode.c CFLAGS += -Wall .if ${MACHINE} == "pc98" CFLAGS += -DPC98 .endif .include usr.sbin/vidcontrol/vidcontrol.c100644 0 0 31205 7030345341 15553 0ustar rootwheel/*- * Copyright (c) 1994-1996 Søren Schmidt * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer, * in this position and unchanged. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. The name of the author may not be used to endorse or promote products * derived from this software withough specific prior written permission * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ #ifndef lint static const char rcsid[] = "$FreeBSD: src/usr.sbin/vidcontrol/vidcontrol.c,v 1.26.2.2 1999/08/29 15:48:54 peter Exp $"; #endif /* not lint */ #include #include #include #include #include #include #include #include #include "path.h" #include "decode.h" char legal_colors[16][16] = { "black", "blue", "green", "cyan", "red", "magenta", "brown", "white", "grey", "lightblue", "lightgreen", "lightcyan", "lightred", "lightmagenta", "yellow", "lightwhite" }; int hex = 0; int number; char letter; struct vid_info info; static void usage() { fprintf(stderr, "%s\n%s\n%s\n", "usage: vidcontrol [-r fg bg] [-b color] [-c appearance] [-d] [-l scrmap]", " [-i adapter | mode] [-L] [-m on|off] [-f size file]", " [-s number] [-t N|off] [-x] [mode] [fgcol [bgcol]] [show]"); exit(1); } char * nextarg(int ac, char **av, int *indp, int oc) { if (*indp < ac) return(av[(*indp)++]); errx(1, "option requires two arguments -- %c", oc); return(""); } char * mkfullname(const char *s1, const char *s2, const char *s3) { static char *buf = NULL; static int bufl = 0; int f; f = strlen(s1) + strlen(s2) + strlen(s3) + 1; if (f > bufl) if (buf) buf = (char *)realloc(buf, f); else buf = (char *)malloc(f); if (!buf) { bufl = 0; return(NULL); } bufl = f; strcpy(buf, s1); strcat(buf, s2); strcat(buf, s3); return(buf); } void load_scrnmap(char *filename) { FILE *fd = 0; int i, size; char *name; scrmap_t scrnmap; char *prefix[] = {"", "", SCRNMAP_PATH, SCRNMAP_PATH, NULL}; char *postfix[] = {"", ".scm", "", ".scm"}; for (i=0; prefix[i]; i++) { name = mkfullname(prefix[i], filename, postfix[i]); fd = fopen(name, "r"); if (fd) break; } if (fd == NULL) { warn("screenmap file not found"); return; } size = sizeof(scrnmap); if (decode(fd, (char *)&scrnmap) != size) { rewind(fd); if (fread(&scrnmap, 1, size, fd) != size) { warnx("bad screenmap file"); fclose(fd); return; } } if (ioctl(0, PIO_SCRNMAP, &scrnmap) < 0) warn("can't load screenmap"); fclose(fd); } void load_default_scrnmap() { scrmap_t scrnmap; int i; for (i=0; i<256; i++) *((char*)&scrnmap + i) = i; if (ioctl(0, PIO_SCRNMAP, &scrnmap) < 0) warn("can't load default screenmap"); } void print_scrnmap() { unsigned char map[256]; int i; if (ioctl(0, GIO_SCRNMAP, &map) < 0) { warn("getting screenmap"); return; } for (i=0; i 0 && i % 16 == 0) fprintf(stdout, "\n"); if (hex) fprintf(stdout, " %02x", map[i]); else fprintf(stdout, " %03d", map[i]); } fprintf(stdout, "\n"); } void load_font(char *type, char *filename) { FILE *fd = 0; int i, size; unsigned long io; char *name, *fontmap; char *prefix[] = {"", "", FONT_PATH, FONT_PATH, NULL}; char *postfix[] = {"", ".fnt", "", ".fnt"}; for (i=0; prefix[i]; i++) { name = mkfullname(prefix[i], filename, postfix[i]); fd = fopen(name, "r"); if (fd) break; } if (fd == NULL) { warn("font file not found"); return; } if (!strcmp(type, "8x8")) { size = 8*256; io = PIO_FONT8x8; } else if (!strcmp(type, "8x14")) { size = 14*256; io = PIO_FONT8x14; } else if (!strcmp(type, "8x16")) { size = 16*256; io = PIO_FONT8x16; } else { warn("bad font size specification"); fclose(fd); return; } fontmap = (char*) malloc(size); if (decode(fd, fontmap) != size) { rewind(fd); if (fread(fontmap, 1, size, fd) != size) { warnx("bad font file"); fclose(fd); free(fontmap); return; } } if (ioctl(0, io, fontmap) < 0) warn("can't load font"); fclose(fd); free(fontmap); } void set_screensaver_timeout(char *arg) { int nsec; if (!strcmp(arg, "off")) nsec = 0; else { nsec = atoi(arg); if ((*arg == '\0') || (nsec < 1)) { warnx("argument must be a positive number"); return; } } if (ioctl(0, CONS_BLANKTIME, &nsec) == -1) warn("setting screensaver period"); } void set_cursor_type(char *appearence) { int type; if (!strcmp(appearence, "normal")) type = 0; else if (!strcmp(appearence, "blink")) type = 1; else if (!strcmp(appearence, "destructive")) type = 3; else { warnx("argument to -c must be normal, blink or destructive"); return; } ioctl(0, CONS_CURSORTYPE, &type); } void video_mode(int argc, char **argv, int *index) { static struct { char *name; unsigned long mode; } modes[] = { #ifdef PC98 { "PC98_80x25", SW_PC98_80x25 }, { "PC98_80x30", SW_PC98_80x30 }, #else #ifdef SW_TEXT_80x25 { "80x25", SW_TEXT_80x25 }, { "80x30", SW_TEXT_80x30 }, { "80x43", SW_TEXT_80x43 }, { "80x50", SW_TEXT_80x50 }, { "80x60", SW_TEXT_80x60 }, { "132x25", SW_TEXT_132x25 }, { "132x30", SW_TEXT_132x30 }, { "132x43", SW_TEXT_132x43 }, { "132x50", SW_TEXT_132x50 }, { "132x60", SW_TEXT_132x60 }, #endif { "VGA_40x25", SW_VGA_C40x25 }, { "VGA_80x25", SW_VGA_C80x25 }, { "VGA_80x30", SW_VGA_C80x30 }, { "VGA_80x50", SW_VGA_C80x50 }, { "VGA_80x60", SW_VGA_C80x60 }, { "VGA_320x200", SW_VGA_CG320 }, { "EGA_80x25", SW_ENH_C80x25 }, { "EGA_80x43", SW_ENH_C80x43 }, { "VESA_132x25", SW_VESA_C132x25 }, { "VESA_132x43", SW_VESA_C132x43 }, { "VESA_132x50", SW_VESA_C132x50 }, { "VESA_132x60", SW_VESA_C132x60 }, { "VESA_800x600", SW_VESA_800x600 }, #endif /* PC98 */ { NULL }, }; unsigned long mode = 0; int size[3]; int i; if (*index < argc) { for (i = 0; modes[i].name != NULL; ++i) { if (!strcmp(argv[*index], modes[i].name)) { mode = modes[i].mode; break; } } if (modes[i].name == NULL) return; if (ioctl(0, mode, NULL) < 0) warn("cannot set videomode"); if (mode == SW_VESA_800x600) { size[0] = 80; /* columns */ size[1] = 25; /* rows */ size[2] = 16; /* font size */ if (ioctl(0, KDRASTER, size)) warn("cannot activate raster display"); } (*index)++; } return; } int get_color_number(char *color) { int i; for (i=0; i<16; i++) if (!strcmp(color, legal_colors[i])) return i; return -1; } void set_normal_colors(int argc, char **argv, int *index) { int color; if (*index < argc && (color = get_color_number(argv[*index])) != -1) { (*index)++; fprintf(stderr, "[=%dF", color); if (*index < argc && (color = get_color_number(argv[*index])) != -1 && color < 8) { (*index)++; fprintf(stderr, "[=%dG", color); } } } void set_reverse_colors(int argc, char **argv, int *index) { int color; if ((color = get_color_number(argv[*(index)-1])) != -1) { fprintf(stderr, "[=%dH", color); if (*index < argc && (color = get_color_number(argv[*index])) != -1 && color < 8) { (*index)++; fprintf(stderr, "[=%dI", color); } } } void set_console(char *arg) { int n; if( !arg || strspn(arg,"0123456789") != strlen(arg)) { warnx("bad console number"); return; } n = atoi(arg); if (n < 1 || n > 12) { warnx("console number out of range"); } else if (ioctl(0, VT_ACTIVATE, (caddr_t) (long) n) == -1) warn("ioctl(VT_ACTIVATE)"); } void set_border_color(char *arg) { int color; if ((color = get_color_number(arg)) != -1) { fprintf(stderr, "[=%dA", color); } else usage(); } void set_mouse(char *arg) { struct mouse_info mouse; if (!strcmp(arg, "on")) mouse.operation = MOUSE_SHOW; else if (!strcmp(arg, "off")) mouse.operation = MOUSE_HIDE; else { warnx("argument to -m must either on or off"); return; } ioctl(0, CONS_MOUSECTL, &mouse); } static char *adapter_name(int type) { static struct { int type; char *name; } names[] = { { KD_MONO, "MDA" }, { KD_HERCULES, "Hercules" }, { KD_CGA, "CGA" }, { KD_EGA, "EGA" }, { KD_VGA, "VGA" }, { KD_PC98, "PC-98xx" }, { -1, "Unknown" }, }; int i; for (i = 0; names[i].type != -1; ++i) if (names[i].type == type) break; return names[i].name; } void show_adapter_info(void) { struct video_adapter_info ad; ad.va_index = 0; if (ioctl(0, CONS_ADPINFO, &ad)) { warn("failed to obtain adapter information"); return; } printf("fb%d:\n", ad.va_index); printf(" %.*s%d, type:%s%s (%d), flags:0x%x\n", (int)sizeof(ad.va_name), ad.va_name, ad.va_unit, (ad.va_flags & V_ADP_VESA) ? "VESA " : "", adapter_name(ad.va_type), ad.va_type, ad.va_flags); printf(" initial mode:%d, current mode:%d, BIOS mode:%d\n", ad.va_initial_mode, ad.va_mode, ad.va_initial_bios_mode); } void show_mode_info(void) { struct video_info info; char buf[80]; int mode; int c; printf(" mode# flags type size " "font window linear buffer\n"); printf("---------------------------------------" "---------------------------------------\n"); for (mode = 0; mode < M_VESA_MODE_MAX; ++mode) { info.vi_mode = mode; if (ioctl(0, CONS_MODEINFO, &info)) continue; printf("%3d (0x%03x)", mode, mode); printf(" 0x%08x", info.vi_flags); if (info.vi_flags & V_INFO_GRAPHICS) { c = 'G'; snprintf(buf, sizeof(buf), "%dx%dx%d %d", info.vi_width, info.vi_height, info.vi_depth, info.vi_planes); } else { c = 'T'; snprintf(buf, sizeof(buf), "%dx%d", info.vi_width, info.vi_height); } printf(" %c %-15s", c, buf); snprintf(buf, sizeof(buf), "%dx%d", info.vi_cwidth, info.vi_cheight); printf(" %-5s", buf); printf(" 0x%05x %2dk %2dk", info.vi_window, (int)info.vi_window_size/1024, (int)info.vi_window_gran/1024); printf(" 0x%08x %2dk\n", info.vi_buffer, (int)info.vi_buffer_size/1024); } } void show_info(char *arg) { if (!strcmp(arg, "adapter")) show_adapter_info(); else if (!strcmp(arg, "mode")) show_mode_info(); else { warnx("argument to -i must either adapter or mode"); return; } } void test_frame() { int i; fprintf(stdout, "[=0G\n\n"); for (i=0; i<8; i++) { fprintf(stdout, "[=15F[=0G %2d [=%dF%-16s" "[=15F[=0G %2d [=%dF%-16s " "[=15F %2d [=%dGBACKGROUND[=0G\n", i, i, legal_colors[i], i+8, i+8, legal_colors[i+8], i, i); } fprintf(stdout, "[=%dF[=%dG[=%dH[=%dI\n", info.mv_norm.fore, info.mv_norm.back, info.mv_rev.fore, info.mv_rev.back); } int main(int argc, char **argv) { int opt; info.size = sizeof(info); if (ioctl(0, CONS_GETINFO, &info) < 0) err(1, "must be on a virtual console"); while((opt = getopt(argc, argv, "b:c:df:i:l:Lm:r:s:t:x")) != -1) switch(opt) { case 'b': set_border_color(optarg); break; case 'c': set_cursor_type(optarg); break; case 'd': print_scrnmap(); break; case 'f': load_font(optarg, nextarg(argc, argv, &optind, 'f')); break; case 'i': show_info(optarg); break; case 'l': load_scrnmap(optarg); break; case 'L': load_default_scrnmap(); break; case 'm': set_mouse(optarg); break; case 'r': set_reverse_colors(argc, argv, &optind); break; case 's': set_console(optarg); break; case 't': set_screensaver_timeout(optarg); break; case 'x': hex = 1; break; default: usage(); } video_mode(argc, argv, &optind); set_normal_colors(argc, argv, &optind); if (optind < argc && !strcmp(argv[optind], "show")) { test_frame(); optind++; } if ((optind != argc) || (argc == 1)) usage(); return 0; }