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