1 /*
2  * Copyright (c) 1996 Joerg Wunsch
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  * 1. Redistributions of source code must retain the above copyright
8  *    notice, this list of conditions and the following disclaimer.
9  * 2. Redistributions in binary form must reproduce the above copyright
10  *    notice, this list of conditions and the following disclaimer in the
11  *    documentation and/or other materials provided with the distribution.
12  *
13  * THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY EXPRESS OR
14  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
15  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
16  * IN NO EVENT SHALL THE DEVELOPERS BE LIABLE FOR ANY DIRECT, INDIRECT,
17  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
18  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
19  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
20  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
21  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
22  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
23  *
24  * $FreeBSD: stable/9/usr.sbin/sysinstall/keymap.c 183977 2008-10-17 14:40:03Z philip $
25  *
26  */
27 
28 #include "sysinstall.h"
29 #include <errno.h>
30 #include <stdlib.h>
31 #include <string.h>
32 #include <unistd.h>
33 #include <sys/kbio.h>
34 
35 struct keymapInfo {
36     const char *name;
37     const struct keymap *map;
38 };
39 
40 #include "keymap.h"
41 
42 /*
43  * keymap.h is being automatically generated by the Makefile.  It
44  * contains definitions for all desired keymaps.  Note that since we
45  * don't support font loading nor screen mapping during installation,
46  * we simply don't care for any other keys than the ASCII subset.
47  *
48  * Therefore, if no keymap with the exact name has been found in the
49  * first pass, we make a second pass over the table looking just for
50  * the language name only.
51  */
52 
53 #ifdef WITH_SYSCONS
54 static int
keymapSetDefault(const char * prefix)55 keymapSetDefault(const char *prefix)
56 {
57     dialogMenuItem *items = MenuSysconsKeymap.items;
58     int i;
59     size_t plen = strlen(prefix);
60 
61     for (i = 0; items[i].data; ++i)
62 	if (!strncmp(prefix, items[i].data, plen))
63 	    return i;
64 
65     return -1;
66 }
67 
68 int
keymapMenuSelect(dialogMenuItem * self)69 keymapMenuSelect(dialogMenuItem *self)
70 {
71     static const struct {
72 	const char *country, *lang;
73     } map[] = {
74 	{"dk", "danish"},
75 	{"ee", "estonian"},
76 	{"fi", "finnish"},
77 	{"de", "german"},
78 	{"is", "icelandic"},
79 	{"no", "norwegian"},
80 	{"pl", "pl_PL"},
81 	{"es", "spanish"},
82 	{"se", "swedish"},
83 	{"ch", "swiss"},
84 	{"gb", "uk"},
85 	{"gg", "uk"},
86 	{"ie", "uk"},
87 	{"im", "uk"},
88 	{"je", "uk"},
89 	{NULL, NULL}
90     };
91     const char *country, *lang;
92     int i;
93     int choice, scroll, curr, max;
94     char prefix[16 + 1];
95 
96     if ((country = variable_get(VAR_COUNTRY)) != NULL)
97     {
98 	lang = country;
99 	for (i = 0; map[i].country; ++i)
100 	    if (!strcmp(country, map[i].country))
101 	    {
102 		lang = map[i].lang;
103 		break;
104 	    }
105 
106 	snprintf(prefix, sizeof(prefix), "keymap=%s.iso", lang);
107 	if ((choice = keymapSetDefault(prefix)) == -1)
108 	{
109 	    snprintf(prefix, sizeof(prefix), "keymap=%s", lang);
110 	    if ((choice = keymapSetDefault(prefix)) == -1) {
111 #ifdef PC98
112 		    snprintf(prefix, sizeof(prefix), "keymap=jp.pc98");
113 #else
114 		    snprintf(prefix, sizeof(prefix), "keymap=us.iso");
115 #endif
116 		    if ((choice = keymapSetDefault(prefix)) == -1)
117 			    choice = 0;
118 	    }
119 	}
120 
121 	dmenuSetDefaultIndex(&MenuSysconsKeymap, &choice, &scroll, &curr, &max);
122 	return dmenuOpen(&MenuSysconsKeymap, &choice, &scroll, &curr, &max, FALSE);
123     }
124     else
125 	return dmenuOpenSimple(&MenuSysconsKeymap, FALSE) ? DITEM_SUCCESS :
126 	    DITEM_FAILURE;
127 }
128 #endif
129 
130 /*
131  * Return values:
132  *
133  *  0: OK
134  * -1: no appropriate keymap found
135  * -2: error installing map (other than ENXIO which means we're not on syscons)
136  */
137 
138 int
loadKeymap(const char * lang)139 loadKeymap(const char *lang)
140 {
141     int passno, err;
142     char *llang;
143     size_t l;
144     struct keymapInfo *kip;
145 
146     llang = strdup(lang);
147     if (llang == NULL)
148 	abort();
149 
150     for (passno = 0; passno < 2; passno++)
151     {
152 	if (passno > 0)
153 	{
154 	    /* make the match more fuzzy */
155 	    l = strspn(llang, "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789");
156 	    llang[l] = '\0';
157 	}
158 
159 	l = strlen(llang);
160 
161 	for (kip = keymapInfos; kip->name; kip++)
162 	    if (strncmp(kip->name, llang, l) == 0)
163 	    {
164 		/* Yep, got it! */
165 		err = ioctl(0, PIO_KEYMAP, kip->map);
166 		free(llang);
167 		return (err == -1 && errno != ENOTTY)? -2: 0;
168 	    }
169     }
170     free(llang);
171     return -1;
172 }
173