include cleanup: Update gfp.h and slab.h includes to prepare for breaking implicit...
[GitHub/mt8127/android_kernel_alcatel_ttab.git] / drivers / scsi / ch.c
1 /*
2 * SCSI Media Changer device driver for Linux 2.6
3 *
4 * (c) 1996-2003 Gerd Knorr <kraxel@bytesex.org>
5 *
6 */
7
8 #define VERSION "0.25"
9
10 #include <linux/module.h>
11 #include <linux/init.h>
12 #include <linux/fs.h>
13 #include <linux/kernel.h>
14 #include <linux/mm.h>
15 #include <linux/major.h>
16 #include <linux/string.h>
17 #include <linux/errno.h>
18 #include <linux/interrupt.h>
19 #include <linux/blkdev.h>
20 #include <linux/completion.h>
21 #include <linux/compat.h>
22 #include <linux/chio.h> /* here are all the ioctls */
23 #include <linux/mutex.h>
24 #include <linux/idr.h>
25 #include <linux/smp_lock.h>
26 #include <linux/slab.h>
27
28 #include <scsi/scsi.h>
29 #include <scsi/scsi_cmnd.h>
30 #include <scsi/scsi_driver.h>
31 #include <scsi/scsi_ioctl.h>
32 #include <scsi/scsi_host.h>
33 #include <scsi/scsi_device.h>
34 #include <scsi/scsi_eh.h>
35 #include <scsi/scsi_dbg.h>
36
37 #define CH_DT_MAX 16
38 #define CH_TYPES 8
39 #define CH_MAX_DEVS 128
40
41 MODULE_DESCRIPTION("device driver for scsi media changer devices");
42 MODULE_AUTHOR("Gerd Knorr <kraxel@bytesex.org>");
43 MODULE_LICENSE("GPL");
44 MODULE_ALIAS_CHARDEV_MAJOR(SCSI_CHANGER_MAJOR);
45 MODULE_ALIAS_SCSI_DEVICE(TYPE_MEDIUM_CHANGER);
46
47 static int init = 1;
48 module_param(init, int, 0444);
49 MODULE_PARM_DESC(init, \
50 "initialize element status on driver load (default: on)");
51
52 static int timeout_move = 300;
53 module_param(timeout_move, int, 0644);
54 MODULE_PARM_DESC(timeout_move,"timeout for move commands "
55 "(default: 300 seconds)");
56
57 static int timeout_init = 3600;
58 module_param(timeout_init, int, 0644);
59 MODULE_PARM_DESC(timeout_init,"timeout for INITIALIZE ELEMENT STATUS "
60 "(default: 3600 seconds)");
61
62 static int verbose = 1;
63 module_param(verbose, int, 0644);
64 MODULE_PARM_DESC(verbose,"be verbose (default: on)");
65
66 static int debug = 0;
67 module_param(debug, int, 0644);
68 MODULE_PARM_DESC(debug,"enable/disable debug messages, also prints more "
69 "detailed sense codes on scsi errors (default: off)");
70
71 static int dt_id[CH_DT_MAX] = { [ 0 ... (CH_DT_MAX-1) ] = -1 };
72 static int dt_lun[CH_DT_MAX];
73 module_param_array(dt_id, int, NULL, 0444);
74 module_param_array(dt_lun, int, NULL, 0444);
75
76 /* tell the driver about vendor-specific slots */
77 static int vendor_firsts[CH_TYPES-4];
78 static int vendor_counts[CH_TYPES-4];
79 module_param_array(vendor_firsts, int, NULL, 0444);
80 module_param_array(vendor_counts, int, NULL, 0444);
81
82 static const char * vendor_labels[CH_TYPES-4] = {
83 "v0", "v1", "v2", "v3"
84 };
85 // module_param_string_array(vendor_labels, NULL, 0444);
86
87 #define dprintk(fmt, arg...) if (debug) \
88 printk(KERN_DEBUG "%s: " fmt, ch->name , ## arg)
89 #define vprintk(fmt, arg...) if (verbose) \
90 printk(KERN_INFO "%s: " fmt, ch->name , ## arg)
91
92 /* ------------------------------------------------------------------- */
93
94 #define MAX_RETRIES 1
95
96 static struct class * ch_sysfs_class;
97
98 typedef struct {
99 struct list_head list;
100 int minor;
101 char name[8];
102 struct scsi_device *device;
103 struct scsi_device **dt; /* ptrs to data transfer elements */
104 u_int firsts[CH_TYPES];
105 u_int counts[CH_TYPES];
106 u_int unit_attention;
107 u_int voltags;
108 struct mutex lock;
109 } scsi_changer;
110
111 static DEFINE_IDR(ch_index_idr);
112 static DEFINE_SPINLOCK(ch_index_lock);
113
114 static const struct {
115 unsigned char sense;
116 unsigned char asc;
117 unsigned char ascq;
118 int errno;
119 } ch_err[] = {
120 /* Just filled in what looks right. Hav'nt checked any standard paper for
121 these errno assignments, so they may be wrong... */
122 {
123 .sense = ILLEGAL_REQUEST,
124 .asc = 0x21,
125 .ascq = 0x01,
126 .errno = EBADSLT, /* Invalid element address */
127 },{
128 .sense = ILLEGAL_REQUEST,
129 .asc = 0x28,
130 .ascq = 0x01,
131 .errno = EBADE, /* Import or export element accessed */
132 },{
133 .sense = ILLEGAL_REQUEST,
134 .asc = 0x3B,
135 .ascq = 0x0D,
136 .errno = EXFULL, /* Medium destination element full */
137 },{
138 .sense = ILLEGAL_REQUEST,
139 .asc = 0x3B,
140 .ascq = 0x0E,
141 .errno = EBADE, /* Medium source element empty */
142 },{
143 .sense = ILLEGAL_REQUEST,
144 .asc = 0x20,
145 .ascq = 0x00,
146 .errno = EBADRQC, /* Invalid command operation code */
147 },{
148 /* end of list */
149 }
150 };
151
152 /* ------------------------------------------------------------------- */
153
154 static int ch_find_errno(struct scsi_sense_hdr *sshdr)
155 {
156 int i,errno = 0;
157
158 /* Check to see if additional sense information is available */
159 if (scsi_sense_valid(sshdr) &&
160 sshdr->asc != 0) {
161 for (i = 0; ch_err[i].errno != 0; i++) {
162 if (ch_err[i].sense == sshdr->sense_key &&
163 ch_err[i].asc == sshdr->asc &&
164 ch_err[i].ascq == sshdr->ascq) {
165 errno = -ch_err[i].errno;
166 break;
167 }
168 }
169 }
170 if (errno == 0)
171 errno = -EIO;
172 return errno;
173 }
174
175 static int
176 ch_do_scsi(scsi_changer *ch, unsigned char *cmd,
177 void *buffer, unsigned buflength,
178 enum dma_data_direction direction)
179 {
180 int errno, retries = 0, timeout, result;
181 struct scsi_sense_hdr sshdr;
182
183 timeout = (cmd[0] == INITIALIZE_ELEMENT_STATUS)
184 ? timeout_init : timeout_move;
185
186 retry:
187 errno = 0;
188 if (debug) {
189 dprintk("command: ");
190 __scsi_print_command(cmd);
191 }
192
193 result = scsi_execute_req(ch->device, cmd, direction, buffer,
194 buflength, &sshdr, timeout * HZ,
195 MAX_RETRIES, NULL);
196
197 dprintk("result: 0x%x\n",result);
198 if (driver_byte(result) & DRIVER_SENSE) {
199 if (debug)
200 scsi_print_sense_hdr(ch->name, &sshdr);
201 errno = ch_find_errno(&sshdr);
202
203 switch(sshdr.sense_key) {
204 case UNIT_ATTENTION:
205 ch->unit_attention = 1;
206 if (retries++ < 3)
207 goto retry;
208 break;
209 }
210 }
211 return errno;
212 }
213
214 /* ------------------------------------------------------------------------ */
215
216 static int
217 ch_elem_to_typecode(scsi_changer *ch, u_int elem)
218 {
219 int i;
220
221 for (i = 0; i < CH_TYPES; i++) {
222 if (elem >= ch->firsts[i] &&
223 elem < ch->firsts[i] +
224 ch->counts[i])
225 return i+1;
226 }
227 return 0;
228 }
229
230 static int
231 ch_read_element_status(scsi_changer *ch, u_int elem, char *data)
232 {
233 u_char cmd[12];
234 u_char *buffer;
235 int result;
236
237 buffer = kmalloc(512, GFP_KERNEL | GFP_DMA);
238 if(!buffer)
239 return -ENOMEM;
240
241 retry:
242 memset(cmd,0,sizeof(cmd));
243 cmd[0] = READ_ELEMENT_STATUS;
244 cmd[1] = (ch->device->lun << 5) |
245 (ch->voltags ? 0x10 : 0) |
246 ch_elem_to_typecode(ch,elem);
247 cmd[2] = (elem >> 8) & 0xff;
248 cmd[3] = elem & 0xff;
249 cmd[5] = 1;
250 cmd[9] = 255;
251 if (0 == (result = ch_do_scsi(ch, cmd, buffer, 256, DMA_FROM_DEVICE))) {
252 if (((buffer[16] << 8) | buffer[17]) != elem) {
253 dprintk("asked for element 0x%02x, got 0x%02x\n",
254 elem,(buffer[16] << 8) | buffer[17]);
255 kfree(buffer);
256 return -EIO;
257 }
258 memcpy(data,buffer+16,16);
259 } else {
260 if (ch->voltags) {
261 ch->voltags = 0;
262 vprintk("device has no volume tag support\n");
263 goto retry;
264 }
265 dprintk("READ ELEMENT STATUS for element 0x%x failed\n",elem);
266 }
267 kfree(buffer);
268 return result;
269 }
270
271 static int
272 ch_init_elem(scsi_changer *ch)
273 {
274 int err;
275 u_char cmd[6];
276
277 vprintk("INITIALIZE ELEMENT STATUS, may take some time ...\n");
278 memset(cmd,0,sizeof(cmd));
279 cmd[0] = INITIALIZE_ELEMENT_STATUS;
280 cmd[1] = ch->device->lun << 5;
281 err = ch_do_scsi(ch, cmd, NULL, 0, DMA_NONE);
282 vprintk("... finished\n");
283 return err;
284 }
285
286 static int
287 ch_readconfig(scsi_changer *ch)
288 {
289 u_char cmd[10], data[16];
290 u_char *buffer;
291 int result,id,lun,i;
292 u_int elem;
293
294 buffer = kzalloc(512, GFP_KERNEL | GFP_DMA);
295 if (!buffer)
296 return -ENOMEM;
297
298 memset(cmd,0,sizeof(cmd));
299 cmd[0] = MODE_SENSE;
300 cmd[1] = ch->device->lun << 5;
301 cmd[2] = 0x1d;
302 cmd[4] = 255;
303 result = ch_do_scsi(ch, cmd, buffer, 255, DMA_FROM_DEVICE);
304 if (0 != result) {
305 cmd[1] |= (1<<3);
306 result = ch_do_scsi(ch, cmd, buffer, 255, DMA_FROM_DEVICE);
307 }
308 if (0 == result) {
309 ch->firsts[CHET_MT] =
310 (buffer[buffer[3]+ 6] << 8) | buffer[buffer[3]+ 7];
311 ch->counts[CHET_MT] =
312 (buffer[buffer[3]+ 8] << 8) | buffer[buffer[3]+ 9];
313 ch->firsts[CHET_ST] =
314 (buffer[buffer[3]+10] << 8) | buffer[buffer[3]+11];
315 ch->counts[CHET_ST] =
316 (buffer[buffer[3]+12] << 8) | buffer[buffer[3]+13];
317 ch->firsts[CHET_IE] =
318 (buffer[buffer[3]+14] << 8) | buffer[buffer[3]+15];
319 ch->counts[CHET_IE] =
320 (buffer[buffer[3]+16] << 8) | buffer[buffer[3]+17];
321 ch->firsts[CHET_DT] =
322 (buffer[buffer[3]+18] << 8) | buffer[buffer[3]+19];
323 ch->counts[CHET_DT] =
324 (buffer[buffer[3]+20] << 8) | buffer[buffer[3]+21];
325 vprintk("type #1 (mt): 0x%x+%d [medium transport]\n",
326 ch->firsts[CHET_MT],
327 ch->counts[CHET_MT]);
328 vprintk("type #2 (st): 0x%x+%d [storage]\n",
329 ch->firsts[CHET_ST],
330 ch->counts[CHET_ST]);
331 vprintk("type #3 (ie): 0x%x+%d [import/export]\n",
332 ch->firsts[CHET_IE],
333 ch->counts[CHET_IE]);
334 vprintk("type #4 (dt): 0x%x+%d [data transfer]\n",
335 ch->firsts[CHET_DT],
336 ch->counts[CHET_DT]);
337 } else {
338 vprintk("reading element address assigment page failed!\n");
339 }
340
341 /* vendor specific element types */
342 for (i = 0; i < 4; i++) {
343 if (0 == vendor_counts[i])
344 continue;
345 if (NULL == vendor_labels[i])
346 continue;
347 ch->firsts[CHET_V1+i] = vendor_firsts[i];
348 ch->counts[CHET_V1+i] = vendor_counts[i];
349 vprintk("type #%d (v%d): 0x%x+%d [%s, vendor specific]\n",
350 i+5,i+1,vendor_firsts[i],vendor_counts[i],
351 vendor_labels[i]);
352 }
353
354 /* look up the devices of the data transfer elements */
355 ch->dt = kmalloc(ch->counts[CHET_DT]*sizeof(struct scsi_device),
356 GFP_KERNEL);
357
358 if (!ch->dt) {
359 kfree(buffer);
360 return -ENOMEM;
361 }
362
363 for (elem = 0; elem < ch->counts[CHET_DT]; elem++) {
364 id = -1;
365 lun = 0;
366 if (elem < CH_DT_MAX && -1 != dt_id[elem]) {
367 id = dt_id[elem];
368 lun = dt_lun[elem];
369 vprintk("dt 0x%x: [insmod option] ",
370 elem+ch->firsts[CHET_DT]);
371 } else if (0 != ch_read_element_status
372 (ch,elem+ch->firsts[CHET_DT],data)) {
373 vprintk("dt 0x%x: READ ELEMENT STATUS failed\n",
374 elem+ch->firsts[CHET_DT]);
375 } else {
376 vprintk("dt 0x%x: ",elem+ch->firsts[CHET_DT]);
377 if (data[6] & 0x80) {
378 if (verbose)
379 printk("not this SCSI bus\n");
380 ch->dt[elem] = NULL;
381 } else if (0 == (data[6] & 0x30)) {
382 if (verbose)
383 printk("ID/LUN unknown\n");
384 ch->dt[elem] = NULL;
385 } else {
386 id = ch->device->id;
387 lun = 0;
388 if (data[6] & 0x20) id = data[7];
389 if (data[6] & 0x10) lun = data[6] & 7;
390 }
391 }
392 if (-1 != id) {
393 if (verbose)
394 printk("ID %i, LUN %i, ",id,lun);
395 ch->dt[elem] =
396 scsi_device_lookup(ch->device->host,
397 ch->device->channel,
398 id,lun);
399 if (!ch->dt[elem]) {
400 /* should not happen */
401 if (verbose)
402 printk("Huh? device not found!\n");
403 } else {
404 if (verbose)
405 printk("name: %8.8s %16.16s %4.4s\n",
406 ch->dt[elem]->vendor,
407 ch->dt[elem]->model,
408 ch->dt[elem]->rev);
409 }
410 }
411 }
412 ch->voltags = 1;
413 kfree(buffer);
414
415 return 0;
416 }
417
418 /* ------------------------------------------------------------------------ */
419
420 static int
421 ch_position(scsi_changer *ch, u_int trans, u_int elem, int rotate)
422 {
423 u_char cmd[10];
424
425 dprintk("position: 0x%x\n",elem);
426 if (0 == trans)
427 trans = ch->firsts[CHET_MT];
428 memset(cmd,0,sizeof(cmd));
429 cmd[0] = POSITION_TO_ELEMENT;
430 cmd[1] = ch->device->lun << 5;
431 cmd[2] = (trans >> 8) & 0xff;
432 cmd[3] = trans & 0xff;
433 cmd[4] = (elem >> 8) & 0xff;
434 cmd[5] = elem & 0xff;
435 cmd[8] = rotate ? 1 : 0;
436 return ch_do_scsi(ch, cmd, NULL, 0, DMA_NONE);
437 }
438
439 static int
440 ch_move(scsi_changer *ch, u_int trans, u_int src, u_int dest, int rotate)
441 {
442 u_char cmd[12];
443
444 dprintk("move: 0x%x => 0x%x\n",src,dest);
445 if (0 == trans)
446 trans = ch->firsts[CHET_MT];
447 memset(cmd,0,sizeof(cmd));
448 cmd[0] = MOVE_MEDIUM;
449 cmd[1] = ch->device->lun << 5;
450 cmd[2] = (trans >> 8) & 0xff;
451 cmd[3] = trans & 0xff;
452 cmd[4] = (src >> 8) & 0xff;
453 cmd[5] = src & 0xff;
454 cmd[6] = (dest >> 8) & 0xff;
455 cmd[7] = dest & 0xff;
456 cmd[10] = rotate ? 1 : 0;
457 return ch_do_scsi(ch, cmd, NULL,0, DMA_NONE);
458 }
459
460 static int
461 ch_exchange(scsi_changer *ch, u_int trans, u_int src,
462 u_int dest1, u_int dest2, int rotate1, int rotate2)
463 {
464 u_char cmd[12];
465
466 dprintk("exchange: 0x%x => 0x%x => 0x%x\n",
467 src,dest1,dest2);
468 if (0 == trans)
469 trans = ch->firsts[CHET_MT];
470 memset(cmd,0,sizeof(cmd));
471 cmd[0] = EXCHANGE_MEDIUM;
472 cmd[1] = ch->device->lun << 5;
473 cmd[2] = (trans >> 8) & 0xff;
474 cmd[3] = trans & 0xff;
475 cmd[4] = (src >> 8) & 0xff;
476 cmd[5] = src & 0xff;
477 cmd[6] = (dest1 >> 8) & 0xff;
478 cmd[7] = dest1 & 0xff;
479 cmd[8] = (dest2 >> 8) & 0xff;
480 cmd[9] = dest2 & 0xff;
481 cmd[10] = (rotate1 ? 1 : 0) | (rotate2 ? 2 : 0);
482
483 return ch_do_scsi(ch, cmd, NULL,0, DMA_NONE);
484 }
485
486 static void
487 ch_check_voltag(char *tag)
488 {
489 int i;
490
491 for (i = 0; i < 32; i++) {
492 /* restrict to ascii */
493 if (tag[i] >= 0x7f || tag[i] < 0x20)
494 tag[i] = ' ';
495 /* don't allow search wildcards */
496 if (tag[i] == '?' ||
497 tag[i] == '*')
498 tag[i] = ' ';
499 }
500 }
501
502 static int
503 ch_set_voltag(scsi_changer *ch, u_int elem,
504 int alternate, int clear, u_char *tag)
505 {
506 u_char cmd[12];
507 u_char *buffer;
508 int result;
509
510 buffer = kzalloc(512, GFP_KERNEL);
511 if (!buffer)
512 return -ENOMEM;
513
514 dprintk("%s %s voltag: 0x%x => \"%s\"\n",
515 clear ? "clear" : "set",
516 alternate ? "alternate" : "primary",
517 elem, tag);
518 memset(cmd,0,sizeof(cmd));
519 cmd[0] = SEND_VOLUME_TAG;
520 cmd[1] = (ch->device->lun << 5) |
521 ch_elem_to_typecode(ch,elem);
522 cmd[2] = (elem >> 8) & 0xff;
523 cmd[3] = elem & 0xff;
524 cmd[5] = clear
525 ? (alternate ? 0x0d : 0x0c)
526 : (alternate ? 0x0b : 0x0a);
527
528 cmd[9] = 255;
529
530 memcpy(buffer,tag,32);
531 ch_check_voltag(buffer);
532
533 result = ch_do_scsi(ch, cmd, buffer, 256, DMA_TO_DEVICE);
534 kfree(buffer);
535 return result;
536 }
537
538 static int ch_gstatus(scsi_changer *ch, int type, unsigned char __user *dest)
539 {
540 int retval = 0;
541 u_char data[16];
542 unsigned int i;
543
544 mutex_lock(&ch->lock);
545 for (i = 0; i < ch->counts[type]; i++) {
546 if (0 != ch_read_element_status
547 (ch, ch->firsts[type]+i,data)) {
548 retval = -EIO;
549 break;
550 }
551 put_user(data[2], dest+i);
552 if (data[2] & CESTATUS_EXCEPT)
553 vprintk("element 0x%x: asc=0x%x, ascq=0x%x\n",
554 ch->firsts[type]+i,
555 (int)data[4],(int)data[5]);
556 retval = ch_read_element_status
557 (ch, ch->firsts[type]+i,data);
558 if (0 != retval)
559 break;
560 }
561 mutex_unlock(&ch->lock);
562 return retval;
563 }
564
565 /* ------------------------------------------------------------------------ */
566
567 static int
568 ch_release(struct inode *inode, struct file *file)
569 {
570 scsi_changer *ch = file->private_data;
571
572 scsi_device_put(ch->device);
573 file->private_data = NULL;
574 return 0;
575 }
576
577 static int
578 ch_open(struct inode *inode, struct file *file)
579 {
580 scsi_changer *ch;
581 int minor = iminor(inode);
582
583 lock_kernel();
584 spin_lock(&ch_index_lock);
585 ch = idr_find(&ch_index_idr, minor);
586
587 if (NULL == ch || scsi_device_get(ch->device)) {
588 spin_unlock(&ch_index_lock);
589 unlock_kernel();
590 return -ENXIO;
591 }
592 spin_unlock(&ch_index_lock);
593
594 file->private_data = ch;
595 unlock_kernel();
596 return 0;
597 }
598
599 static int
600 ch_checkrange(scsi_changer *ch, unsigned int type, unsigned int unit)
601 {
602 if (type >= CH_TYPES || unit >= ch->counts[type])
603 return -1;
604 return 0;
605 }
606
607 static long ch_ioctl(struct file *file,
608 unsigned int cmd, unsigned long arg)
609 {
610 scsi_changer *ch = file->private_data;
611 int retval;
612 void __user *argp = (void __user *)arg;
613
614 switch (cmd) {
615 case CHIOGPARAMS:
616 {
617 struct changer_params params;
618
619 params.cp_curpicker = 0;
620 params.cp_npickers = ch->counts[CHET_MT];
621 params.cp_nslots = ch->counts[CHET_ST];
622 params.cp_nportals = ch->counts[CHET_IE];
623 params.cp_ndrives = ch->counts[CHET_DT];
624
625 if (copy_to_user(argp, &params, sizeof(params)))
626 return -EFAULT;
627 return 0;
628 }
629 case CHIOGVPARAMS:
630 {
631 struct changer_vendor_params vparams;
632
633 memset(&vparams,0,sizeof(vparams));
634 if (ch->counts[CHET_V1]) {
635 vparams.cvp_n1 = ch->counts[CHET_V1];
636 strncpy(vparams.cvp_label1,vendor_labels[0],16);
637 }
638 if (ch->counts[CHET_V2]) {
639 vparams.cvp_n2 = ch->counts[CHET_V2];
640 strncpy(vparams.cvp_label2,vendor_labels[1],16);
641 }
642 if (ch->counts[CHET_V3]) {
643 vparams.cvp_n3 = ch->counts[CHET_V3];
644 strncpy(vparams.cvp_label3,vendor_labels[2],16);
645 }
646 if (ch->counts[CHET_V4]) {
647 vparams.cvp_n4 = ch->counts[CHET_V4];
648 strncpy(vparams.cvp_label4,vendor_labels[3],16);
649 }
650 if (copy_to_user(argp, &vparams, sizeof(vparams)))
651 return -EFAULT;
652 return 0;
653 }
654
655 case CHIOPOSITION:
656 {
657 struct changer_position pos;
658
659 if (copy_from_user(&pos, argp, sizeof (pos)))
660 return -EFAULT;
661
662 if (0 != ch_checkrange(ch, pos.cp_type, pos.cp_unit)) {
663 dprintk("CHIOPOSITION: invalid parameter\n");
664 return -EBADSLT;
665 }
666 mutex_lock(&ch->lock);
667 retval = ch_position(ch,0,
668 ch->firsts[pos.cp_type] + pos.cp_unit,
669 pos.cp_flags & CP_INVERT);
670 mutex_unlock(&ch->lock);
671 return retval;
672 }
673
674 case CHIOMOVE:
675 {
676 struct changer_move mv;
677
678 if (copy_from_user(&mv, argp, sizeof (mv)))
679 return -EFAULT;
680
681 if (0 != ch_checkrange(ch, mv.cm_fromtype, mv.cm_fromunit) ||
682 0 != ch_checkrange(ch, mv.cm_totype, mv.cm_tounit )) {
683 dprintk("CHIOMOVE: invalid parameter\n");
684 return -EBADSLT;
685 }
686
687 mutex_lock(&ch->lock);
688 retval = ch_move(ch,0,
689 ch->firsts[mv.cm_fromtype] + mv.cm_fromunit,
690 ch->firsts[mv.cm_totype] + mv.cm_tounit,
691 mv.cm_flags & CM_INVERT);
692 mutex_unlock(&ch->lock);
693 return retval;
694 }
695
696 case CHIOEXCHANGE:
697 {
698 struct changer_exchange mv;
699
700 if (copy_from_user(&mv, argp, sizeof (mv)))
701 return -EFAULT;
702
703 if (0 != ch_checkrange(ch, mv.ce_srctype, mv.ce_srcunit ) ||
704 0 != ch_checkrange(ch, mv.ce_fdsttype, mv.ce_fdstunit) ||
705 0 != ch_checkrange(ch, mv.ce_sdsttype, mv.ce_sdstunit)) {
706 dprintk("CHIOEXCHANGE: invalid parameter\n");
707 return -EBADSLT;
708 }
709
710 mutex_lock(&ch->lock);
711 retval = ch_exchange
712 (ch,0,
713 ch->firsts[mv.ce_srctype] + mv.ce_srcunit,
714 ch->firsts[mv.ce_fdsttype] + mv.ce_fdstunit,
715 ch->firsts[mv.ce_sdsttype] + mv.ce_sdstunit,
716 mv.ce_flags & CE_INVERT1, mv.ce_flags & CE_INVERT2);
717 mutex_unlock(&ch->lock);
718 return retval;
719 }
720
721 case CHIOGSTATUS:
722 {
723 struct changer_element_status ces;
724
725 if (copy_from_user(&ces, argp, sizeof (ces)))
726 return -EFAULT;
727 if (ces.ces_type < 0 || ces.ces_type >= CH_TYPES)
728 return -EINVAL;
729
730 return ch_gstatus(ch, ces.ces_type, ces.ces_data);
731 }
732
733 case CHIOGELEM:
734 {
735 struct changer_get_element cge;
736 u_char ch_cmd[12];
737 u_char *buffer;
738 unsigned int elem;
739 int result,i;
740
741 if (copy_from_user(&cge, argp, sizeof (cge)))
742 return -EFAULT;
743
744 if (0 != ch_checkrange(ch, cge.cge_type, cge.cge_unit))
745 return -EINVAL;
746 elem = ch->firsts[cge.cge_type] + cge.cge_unit;
747
748 buffer = kmalloc(512, GFP_KERNEL | GFP_DMA);
749 if (!buffer)
750 return -ENOMEM;
751 mutex_lock(&ch->lock);
752
753 voltag_retry:
754 memset(ch_cmd, 0, sizeof(ch_cmd));
755 ch_cmd[0] = READ_ELEMENT_STATUS;
756 ch_cmd[1] = (ch->device->lun << 5) |
757 (ch->voltags ? 0x10 : 0) |
758 ch_elem_to_typecode(ch,elem);
759 ch_cmd[2] = (elem >> 8) & 0xff;
760 ch_cmd[3] = elem & 0xff;
761 ch_cmd[5] = 1;
762 ch_cmd[9] = 255;
763
764 result = ch_do_scsi(ch, ch_cmd, buffer, 256, DMA_FROM_DEVICE);
765 if (!result) {
766 cge.cge_status = buffer[18];
767 cge.cge_flags = 0;
768 if (buffer[18] & CESTATUS_EXCEPT) {
769 cge.cge_errno = EIO;
770 }
771 if (buffer[25] & 0x80) {
772 cge.cge_flags |= CGE_SRC;
773 if (buffer[25] & 0x40)
774 cge.cge_flags |= CGE_INVERT;
775 elem = (buffer[26]<<8) | buffer[27];
776 for (i = 0; i < 4; i++) {
777 if (elem >= ch->firsts[i] &&
778 elem < ch->firsts[i] + ch->counts[i]) {
779 cge.cge_srctype = i;
780 cge.cge_srcunit = elem-ch->firsts[i];
781 }
782 }
783 }
784 if ((buffer[22] & 0x30) == 0x30) {
785 cge.cge_flags |= CGE_IDLUN;
786 cge.cge_id = buffer[23];
787 cge.cge_lun = buffer[22] & 7;
788 }
789 if (buffer[9] & 0x80) {
790 cge.cge_flags |= CGE_PVOLTAG;
791 memcpy(cge.cge_pvoltag,buffer+28,36);
792 }
793 if (buffer[9] & 0x40) {
794 cge.cge_flags |= CGE_AVOLTAG;
795 memcpy(cge.cge_avoltag,buffer+64,36);
796 }
797 } else if (ch->voltags) {
798 ch->voltags = 0;
799 vprintk("device has no volume tag support\n");
800 goto voltag_retry;
801 }
802 kfree(buffer);
803 mutex_unlock(&ch->lock);
804
805 if (copy_to_user(argp, &cge, sizeof (cge)))
806 return -EFAULT;
807 return result;
808 }
809
810 case CHIOINITELEM:
811 {
812 mutex_lock(&ch->lock);
813 retval = ch_init_elem(ch);
814 mutex_unlock(&ch->lock);
815 return retval;
816 }
817
818 case CHIOSVOLTAG:
819 {
820 struct changer_set_voltag csv;
821 int elem;
822
823 if (copy_from_user(&csv, argp, sizeof(csv)))
824 return -EFAULT;
825
826 if (0 != ch_checkrange(ch, csv.csv_type, csv.csv_unit)) {
827 dprintk("CHIOSVOLTAG: invalid parameter\n");
828 return -EBADSLT;
829 }
830 elem = ch->firsts[csv.csv_type] + csv.csv_unit;
831 mutex_lock(&ch->lock);
832 retval = ch_set_voltag(ch, elem,
833 csv.csv_flags & CSV_AVOLTAG,
834 csv.csv_flags & CSV_CLEARTAG,
835 csv.csv_voltag);
836 mutex_unlock(&ch->lock);
837 return retval;
838 }
839
840 default:
841 return scsi_ioctl(ch->device, cmd, argp);
842
843 }
844 }
845
846 #ifdef CONFIG_COMPAT
847
848 struct changer_element_status32 {
849 int ces_type;
850 compat_uptr_t ces_data;
851 };
852 #define CHIOGSTATUS32 _IOW('c', 8,struct changer_element_status32)
853
854 static long ch_ioctl_compat(struct file * file,
855 unsigned int cmd, unsigned long arg)
856 {
857 scsi_changer *ch = file->private_data;
858
859 switch (cmd) {
860 case CHIOGPARAMS:
861 case CHIOGVPARAMS:
862 case CHIOPOSITION:
863 case CHIOMOVE:
864 case CHIOEXCHANGE:
865 case CHIOGELEM:
866 case CHIOINITELEM:
867 case CHIOSVOLTAG:
868 /* compatible */
869 return ch_ioctl(file, cmd, arg);
870 case CHIOGSTATUS32:
871 {
872 struct changer_element_status32 ces32;
873 unsigned char __user *data;
874
875 if (copy_from_user(&ces32, (void __user *)arg, sizeof (ces32)))
876 return -EFAULT;
877 if (ces32.ces_type < 0 || ces32.ces_type >= CH_TYPES)
878 return -EINVAL;
879
880 data = compat_ptr(ces32.ces_data);
881 return ch_gstatus(ch, ces32.ces_type, data);
882 }
883 default:
884 // return scsi_ioctl_compat(ch->device, cmd, (void*)arg);
885 return -ENOIOCTLCMD;
886
887 }
888 }
889 #endif
890
891 /* ------------------------------------------------------------------------ */
892
893 static int ch_probe(struct device *dev)
894 {
895 struct scsi_device *sd = to_scsi_device(dev);
896 struct device *class_dev;
897 int minor, ret = -ENOMEM;
898 scsi_changer *ch;
899
900 if (sd->type != TYPE_MEDIUM_CHANGER)
901 return -ENODEV;
902
903 ch = kzalloc(sizeof(*ch), GFP_KERNEL);
904 if (NULL == ch)
905 return -ENOMEM;
906
907 if (!idr_pre_get(&ch_index_idr, GFP_KERNEL))
908 goto free_ch;
909
910 spin_lock(&ch_index_lock);
911 ret = idr_get_new(&ch_index_idr, ch, &minor);
912 spin_unlock(&ch_index_lock);
913
914 if (ret)
915 goto free_ch;
916
917 if (minor > CH_MAX_DEVS) {
918 ret = -ENODEV;
919 goto remove_idr;
920 }
921
922 ch->minor = minor;
923 sprintf(ch->name,"ch%d",ch->minor);
924
925 class_dev = device_create(ch_sysfs_class, dev,
926 MKDEV(SCSI_CHANGER_MAJOR, ch->minor), ch,
927 "s%s", ch->name);
928 if (IS_ERR(class_dev)) {
929 printk(KERN_WARNING "ch%d: device_create failed\n",
930 ch->minor);
931 ret = PTR_ERR(class_dev);
932 goto remove_idr;
933 }
934
935 mutex_init(&ch->lock);
936 ch->device = sd;
937 ch_readconfig(ch);
938 if (init)
939 ch_init_elem(ch);
940
941 dev_set_drvdata(dev, ch);
942 sdev_printk(KERN_INFO, sd, "Attached scsi changer %s\n", ch->name);
943
944 return 0;
945 remove_idr:
946 idr_remove(&ch_index_idr, minor);
947 free_ch:
948 kfree(ch);
949 return ret;
950 }
951
952 static int ch_remove(struct device *dev)
953 {
954 scsi_changer *ch = dev_get_drvdata(dev);
955
956 spin_lock(&ch_index_lock);
957 idr_remove(&ch_index_idr, ch->minor);
958 spin_unlock(&ch_index_lock);
959
960 device_destroy(ch_sysfs_class, MKDEV(SCSI_CHANGER_MAJOR,ch->minor));
961 kfree(ch->dt);
962 kfree(ch);
963 return 0;
964 }
965
966 static struct scsi_driver ch_template = {
967 .owner = THIS_MODULE,
968 .gendrv = {
969 .name = "ch",
970 .probe = ch_probe,
971 .remove = ch_remove,
972 },
973 };
974
975 static const struct file_operations changer_fops = {
976 .owner = THIS_MODULE,
977 .open = ch_open,
978 .release = ch_release,
979 .unlocked_ioctl = ch_ioctl,
980 #ifdef CONFIG_COMPAT
981 .compat_ioctl = ch_ioctl_compat,
982 #endif
983 };
984
985 static int __init init_ch_module(void)
986 {
987 int rc;
988
989 printk(KERN_INFO "SCSI Media Changer driver v" VERSION " \n");
990 ch_sysfs_class = class_create(THIS_MODULE, "scsi_changer");
991 if (IS_ERR(ch_sysfs_class)) {
992 rc = PTR_ERR(ch_sysfs_class);
993 return rc;
994 }
995 rc = register_chrdev(SCSI_CHANGER_MAJOR,"ch",&changer_fops);
996 if (rc < 0) {
997 printk("Unable to get major %d for SCSI-Changer\n",
998 SCSI_CHANGER_MAJOR);
999 goto fail1;
1000 }
1001 rc = scsi_register_driver(&ch_template.gendrv);
1002 if (rc < 0)
1003 goto fail2;
1004 return 0;
1005
1006 fail2:
1007 unregister_chrdev(SCSI_CHANGER_MAJOR, "ch");
1008 fail1:
1009 class_destroy(ch_sysfs_class);
1010 return rc;
1011 }
1012
1013 static void __exit exit_ch_module(void)
1014 {
1015 scsi_unregister_driver(&ch_template.gendrv);
1016 unregister_chrdev(SCSI_CHANGER_MAJOR, "ch");
1017 class_destroy(ch_sysfs_class);
1018 idr_destroy(&ch_index_idr);
1019 }
1020
1021 module_init(init_ch_module);
1022 module_exit(exit_ch_module);
1023
1024 /*
1025 * Local variables:
1026 * c-basic-offset: 8
1027 * End:
1028 */