Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* $Id: parport_probe.c,v 1.1 1999/07/03 08:56:17 davem Exp $ |
2 | * Parallel port device probing code | |
3 | * | |
4 | * Authors: Carsten Gross, carsten@sol.wohnheim.uni-ulm.de | |
5 | * Philip Blundell <philb@gnu.org> | |
6 | */ | |
7 | ||
8 | #include <linux/module.h> | |
9 | #include <linux/parport.h> | |
10 | #include <linux/ctype.h> | |
11 | #include <linux/string.h> | |
12 | #include <asm/uaccess.h> | |
13 | ||
14 | static struct { | |
15 | char *token; | |
16 | char *descr; | |
17 | } classes[] = { | |
18 | { "", "Legacy device" }, | |
19 | { "PRINTER", "Printer" }, | |
20 | { "MODEM", "Modem" }, | |
21 | { "NET", "Network device" }, | |
22 | { "HDC", "Hard disk" }, | |
23 | { "PCMCIA", "PCMCIA" }, | |
24 | { "MEDIA", "Multimedia device" }, | |
25 | { "FDC", "Floppy disk" }, | |
26 | { "PORTS", "Ports" }, | |
27 | { "SCANNER", "Scanner" }, | |
28 | { "DIGICAM", "Digital camera" }, | |
29 | { "", "Unknown device" }, | |
30 | { "", "Unspecified" }, | |
31 | { "SCSIADAPTER", "SCSI adapter" }, | |
32 | { NULL, NULL } | |
33 | }; | |
34 | ||
35 | static void pretty_print(struct parport *port, int device) | |
36 | { | |
37 | struct parport_device_info *info = &port->probe_info[device + 1]; | |
38 | ||
39 | printk(KERN_INFO "%s", port->name); | |
40 | ||
41 | if (device >= 0) | |
42 | printk (" (addr %d)", device); | |
43 | ||
44 | printk (": %s", classes[info->class].descr); | |
45 | if (info->class) | |
46 | printk(", %s %s", info->mfr, info->model); | |
47 | ||
48 | printk("\n"); | |
49 | } | |
50 | ||
1da177e4 LT |
51 | static void parse_data(struct parport *port, int device, char *str) |
52 | { | |
53 | char *txt = kmalloc(strlen(str)+1, GFP_KERNEL); | |
54 | char *p = txt, *q; | |
55 | int guessed_class = PARPORT_CLASS_UNSPEC; | |
56 | struct parport_device_info *info = &port->probe_info[device + 1]; | |
57 | ||
58 | if (!txt) { | |
59 | printk(KERN_WARNING "%s probe: memory squeeze\n", port->name); | |
60 | return; | |
61 | } | |
62 | strcpy(txt, str); | |
63 | while (p) { | |
64 | char *sep; | |
65 | q = strchr(p, ';'); | |
66 | if (q) *q = 0; | |
67 | sep = strchr(p, ':'); | |
68 | if (sep) { | |
69 | char *u; | |
70 | *(sep++) = 0; | |
71 | /* Get rid of trailing blanks */ | |
72 | u = sep + strlen (sep) - 1; | |
73 | while (u >= p && *u == ' ') | |
74 | *u-- = '\0'; | |
75 | u = p; | |
76 | while (*u) { | |
77 | *u = toupper(*u); | |
78 | u++; | |
79 | } | |
80 | if (!strcmp(p, "MFG") || !strcmp(p, "MANUFACTURER")) { | |
81 | if (info->mfr) | |
82 | kfree (info->mfr); | |
543537bd | 83 | info->mfr = kstrdup(sep, GFP_KERNEL); |
1da177e4 LT |
84 | } else if (!strcmp(p, "MDL") || !strcmp(p, "MODEL")) { |
85 | if (info->model) | |
86 | kfree (info->model); | |
543537bd | 87 | info->model = kstrdup(sep, GFP_KERNEL); |
1da177e4 LT |
88 | } else if (!strcmp(p, "CLS") || !strcmp(p, "CLASS")) { |
89 | int i; | |
90 | if (info->class_name) | |
91 | kfree (info->class_name); | |
543537bd | 92 | info->class_name = kstrdup(sep, GFP_KERNEL); |
1da177e4 LT |
93 | for (u = sep; *u; u++) |
94 | *u = toupper(*u); | |
95 | for (i = 0; classes[i].token; i++) { | |
96 | if (!strcmp(classes[i].token, sep)) { | |
97 | info->class = i; | |
98 | goto rock_on; | |
99 | } | |
100 | } | |
101 | printk(KERN_WARNING "%s probe: warning, class '%s' not understood.\n", port->name, sep); | |
102 | info->class = PARPORT_CLASS_OTHER; | |
103 | } else if (!strcmp(p, "CMD") || | |
104 | !strcmp(p, "COMMAND SET")) { | |
105 | if (info->cmdset) | |
106 | kfree (info->cmdset); | |
543537bd | 107 | info->cmdset = kstrdup(sep, GFP_KERNEL); |
1da177e4 LT |
108 | /* if it speaks printer language, it's |
109 | probably a printer */ | |
110 | if (strstr(sep, "PJL") || strstr(sep, "PCL")) | |
111 | guessed_class = PARPORT_CLASS_PRINTER; | |
112 | } else if (!strcmp(p, "DES") || !strcmp(p, "DESCRIPTION")) { | |
113 | if (info->description) | |
114 | kfree (info->description); | |
543537bd | 115 | info->description = kstrdup(sep, GFP_KERNEL); |
1da177e4 LT |
116 | } |
117 | } | |
118 | rock_on: | |
119 | if (q) p = q+1; else p=NULL; | |
120 | } | |
121 | ||
122 | /* If the device didn't tell us its class, maybe we have managed to | |
123 | guess one from the things it did say. */ | |
124 | if (info->class == PARPORT_CLASS_UNSPEC) | |
125 | info->class = guessed_class; | |
126 | ||
127 | pretty_print (port, device); | |
128 | ||
129 | kfree(txt); | |
130 | } | |
131 | ||
132 | /* Get Std 1284 Device ID. */ | |
133 | ssize_t parport_device_id (int devnum, char *buffer, size_t len) | |
134 | { | |
135 | ssize_t retval = -ENXIO; | |
136 | struct pardevice *dev = parport_open (devnum, "Device ID probe", | |
137 | NULL, NULL, NULL, 0, NULL); | |
138 | if (!dev) | |
139 | return -ENXIO; | |
140 | ||
141 | parport_claim_or_block (dev); | |
142 | ||
143 | /* Negotiate to compatibility mode, and then to device ID mode. | |
144 | * (This is in case we are already in device ID mode.) */ | |
145 | parport_negotiate (dev->port, IEEE1284_MODE_COMPAT); | |
146 | retval = parport_negotiate (dev->port, | |
147 | IEEE1284_MODE_NIBBLE | IEEE1284_DEVICEID); | |
148 | ||
149 | if (!retval) { | |
150 | int idlen; | |
151 | unsigned char length[2]; | |
152 | ||
153 | /* First two bytes are MSB,LSB of inclusive length. */ | |
154 | retval = parport_read (dev->port, length, 2); | |
155 | ||
156 | if (retval != 2) goto end_id; | |
157 | ||
158 | idlen = (length[0] << 8) + length[1] - 2; | |
159 | /* | |
160 | * Check if the caller-allocated buffer is large enough | |
161 | * otherwise bail out or there will be an at least off by one. | |
162 | */ | |
163 | if (idlen + 1 < len) | |
164 | len = idlen; | |
165 | else { | |
166 | retval = -EINVAL; | |
167 | goto out; | |
168 | } | |
169 | retval = parport_read (dev->port, buffer, len); | |
170 | ||
171 | if (retval != len) | |
172 | printk (KERN_DEBUG "%s: only read %Zd of %Zd ID bytes\n", | |
173 | dev->port->name, retval, | |
174 | len); | |
175 | ||
176 | /* Some printer manufacturers mistakenly believe that | |
177 | the length field is supposed to be _exclusive_. | |
178 | In addition, there are broken devices out there | |
179 | that don't even finish off with a semi-colon. */ | |
180 | if (buffer[len - 1] != ';') { | |
181 | ssize_t diff; | |
182 | diff = parport_read (dev->port, buffer + len, 2); | |
183 | retval += diff; | |
184 | ||
185 | if (diff) | |
186 | printk (KERN_DEBUG | |
187 | "%s: device reported incorrect " | |
188 | "length field (%d, should be %Zd)\n", | |
189 | dev->port->name, idlen, retval); | |
190 | else { | |
191 | /* One semi-colon short of a device ID. */ | |
192 | buffer[len++] = ';'; | |
193 | printk (KERN_DEBUG "%s: faking semi-colon\n", | |
194 | dev->port->name); | |
195 | ||
196 | /* If we get here, I don't think we | |
197 | need to worry about the possible | |
198 | standard violation of having read | |
199 | more than we were told to. The | |
200 | device is non-compliant anyhow. */ | |
201 | } | |
202 | } | |
203 | ||
204 | end_id: | |
205 | buffer[len] = '\0'; | |
206 | parport_negotiate (dev->port, IEEE1284_MODE_COMPAT); | |
207 | } | |
208 | ||
209 | if (retval > 2) | |
210 | parse_data (dev->port, dev->daisy, buffer); | |
211 | ||
212 | out: | |
213 | parport_release (dev); | |
214 | parport_close (dev); | |
215 | return retval; | |
216 | } |