#ifndef lint static char *RCSid = "$Revision: 1.1.1.1 $"; #endif /* * The code contained in this file is based on xkeycaps by * Jamie Zawinski . It is been modified slightly * for use with sysinfo. */ /* xkeycaps, Copyright (c) 1991, 1992, 1993 Jamie Zawinski * * Permission to use, copy, modify, distribute, and sell this software and its * documentation for any purpose is hereby granted without fee, provided that * the above copyright notice appear in all copies and that both that * copyright notice and this permission notice appear in supporting * documentation. No representations are made about the suitability of this * software for any purpose. It is provided "as is" without express or * implied warranty. */ /* SunOS-specific stuff: if we're on console, we can query the keyboard hardware directly to find out what kind it is. I would have just put this code in guess.c, but vuid_event.h defines a `struct keyboard' that conflicts with our own... */ #include "defs.h" #if __STDC__ #include #include extern char *strdup (const char *); #endif #include #include #include #include #include #include #include #include #if defined(SVR4) || (defined(sunos) && OSMVER == 5) #include #include #include #else #include #include #include #endif #define KBD_DEVICE "/dev/kbd" char * xkeycaps_guess_local_keyboard_type () { int type = -1, layout = 0; int kbdfd; if ((kbdfd = open (KBD_DEVICE, O_WRONLY)) <= 0) { SImsg(SIM_GERR, "Cannot open %s: %s.", KBD_DEVICE, SYSERR); return 0; } if (ioctl (kbdfd, KIOCTYPE, &type) == -1) { SImsg(SIM_GERR, "ioctl KIOCTYPE of %s failed: %s.", KBD_DEVICE, SYSERR); close (kbdfd); return 0; } if (ioctl (kbdfd, KIOCLAYOUT, &layout) == -1) SImsg(SIM_GERR, "ioctl KIOCLAYOUT of %s failed: %s.",KBD_DEVICE,SYSERR); close (kbdfd); switch (type) { case -1: return 0; case KB_ASCII: return "Generic ASCII Terminal"; /* Ascii terminal */ case KB_KLUNK: return "MS103SD32-2"; /* Micro Switch 103SD32-2 */ case KB_VT100: return "Sun VT100"; /* Keytronics VT100 compatible */ case KB_VT220: return "Sun VT220"; /* vt220 Emulation */ case KB_VT220I: return "Sun VT220i"; /* International vt220 Emulation */ case KB_SUN2: return "Sun Type-2"; case KB_SUN3: return "Sun Type-3"; case KB_SUN4: switch (layout) { case 0: return "Sun Type-4 US Unix"; /* Part 320-1005-02 REV A. */ case 1: return "Sun Type-4 US Unix"; /* Part 320-1005-01 REV B. Seems identical... */ case 2: return "Sun Type-4 Belgium/France"; case 3: return "Sun Type-4 French Canadian"; case 4: return "Sun Type-4 Danish"; case 5: return "Sun Type-4 German"; case 6: return "Sun Type-4 Italian"; case 7: return "Sun Type-4 Dutch"; case 8: return "Sun Type-4 Norwegian"; case 9: return "Sun Type-4 Portuguese"; case 10: return "Sun Type-4 Spanish"; case 11: return "Sun Type-4 Swedish/Finnish"; case 12: return "Sun Type-4 Swiss/French"; case 13: return "Sun Type-4 Swiss/German"; case 14: return "Sun Type-4 UK"; case 33: return "Sun Type-5 US PC"; case 34: return "Sun Type-5 US Unix"; case 35: return "Sun Type-5 French"; case 36: return "Sun Type-5 Danish"; case 37: return "Sun Type-5 German"; case 38: return "Sun Type-5 Italian"; case 39: return "Sun Type-5 Dutch"; case 40: return "Sun Type-5 Norwegian"; case 41: return "Sun Type-5 Portuguese"; case 42: return "Sun Type-5 Spanish"; case 43: return "Sun Type-5 Swedish/Finnish"; case 44: return "Sun Type-5 Swiss/French"; case 45: return "Sun Type-5 Swiss/German"; case 46: return "Sun Type-5 UK"; case 47: return "Sun Type-5 Korean"; case 48: return "Sun Type-5 Taiwanese"; case 49: return "Sun Type-5 Nihon-go"; case 50: return "Sun Type-5 French Canadian"; case 80: return "Sun Compact 1 US PC"; case 81: return "Sun Compact 1 US Unix"; case 82: return "Sun Compact 1 French"; case 83: return "Sun Compact 1 Danish"; case 84: return "Sun Compact 1 German"; case 85: return "Sun Compact 1 Italian"; case 86: return "Sun Compact 1 Dutch"; case 87: return "Sun Compact 1 Norwegian"; case 88: return "Sun Compact 1 Portuguese"; case 89: return "Sun Compact 1 Spanish"; case 90: return "Sun Compact 1 Swedish/Finnish"; case 91: return "Sun Compact 1 Swiss/French"; case 92: return "Sun Compact 1 Swiss/German"; case 93: return "Sun Compact 1 UK"; case 94: return "Sun Compact 1 Korean"; case 95: return "Sun Compact 1 Taiwanese"; case 96: return "Sun Compact 1 Nihon-go"; case 97: return "Sun Compact 1 French Canadian"; default: { char buf [255]; (void) snprintf(buf, sizeof(buf), "Sun Type-4 Layout %d", layout); return strdup (buf); } } default: { char buf [255]; if (layout) (void) snprintf(buf, sizeof(buf), "Sun Type-%d Layout %d", type, layout); else (void) snprintf(buf, sizeof(buf), "Sun Type-%d", type); return strdup (buf); } } } /* * Keyboard Probe routine. */ extern DevInfo_t *ProbeKbd(TreePtr) DevInfo_t **TreePtr; { DevInfo_t *DevInfo; DevInfo_t *KbdDev; static char *KbdType = NULL; /* * If we've already been called, return now. */ if (KbdType) return((DevInfo_t *) NULL); KbdType = xkeycaps_guess_local_keyboard_type(); if (!KbdType) return((DevInfo_t *) NULL); if (!(KbdDev = NewDevInfo(NULL))) { SImsg(SIM_GERR, "Cannot create new kbd device."); return((DevInfo_t *) NULL); } KbdDev->Name = "kbd"; KbdDev->Type = DT_KEYBOARD; KbdDev->Model = KbdType; if (TreePtr && *TreePtr) { DevInfo = *TreePtr; /* * Set device master to be the top node if the top node * has no peers. */ if (!DevInfo->Name && DevInfo->Slaves && !DevInfo->Slaves->Next) KbdDev->Master = DevInfo->Slaves; } return(KbdDev); }