blob: c94963145e17991bbfeb233e8d7a63733da58698 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/* $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
14static 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
35static 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
51static char *strdup(char *str)
52{
53 int n = strlen(str)+1;
54 char *s = kmalloc(n, GFP_KERNEL);
55 if (!s) return NULL;
56 return strcpy(s, str);
57}
58
59static void parse_data(struct parport *port, int device, char *str)
60{
61 char *txt = kmalloc(strlen(str)+1, GFP_KERNEL);
62 char *p = txt, *q;
63 int guessed_class = PARPORT_CLASS_UNSPEC;
64 struct parport_device_info *info = &port->probe_info[device + 1];
65
66 if (!txt) {
67 printk(KERN_WARNING "%s probe: memory squeeze\n", port->name);
68 return;
69 }
70 strcpy(txt, str);
71 while (p) {
72 char *sep;
73 q = strchr(p, ';');
74 if (q) *q = 0;
75 sep = strchr(p, ':');
76 if (sep) {
77 char *u;
78 *(sep++) = 0;
79 /* Get rid of trailing blanks */
80 u = sep + strlen (sep) - 1;
81 while (u >= p && *u == ' ')
82 *u-- = '\0';
83 u = p;
84 while (*u) {
85 *u = toupper(*u);
86 u++;
87 }
88 if (!strcmp(p, "MFG") || !strcmp(p, "MANUFACTURER")) {
89 if (info->mfr)
90 kfree (info->mfr);
91 info->mfr = strdup(sep);
92 } else if (!strcmp(p, "MDL") || !strcmp(p, "MODEL")) {
93 if (info->model)
94 kfree (info->model);
95 info->model = strdup(sep);
96 } else if (!strcmp(p, "CLS") || !strcmp(p, "CLASS")) {
97 int i;
98 if (info->class_name)
99 kfree (info->class_name);
100 info->class_name = strdup(sep);
101 for (u = sep; *u; u++)
102 *u = toupper(*u);
103 for (i = 0; classes[i].token; i++) {
104 if (!strcmp(classes[i].token, sep)) {
105 info->class = i;
106 goto rock_on;
107 }
108 }
109 printk(KERN_WARNING "%s probe: warning, class '%s' not understood.\n", port->name, sep);
110 info->class = PARPORT_CLASS_OTHER;
111 } else if (!strcmp(p, "CMD") ||
112 !strcmp(p, "COMMAND SET")) {
113 if (info->cmdset)
114 kfree (info->cmdset);
115 info->cmdset = strdup(sep);
116 /* if it speaks printer language, it's
117 probably a printer */
118 if (strstr(sep, "PJL") || strstr(sep, "PCL"))
119 guessed_class = PARPORT_CLASS_PRINTER;
120 } else if (!strcmp(p, "DES") || !strcmp(p, "DESCRIPTION")) {
121 if (info->description)
122 kfree (info->description);
123 info->description = strdup(sep);
124 }
125 }
126 rock_on:
127 if (q) p = q+1; else p=NULL;
128 }
129
130 /* If the device didn't tell us its class, maybe we have managed to
131 guess one from the things it did say. */
132 if (info->class == PARPORT_CLASS_UNSPEC)
133 info->class = guessed_class;
134
135 pretty_print (port, device);
136
137 kfree(txt);
138}
139
140/* Get Std 1284 Device ID. */
141ssize_t parport_device_id (int devnum, char *buffer, size_t len)
142{
143 ssize_t retval = -ENXIO;
144 struct pardevice *dev = parport_open (devnum, "Device ID probe",
145 NULL, NULL, NULL, 0, NULL);
146 if (!dev)
147 return -ENXIO;
148
149 parport_claim_or_block (dev);
150
151 /* Negotiate to compatibility mode, and then to device ID mode.
152 * (This is in case we are already in device ID mode.) */
153 parport_negotiate (dev->port, IEEE1284_MODE_COMPAT);
154 retval = parport_negotiate (dev->port,
155 IEEE1284_MODE_NIBBLE | IEEE1284_DEVICEID);
156
157 if (!retval) {
158 int idlen;
159 unsigned char length[2];
160
161 /* First two bytes are MSB,LSB of inclusive length. */
162 retval = parport_read (dev->port, length, 2);
163
164 if (retval != 2) goto end_id;
165
166 idlen = (length[0] << 8) + length[1] - 2;
167 /*
168 * Check if the caller-allocated buffer is large enough
169 * otherwise bail out or there will be an at least off by one.
170 */
171 if (idlen + 1 < len)
172 len = idlen;
173 else {
174 retval = -EINVAL;
175 goto out;
176 }
177 retval = parport_read (dev->port, buffer, len);
178
179 if (retval != len)
180 printk (KERN_DEBUG "%s: only read %Zd of %Zd ID bytes\n",
181 dev->port->name, retval,
182 len);
183
184 /* Some printer manufacturers mistakenly believe that
185 the length field is supposed to be _exclusive_.
186 In addition, there are broken devices out there
187 that don't even finish off with a semi-colon. */
188 if (buffer[len - 1] != ';') {
189 ssize_t diff;
190 diff = parport_read (dev->port, buffer + len, 2);
191 retval += diff;
192
193 if (diff)
194 printk (KERN_DEBUG
195 "%s: device reported incorrect "
196 "length field (%d, should be %Zd)\n",
197 dev->port->name, idlen, retval);
198 else {
199 /* One semi-colon short of a device ID. */
200 buffer[len++] = ';';
201 printk (KERN_DEBUG "%s: faking semi-colon\n",
202 dev->port->name);
203
204 /* If we get here, I don't think we
205 need to worry about the possible
206 standard violation of having read
207 more than we were told to. The
208 device is non-compliant anyhow. */
209 }
210 }
211
212 end_id:
213 buffer[len] = '\0';
214 parport_negotiate (dev->port, IEEE1284_MODE_COMPAT);
215 }
216
217 if (retval > 2)
218 parse_data (dev->port, dev->daisy, buffer);
219
220out:
221 parport_release (dev);
222 parport_close (dev);
223 return retval;
224}