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, ¶ms, 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 */ 1029