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
  18typedef Elf32_Addr	kernel_ulong_t;
  19#define BITS_PER_LONG 32
  20#else
  21typedef 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
  32typedef uint32_t	__u32;
  33typedef uint16_t	__u16;
  34typedef 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)                              \
  42do {                                                            \
  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 */
  55static inline void add_wildcard(char *str)
  56{
  57	int len = strlen(str);
  58
  59	if (str[len - 1] != '*')
  60		strcat(str + len, "*");
  61}
  62
  63unsigned 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 **/
  71static 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" */
 104static 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-- */
 165static 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
 202static 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
 263static 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 */
 279static 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 */
 294static 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. */
 318static 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" */
 361static 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" */
 384static 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" */
 392static 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" */
 400static 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" */
 419static 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" */
 427static 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 */
 454static 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. */
 512static 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
 550static 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
 572static 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
 591static 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. */
 602static 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
 644static 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 */
 655static 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. */
 674static 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. */
 690static 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. */
 706static 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 */
 724static 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 */
 739static 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 */
 748static 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
 756static 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
 775static 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
 786static 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
 810static 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
 817static 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. */
 840static 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" */
 850static 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 _ */
 863static 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
 873static 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. */
 898void 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 */
1029void 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}