xref: /linux/drivers/usb/storage/freecom.c (revision 7a9787e1eba95a166265e6a260cf30af04ef0a99)
1 /* Driver for Freecom USB/IDE adaptor
2  *
3  * Freecom v0.1:
4  *
5  * First release
6  *
7  * Current development and maintenance by:
8  *   (C) 2000 David Brown <usb-storage@davidb.org>
9  *
10  * This program is free software; you can redistribute it and/or modify it
11  * under the terms of the GNU General Public License as published by the
12  * Free Software Foundation; either version 2, or (at your option) any
13  * later version.
14  *
15  * This program is distributed in the hope that it will be useful, but
16  * WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18  * General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License along
21  * with this program; if not, write to the Free Software Foundation, Inc.,
22  * 675 Mass Ave, Cambridge, MA 02139, USA.
23  *
24  * This driver was developed with information provided in FREECOM's USB
25  * Programmers Reference Guide.  For further information contact Freecom
26  * (http://www.freecom.de/)
27  */
28 
29 #include <scsi/scsi.h>
30 #include <scsi/scsi_cmnd.h>
31 
32 #include "usb.h"
33 #include "transport.h"
34 #include "protocol.h"
35 #include "debug.h"
36 #include "freecom.h"
37 
38 #ifdef CONFIG_USB_STORAGE_DEBUG
39 static void pdump (void *, int);
40 #endif
41 
42 /* Bits of HD_STATUS */
43 #define ERR_STAT		0x01
44 #define DRQ_STAT		0x08
45 
46 /* All of the outgoing packets are 64 bytes long. */
47 struct freecom_cb_wrap {
48 	u8    Type;		/* Command type. */
49 	u8    Timeout;		/* Timeout in seconds. */
50 	u8    Atapi[12];	/* An ATAPI packet. */
51 	u8    Filler[50];	/* Padding Data. */
52 };
53 
54 struct freecom_xfer_wrap {
55 	u8    Type;		/* Command type. */
56 	u8    Timeout;		/* Timeout in seconds. */
57 	__le32   Count;		/* Number of bytes to transfer. */
58 	u8    Pad[58];
59 } __attribute__ ((packed));
60 
61 struct freecom_ide_out {
62 	u8    Type;		/* Type + IDE register. */
63 	u8    Pad;
64 	__le16   Value;		/* Value to write. */
65 	u8    Pad2[60];
66 };
67 
68 struct freecom_ide_in {
69 	u8    Type;		/* Type | IDE register. */
70 	u8    Pad[63];
71 };
72 
73 struct freecom_status {
74 	u8    Status;
75 	u8    Reason;
76 	__le16   Count;
77 	u8    Pad[60];
78 };
79 
80 /* Freecom stuffs the interrupt status in the INDEX_STAT bit of the ide
81  * register. */
82 #define FCM_INT_STATUS		0x02 /* INDEX_STAT */
83 #define FCM_STATUS_BUSY		0x80
84 
85 /* These are the packet types.  The low bit indicates that this command
86  * should wait for an interrupt. */
87 #define FCM_PACKET_ATAPI	0x21
88 #define FCM_PACKET_STATUS	0x20
89 
90 /* Receive data from the IDE interface.  The ATAPI packet has already
91  * waited, so the data should be immediately available. */
92 #define FCM_PACKET_INPUT	0x81
93 
94 /* Send data to the IDE interface. */
95 #define FCM_PACKET_OUTPUT	0x01
96 
97 /* Write a value to an ide register.  Or the ide register to write after
98  * munging the address a bit. */
99 #define FCM_PACKET_IDE_WRITE	0x40
100 #define FCM_PACKET_IDE_READ	0xC0
101 
102 /* All packets (except for status) are 64 bytes long. */
103 #define FCM_PACKET_LENGTH		64
104 #define FCM_STATUS_PACKET_LENGTH	4
105 
106 static int
107 freecom_readdata (struct scsi_cmnd *srb, struct us_data *us,
108 		unsigned int ipipe, unsigned int opipe, int count)
109 {
110 	struct freecom_xfer_wrap *fxfr =
111 		(struct freecom_xfer_wrap *) us->iobuf;
112 	int result;
113 
114 	fxfr->Type = FCM_PACKET_INPUT | 0x00;
115 	fxfr->Timeout = 0;    /* Short timeout for debugging. */
116 	fxfr->Count = cpu_to_le32 (count);
117 	memset (fxfr->Pad, 0, sizeof (fxfr->Pad));
118 
119 	US_DEBUGP("Read data Freecom! (c=%d)\n", count);
120 
121 	/* Issue the transfer command. */
122 	result = usb_stor_bulk_transfer_buf (us, opipe, fxfr,
123 			FCM_PACKET_LENGTH, NULL);
124 	if (result != USB_STOR_XFER_GOOD) {
125 		US_DEBUGP ("Freecom readdata transport error\n");
126 		return USB_STOR_TRANSPORT_ERROR;
127 	}
128 
129 	/* Now transfer all of our blocks. */
130 	US_DEBUGP("Start of read\n");
131 	result = usb_stor_bulk_srb(us, ipipe, srb);
132 	US_DEBUGP("freecom_readdata done!\n");
133 
134 	if (result > USB_STOR_XFER_SHORT)
135 		return USB_STOR_TRANSPORT_ERROR;
136 	return USB_STOR_TRANSPORT_GOOD;
137 }
138 
139 static int
140 freecom_writedata (struct scsi_cmnd *srb, struct us_data *us,
141 		int unsigned ipipe, unsigned int opipe, int count)
142 {
143 	struct freecom_xfer_wrap *fxfr =
144 		(struct freecom_xfer_wrap *) us->iobuf;
145 	int result;
146 
147 	fxfr->Type = FCM_PACKET_OUTPUT | 0x00;
148 	fxfr->Timeout = 0;    /* Short timeout for debugging. */
149 	fxfr->Count = cpu_to_le32 (count);
150 	memset (fxfr->Pad, 0, sizeof (fxfr->Pad));
151 
152 	US_DEBUGP("Write data Freecom! (c=%d)\n", count);
153 
154 	/* Issue the transfer command. */
155 	result = usb_stor_bulk_transfer_buf (us, opipe, fxfr,
156 			FCM_PACKET_LENGTH, NULL);
157 	if (result != USB_STOR_XFER_GOOD) {
158 		US_DEBUGP ("Freecom writedata transport error\n");
159 		return USB_STOR_TRANSPORT_ERROR;
160 	}
161 
162 	/* Now transfer all of our blocks. */
163 	US_DEBUGP("Start of write\n");
164 	result = usb_stor_bulk_srb(us, opipe, srb);
165 
166 	US_DEBUGP("freecom_writedata done!\n");
167 	if (result > USB_STOR_XFER_SHORT)
168 		return USB_STOR_TRANSPORT_ERROR;
169 	return USB_STOR_TRANSPORT_GOOD;
170 }
171 
172 /*
173  * Transport for the Freecom USB/IDE adaptor.
174  *
175  */
176 int freecom_transport(struct scsi_cmnd *srb, struct us_data *us)
177 {
178 	struct freecom_cb_wrap *fcb;
179 	struct freecom_status  *fst;
180 	unsigned int ipipe, opipe;		/* We need both pipes. */
181 	int result;
182 	unsigned int partial;
183 	int length;
184 
185 	fcb = (struct freecom_cb_wrap *) us->iobuf;
186 	fst = (struct freecom_status *) us->iobuf;
187 
188 	US_DEBUGP("Freecom TRANSPORT STARTED\n");
189 
190 	/* Get handles for both transports. */
191 	opipe = us->send_bulk_pipe;
192 	ipipe = us->recv_bulk_pipe;
193 
194 	/* The ATAPI Command always goes out first. */
195 	fcb->Type = FCM_PACKET_ATAPI | 0x00;
196 	fcb->Timeout = 0;
197 	memcpy (fcb->Atapi, srb->cmnd, 12);
198 	memset (fcb->Filler, 0, sizeof (fcb->Filler));
199 
200 	US_DEBUG(pdump (srb->cmnd, 12));
201 
202 	/* Send it out. */
203 	result = usb_stor_bulk_transfer_buf (us, opipe, fcb,
204 			FCM_PACKET_LENGTH, NULL);
205 
206 	/* The Freecom device will only fail if there is something wrong in
207 	 * USB land.  It returns the status in its own registers, which
208 	 * come back in the bulk pipe. */
209 	if (result != USB_STOR_XFER_GOOD) {
210 		US_DEBUGP ("freecom transport error\n");
211 		return USB_STOR_TRANSPORT_ERROR;
212 	}
213 
214 	/* There are times we can optimize out this status read, but it
215 	 * doesn't hurt us to always do it now. */
216 	result = usb_stor_bulk_transfer_buf (us, ipipe, fst,
217 			FCM_STATUS_PACKET_LENGTH, &partial);
218 	US_DEBUGP("foo Status result %d %u\n", result, partial);
219 	if (result != USB_STOR_XFER_GOOD)
220 		return USB_STOR_TRANSPORT_ERROR;
221 
222 	US_DEBUG(pdump ((void *) fst, partial));
223 
224 	/* The firmware will time-out commands after 20 seconds. Some commands
225 	 * can legitimately take longer than this, so we use a different
226 	 * command that only waits for the interrupt and then sends status,
227 	 * without having to send a new ATAPI command to the device.
228 	 *
229 	 * NOTE: There is some indication that a data transfer after a timeout
230 	 * may not work, but that is a condition that should never happen.
231 	 */
232 	while (fst->Status & FCM_STATUS_BUSY) {
233 		US_DEBUGP("20 second USB/ATAPI bridge TIMEOUT occurred!\n");
234 		US_DEBUGP("fst->Status is %x\n", fst->Status);
235 
236 		/* Get the status again */
237 		fcb->Type = FCM_PACKET_STATUS;
238 		fcb->Timeout = 0;
239 		memset (fcb->Atapi, 0, sizeof(fcb->Atapi));
240 		memset (fcb->Filler, 0, sizeof (fcb->Filler));
241 
242 		/* Send it out. */
243 		result = usb_stor_bulk_transfer_buf (us, opipe, fcb,
244 				FCM_PACKET_LENGTH, NULL);
245 
246 		/* The Freecom device will only fail if there is something
247 		 * wrong in USB land.  It returns the status in its own
248 		 * registers, which come back in the bulk pipe.
249 		 */
250 		if (result != USB_STOR_XFER_GOOD) {
251 			US_DEBUGP ("freecom transport error\n");
252 			return USB_STOR_TRANSPORT_ERROR;
253 		}
254 
255 		/* get the data */
256 		result = usb_stor_bulk_transfer_buf (us, ipipe, fst,
257 				FCM_STATUS_PACKET_LENGTH, &partial);
258 
259 		US_DEBUGP("bar Status result %d %u\n", result, partial);
260 		if (result != USB_STOR_XFER_GOOD)
261 			return USB_STOR_TRANSPORT_ERROR;
262 
263 		US_DEBUG(pdump ((void *) fst, partial));
264 	}
265 
266 	if (partial != 4)
267 		return USB_STOR_TRANSPORT_ERROR;
268 	if ((fst->Status & 1) != 0) {
269 		US_DEBUGP("operation failed\n");
270 		return USB_STOR_TRANSPORT_FAILED;
271 	}
272 
273 	/* The device might not have as much data available as we
274 	 * requested.  If you ask for more than the device has, this reads
275 	 * and such will hang. */
276 	US_DEBUGP("Device indicates that it has %d bytes available\n",
277 			le16_to_cpu (fst->Count));
278 	US_DEBUGP("SCSI requested %d\n", scsi_bufflen(srb));
279 
280 	/* Find the length we desire to read. */
281 	switch (srb->cmnd[0]) {
282 		case INQUIRY:
283 		case REQUEST_SENSE:		/* 16 or 18 bytes? spec says 18, lots of devices only have 16 */
284 		case MODE_SENSE:
285 		case MODE_SENSE_10:
286 			length = le16_to_cpu(fst->Count);
287 			break;
288 		default:
289 			length = scsi_bufflen(srb);
290 	}
291 
292 	/* verify that this amount is legal */
293 	if (length > scsi_bufflen(srb)) {
294 		length = scsi_bufflen(srb);
295 		US_DEBUGP("Truncating request to match buffer length: %d\n", length);
296 	}
297 
298 	/* What we do now depends on what direction the data is supposed to
299 	 * move in. */
300 
301 	switch (us->srb->sc_data_direction) {
302 	case DMA_FROM_DEVICE:
303 		/* catch bogus "read 0 length" case */
304 		if (!length)
305 			break;
306 		/* Make sure that the status indicates that the device
307 		 * wants data as well. */
308 		if ((fst->Status & DRQ_STAT) == 0 || (fst->Reason & 3) != 2) {
309 			US_DEBUGP("SCSI wants data, drive doesn't have any\n");
310 			return USB_STOR_TRANSPORT_FAILED;
311 		}
312 		result = freecom_readdata (srb, us, ipipe, opipe, length);
313 		if (result != USB_STOR_TRANSPORT_GOOD)
314 			return result;
315 
316 		US_DEBUGP("FCM: Waiting for status\n");
317 		result = usb_stor_bulk_transfer_buf (us, ipipe, fst,
318 				FCM_PACKET_LENGTH, &partial);
319 		US_DEBUG(pdump ((void *) fst, partial));
320 
321 		if (partial != 4 || result > USB_STOR_XFER_SHORT)
322 			return USB_STOR_TRANSPORT_ERROR;
323 		if ((fst->Status & ERR_STAT) != 0) {
324 			US_DEBUGP("operation failed\n");
325 			return USB_STOR_TRANSPORT_FAILED;
326 		}
327 		if ((fst->Reason & 3) != 3) {
328 			US_DEBUGP("Drive seems still hungry\n");
329 			return USB_STOR_TRANSPORT_FAILED;
330 		}
331 		US_DEBUGP("Transfer happy\n");
332 		break;
333 
334 	case DMA_TO_DEVICE:
335 		/* catch bogus "write 0 length" case */
336 		if (!length)
337 			break;
338 		/* Make sure the status indicates that the device wants to
339 		 * send us data. */
340 		/* !!IMPLEMENT!! */
341 		result = freecom_writedata (srb, us, ipipe, opipe, length);
342 		if (result != USB_STOR_TRANSPORT_GOOD)
343 			return result;
344 
345 		US_DEBUGP("FCM: Waiting for status\n");
346 		result = usb_stor_bulk_transfer_buf (us, ipipe, fst,
347 				FCM_PACKET_LENGTH, &partial);
348 
349 		if (partial != 4 || result > USB_STOR_XFER_SHORT)
350 			return USB_STOR_TRANSPORT_ERROR;
351 		if ((fst->Status & ERR_STAT) != 0) {
352 			US_DEBUGP("operation failed\n");
353 			return USB_STOR_TRANSPORT_FAILED;
354 		}
355 		if ((fst->Reason & 3) != 3) {
356 			US_DEBUGP("Drive seems still hungry\n");
357 			return USB_STOR_TRANSPORT_FAILED;
358 		}
359 
360 		US_DEBUGP("Transfer happy\n");
361 		break;
362 
363 
364 	case DMA_NONE:
365 		/* Easy, do nothing. */
366 		break;
367 
368 	default:
369 		/* should never hit here -- filtered in usb.c */
370 		US_DEBUGP ("freecom unimplemented direction: %d\n",
371 				us->srb->sc_data_direction);
372 		// Return fail, SCSI seems to handle this better.
373 		return USB_STOR_TRANSPORT_FAILED;
374 		break;
375 	}
376 
377 	return USB_STOR_TRANSPORT_GOOD;
378 }
379 
380 int
381 freecom_init (struct us_data *us)
382 {
383 	int result;
384 	char *buffer = us->iobuf;
385 
386 	/* The DMA-mapped I/O buffer is 64 bytes long, just right for
387 	 * all our packets.  No need to allocate any extra buffer space.
388 	 */
389 
390 	result = usb_stor_control_msg(us, us->recv_ctrl_pipe,
391 			0x4c, 0xc0, 0x4346, 0x0, buffer, 0x20, 3*HZ);
392 	buffer[32] = '\0';
393 	US_DEBUGP("String returned from FC init is: %s\n", buffer);
394 
395 	/* Special thanks to the people at Freecom for providing me with
396 	 * this "magic sequence", which they use in their Windows and MacOS
397 	 * drivers to make sure that all the attached perhiperals are
398 	 * properly reset.
399 	 */
400 
401 	/* send reset */
402 	result = usb_stor_control_msg(us, us->send_ctrl_pipe,
403 			0x4d, 0x40, 0x24d8, 0x0, NULL, 0x0, 3*HZ);
404 	US_DEBUGP("result from activate reset is %d\n", result);
405 
406 	/* wait 250ms */
407 	mdelay(250);
408 
409 	/* clear reset */
410 	result = usb_stor_control_msg(us, us->send_ctrl_pipe,
411 			0x4d, 0x40, 0x24f8, 0x0, NULL, 0x0, 3*HZ);
412 	US_DEBUGP("result from clear reset is %d\n", result);
413 
414 	/* wait 3 seconds */
415 	mdelay(3 * 1000);
416 
417 	return USB_STOR_TRANSPORT_GOOD;
418 }
419 
420 int usb_stor_freecom_reset(struct us_data *us)
421 {
422 	printk (KERN_CRIT "freecom reset called\n");
423 
424 	/* We don't really have this feature. */
425 	return FAILED;
426 }
427 
428 #ifdef CONFIG_USB_STORAGE_DEBUG
429 static void pdump (void *ibuffer, int length)
430 {
431 	static char line[80];
432 	int offset = 0;
433 	unsigned char *buffer = (unsigned char *) ibuffer;
434 	int i, j;
435 	int from, base;
436 
437 	offset = 0;
438 	for (i = 0; i < length; i++) {
439 		if ((i & 15) == 0) {
440 			if (i > 0) {
441 				offset += sprintf (line+offset, " - ");
442 				for (j = i - 16; j < i; j++) {
443 					if (buffer[j] >= 32 && buffer[j] <= 126)
444 						line[offset++] = buffer[j];
445 					else
446 						line[offset++] = '.';
447 				}
448 				line[offset] = 0;
449 				US_DEBUGP("%s\n", line);
450 				offset = 0;
451 			}
452 			offset += sprintf (line+offset, "%08x:", i);
453 		}
454 		else if ((i & 7) == 0) {
455 			offset += sprintf (line+offset, " -");
456 		}
457 		offset += sprintf (line+offset, " %02x", buffer[i] & 0xff);
458 	}
459 
460 	/* Add the last "chunk" of data. */
461 	from = (length - 1) % 16;
462 	base = ((length - 1) / 16) * 16;
463 
464 	for (i = from + 1; i < 16; i++)
465 		offset += sprintf (line+offset, "   ");
466 	if (from < 8)
467 		offset += sprintf (line+offset, "  ");
468 	offset += sprintf (line+offset, " - ");
469 
470 	for (i = 0; i <= from; i++) {
471 		if (buffer[base+i] >= 32 && buffer[base+i] <= 126)
472 			line[offset++] = buffer[base+i];
473 		else
474 			line[offset++] = '.';
475 	}
476 	line[offset] = 0;
477 	US_DEBUGP("%s\n", line);
478 	offset = 0;
479 }
480 #endif
481 
482