xref: /linux/scripts/mod/file2alias.c (revision 60e13231561b3a4c5269bfa1ef6c0569ad6f28ec)
1 /* Simple code to turn various tables in an ELF file into alias definitions.
2  * This deals with kernel datastructures where they should be
3  * dealt with: in the kernel source.
4  *
5  * Copyright 2002-2003  Rusty Russell, IBM Corporation
6  *           2003       Kai Germaschewski
7  *
8  *
9  * This software may be used and distributed according to the terms
10  * of the GNU General Public License, incorporated herein by reference.
11  */
12 
13 #include "modpost.h"
14 
15 /* We use the ELF typedefs for kernel_ulong_t but bite the bullet and
16  * use either stdint.h or inttypes.h for the rest. */
17 #if KERNEL_ELFCLASS == ELFCLASS32
18 typedef Elf32_Addr	kernel_ulong_t;
19 #define BITS_PER_LONG 32
20 #else
21 typedef Elf64_Addr	kernel_ulong_t;
22 #define BITS_PER_LONG 64
23 #endif
24 #ifdef __sun__
25 #include <inttypes.h>
26 #else
27 #include <stdint.h>
28 #endif
29 
30 #include <ctype.h>
31 
32 typedef uint32_t	__u32;
33 typedef uint16_t	__u16;
34 typedef unsigned char	__u8;
35 
36 /* Big exception to the "don't include kernel headers into userspace, which
37  * even potentially has different endianness and word sizes, since
38  * we handle those differences explicitly below */
39 #include "../../include/linux/mod_devicetable.h"
40 
41 #define ADD(str, sep, cond, field)                              \
42 do {                                                            \
43         strcat(str, sep);                                       \
44         if (cond)                                               \
45                 sprintf(str + strlen(str),                      \
46                         sizeof(field) == 1 ? "%02X" :           \
47                         sizeof(field) == 2 ? "%04X" :           \
48                         sizeof(field) == 4 ? "%08X" : "",       \
49                         field);                                 \
50         else                                                    \
51                 sprintf(str + strlen(str), "*");                \
52 } while(0)
53 
54 /* Always end in a wildcard, for future extension */
55 static inline void add_wildcard(char *str)
56 {
57 	int len = strlen(str);
58 
59 	if (str[len - 1] != '*')
60 		strcat(str + len, "*");
61 }
62 
63 unsigned int cross_build = 0;
64 /**
65  * Check that sizeof(device_id type) are consistent with size of section
66  * in .o file. If in-consistent then userspace and kernel does not agree
67  * on actual size which is a bug.
68  * Also verify that the final entry in the table is all zeros.
69  * Ignore both checks if build host differ from target host and size differs.
70  **/
71 static void device_id_check(const char *modname, const char *device_id,
72 			    unsigned long size, unsigned long id_size,
73 			    void *symval)
74 {
75 	int i;
76 
77 	if (size % id_size || size < id_size) {
78 		if (cross_build != 0)
79 			return;
80 		fatal("%s: sizeof(struct %s_device_id)=%lu is not a modulo "
81 		      "of the size of section __mod_%s_device_table=%lu.\n"
82 		      "Fix definition of struct %s_device_id "
83 		      "in mod_devicetable.h\n",
84 		      modname, device_id, id_size, device_id, size, device_id);
85 	}
86 	/* Verify last one is a terminator */
87 	for (i = 0; i < id_size; i++ ) {
88 		if (*(uint8_t*)(symval+size-id_size+i)) {
89 			fprintf(stderr,"%s: struct %s_device_id is %lu bytes.  "
90 				"The last of %lu is:\n",
91 				modname, device_id, id_size, size / id_size);
92 			for (i = 0; i < id_size; i++ )
93 				fprintf(stderr,"0x%02x ",
94 					*(uint8_t*)(symval+size-id_size+i) );
95 			fprintf(stderr,"\n");
96 			fatal("%s: struct %s_device_id is not terminated "
97 				"with a NULL entry!\n", modname, device_id);
98 		}
99 	}
100 }
101 
102 /* USB is special because the bcdDevice can be matched against a numeric range */
103 /* Looks like "usb:vNpNdNdcNdscNdpNicNiscNipN" */
104 static void do_usb_entry(struct usb_device_id *id,
105 			 unsigned int bcdDevice_initial, int bcdDevice_initial_digits,
106 			 unsigned char range_lo, unsigned char range_hi,
107 			 unsigned char max, struct module *mod)
108 {
109 	char alias[500];
110 	strcpy(alias, "usb:");
111 	ADD(alias, "v", id->match_flags&USB_DEVICE_ID_MATCH_VENDOR,
112 	    id->idVendor);
113 	ADD(alias, "p", id->match_flags&USB_DEVICE_ID_MATCH_PRODUCT,
114 	    id->idProduct);
115 
116 	strcat(alias, "d");
117 	if (bcdDevice_initial_digits)
118 		sprintf(alias + strlen(alias), "%0*X",
119 			bcdDevice_initial_digits, bcdDevice_initial);
120 	if (range_lo == range_hi)
121 		sprintf(alias + strlen(alias), "%X", range_lo);
122 	else if (range_lo > 0 || range_hi < max) {
123 		if (range_lo > 0x9 || range_hi < 0xA)
124 			sprintf(alias + strlen(alias),
125 				"[%X-%X]",
126 				range_lo,
127 				range_hi);
128 		else {
129 			sprintf(alias + strlen(alias),
130 				range_lo < 0x9 ? "[%X-9" : "[%X",
131 				range_lo);
132 			sprintf(alias + strlen(alias),
133 				range_hi > 0xA ? "a-%X]" : "%X]",
134 				range_lo);
135 		}
136 	}
137 	if (bcdDevice_initial_digits < (sizeof(id->bcdDevice_lo) * 2 - 1))
138 		strcat(alias, "*");
139 
140 	ADD(alias, "dc", id->match_flags&USB_DEVICE_ID_MATCH_DEV_CLASS,
141 	    id->bDeviceClass);
142 	ADD(alias, "dsc",
143 	    id->match_flags&USB_DEVICE_ID_MATCH_DEV_SUBCLASS,
144 	    id->bDeviceSubClass);
145 	ADD(alias, "dp",
146 	    id->match_flags&USB_DEVICE_ID_MATCH_DEV_PROTOCOL,
147 	    id->bDeviceProtocol);
148 	ADD(alias, "ic",
149 	    id->match_flags&USB_DEVICE_ID_MATCH_INT_CLASS,
150 	    id->bInterfaceClass);
151 	ADD(alias, "isc",
152 	    id->match_flags&USB_DEVICE_ID_MATCH_INT_SUBCLASS,
153 	    id->bInterfaceSubClass);
154 	ADD(alias, "ip",
155 	    id->match_flags&USB_DEVICE_ID_MATCH_INT_PROTOCOL,
156 	    id->bInterfaceProtocol);
157 
158 	add_wildcard(alias);
159 	buf_printf(&mod->dev_table_buf,
160 		   "MODULE_ALIAS(\"%s\");\n", alias);
161 }
162 
163 /* Handles increment/decrement of BCD formatted integers */
164 /* Returns the previous value, so it works like i++ or i-- */
165 static unsigned int incbcd(unsigned int *bcd,
166 			   int inc,
167 			   unsigned char max,
168 			   size_t chars)
169 {
170 	unsigned int init = *bcd, i, j;
171 	unsigned long long c, dec = 0;
172 
173 	/* If bcd is not in BCD format, just increment */
174 	if (max > 0x9) {
175 		*bcd += inc;
176 		return init;
177 	}
178 
179 	/* Convert BCD to Decimal */
180 	for (i=0 ; i < chars ; i++) {
181 		c = (*bcd >> (i << 2)) & 0xf;
182 		c = c > 9 ? 9 : c; /* force to bcd just in case */
183 		for (j=0 ; j < i ; j++)
184 			c = c * 10;
185 		dec += c;
186 	}
187 
188 	/* Do our increment/decrement */
189 	dec += inc;
190 	*bcd  = 0;
191 
192 	/* Convert back to BCD */
193 	for (i=0 ; i < chars ; i++) {
194 		for (c=1,j=0 ; j < i ; j++)
195 			c = c * 10;
196 		c = (dec / c) % 10;
197 		*bcd += c << (i << 2);
198 	}
199 	return init;
200 }
201 
202 static void do_usb_entry_multi(struct usb_device_id *id, struct module *mod)
203 {
204 	unsigned int devlo, devhi;
205 	unsigned char chi, clo, max;
206 	int ndigits;
207 
208 	id->match_flags = TO_NATIVE(id->match_flags);
209 	id->idVendor = TO_NATIVE(id->idVendor);
210 	id->idProduct = TO_NATIVE(id->idProduct);
211 
212 	devlo = id->match_flags & USB_DEVICE_ID_MATCH_DEV_LO ?
213 		TO_NATIVE(id->bcdDevice_lo) : 0x0U;
214 	devhi = id->match_flags & USB_DEVICE_ID_MATCH_DEV_HI ?
215 		TO_NATIVE(id->bcdDevice_hi) : ~0x0U;
216 
217 	/* Figure out if this entry is in bcd or hex format */
218 	max = 0x9; /* Default to decimal format */
219 	for (ndigits = 0 ; ndigits < sizeof(id->bcdDevice_lo) * 2 ; ndigits++) {
220 		clo = (devlo >> (ndigits << 2)) & 0xf;
221 		chi = ((devhi > 0x9999 ? 0x9999 : devhi) >> (ndigits << 2)) & 0xf;
222 		if (clo > max || chi > max) {
223 			max = 0xf;
224 			break;
225 		}
226 	}
227 
228 	/*
229 	 * Some modules (visor) have empty slots as placeholder for
230 	 * run-time specification that results in catch-all alias
231 	 */
232 	if (!(id->idVendor | id->idProduct | id->bDeviceClass | id->bInterfaceClass))
233 		return;
234 
235 	/* Convert numeric bcdDevice range into fnmatch-able pattern(s) */
236 	for (ndigits = sizeof(id->bcdDevice_lo) * 2 - 1; devlo <= devhi; ndigits--) {
237 		clo = devlo & 0xf;
238 		chi = devhi & 0xf;
239 		if (chi > max)	/* If we are in bcd mode, truncate if necessary */
240 			chi = max;
241 		devlo >>= 4;
242 		devhi >>= 4;
243 
244 		if (devlo == devhi || !ndigits) {
245 			do_usb_entry(id, devlo, ndigits, clo, chi, max, mod);
246 			break;
247 		}
248 
249 		if (clo > 0x0)
250 			do_usb_entry(id,
251 				     incbcd(&devlo, 1, max,
252 					    sizeof(id->bcdDevice_lo) * 2),
253 				     ndigits, clo, max, max, mod);
254 
255 		if (chi < max)
256 			do_usb_entry(id,
257 				     incbcd(&devhi, -1, max,
258 					    sizeof(id->bcdDevice_lo) * 2),
259 				     ndigits, 0x0, chi, max, mod);
260 	}
261 }
262 
263 static void do_usb_table(void *symval, unsigned long size,
264 			 struct module *mod)
265 {
266 	unsigned int i;
267 	const unsigned long id_size = sizeof(struct usb_device_id);
268 
269 	device_id_check(mod->name, "usb", size, id_size, symval);
270 
271 	/* Leave last one: it's the terminator. */
272 	size -= id_size;
273 
274 	for (i = 0; i < size; i += id_size)
275 		do_usb_entry_multi(symval + i, mod);
276 }
277 
278 /* Looks like: hid:bNvNpN */
279 static int do_hid_entry(const char *filename,
280 			     struct hid_device_id *id, char *alias)
281 {
282 	id->bus = TO_NATIVE(id->bus);
283 	id->vendor = TO_NATIVE(id->vendor);
284 	id->product = TO_NATIVE(id->product);
285 
286 	sprintf(alias, "hid:b%04X", id->bus);
287 	ADD(alias, "v", id->vendor != HID_ANY_ID, id->vendor);
288 	ADD(alias, "p", id->product != HID_ANY_ID, id->product);
289 
290 	return 1;
291 }
292 
293 /* Looks like: ieee1394:venNmoNspNverN */
294 static int do_ieee1394_entry(const char *filename,
295 			     struct ieee1394_device_id *id, char *alias)
296 {
297 	id->match_flags = TO_NATIVE(id->match_flags);
298 	id->vendor_id = TO_NATIVE(id->vendor_id);
299 	id->model_id = TO_NATIVE(id->model_id);
300 	id->specifier_id = TO_NATIVE(id->specifier_id);
301 	id->version = TO_NATIVE(id->version);
302 
303 	strcpy(alias, "ieee1394:");
304 	ADD(alias, "ven", id->match_flags & IEEE1394_MATCH_VENDOR_ID,
305 	    id->vendor_id);
306 	ADD(alias, "mo", id->match_flags & IEEE1394_MATCH_MODEL_ID,
307 	    id->model_id);
308 	ADD(alias, "sp", id->match_flags & IEEE1394_MATCH_SPECIFIER_ID,
309 	    id->specifier_id);
310 	ADD(alias, "ver", id->match_flags & IEEE1394_MATCH_VERSION,
311 	    id->version);
312 
313 	add_wildcard(alias);
314 	return 1;
315 }
316 
317 /* Looks like: pci:vNdNsvNsdNbcNscNiN. */
318 static int do_pci_entry(const char *filename,
319 			struct pci_device_id *id, char *alias)
320 {
321 	/* Class field can be divided into these three. */
322 	unsigned char baseclass, subclass, interface,
323 		baseclass_mask, subclass_mask, interface_mask;
324 
325 	id->vendor = TO_NATIVE(id->vendor);
326 	id->device = TO_NATIVE(id->device);
327 	id->subvendor = TO_NATIVE(id->subvendor);
328 	id->subdevice = TO_NATIVE(id->subdevice);
329 	id->class = TO_NATIVE(id->class);
330 	id->class_mask = TO_NATIVE(id->class_mask);
331 
332 	strcpy(alias, "pci:");
333 	ADD(alias, "v", id->vendor != PCI_ANY_ID, id->vendor);
334 	ADD(alias, "d", id->device != PCI_ANY_ID, id->device);
335 	ADD(alias, "sv", id->subvendor != PCI_ANY_ID, id->subvendor);
336 	ADD(alias, "sd", id->subdevice != PCI_ANY_ID, id->subdevice);
337 
338 	baseclass = (id->class) >> 16;
339 	baseclass_mask = (id->class_mask) >> 16;
340 	subclass = (id->class) >> 8;
341 	subclass_mask = (id->class_mask) >> 8;
342 	interface = id->class;
343 	interface_mask = id->class_mask;
344 
345 	if ((baseclass_mask != 0 && baseclass_mask != 0xFF)
346 	    || (subclass_mask != 0 && subclass_mask != 0xFF)
347 	    || (interface_mask != 0 && interface_mask != 0xFF)) {
348 		warn("Can't handle masks in %s:%04X\n",
349 		     filename, id->class_mask);
350 		return 0;
351 	}
352 
353 	ADD(alias, "bc", baseclass_mask == 0xFF, baseclass);
354 	ADD(alias, "sc", subclass_mask == 0xFF, subclass);
355 	ADD(alias, "i", interface_mask == 0xFF, interface);
356 	add_wildcard(alias);
357 	return 1;
358 }
359 
360 /* looks like: "ccw:tNmNdtNdmN" */
361 static int do_ccw_entry(const char *filename,
362 			struct ccw_device_id *id, char *alias)
363 {
364 	id->match_flags = TO_NATIVE(id->match_flags);
365 	id->cu_type = TO_NATIVE(id->cu_type);
366 	id->cu_model = TO_NATIVE(id->cu_model);
367 	id->dev_type = TO_NATIVE(id->dev_type);
368 	id->dev_model = TO_NATIVE(id->dev_model);
369 
370 	strcpy(alias, "ccw:");
371 	ADD(alias, "t", id->match_flags&CCW_DEVICE_ID_MATCH_CU_TYPE,
372 	    id->cu_type);
373 	ADD(alias, "m", id->match_flags&CCW_DEVICE_ID_MATCH_CU_MODEL,
374 	    id->cu_model);
375 	ADD(alias, "dt", id->match_flags&CCW_DEVICE_ID_MATCH_DEVICE_TYPE,
376 	    id->dev_type);
377 	ADD(alias, "dm", id->match_flags&CCW_DEVICE_ID_MATCH_DEVICE_MODEL,
378 	    id->dev_model);
379 	add_wildcard(alias);
380 	return 1;
381 }
382 
383 /* looks like: "ap:tN" */
384 static int do_ap_entry(const char *filename,
385 		       struct ap_device_id *id, char *alias)
386 {
387 	sprintf(alias, "ap:t%02X*", id->dev_type);
388 	return 1;
389 }
390 
391 /* looks like: "css:tN" */
392 static int do_css_entry(const char *filename,
393 			struct css_device_id *id, char *alias)
394 {
395 	sprintf(alias, "css:t%01X", id->type);
396 	return 1;
397 }
398 
399 /* Looks like: "serio:tyNprNidNexN" */
400 static int do_serio_entry(const char *filename,
401 			  struct serio_device_id *id, char *alias)
402 {
403 	id->type = TO_NATIVE(id->type);
404 	id->proto = TO_NATIVE(id->proto);
405 	id->id = TO_NATIVE(id->id);
406 	id->extra = TO_NATIVE(id->extra);
407 
408 	strcpy(alias, "serio:");
409 	ADD(alias, "ty", id->type != SERIO_ANY, id->type);
410 	ADD(alias, "pr", id->proto != SERIO_ANY, id->proto);
411 	ADD(alias, "id", id->id != SERIO_ANY, id->id);
412 	ADD(alias, "ex", id->extra != SERIO_ANY, id->extra);
413 
414 	add_wildcard(alias);
415 	return 1;
416 }
417 
418 /* looks like: "acpi:ACPI0003 or acpi:PNP0C0B" or "acpi:LNXVIDEO" */
419 static int do_acpi_entry(const char *filename,
420 			struct acpi_device_id *id, char *alias)
421 {
422 	sprintf(alias, "acpi*:%s:*", id->id);
423 	return 1;
424 }
425 
426 /* looks like: "pnp:dD" */
427 static void do_pnp_device_entry(void *symval, unsigned long size,
428 				struct module *mod)
429 {
430 	const unsigned long id_size = sizeof(struct pnp_device_id);
431 	const unsigned int count = (size / id_size)-1;
432 	const struct pnp_device_id *devs = symval;
433 	unsigned int i;
434 
435 	device_id_check(mod->name, "pnp", size, id_size, symval);
436 
437 	for (i = 0; i < count; i++) {
438 		const char *id = (char *)devs[i].id;
439 		char acpi_id[sizeof(devs[0].id)];
440 		int j;
441 
442 		buf_printf(&mod->dev_table_buf,
443 			   "MODULE_ALIAS(\"pnp:d%s*\");\n", id);
444 
445 		/* fix broken pnp bus lowercasing */
446 		for (j = 0; j < sizeof(acpi_id); j++)
447 			acpi_id[j] = toupper(id[j]);
448 		buf_printf(&mod->dev_table_buf,
449 			   "MODULE_ALIAS(\"acpi*:%s:*\");\n", acpi_id);
450 	}
451 }
452 
453 /* looks like: "pnp:dD" for every device of the card */
454 static void do_pnp_card_entries(void *symval, unsigned long size,
455 				struct module *mod)
456 {
457 	const unsigned long id_size = sizeof(struct pnp_card_device_id);
458 	const unsigned int count = (size / id_size)-1;
459 	const struct pnp_card_device_id *cards = symval;
460 	unsigned int i;
461 
462 	device_id_check(mod->name, "pnp", size, id_size, symval);
463 
464 	for (i = 0; i < count; i++) {
465 		unsigned int j;
466 		const struct pnp_card_device_id *card = &cards[i];
467 
468 		for (j = 0; j < PNP_MAX_DEVICES; j++) {
469 			const char *id = (char *)card->devs[j].id;
470 			int i2, j2;
471 			int dup = 0;
472 
473 			if (!id[0])
474 				break;
475 
476 			/* find duplicate, already added value */
477 			for (i2 = 0; i2 < i && !dup; i2++) {
478 				const struct pnp_card_device_id *card2 = &cards[i2];
479 
480 				for (j2 = 0; j2 < PNP_MAX_DEVICES; j2++) {
481 					const char *id2 = (char *)card2->devs[j2].id;
482 
483 					if (!id2[0])
484 						break;
485 
486 					if (!strcmp(id, id2)) {
487 						dup = 1;
488 						break;
489 					}
490 				}
491 			}
492 
493 			/* add an individual alias for every device entry */
494 			if (!dup) {
495 				char acpi_id[sizeof(card->devs[0].id)];
496 				int k;
497 
498 				buf_printf(&mod->dev_table_buf,
499 					   "MODULE_ALIAS(\"pnp:d%s*\");\n", id);
500 
501 				/* fix broken pnp bus lowercasing */
502 				for (k = 0; k < sizeof(acpi_id); k++)
503 					acpi_id[k] = toupper(id[k]);
504 				buf_printf(&mod->dev_table_buf,
505 					   "MODULE_ALIAS(\"acpi*:%s:*\");\n", acpi_id);
506 			}
507 		}
508 	}
509 }
510 
511 /* Looks like: pcmcia:mNcNfNfnNpfnNvaNvbNvcNvdN. */
512 static int do_pcmcia_entry(const char *filename,
513 			   struct pcmcia_device_id *id, char *alias)
514 {
515 	unsigned int i;
516 
517 	id->match_flags = TO_NATIVE(id->match_flags);
518 	id->manf_id = TO_NATIVE(id->manf_id);
519 	id->card_id = TO_NATIVE(id->card_id);
520 	id->func_id = TO_NATIVE(id->func_id);
521 	id->function = TO_NATIVE(id->function);
522 	id->device_no = TO_NATIVE(id->device_no);
523 
524 	for (i=0; i<4; i++) {
525 		id->prod_id_hash[i] = TO_NATIVE(id->prod_id_hash[i]);
526        }
527 
528        strcpy(alias, "pcmcia:");
529        ADD(alias, "m", id->match_flags & PCMCIA_DEV_ID_MATCH_MANF_ID,
530 	   id->manf_id);
531        ADD(alias, "c", id->match_flags & PCMCIA_DEV_ID_MATCH_CARD_ID,
532 	   id->card_id);
533        ADD(alias, "f", id->match_flags & PCMCIA_DEV_ID_MATCH_FUNC_ID,
534 	   id->func_id);
535        ADD(alias, "fn", id->match_flags & PCMCIA_DEV_ID_MATCH_FUNCTION,
536 	   id->function);
537        ADD(alias, "pfn", id->match_flags & PCMCIA_DEV_ID_MATCH_DEVICE_NO,
538 	   id->device_no);
539        ADD(alias, "pa", id->match_flags & PCMCIA_DEV_ID_MATCH_PROD_ID1, id->prod_id_hash[0]);
540        ADD(alias, "pb", id->match_flags & PCMCIA_DEV_ID_MATCH_PROD_ID2, id->prod_id_hash[1]);
541        ADD(alias, "pc", id->match_flags & PCMCIA_DEV_ID_MATCH_PROD_ID3, id->prod_id_hash[2]);
542        ADD(alias, "pd", id->match_flags & PCMCIA_DEV_ID_MATCH_PROD_ID4, id->prod_id_hash[3]);
543 
544 	add_wildcard(alias);
545        return 1;
546 }
547 
548 
549 
550 static int do_of_entry (const char *filename, struct of_device_id *of, char *alias)
551 {
552     int len;
553     char *tmp;
554     len = sprintf (alias, "of:N%sT%s",
555                     of->name[0] ? of->name : "*",
556                     of->type[0] ? of->type : "*");
557 
558     if (of->compatible[0])
559         sprintf (&alias[len], "%sC%s",
560                      of->type[0] ? "*" : "",
561                      of->compatible);
562 
563     /* Replace all whitespace with underscores */
564     for (tmp = alias; tmp && *tmp; tmp++)
565         if (isspace (*tmp))
566             *tmp = '_';
567 
568     add_wildcard(alias);
569     return 1;
570 }
571 
572 static int do_vio_entry(const char *filename, struct vio_device_id *vio,
573 		char *alias)
574 {
575 	char *tmp;
576 
577 	sprintf(alias, "vio:T%sS%s", vio->type[0] ? vio->type : "*",
578 			vio->compat[0] ? vio->compat : "*");
579 
580 	/* Replace all whitespace with underscores */
581 	for (tmp = alias; tmp && *tmp; tmp++)
582 		if (isspace (*tmp))
583 			*tmp = '_';
584 
585 	add_wildcard(alias);
586 	return 1;
587 }
588 
589 #define ARRAY_SIZE(x) (sizeof(x) / sizeof((x)[0]))
590 
591 static void do_input(char *alias,
592 		     kernel_ulong_t *arr, unsigned int min, unsigned int max)
593 {
594 	unsigned int i;
595 
596 	for (i = min; i < max; i++)
597 		if (arr[i / BITS_PER_LONG] & (1L << (i%BITS_PER_LONG)))
598 			sprintf(alias + strlen(alias), "%X,*", i);
599 }
600 
601 /* input:b0v0p0e0-eXkXrXaXmXlXsXfXwX where X is comma-separated %02X. */
602 static int do_input_entry(const char *filename, struct input_device_id *id,
603 			  char *alias)
604 {
605 	sprintf(alias, "input:");
606 
607 	ADD(alias, "b", id->flags & INPUT_DEVICE_ID_MATCH_BUS, id->bustype);
608 	ADD(alias, "v", id->flags & INPUT_DEVICE_ID_MATCH_VENDOR, id->vendor);
609 	ADD(alias, "p", id->flags & INPUT_DEVICE_ID_MATCH_PRODUCT, id->product);
610 	ADD(alias, "e", id->flags & INPUT_DEVICE_ID_MATCH_VERSION, id->version);
611 
612 	sprintf(alias + strlen(alias), "-e*");
613 	if (id->flags & INPUT_DEVICE_ID_MATCH_EVBIT)
614 		do_input(alias, id->evbit, 0, INPUT_DEVICE_ID_EV_MAX);
615 	sprintf(alias + strlen(alias), "k*");
616 	if (id->flags & INPUT_DEVICE_ID_MATCH_KEYBIT)
617 		do_input(alias, id->keybit,
618 			 INPUT_DEVICE_ID_KEY_MIN_INTERESTING,
619 			 INPUT_DEVICE_ID_KEY_MAX);
620 	sprintf(alias + strlen(alias), "r*");
621 	if (id->flags & INPUT_DEVICE_ID_MATCH_RELBIT)
622 		do_input(alias, id->relbit, 0, INPUT_DEVICE_ID_REL_MAX);
623 	sprintf(alias + strlen(alias), "a*");
624 	if (id->flags & INPUT_DEVICE_ID_MATCH_ABSBIT)
625 		do_input(alias, id->absbit, 0, INPUT_DEVICE_ID_ABS_MAX);
626 	sprintf(alias + strlen(alias), "m*");
627 	if (id->flags & INPUT_DEVICE_ID_MATCH_MSCIT)
628 		do_input(alias, id->mscbit, 0, INPUT_DEVICE_ID_MSC_MAX);
629 	sprintf(alias + strlen(alias), "l*");
630 	if (id->flags & INPUT_DEVICE_ID_MATCH_LEDBIT)
631 		do_input(alias, id->ledbit, 0, INPUT_DEVICE_ID_LED_MAX);
632 	sprintf(alias + strlen(alias), "s*");
633 	if (id->flags & INPUT_DEVICE_ID_MATCH_SNDBIT)
634 		do_input(alias, id->sndbit, 0, INPUT_DEVICE_ID_SND_MAX);
635 	sprintf(alias + strlen(alias), "f*");
636 	if (id->flags & INPUT_DEVICE_ID_MATCH_FFBIT)
637 		do_input(alias, id->ffbit, 0, INPUT_DEVICE_ID_FF_MAX);
638 	sprintf(alias + strlen(alias), "w*");
639 	if (id->flags & INPUT_DEVICE_ID_MATCH_SWBIT)
640 		do_input(alias, id->swbit, 0, INPUT_DEVICE_ID_SW_MAX);
641 	return 1;
642 }
643 
644 static int do_eisa_entry(const char *filename, struct eisa_device_id *eisa,
645 		char *alias)
646 {
647 	if (eisa->sig[0])
648 		sprintf(alias, EISA_DEVICE_MODALIAS_FMT "*", eisa->sig);
649 	else
650 		strcat(alias, "*");
651 	return 1;
652 }
653 
654 /* Looks like: parisc:tNhvNrevNsvN */
655 static int do_parisc_entry(const char *filename, struct parisc_device_id *id,
656 		char *alias)
657 {
658 	id->hw_type = TO_NATIVE(id->hw_type);
659 	id->hversion = TO_NATIVE(id->hversion);
660 	id->hversion_rev = TO_NATIVE(id->hversion_rev);
661 	id->sversion = TO_NATIVE(id->sversion);
662 
663 	strcpy(alias, "parisc:");
664 	ADD(alias, "t", id->hw_type != PA_HWTYPE_ANY_ID, id->hw_type);
665 	ADD(alias, "hv", id->hversion != PA_HVERSION_ANY_ID, id->hversion);
666 	ADD(alias, "rev", id->hversion_rev != PA_HVERSION_REV_ANY_ID, id->hversion_rev);
667 	ADD(alias, "sv", id->sversion != PA_SVERSION_ANY_ID, id->sversion);
668 
669 	add_wildcard(alias);
670 	return 1;
671 }
672 
673 /* Looks like: sdio:cNvNdN. */
674 static int do_sdio_entry(const char *filename,
675 			struct sdio_device_id *id, char *alias)
676 {
677 	id->class = TO_NATIVE(id->class);
678 	id->vendor = TO_NATIVE(id->vendor);
679 	id->device = TO_NATIVE(id->device);
680 
681 	strcpy(alias, "sdio:");
682 	ADD(alias, "c", id->class != (__u8)SDIO_ANY_ID, id->class);
683 	ADD(alias, "v", id->vendor != (__u16)SDIO_ANY_ID, id->vendor);
684 	ADD(alias, "d", id->device != (__u16)SDIO_ANY_ID, id->device);
685 	add_wildcard(alias);
686 	return 1;
687 }
688 
689 /* Looks like: ssb:vNidNrevN. */
690 static int do_ssb_entry(const char *filename,
691 			struct ssb_device_id *id, char *alias)
692 {
693 	id->vendor = TO_NATIVE(id->vendor);
694 	id->coreid = TO_NATIVE(id->coreid);
695 	id->revision = TO_NATIVE(id->revision);
696 
697 	strcpy(alias, "ssb:");
698 	ADD(alias, "v", id->vendor != SSB_ANY_VENDOR, id->vendor);
699 	ADD(alias, "id", id->coreid != SSB_ANY_ID, id->coreid);
700 	ADD(alias, "rev", id->revision != SSB_ANY_REV, id->revision);
701 	add_wildcard(alias);
702 	return 1;
703 }
704 
705 /* Looks like: bcma:mNidNrevNclN. */
706 static int do_bcma_entry(const char *filename,
707 			 struct bcma_device_id *id, char *alias)
708 {
709 	id->manuf = TO_NATIVE(id->manuf);
710 	id->id = TO_NATIVE(id->id);
711 	id->rev = TO_NATIVE(id->rev);
712 	id->class = TO_NATIVE(id->class);
713 
714 	strcpy(alias, "bcma:");
715 	ADD(alias, "m", id->manuf != BCMA_ANY_MANUF, id->manuf);
716 	ADD(alias, "id", id->id != BCMA_ANY_ID, id->id);
717 	ADD(alias, "rev", id->rev != BCMA_ANY_REV, id->rev);
718 	ADD(alias, "cl", id->class != BCMA_ANY_CLASS, id->class);
719 	add_wildcard(alias);
720 	return 1;
721 }
722 
723 /* Looks like: virtio:dNvN */
724 static int do_virtio_entry(const char *filename, struct virtio_device_id *id,
725 			   char *alias)
726 {
727 	id->device = TO_NATIVE(id->device);
728 	id->vendor = TO_NATIVE(id->vendor);
729 
730 	strcpy(alias, "virtio:");
731 	ADD(alias, "d", id->device != VIRTIO_DEV_ANY_ID, id->device);
732 	ADD(alias, "v", id->vendor != VIRTIO_DEV_ANY_ID, id->vendor);
733 
734 	add_wildcard(alias);
735 	return 1;
736 }
737 
738 /* Looks like: i2c:S */
739 static int do_i2c_entry(const char *filename, struct i2c_device_id *id,
740 			char *alias)
741 {
742 	sprintf(alias, I2C_MODULE_PREFIX "%s", id->name);
743 
744 	return 1;
745 }
746 
747 /* Looks like: spi:S */
748 static int do_spi_entry(const char *filename, struct spi_device_id *id,
749 			char *alias)
750 {
751 	sprintf(alias, SPI_MODULE_PREFIX "%s", id->name);
752 
753 	return 1;
754 }
755 
756 static const struct dmifield {
757 	const char *prefix;
758 	int field;
759 } dmi_fields[] = {
760 	{ "bvn", DMI_BIOS_VENDOR },
761 	{ "bvr", DMI_BIOS_VERSION },
762 	{ "bd",  DMI_BIOS_DATE },
763 	{ "svn", DMI_SYS_VENDOR },
764 	{ "pn",  DMI_PRODUCT_NAME },
765 	{ "pvr", DMI_PRODUCT_VERSION },
766 	{ "rvn", DMI_BOARD_VENDOR },
767 	{ "rn",  DMI_BOARD_NAME },
768 	{ "rvr", DMI_BOARD_VERSION },
769 	{ "cvn", DMI_CHASSIS_VENDOR },
770 	{ "ct",  DMI_CHASSIS_TYPE },
771 	{ "cvr", DMI_CHASSIS_VERSION },
772 	{ NULL,  DMI_NONE }
773 };
774 
775 static void dmi_ascii_filter(char *d, const char *s)
776 {
777 	/* Filter out characters we don't want to see in the modalias string */
778 	for (; *s; s++)
779 		if (*s > ' ' && *s < 127 && *s != ':')
780 			*(d++) = *s;
781 
782 	*d = 0;
783 }
784 
785 
786 static int do_dmi_entry(const char *filename, struct dmi_system_id *id,
787 			char *alias)
788 {
789 	int i, j;
790 
791 	sprintf(alias, "dmi*");
792 
793 	for (i = 0; i < ARRAY_SIZE(dmi_fields); i++) {
794 		for (j = 0; j < 4; j++) {
795 			if (id->matches[j].slot &&
796 			    id->matches[j].slot == dmi_fields[i].field) {
797 				sprintf(alias + strlen(alias), ":%s*",
798 					dmi_fields[i].prefix);
799 				dmi_ascii_filter(alias + strlen(alias),
800 						 id->matches[j].substr);
801 				strcat(alias, "*");
802 			}
803 		}
804 	}
805 
806 	strcat(alias, ":");
807 	return 1;
808 }
809 
810 static int do_platform_entry(const char *filename,
811 			     struct platform_device_id *id, char *alias)
812 {
813 	sprintf(alias, PLATFORM_MODULE_PREFIX "%s", id->name);
814 	return 1;
815 }
816 
817 static int do_mdio_entry(const char *filename,
818 			 struct mdio_device_id *id, char *alias)
819 {
820 	int i;
821 
822 	alias += sprintf(alias, MDIO_MODULE_PREFIX);
823 
824 	for (i = 0; i < 32; i++) {
825 		if (!((id->phy_id_mask >> (31-i)) & 1))
826 			*(alias++) = '?';
827 		else if ((id->phy_id >> (31-i)) & 1)
828 			*(alias++) = '1';
829 		else
830 			*(alias++) = '0';
831 	}
832 
833 	/* Terminate the string */
834 	*alias = 0;
835 
836 	return 1;
837 }
838 
839 /* Looks like: zorro:iN. */
840 static int do_zorro_entry(const char *filename, struct zorro_device_id *id,
841 			  char *alias)
842 {
843 	id->id = TO_NATIVE(id->id);
844 	strcpy(alias, "zorro:");
845 	ADD(alias, "i", id->id != ZORRO_WILDCARD, id->id);
846 	return 1;
847 }
848 
849 /* looks like: "pnp:dD" */
850 static int do_isapnp_entry(const char *filename,
851 			   struct isapnp_device_id *id, char *alias)
852 {
853 	sprintf(alias, "pnp:d%c%c%c%x%x%x%x*",
854 		'A' + ((id->vendor >> 2) & 0x3f) - 1,
855 		'A' + (((id->vendor & 3) << 3) | ((id->vendor >> 13) & 7)) - 1,
856 		'A' + ((id->vendor >> 8) & 0x1f) - 1,
857 		(id->function >> 4) & 0x0f, id->function & 0x0f,
858 		(id->function >> 12) & 0x0f, (id->function >> 8) & 0x0f);
859 	return 1;
860 }
861 
862 /* Ignore any prefix, eg. some architectures prepend _ */
863 static inline int sym_is(const char *symbol, const char *name)
864 {
865 	const char *match;
866 
867 	match = strstr(symbol, name);
868 	if (!match)
869 		return 0;
870 	return match[strlen(name)] == '\0';
871 }
872 
873 static void do_table(void *symval, unsigned long size,
874 		     unsigned long id_size,
875 		     const char *device_id,
876 		     void *function,
877 		     struct module *mod)
878 {
879 	unsigned int i;
880 	char alias[500];
881 	int (*do_entry)(const char *, void *entry, char *alias) = function;
882 
883 	device_id_check(mod->name, device_id, size, id_size, symval);
884 	/* Leave last one: it's the terminator. */
885 	size -= id_size;
886 
887 	for (i = 0; i < size; i += id_size) {
888 		if (do_entry(mod->name, symval+i, alias)) {
889 			buf_printf(&mod->dev_table_buf,
890 				   "MODULE_ALIAS(\"%s\");\n", alias);
891 		}
892 	}
893 }
894 
895 /* Create MODULE_ALIAS() statements.
896  * At this time, we cannot write the actual output C source yet,
897  * so we write into the mod->dev_table_buf buffer. */
898 void handle_moddevtable(struct module *mod, struct elf_info *info,
899 			Elf_Sym *sym, const char *symname)
900 {
901 	void *symval;
902 	char *zeros = NULL;
903 
904 	/* We're looking for a section relative symbol */
905 	if (!sym->st_shndx || get_secindex(info, sym) >= info->num_sections)
906 		return;
907 
908 	/* Handle all-NULL symbols allocated into .bss */
909 	if (info->sechdrs[get_secindex(info, sym)].sh_type & SHT_NOBITS) {
910 		zeros = calloc(1, sym->st_size);
911 		symval = zeros;
912 	} else {
913 		symval = (void *)info->hdr
914 			+ info->sechdrs[get_secindex(info, sym)].sh_offset
915 			+ sym->st_value;
916 	}
917 
918 	if (sym_is(symname, "__mod_pci_device_table"))
919 		do_table(symval, sym->st_size,
920 			 sizeof(struct pci_device_id), "pci",
921 			 do_pci_entry, mod);
922 	else if (sym_is(symname, "__mod_usb_device_table"))
923 		/* special case to handle bcdDevice ranges */
924 		do_usb_table(symval, sym->st_size, mod);
925 	else if (sym_is(symname, "__mod_hid_device_table"))
926 		do_table(symval, sym->st_size,
927 			 sizeof(struct hid_device_id), "hid",
928 			 do_hid_entry, mod);
929 	else if (sym_is(symname, "__mod_ieee1394_device_table"))
930 		do_table(symval, sym->st_size,
931 			 sizeof(struct ieee1394_device_id), "ieee1394",
932 			 do_ieee1394_entry, mod);
933 	else if (sym_is(symname, "__mod_ccw_device_table"))
934 		do_table(symval, sym->st_size,
935 			 sizeof(struct ccw_device_id), "ccw",
936 			 do_ccw_entry, mod);
937 	else if (sym_is(symname, "__mod_ap_device_table"))
938 		do_table(symval, sym->st_size,
939 			 sizeof(struct ap_device_id), "ap",
940 			 do_ap_entry, mod);
941 	else if (sym_is(symname, "__mod_css_device_table"))
942 		do_table(symval, sym->st_size,
943 			 sizeof(struct css_device_id), "css",
944 			 do_css_entry, mod);
945 	else if (sym_is(symname, "__mod_serio_device_table"))
946 		do_table(symval, sym->st_size,
947 			 sizeof(struct serio_device_id), "serio",
948 			 do_serio_entry, mod);
949 	else if (sym_is(symname, "__mod_acpi_device_table"))
950 		do_table(symval, sym->st_size,
951 			 sizeof(struct acpi_device_id), "acpi",
952 			 do_acpi_entry, mod);
953 	else if (sym_is(symname, "__mod_pnp_device_table"))
954 		do_pnp_device_entry(symval, sym->st_size, mod);
955 	else if (sym_is(symname, "__mod_pnp_card_device_table"))
956 		do_pnp_card_entries(symval, sym->st_size, mod);
957 	else if (sym_is(symname, "__mod_pcmcia_device_table"))
958 		do_table(symval, sym->st_size,
959 			 sizeof(struct pcmcia_device_id), "pcmcia",
960 			 do_pcmcia_entry, mod);
961         else if (sym_is(symname, "__mod_of_device_table"))
962 		do_table(symval, sym->st_size,
963 			 sizeof(struct of_device_id), "of",
964 			 do_of_entry, mod);
965         else if (sym_is(symname, "__mod_vio_device_table"))
966 		do_table(symval, sym->st_size,
967 			 sizeof(struct vio_device_id), "vio",
968 			 do_vio_entry, mod);
969 	else if (sym_is(symname, "__mod_input_device_table"))
970 		do_table(symval, sym->st_size,
971 			 sizeof(struct input_device_id), "input",
972 			 do_input_entry, mod);
973 	else if (sym_is(symname, "__mod_eisa_device_table"))
974 		do_table(symval, sym->st_size,
975 			 sizeof(struct eisa_device_id), "eisa",
976 			 do_eisa_entry, mod);
977 	else if (sym_is(symname, "__mod_parisc_device_table"))
978 		do_table(symval, sym->st_size,
979 			 sizeof(struct parisc_device_id), "parisc",
980 			 do_parisc_entry, mod);
981 	else if (sym_is(symname, "__mod_sdio_device_table"))
982 		do_table(symval, sym->st_size,
983 			 sizeof(struct sdio_device_id), "sdio",
984 			 do_sdio_entry, mod);
985 	else if (sym_is(symname, "__mod_ssb_device_table"))
986 		do_table(symval, sym->st_size,
987 			 sizeof(struct ssb_device_id), "ssb",
988 			 do_ssb_entry, mod);
989 	else if (sym_is(symname, "__mod_bcma_device_table"))
990 		do_table(symval, sym->st_size,
991 			 sizeof(struct bcma_device_id), "bcma",
992 			 do_bcma_entry, mod);
993 	else if (sym_is(symname, "__mod_virtio_device_table"))
994 		do_table(symval, sym->st_size,
995 			 sizeof(struct virtio_device_id), "virtio",
996 			 do_virtio_entry, mod);
997 	else if (sym_is(symname, "__mod_i2c_device_table"))
998 		do_table(symval, sym->st_size,
999 			 sizeof(struct i2c_device_id), "i2c",
1000 			 do_i2c_entry, mod);
1001 	else if (sym_is(symname, "__mod_spi_device_table"))
1002 		do_table(symval, sym->st_size,
1003 			 sizeof(struct spi_device_id), "spi",
1004 			 do_spi_entry, mod);
1005 	else if (sym_is(symname, "__mod_dmi_device_table"))
1006 		do_table(symval, sym->st_size,
1007 			 sizeof(struct dmi_system_id), "dmi",
1008 			 do_dmi_entry, mod);
1009 	else if (sym_is(symname, "__mod_platform_device_table"))
1010 		do_table(symval, sym->st_size,
1011 			 sizeof(struct platform_device_id), "platform",
1012 			 do_platform_entry, mod);
1013 	else if (sym_is(symname, "__mod_mdio_device_table"))
1014 		do_table(symval, sym->st_size,
1015 			 sizeof(struct mdio_device_id), "mdio",
1016 			 do_mdio_entry, mod);
1017 	else if (sym_is(symname, "__mod_zorro_device_table"))
1018 		do_table(symval, sym->st_size,
1019 			 sizeof(struct zorro_device_id), "zorro",
1020 			 do_zorro_entry, mod);
1021 	else if (sym_is(symname, "__mod_isapnp_device_table"))
1022 		do_table(symval, sym->st_size,
1023 			sizeof(struct isapnp_device_id), "isa",
1024 			do_isapnp_entry, mod);
1025 	free(zeros);
1026 }
1027 
1028 /* Now add out buffered information to the generated C source */
1029 void add_moddevtable(struct buffer *buf, struct module *mod)
1030 {
1031 	buf_printf(buf, "\n");
1032 	buf_write(buf, mod->dev_table_buf.p, mod->dev_table_buf.pos);
1033 	free(mod->dev_table_buf.p);
1034 }
1035