1 /* 2 * File...........: linux/drivers/s390/block/dasd_eckd.c 3 * Author(s)......: Holger Smolinski <Holger.Smolinski@de.ibm.com> 4 * Horst Hummel <Horst.Hummel@de.ibm.com> 5 * Carsten Otte <Cotte@de.ibm.com> 6 * Martin Schwidefsky <schwidefsky@de.ibm.com> 7 * Bugreports.to..: <Linux390@de.ibm.com> 8 * Copyright IBM Corp. 1999, 2009 9 * EMC Symmetrix ioctl Copyright EMC Corporation, 2008 10 * Author.........: Nigel Hislop <hislop_nigel@emc.com> 11 */ 12 13 #define KMSG_COMPONENT "dasd-eckd" 14 15 #include <linux/stddef.h> 16 #include <linux/kernel.h> 17 #include <linux/slab.h> 18 #include <linux/hdreg.h> /* HDIO_GETGEO */ 19 #include <linux/bio.h> 20 #include <linux/module.h> 21 #include <linux/init.h> 22 23 #include <asm/debug.h> 24 #include <asm/idals.h> 25 #include <asm/ebcdic.h> 26 #include <asm/io.h> 27 #include <asm/uaccess.h> 28 #include <asm/cio.h> 29 #include <asm/ccwdev.h> 30 #include <asm/itcw.h> 31 32 #include "dasd_int.h" 33 #include "dasd_eckd.h" 34 #include "../cio/chsc.h" 35 36 37 #ifdef PRINTK_HEADER 38 #undef PRINTK_HEADER 39 #endif /* PRINTK_HEADER */ 40 #define PRINTK_HEADER "dasd(eckd):" 41 42 #define ECKD_C0(i) (i->home_bytes) 43 #define ECKD_F(i) (i->formula) 44 #define ECKD_F1(i) (ECKD_F(i)==0x01?(i->factors.f_0x01.f1):\ 45 (i->factors.f_0x02.f1)) 46 #define ECKD_F2(i) (ECKD_F(i)==0x01?(i->factors.f_0x01.f2):\ 47 (i->factors.f_0x02.f2)) 48 #define ECKD_F3(i) (ECKD_F(i)==0x01?(i->factors.f_0x01.f3):\ 49 (i->factors.f_0x02.f3)) 50 #define ECKD_F4(i) (ECKD_F(i)==0x02?(i->factors.f_0x02.f4):0) 51 #define ECKD_F5(i) (ECKD_F(i)==0x02?(i->factors.f_0x02.f5):0) 52 #define ECKD_F6(i) (i->factor6) 53 #define ECKD_F7(i) (i->factor7) 54 #define ECKD_F8(i) (i->factor8) 55 56 MODULE_LICENSE("GPL"); 57 58 static struct dasd_discipline dasd_eckd_discipline; 59 60 /* The ccw bus type uses this table to find devices that it sends to 61 * dasd_eckd_probe */ 62 static struct ccw_device_id dasd_eckd_ids[] = { 63 { CCW_DEVICE_DEVTYPE (0x3990, 0, 0x3390, 0), .driver_info = 0x1}, 64 { CCW_DEVICE_DEVTYPE (0x2105, 0, 0x3390, 0), .driver_info = 0x2}, 65 { CCW_DEVICE_DEVTYPE (0x3880, 0, 0x3390, 0), .driver_info = 0x3}, 66 { CCW_DEVICE_DEVTYPE (0x3990, 0, 0x3380, 0), .driver_info = 0x4}, 67 { CCW_DEVICE_DEVTYPE (0x2105, 0, 0x3380, 0), .driver_info = 0x5}, 68 { CCW_DEVICE_DEVTYPE (0x9343, 0, 0x9345, 0), .driver_info = 0x6}, 69 { CCW_DEVICE_DEVTYPE (0x2107, 0, 0x3390, 0), .driver_info = 0x7}, 70 { CCW_DEVICE_DEVTYPE (0x2107, 0, 0x3380, 0), .driver_info = 0x8}, 71 { CCW_DEVICE_DEVTYPE (0x1750, 0, 0x3390, 0), .driver_info = 0x9}, 72 { CCW_DEVICE_DEVTYPE (0x1750, 0, 0x3380, 0), .driver_info = 0xa}, 73 { /* end of list */ }, 74 }; 75 76 MODULE_DEVICE_TABLE(ccw, dasd_eckd_ids); 77 78 static struct ccw_driver dasd_eckd_driver; /* see below */ 79 80 #define INIT_CQR_OK 0 81 #define INIT_CQR_UNFORMATTED 1 82 #define INIT_CQR_ERROR 2 83 84 85 /* initial attempt at a probe function. this can be simplified once 86 * the other detection code is gone */ 87 static int 88 dasd_eckd_probe (struct ccw_device *cdev) 89 { 90 int ret; 91 92 /* set ECKD specific ccw-device options */ 93 ret = ccw_device_set_options(cdev, CCWDEV_ALLOW_FORCE | 94 CCWDEV_DO_PATHGROUP | CCWDEV_DO_MULTIPATH); 95 if (ret) { 96 DBF_EVENT_DEVID(DBF_WARNING, cdev, "%s", 97 "dasd_eckd_probe: could not set " 98 "ccw-device options"); 99 return ret; 100 } 101 ret = dasd_generic_probe(cdev, &dasd_eckd_discipline); 102 return ret; 103 } 104 105 static int 106 dasd_eckd_set_online(struct ccw_device *cdev) 107 { 108 return dasd_generic_set_online(cdev, &dasd_eckd_discipline); 109 } 110 111 static const int sizes_trk0[] = { 28, 148, 84 }; 112 #define LABEL_SIZE 140 113 114 static inline unsigned int 115 round_up_multiple(unsigned int no, unsigned int mult) 116 { 117 int rem = no % mult; 118 return (rem ? no - rem + mult : no); 119 } 120 121 static inline unsigned int 122 ceil_quot(unsigned int d1, unsigned int d2) 123 { 124 return (d1 + (d2 - 1)) / d2; 125 } 126 127 static unsigned int 128 recs_per_track(struct dasd_eckd_characteristics * rdc, 129 unsigned int kl, unsigned int dl) 130 { 131 int dn, kn; 132 133 switch (rdc->dev_type) { 134 case 0x3380: 135 if (kl) 136 return 1499 / (15 + 7 + ceil_quot(kl + 12, 32) + 137 ceil_quot(dl + 12, 32)); 138 else 139 return 1499 / (15 + ceil_quot(dl + 12, 32)); 140 case 0x3390: 141 dn = ceil_quot(dl + 6, 232) + 1; 142 if (kl) { 143 kn = ceil_quot(kl + 6, 232) + 1; 144 return 1729 / (10 + 9 + ceil_quot(kl + 6 * kn, 34) + 145 9 + ceil_quot(dl + 6 * dn, 34)); 146 } else 147 return 1729 / (10 + 9 + ceil_quot(dl + 6 * dn, 34)); 148 case 0x9345: 149 dn = ceil_quot(dl + 6, 232) + 1; 150 if (kl) { 151 kn = ceil_quot(kl + 6, 232) + 1; 152 return 1420 / (18 + 7 + ceil_quot(kl + 6 * kn, 34) + 153 ceil_quot(dl + 6 * dn, 34)); 154 } else 155 return 1420 / (18 + 7 + ceil_quot(dl + 6 * dn, 34)); 156 } 157 return 0; 158 } 159 160 static void set_ch_t(struct ch_t *geo, __u32 cyl, __u8 head) 161 { 162 geo->cyl = (__u16) cyl; 163 geo->head = cyl >> 16; 164 geo->head <<= 4; 165 geo->head |= head; 166 } 167 168 static int 169 check_XRC (struct ccw1 *de_ccw, 170 struct DE_eckd_data *data, 171 struct dasd_device *device) 172 { 173 struct dasd_eckd_private *private; 174 int rc; 175 176 private = (struct dasd_eckd_private *) device->private; 177 if (!private->rdc_data.facilities.XRC_supported) 178 return 0; 179 180 /* switch on System Time Stamp - needed for XRC Support */ 181 data->ga_extended |= 0x08; /* switch on 'Time Stamp Valid' */ 182 data->ga_extended |= 0x02; /* switch on 'Extended Parameter' */ 183 184 rc = get_sync_clock(&data->ep_sys_time); 185 /* Ignore return code if sync clock is switched off. */ 186 if (rc == -ENOSYS || rc == -EACCES) 187 rc = 0; 188 189 de_ccw->count = sizeof(struct DE_eckd_data); 190 de_ccw->flags |= CCW_FLAG_SLI; 191 return rc; 192 } 193 194 static int 195 define_extent(struct ccw1 *ccw, struct DE_eckd_data *data, unsigned int trk, 196 unsigned int totrk, int cmd, struct dasd_device *device) 197 { 198 struct dasd_eckd_private *private; 199 u32 begcyl, endcyl; 200 u16 heads, beghead, endhead; 201 int rc = 0; 202 203 private = (struct dasd_eckd_private *) device->private; 204 205 ccw->cmd_code = DASD_ECKD_CCW_DEFINE_EXTENT; 206 ccw->flags = 0; 207 ccw->count = 16; 208 ccw->cda = (__u32) __pa(data); 209 210 memset(data, 0, sizeof(struct DE_eckd_data)); 211 switch (cmd) { 212 case DASD_ECKD_CCW_READ_HOME_ADDRESS: 213 case DASD_ECKD_CCW_READ_RECORD_ZERO: 214 case DASD_ECKD_CCW_READ: 215 case DASD_ECKD_CCW_READ_MT: 216 case DASD_ECKD_CCW_READ_CKD: 217 case DASD_ECKD_CCW_READ_CKD_MT: 218 case DASD_ECKD_CCW_READ_KD: 219 case DASD_ECKD_CCW_READ_KD_MT: 220 case DASD_ECKD_CCW_READ_COUNT: 221 data->mask.perm = 0x1; 222 data->attributes.operation = private->attrib.operation; 223 break; 224 case DASD_ECKD_CCW_WRITE: 225 case DASD_ECKD_CCW_WRITE_MT: 226 case DASD_ECKD_CCW_WRITE_KD: 227 case DASD_ECKD_CCW_WRITE_KD_MT: 228 data->mask.perm = 0x02; 229 data->attributes.operation = private->attrib.operation; 230 rc = check_XRC (ccw, data, device); 231 break; 232 case DASD_ECKD_CCW_WRITE_CKD: 233 case DASD_ECKD_CCW_WRITE_CKD_MT: 234 data->attributes.operation = DASD_BYPASS_CACHE; 235 rc = check_XRC (ccw, data, device); 236 break; 237 case DASD_ECKD_CCW_ERASE: 238 case DASD_ECKD_CCW_WRITE_HOME_ADDRESS: 239 case DASD_ECKD_CCW_WRITE_RECORD_ZERO: 240 data->mask.perm = 0x3; 241 data->mask.auth = 0x1; 242 data->attributes.operation = DASD_BYPASS_CACHE; 243 rc = check_XRC (ccw, data, device); 244 break; 245 default: 246 dev_err(&device->cdev->dev, 247 "0x%x is not a known command\n", cmd); 248 break; 249 } 250 251 data->attributes.mode = 0x3; /* ECKD */ 252 253 if ((private->rdc_data.cu_type == 0x2105 || 254 private->rdc_data.cu_type == 0x2107 || 255 private->rdc_data.cu_type == 0x1750) 256 && !(private->uses_cdl && trk < 2)) 257 data->ga_extended |= 0x40; /* Regular Data Format Mode */ 258 259 heads = private->rdc_data.trk_per_cyl; 260 begcyl = trk / heads; 261 beghead = trk % heads; 262 endcyl = totrk / heads; 263 endhead = totrk % heads; 264 265 /* check for sequential prestage - enhance cylinder range */ 266 if (data->attributes.operation == DASD_SEQ_PRESTAGE || 267 data->attributes.operation == DASD_SEQ_ACCESS) { 268 269 if (endcyl + private->attrib.nr_cyl < private->real_cyl) 270 endcyl += private->attrib.nr_cyl; 271 else 272 endcyl = (private->real_cyl - 1); 273 } 274 275 set_ch_t(&data->beg_ext, begcyl, beghead); 276 set_ch_t(&data->end_ext, endcyl, endhead); 277 return rc; 278 } 279 280 static int check_XRC_on_prefix(struct PFX_eckd_data *pfxdata, 281 struct dasd_device *device) 282 { 283 struct dasd_eckd_private *private; 284 int rc; 285 286 private = (struct dasd_eckd_private *) device->private; 287 if (!private->rdc_data.facilities.XRC_supported) 288 return 0; 289 290 /* switch on System Time Stamp - needed for XRC Support */ 291 pfxdata->define_extent.ga_extended |= 0x08; /* 'Time Stamp Valid' */ 292 pfxdata->define_extent.ga_extended |= 0x02; /* 'Extended Parameter' */ 293 pfxdata->validity.time_stamp = 1; /* 'Time Stamp Valid' */ 294 295 rc = get_sync_clock(&pfxdata->define_extent.ep_sys_time); 296 /* Ignore return code if sync clock is switched off. */ 297 if (rc == -ENOSYS || rc == -EACCES) 298 rc = 0; 299 return rc; 300 } 301 302 static void fill_LRE_data(struct LRE_eckd_data *data, unsigned int trk, 303 unsigned int rec_on_trk, int count, int cmd, 304 struct dasd_device *device, unsigned int reclen, 305 unsigned int tlf) 306 { 307 struct dasd_eckd_private *private; 308 int sector; 309 int dn, d; 310 311 private = (struct dasd_eckd_private *) device->private; 312 313 memset(data, 0, sizeof(*data)); 314 sector = 0; 315 if (rec_on_trk) { 316 switch (private->rdc_data.dev_type) { 317 case 0x3390: 318 dn = ceil_quot(reclen + 6, 232); 319 d = 9 + ceil_quot(reclen + 6 * (dn + 1), 34); 320 sector = (49 + (rec_on_trk - 1) * (10 + d)) / 8; 321 break; 322 case 0x3380: 323 d = 7 + ceil_quot(reclen + 12, 32); 324 sector = (39 + (rec_on_trk - 1) * (8 + d)) / 7; 325 break; 326 } 327 } 328 data->sector = sector; 329 /* note: meaning of count depends on the operation 330 * for record based I/O it's the number of records, but for 331 * track based I/O it's the number of tracks 332 */ 333 data->count = count; 334 switch (cmd) { 335 case DASD_ECKD_CCW_WRITE_HOME_ADDRESS: 336 data->operation.orientation = 0x3; 337 data->operation.operation = 0x03; 338 break; 339 case DASD_ECKD_CCW_READ_HOME_ADDRESS: 340 data->operation.orientation = 0x3; 341 data->operation.operation = 0x16; 342 break; 343 case DASD_ECKD_CCW_WRITE_RECORD_ZERO: 344 data->operation.orientation = 0x1; 345 data->operation.operation = 0x03; 346 data->count++; 347 break; 348 case DASD_ECKD_CCW_READ_RECORD_ZERO: 349 data->operation.orientation = 0x3; 350 data->operation.operation = 0x16; 351 data->count++; 352 break; 353 case DASD_ECKD_CCW_WRITE: 354 case DASD_ECKD_CCW_WRITE_MT: 355 case DASD_ECKD_CCW_WRITE_KD: 356 case DASD_ECKD_CCW_WRITE_KD_MT: 357 data->auxiliary.length_valid = 0x1; 358 data->length = reclen; 359 data->operation.operation = 0x01; 360 break; 361 case DASD_ECKD_CCW_WRITE_CKD: 362 case DASD_ECKD_CCW_WRITE_CKD_MT: 363 data->auxiliary.length_valid = 0x1; 364 data->length = reclen; 365 data->operation.operation = 0x03; 366 break; 367 case DASD_ECKD_CCW_WRITE_TRACK_DATA: 368 data->auxiliary.length_valid = 0x1; 369 data->length = reclen; /* not tlf, as one might think */ 370 data->operation.operation = 0x3F; 371 data->extended_operation = 0x23; 372 break; 373 case DASD_ECKD_CCW_READ: 374 case DASD_ECKD_CCW_READ_MT: 375 case DASD_ECKD_CCW_READ_KD: 376 case DASD_ECKD_CCW_READ_KD_MT: 377 data->auxiliary.length_valid = 0x1; 378 data->length = reclen; 379 data->operation.operation = 0x06; 380 break; 381 case DASD_ECKD_CCW_READ_CKD: 382 case DASD_ECKD_CCW_READ_CKD_MT: 383 data->auxiliary.length_valid = 0x1; 384 data->length = reclen; 385 data->operation.operation = 0x16; 386 break; 387 case DASD_ECKD_CCW_READ_COUNT: 388 data->operation.operation = 0x06; 389 break; 390 case DASD_ECKD_CCW_READ_TRACK_DATA: 391 data->auxiliary.length_valid = 0x1; 392 data->length = tlf; 393 data->operation.operation = 0x0C; 394 break; 395 case DASD_ECKD_CCW_ERASE: 396 data->length = reclen; 397 data->auxiliary.length_valid = 0x1; 398 data->operation.operation = 0x0b; 399 break; 400 default: 401 DBF_DEV_EVENT(DBF_ERR, device, 402 "fill LRE unknown opcode 0x%x", cmd); 403 BUG(); 404 } 405 set_ch_t(&data->seek_addr, 406 trk / private->rdc_data.trk_per_cyl, 407 trk % private->rdc_data.trk_per_cyl); 408 data->search_arg.cyl = data->seek_addr.cyl; 409 data->search_arg.head = data->seek_addr.head; 410 data->search_arg.record = rec_on_trk; 411 } 412 413 static int prefix_LRE(struct ccw1 *ccw, struct PFX_eckd_data *pfxdata, 414 unsigned int trk, unsigned int totrk, int cmd, 415 struct dasd_device *basedev, struct dasd_device *startdev, 416 unsigned char format, unsigned int rec_on_trk, int count, 417 unsigned int blksize, unsigned int tlf) 418 { 419 struct dasd_eckd_private *basepriv, *startpriv; 420 struct DE_eckd_data *dedata; 421 struct LRE_eckd_data *lredata; 422 u32 begcyl, endcyl; 423 u16 heads, beghead, endhead; 424 int rc = 0; 425 426 basepriv = (struct dasd_eckd_private *) basedev->private; 427 startpriv = (struct dasd_eckd_private *) startdev->private; 428 dedata = &pfxdata->define_extent; 429 lredata = &pfxdata->locate_record; 430 431 ccw->cmd_code = DASD_ECKD_CCW_PFX; 432 ccw->flags = 0; 433 ccw->count = sizeof(*pfxdata); 434 ccw->cda = (__u32) __pa(pfxdata); 435 436 memset(pfxdata, 0, sizeof(*pfxdata)); 437 /* prefix data */ 438 if (format > 1) { 439 DBF_DEV_EVENT(DBF_ERR, basedev, 440 "PFX LRE unknown format 0x%x", format); 441 BUG(); 442 return -EINVAL; 443 } 444 pfxdata->format = format; 445 pfxdata->base_address = basepriv->ned->unit_addr; 446 pfxdata->base_lss = basepriv->ned->ID; 447 pfxdata->validity.define_extent = 1; 448 449 /* private uid is kept up to date, conf_data may be outdated */ 450 if (startpriv->uid.type != UA_BASE_DEVICE) { 451 pfxdata->validity.verify_base = 1; 452 if (startpriv->uid.type == UA_HYPER_PAV_ALIAS) 453 pfxdata->validity.hyper_pav = 1; 454 } 455 456 /* define extend data (mostly)*/ 457 switch (cmd) { 458 case DASD_ECKD_CCW_READ_HOME_ADDRESS: 459 case DASD_ECKD_CCW_READ_RECORD_ZERO: 460 case DASD_ECKD_CCW_READ: 461 case DASD_ECKD_CCW_READ_MT: 462 case DASD_ECKD_CCW_READ_CKD: 463 case DASD_ECKD_CCW_READ_CKD_MT: 464 case DASD_ECKD_CCW_READ_KD: 465 case DASD_ECKD_CCW_READ_KD_MT: 466 case DASD_ECKD_CCW_READ_COUNT: 467 dedata->mask.perm = 0x1; 468 dedata->attributes.operation = basepriv->attrib.operation; 469 break; 470 case DASD_ECKD_CCW_READ_TRACK_DATA: 471 dedata->mask.perm = 0x1; 472 dedata->attributes.operation = basepriv->attrib.operation; 473 dedata->blk_size = 0; 474 break; 475 case DASD_ECKD_CCW_WRITE: 476 case DASD_ECKD_CCW_WRITE_MT: 477 case DASD_ECKD_CCW_WRITE_KD: 478 case DASD_ECKD_CCW_WRITE_KD_MT: 479 dedata->mask.perm = 0x02; 480 dedata->attributes.operation = basepriv->attrib.operation; 481 rc = check_XRC_on_prefix(pfxdata, basedev); 482 break; 483 case DASD_ECKD_CCW_WRITE_CKD: 484 case DASD_ECKD_CCW_WRITE_CKD_MT: 485 dedata->attributes.operation = DASD_BYPASS_CACHE; 486 rc = check_XRC_on_prefix(pfxdata, basedev); 487 break; 488 case DASD_ECKD_CCW_ERASE: 489 case DASD_ECKD_CCW_WRITE_HOME_ADDRESS: 490 case DASD_ECKD_CCW_WRITE_RECORD_ZERO: 491 dedata->mask.perm = 0x3; 492 dedata->mask.auth = 0x1; 493 dedata->attributes.operation = DASD_BYPASS_CACHE; 494 rc = check_XRC_on_prefix(pfxdata, basedev); 495 break; 496 case DASD_ECKD_CCW_WRITE_TRACK_DATA: 497 dedata->mask.perm = 0x02; 498 dedata->attributes.operation = basepriv->attrib.operation; 499 dedata->blk_size = blksize; 500 rc = check_XRC_on_prefix(pfxdata, basedev); 501 break; 502 default: 503 DBF_DEV_EVENT(DBF_ERR, basedev, 504 "PFX LRE unknown opcode 0x%x", cmd); 505 BUG(); 506 return -EINVAL; 507 } 508 509 dedata->attributes.mode = 0x3; /* ECKD */ 510 511 if ((basepriv->rdc_data.cu_type == 0x2105 || 512 basepriv->rdc_data.cu_type == 0x2107 || 513 basepriv->rdc_data.cu_type == 0x1750) 514 && !(basepriv->uses_cdl && trk < 2)) 515 dedata->ga_extended |= 0x40; /* Regular Data Format Mode */ 516 517 heads = basepriv->rdc_data.trk_per_cyl; 518 begcyl = trk / heads; 519 beghead = trk % heads; 520 endcyl = totrk / heads; 521 endhead = totrk % heads; 522 523 /* check for sequential prestage - enhance cylinder range */ 524 if (dedata->attributes.operation == DASD_SEQ_PRESTAGE || 525 dedata->attributes.operation == DASD_SEQ_ACCESS) { 526 527 if (endcyl + basepriv->attrib.nr_cyl < basepriv->real_cyl) 528 endcyl += basepriv->attrib.nr_cyl; 529 else 530 endcyl = (basepriv->real_cyl - 1); 531 } 532 533 set_ch_t(&dedata->beg_ext, begcyl, beghead); 534 set_ch_t(&dedata->end_ext, endcyl, endhead); 535 536 if (format == 1) { 537 fill_LRE_data(lredata, trk, rec_on_trk, count, cmd, 538 basedev, blksize, tlf); 539 } 540 541 return rc; 542 } 543 544 static int prefix(struct ccw1 *ccw, struct PFX_eckd_data *pfxdata, 545 unsigned int trk, unsigned int totrk, int cmd, 546 struct dasd_device *basedev, struct dasd_device *startdev) 547 { 548 return prefix_LRE(ccw, pfxdata, trk, totrk, cmd, basedev, startdev, 549 0, 0, 0, 0, 0); 550 } 551 552 static void 553 locate_record(struct ccw1 *ccw, struct LO_eckd_data *data, unsigned int trk, 554 unsigned int rec_on_trk, int no_rec, int cmd, 555 struct dasd_device * device, int reclen) 556 { 557 struct dasd_eckd_private *private; 558 int sector; 559 int dn, d; 560 561 private = (struct dasd_eckd_private *) device->private; 562 563 DBF_DEV_EVENT(DBF_INFO, device, 564 "Locate: trk %d, rec %d, no_rec %d, cmd %d, reclen %d", 565 trk, rec_on_trk, no_rec, cmd, reclen); 566 567 ccw->cmd_code = DASD_ECKD_CCW_LOCATE_RECORD; 568 ccw->flags = 0; 569 ccw->count = 16; 570 ccw->cda = (__u32) __pa(data); 571 572 memset(data, 0, sizeof(struct LO_eckd_data)); 573 sector = 0; 574 if (rec_on_trk) { 575 switch (private->rdc_data.dev_type) { 576 case 0x3390: 577 dn = ceil_quot(reclen + 6, 232); 578 d = 9 + ceil_quot(reclen + 6 * (dn + 1), 34); 579 sector = (49 + (rec_on_trk - 1) * (10 + d)) / 8; 580 break; 581 case 0x3380: 582 d = 7 + ceil_quot(reclen + 12, 32); 583 sector = (39 + (rec_on_trk - 1) * (8 + d)) / 7; 584 break; 585 } 586 } 587 data->sector = sector; 588 data->count = no_rec; 589 switch (cmd) { 590 case DASD_ECKD_CCW_WRITE_HOME_ADDRESS: 591 data->operation.orientation = 0x3; 592 data->operation.operation = 0x03; 593 break; 594 case DASD_ECKD_CCW_READ_HOME_ADDRESS: 595 data->operation.orientation = 0x3; 596 data->operation.operation = 0x16; 597 break; 598 case DASD_ECKD_CCW_WRITE_RECORD_ZERO: 599 data->operation.orientation = 0x1; 600 data->operation.operation = 0x03; 601 data->count++; 602 break; 603 case DASD_ECKD_CCW_READ_RECORD_ZERO: 604 data->operation.orientation = 0x3; 605 data->operation.operation = 0x16; 606 data->count++; 607 break; 608 case DASD_ECKD_CCW_WRITE: 609 case DASD_ECKD_CCW_WRITE_MT: 610 case DASD_ECKD_CCW_WRITE_KD: 611 case DASD_ECKD_CCW_WRITE_KD_MT: 612 data->auxiliary.last_bytes_used = 0x1; 613 data->length = reclen; 614 data->operation.operation = 0x01; 615 break; 616 case DASD_ECKD_CCW_WRITE_CKD: 617 case DASD_ECKD_CCW_WRITE_CKD_MT: 618 data->auxiliary.last_bytes_used = 0x1; 619 data->length = reclen; 620 data->operation.operation = 0x03; 621 break; 622 case DASD_ECKD_CCW_READ: 623 case DASD_ECKD_CCW_READ_MT: 624 case DASD_ECKD_CCW_READ_KD: 625 case DASD_ECKD_CCW_READ_KD_MT: 626 data->auxiliary.last_bytes_used = 0x1; 627 data->length = reclen; 628 data->operation.operation = 0x06; 629 break; 630 case DASD_ECKD_CCW_READ_CKD: 631 case DASD_ECKD_CCW_READ_CKD_MT: 632 data->auxiliary.last_bytes_used = 0x1; 633 data->length = reclen; 634 data->operation.operation = 0x16; 635 break; 636 case DASD_ECKD_CCW_READ_COUNT: 637 data->operation.operation = 0x06; 638 break; 639 case DASD_ECKD_CCW_ERASE: 640 data->length = reclen; 641 data->auxiliary.last_bytes_used = 0x1; 642 data->operation.operation = 0x0b; 643 break; 644 default: 645 DBF_DEV_EVENT(DBF_ERR, device, "unknown locate record " 646 "opcode 0x%x", cmd); 647 } 648 set_ch_t(&data->seek_addr, 649 trk / private->rdc_data.trk_per_cyl, 650 trk % private->rdc_data.trk_per_cyl); 651 data->search_arg.cyl = data->seek_addr.cyl; 652 data->search_arg.head = data->seek_addr.head; 653 data->search_arg.record = rec_on_trk; 654 } 655 656 /* 657 * Returns 1 if the block is one of the special blocks that needs 658 * to get read/written with the KD variant of the command. 659 * That is DASD_ECKD_READ_KD_MT instead of DASD_ECKD_READ_MT and 660 * DASD_ECKD_WRITE_KD_MT instead of DASD_ECKD_WRITE_MT. 661 * Luckily the KD variants differ only by one bit (0x08) from the 662 * normal variant. So don't wonder about code like: 663 * if (dasd_eckd_cdl_special(blk_per_trk, recid)) 664 * ccw->cmd_code |= 0x8; 665 */ 666 static inline int 667 dasd_eckd_cdl_special(int blk_per_trk, int recid) 668 { 669 if (recid < 3) 670 return 1; 671 if (recid < blk_per_trk) 672 return 0; 673 if (recid < 2 * blk_per_trk) 674 return 1; 675 return 0; 676 } 677 678 /* 679 * Returns the record size for the special blocks of the cdl format. 680 * Only returns something useful if dasd_eckd_cdl_special is true 681 * for the recid. 682 */ 683 static inline int 684 dasd_eckd_cdl_reclen(int recid) 685 { 686 if (recid < 3) 687 return sizes_trk0[recid]; 688 return LABEL_SIZE; 689 } 690 691 /* 692 * Generate device unique id that specifies the physical device. 693 */ 694 static int dasd_eckd_generate_uid(struct dasd_device *device, 695 struct dasd_uid *uid) 696 { 697 struct dasd_eckd_private *private; 698 int count; 699 700 private = (struct dasd_eckd_private *) device->private; 701 if (!private) 702 return -ENODEV; 703 if (!private->ned || !private->gneq) 704 return -ENODEV; 705 706 memset(uid, 0, sizeof(struct dasd_uid)); 707 memcpy(uid->vendor, private->ned->HDA_manufacturer, 708 sizeof(uid->vendor) - 1); 709 EBCASC(uid->vendor, sizeof(uid->vendor) - 1); 710 memcpy(uid->serial, private->ned->HDA_location, 711 sizeof(uid->serial) - 1); 712 EBCASC(uid->serial, sizeof(uid->serial) - 1); 713 uid->ssid = private->gneq->subsystemID; 714 uid->real_unit_addr = private->ned->unit_addr; 715 if (private->sneq) { 716 uid->type = private->sneq->sua_flags; 717 if (uid->type == UA_BASE_PAV_ALIAS) 718 uid->base_unit_addr = private->sneq->base_unit_addr; 719 } else { 720 uid->type = UA_BASE_DEVICE; 721 } 722 if (private->vdsneq) { 723 for (count = 0; count < 16; count++) { 724 sprintf(uid->vduit+2*count, "%02x", 725 private->vdsneq->uit[count]); 726 } 727 } 728 return 0; 729 } 730 731 static struct dasd_ccw_req *dasd_eckd_build_rcd_lpm(struct dasd_device *device, 732 void *rcd_buffer, 733 struct ciw *ciw, __u8 lpm) 734 { 735 struct dasd_ccw_req *cqr; 736 struct ccw1 *ccw; 737 738 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 1 /* RCD */, ciw->count, 739 device); 740 741 if (IS_ERR(cqr)) { 742 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 743 "Could not allocate RCD request"); 744 return cqr; 745 } 746 747 ccw = cqr->cpaddr; 748 ccw->cmd_code = ciw->cmd; 749 ccw->cda = (__u32)(addr_t)rcd_buffer; 750 ccw->count = ciw->count; 751 752 cqr->startdev = device; 753 cqr->memdev = device; 754 cqr->block = NULL; 755 cqr->expires = 10*HZ; 756 cqr->lpm = lpm; 757 cqr->retries = 256; 758 cqr->buildclk = get_clock(); 759 cqr->status = DASD_CQR_FILLED; 760 return cqr; 761 } 762 763 static int dasd_eckd_read_conf_lpm(struct dasd_device *device, 764 void **rcd_buffer, 765 int *rcd_buffer_size, __u8 lpm) 766 { 767 struct ciw *ciw; 768 char *rcd_buf = NULL; 769 int ret; 770 struct dasd_ccw_req *cqr; 771 772 /* 773 * scan for RCD command in extended SenseID data 774 */ 775 ciw = ccw_device_get_ciw(device->cdev, CIW_TYPE_RCD); 776 if (!ciw || ciw->cmd == 0) { 777 ret = -EOPNOTSUPP; 778 goto out_error; 779 } 780 rcd_buf = kzalloc(ciw->count, GFP_KERNEL | GFP_DMA); 781 if (!rcd_buf) { 782 ret = -ENOMEM; 783 goto out_error; 784 } 785 786 /* 787 * buffer has to start with EBCDIC "V1.0" to show 788 * support for virtual device SNEQ 789 */ 790 rcd_buf[0] = 0xE5; 791 rcd_buf[1] = 0xF1; 792 rcd_buf[2] = 0x4B; 793 rcd_buf[3] = 0xF0; 794 cqr = dasd_eckd_build_rcd_lpm(device, rcd_buf, ciw, lpm); 795 if (IS_ERR(cqr)) { 796 ret = PTR_ERR(cqr); 797 goto out_error; 798 } 799 ret = dasd_sleep_on(cqr); 800 /* 801 * on success we update the user input parms 802 */ 803 dasd_sfree_request(cqr, cqr->memdev); 804 if (ret) 805 goto out_error; 806 807 *rcd_buffer_size = ciw->count; 808 *rcd_buffer = rcd_buf; 809 return 0; 810 out_error: 811 kfree(rcd_buf); 812 *rcd_buffer = NULL; 813 *rcd_buffer_size = 0; 814 return ret; 815 } 816 817 static int dasd_eckd_identify_conf_parts(struct dasd_eckd_private *private) 818 { 819 820 struct dasd_sneq *sneq; 821 int i, count; 822 823 private->ned = NULL; 824 private->sneq = NULL; 825 private->vdsneq = NULL; 826 private->gneq = NULL; 827 count = private->conf_len / sizeof(struct dasd_sneq); 828 sneq = (struct dasd_sneq *)private->conf_data; 829 for (i = 0; i < count; ++i) { 830 if (sneq->flags.identifier == 1 && sneq->format == 1) 831 private->sneq = sneq; 832 else if (sneq->flags.identifier == 1 && sneq->format == 4) 833 private->vdsneq = (struct vd_sneq *)sneq; 834 else if (sneq->flags.identifier == 2) 835 private->gneq = (struct dasd_gneq *)sneq; 836 else if (sneq->flags.identifier == 3 && sneq->res1 == 1) 837 private->ned = (struct dasd_ned *)sneq; 838 sneq++; 839 } 840 if (!private->ned || !private->gneq) { 841 private->ned = NULL; 842 private->sneq = NULL; 843 private->vdsneq = NULL; 844 private->gneq = NULL; 845 return -EINVAL; 846 } 847 return 0; 848 849 }; 850 851 static unsigned char dasd_eckd_path_access(void *conf_data, int conf_len) 852 { 853 struct dasd_gneq *gneq; 854 int i, count, found; 855 856 count = conf_len / sizeof(*gneq); 857 gneq = (struct dasd_gneq *)conf_data; 858 found = 0; 859 for (i = 0; i < count; ++i) { 860 if (gneq->flags.identifier == 2) { 861 found = 1; 862 break; 863 } 864 gneq++; 865 } 866 if (found) 867 return ((char *)gneq)[18] & 0x07; 868 else 869 return 0; 870 } 871 872 static int dasd_eckd_read_conf(struct dasd_device *device) 873 { 874 void *conf_data; 875 int conf_len, conf_data_saved; 876 int rc; 877 __u8 lpm; 878 struct dasd_eckd_private *private; 879 struct dasd_eckd_path *path_data; 880 881 private = (struct dasd_eckd_private *) device->private; 882 path_data = (struct dasd_eckd_path *) &private->path_data; 883 path_data->opm = ccw_device_get_path_mask(device->cdev); 884 lpm = 0x80; 885 conf_data_saved = 0; 886 /* get configuration data per operational path */ 887 for (lpm = 0x80; lpm; lpm>>= 1) { 888 if (lpm & path_data->opm){ 889 rc = dasd_eckd_read_conf_lpm(device, &conf_data, 890 &conf_len, lpm); 891 if (rc && rc != -EOPNOTSUPP) { /* -EOPNOTSUPP is ok */ 892 DBF_EVENT_DEVID(DBF_WARNING, device->cdev, 893 "Read configuration data returned " 894 "error %d", rc); 895 return rc; 896 } 897 if (conf_data == NULL) { 898 DBF_EVENT_DEVID(DBF_WARNING, device->cdev, "%s", 899 "No configuration data " 900 "retrieved"); 901 continue; /* no error */ 902 } 903 /* save first valid configuration data */ 904 if (!conf_data_saved) { 905 kfree(private->conf_data); 906 private->conf_data = conf_data; 907 private->conf_len = conf_len; 908 if (dasd_eckd_identify_conf_parts(private)) { 909 private->conf_data = NULL; 910 private->conf_len = 0; 911 kfree(conf_data); 912 continue; 913 } 914 conf_data_saved++; 915 } 916 switch (dasd_eckd_path_access(conf_data, conf_len)) { 917 case 0x02: 918 path_data->npm |= lpm; 919 break; 920 case 0x03: 921 path_data->ppm |= lpm; 922 break; 923 } 924 if (conf_data != private->conf_data) 925 kfree(conf_data); 926 } 927 } 928 return 0; 929 } 930 931 static int dasd_eckd_read_features(struct dasd_device *device) 932 { 933 struct dasd_psf_prssd_data *prssdp; 934 struct dasd_rssd_features *features; 935 struct dasd_ccw_req *cqr; 936 struct ccw1 *ccw; 937 int rc; 938 struct dasd_eckd_private *private; 939 940 private = (struct dasd_eckd_private *) device->private; 941 memset(&private->features, 0, sizeof(struct dasd_rssd_features)); 942 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 1 /* PSF */ + 1 /* RSSD */, 943 (sizeof(struct dasd_psf_prssd_data) + 944 sizeof(struct dasd_rssd_features)), 945 device); 946 if (IS_ERR(cqr)) { 947 DBF_EVENT_DEVID(DBF_WARNING, device->cdev, "%s", "Could not " 948 "allocate initialization request"); 949 return PTR_ERR(cqr); 950 } 951 cqr->startdev = device; 952 cqr->memdev = device; 953 cqr->block = NULL; 954 cqr->retries = 256; 955 cqr->expires = 10 * HZ; 956 957 /* Prepare for Read Subsystem Data */ 958 prssdp = (struct dasd_psf_prssd_data *) cqr->data; 959 memset(prssdp, 0, sizeof(struct dasd_psf_prssd_data)); 960 prssdp->order = PSF_ORDER_PRSSD; 961 prssdp->suborder = 0x41; /* Read Feature Codes */ 962 /* all other bytes of prssdp must be zero */ 963 964 ccw = cqr->cpaddr; 965 ccw->cmd_code = DASD_ECKD_CCW_PSF; 966 ccw->count = sizeof(struct dasd_psf_prssd_data); 967 ccw->flags |= CCW_FLAG_CC; 968 ccw->cda = (__u32)(addr_t) prssdp; 969 970 /* Read Subsystem Data - feature codes */ 971 features = (struct dasd_rssd_features *) (prssdp + 1); 972 memset(features, 0, sizeof(struct dasd_rssd_features)); 973 974 ccw++; 975 ccw->cmd_code = DASD_ECKD_CCW_RSSD; 976 ccw->count = sizeof(struct dasd_rssd_features); 977 ccw->cda = (__u32)(addr_t) features; 978 979 cqr->buildclk = get_clock(); 980 cqr->status = DASD_CQR_FILLED; 981 rc = dasd_sleep_on(cqr); 982 if (rc == 0) { 983 prssdp = (struct dasd_psf_prssd_data *) cqr->data; 984 features = (struct dasd_rssd_features *) (prssdp + 1); 985 memcpy(&private->features, features, 986 sizeof(struct dasd_rssd_features)); 987 } else 988 dev_warn(&device->cdev->dev, "Reading device feature codes" 989 " failed with rc=%d\n", rc); 990 dasd_sfree_request(cqr, cqr->memdev); 991 return rc; 992 } 993 994 995 /* 996 * Build CP for Perform Subsystem Function - SSC. 997 */ 998 static struct dasd_ccw_req *dasd_eckd_build_psf_ssc(struct dasd_device *device, 999 int enable_pav) 1000 { 1001 struct dasd_ccw_req *cqr; 1002 struct dasd_psf_ssc_data *psf_ssc_data; 1003 struct ccw1 *ccw; 1004 1005 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 1 /* PSF */ , 1006 sizeof(struct dasd_psf_ssc_data), 1007 device); 1008 1009 if (IS_ERR(cqr)) { 1010 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 1011 "Could not allocate PSF-SSC request"); 1012 return cqr; 1013 } 1014 psf_ssc_data = (struct dasd_psf_ssc_data *)cqr->data; 1015 psf_ssc_data->order = PSF_ORDER_SSC; 1016 psf_ssc_data->suborder = 0xc0; 1017 if (enable_pav) { 1018 psf_ssc_data->suborder |= 0x08; 1019 psf_ssc_data->reserved[0] = 0x88; 1020 } 1021 ccw = cqr->cpaddr; 1022 ccw->cmd_code = DASD_ECKD_CCW_PSF; 1023 ccw->cda = (__u32)(addr_t)psf_ssc_data; 1024 ccw->count = 66; 1025 1026 cqr->startdev = device; 1027 cqr->memdev = device; 1028 cqr->block = NULL; 1029 cqr->retries = 256; 1030 cqr->expires = 10*HZ; 1031 cqr->buildclk = get_clock(); 1032 cqr->status = DASD_CQR_FILLED; 1033 return cqr; 1034 } 1035 1036 /* 1037 * Perform Subsystem Function. 1038 * It is necessary to trigger CIO for channel revalidation since this 1039 * call might change behaviour of DASD devices. 1040 */ 1041 static int 1042 dasd_eckd_psf_ssc(struct dasd_device *device, int enable_pav) 1043 { 1044 struct dasd_ccw_req *cqr; 1045 int rc; 1046 1047 cqr = dasd_eckd_build_psf_ssc(device, enable_pav); 1048 if (IS_ERR(cqr)) 1049 return PTR_ERR(cqr); 1050 1051 rc = dasd_sleep_on(cqr); 1052 if (!rc) 1053 /* trigger CIO to reprobe devices */ 1054 css_schedule_reprobe(); 1055 dasd_sfree_request(cqr, cqr->memdev); 1056 return rc; 1057 } 1058 1059 /* 1060 * Valide storage server of current device. 1061 */ 1062 static int dasd_eckd_validate_server(struct dasd_device *device) 1063 { 1064 int rc; 1065 struct dasd_eckd_private *private; 1066 int enable_pav; 1067 1068 if (dasd_nopav || MACHINE_IS_VM) 1069 enable_pav = 0; 1070 else 1071 enable_pav = 1; 1072 rc = dasd_eckd_psf_ssc(device, enable_pav); 1073 1074 /* may be requested feature is not available on server, 1075 * therefore just report error and go ahead */ 1076 private = (struct dasd_eckd_private *) device->private; 1077 DBF_EVENT_DEVID(DBF_WARNING, device->cdev, "PSF-SSC for SSID %04x " 1078 "returned rc=%d", private->uid.ssid, rc); 1079 /* RE-Read Configuration Data */ 1080 return dasd_eckd_read_conf(device); 1081 } 1082 1083 /* 1084 * Check device characteristics. 1085 * If the device is accessible using ECKD discipline, the device is enabled. 1086 */ 1087 static int 1088 dasd_eckd_check_characteristics(struct dasd_device *device) 1089 { 1090 struct dasd_eckd_private *private; 1091 struct dasd_block *block; 1092 int is_known, rc; 1093 1094 if (!ccw_device_is_pathgroup(device->cdev)) { 1095 dev_warn(&device->cdev->dev, 1096 "A channel path group could not be established\n"); 1097 return -EIO; 1098 } 1099 if (!ccw_device_is_multipath(device->cdev)) { 1100 dev_info(&device->cdev->dev, 1101 "The DASD is not operating in multipath mode\n"); 1102 } 1103 private = (struct dasd_eckd_private *) device->private; 1104 if (!private) { 1105 private = kzalloc(sizeof(*private), GFP_KERNEL | GFP_DMA); 1106 if (!private) { 1107 dev_warn(&device->cdev->dev, 1108 "Allocating memory for private DASD data " 1109 "failed\n"); 1110 return -ENOMEM; 1111 } 1112 device->private = (void *) private; 1113 } else { 1114 memset(private, 0, sizeof(*private)); 1115 } 1116 /* Invalidate status of initial analysis. */ 1117 private->init_cqr_status = -1; 1118 /* Set default cache operations. */ 1119 private->attrib.operation = DASD_NORMAL_CACHE; 1120 private->attrib.nr_cyl = 0; 1121 1122 /* Read Configuration Data */ 1123 rc = dasd_eckd_read_conf(device); 1124 if (rc) 1125 goto out_err1; 1126 1127 /* Generate device unique id and register in devmap */ 1128 rc = dasd_eckd_generate_uid(device, &private->uid); 1129 if (rc) 1130 goto out_err1; 1131 dasd_set_uid(device->cdev, &private->uid); 1132 1133 if (private->uid.type == UA_BASE_DEVICE) { 1134 block = dasd_alloc_block(); 1135 if (IS_ERR(block)) { 1136 DBF_EVENT_DEVID(DBF_WARNING, device->cdev, "%s", 1137 "could not allocate dasd " 1138 "block structure"); 1139 rc = PTR_ERR(block); 1140 goto out_err1; 1141 } 1142 device->block = block; 1143 block->base = device; 1144 } 1145 1146 /* register lcu with alias handling, enable PAV if this is a new lcu */ 1147 is_known = dasd_alias_make_device_known_to_lcu(device); 1148 if (is_known < 0) { 1149 rc = is_known; 1150 goto out_err2; 1151 } 1152 if (!is_known) { 1153 /* new lcu found */ 1154 rc = dasd_eckd_validate_server(device); /* will switch pav on */ 1155 if (rc) 1156 goto out_err3; 1157 } 1158 1159 /* Read Feature Codes */ 1160 dasd_eckd_read_features(device); 1161 1162 /* Read Device Characteristics */ 1163 rc = dasd_generic_read_dev_chars(device, DASD_ECKD_MAGIC, 1164 &private->rdc_data, 64); 1165 if (rc) { 1166 DBF_EVENT_DEVID(DBF_WARNING, device->cdev, 1167 "Read device characteristic failed, rc=%d", rc); 1168 goto out_err3; 1169 } 1170 /* find the vaild cylinder size */ 1171 if (private->rdc_data.no_cyl == LV_COMPAT_CYL && 1172 private->rdc_data.long_no_cyl) 1173 private->real_cyl = private->rdc_data.long_no_cyl; 1174 else 1175 private->real_cyl = private->rdc_data.no_cyl; 1176 1177 dev_info(&device->cdev->dev, "New DASD %04X/%02X (CU %04X/%02X) " 1178 "with %d cylinders, %d heads, %d sectors\n", 1179 private->rdc_data.dev_type, 1180 private->rdc_data.dev_model, 1181 private->rdc_data.cu_type, 1182 private->rdc_data.cu_model.model, 1183 private->real_cyl, 1184 private->rdc_data.trk_per_cyl, 1185 private->rdc_data.sec_per_trk); 1186 return 0; 1187 1188 out_err3: 1189 dasd_alias_disconnect_device_from_lcu(device); 1190 out_err2: 1191 dasd_free_block(device->block); 1192 device->block = NULL; 1193 out_err1: 1194 kfree(private->conf_data); 1195 kfree(device->private); 1196 device->private = NULL; 1197 return rc; 1198 } 1199 1200 static void dasd_eckd_uncheck_device(struct dasd_device *device) 1201 { 1202 struct dasd_eckd_private *private; 1203 1204 private = (struct dasd_eckd_private *) device->private; 1205 dasd_alias_disconnect_device_from_lcu(device); 1206 private->ned = NULL; 1207 private->sneq = NULL; 1208 private->vdsneq = NULL; 1209 private->gneq = NULL; 1210 private->conf_len = 0; 1211 kfree(private->conf_data); 1212 private->conf_data = NULL; 1213 } 1214 1215 static struct dasd_ccw_req * 1216 dasd_eckd_analysis_ccw(struct dasd_device *device) 1217 { 1218 struct dasd_eckd_private *private; 1219 struct eckd_count *count_data; 1220 struct LO_eckd_data *LO_data; 1221 struct dasd_ccw_req *cqr; 1222 struct ccw1 *ccw; 1223 int cplength, datasize; 1224 int i; 1225 1226 private = (struct dasd_eckd_private *) device->private; 1227 1228 cplength = 8; 1229 datasize = sizeof(struct DE_eckd_data) + 2*sizeof(struct LO_eckd_data); 1230 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, cplength, datasize, device); 1231 if (IS_ERR(cqr)) 1232 return cqr; 1233 ccw = cqr->cpaddr; 1234 /* Define extent for the first 3 tracks. */ 1235 define_extent(ccw++, cqr->data, 0, 2, 1236 DASD_ECKD_CCW_READ_COUNT, device); 1237 LO_data = cqr->data + sizeof(struct DE_eckd_data); 1238 /* Locate record for the first 4 records on track 0. */ 1239 ccw[-1].flags |= CCW_FLAG_CC; 1240 locate_record(ccw++, LO_data++, 0, 0, 4, 1241 DASD_ECKD_CCW_READ_COUNT, device, 0); 1242 1243 count_data = private->count_area; 1244 for (i = 0; i < 4; i++) { 1245 ccw[-1].flags |= CCW_FLAG_CC; 1246 ccw->cmd_code = DASD_ECKD_CCW_READ_COUNT; 1247 ccw->flags = 0; 1248 ccw->count = 8; 1249 ccw->cda = (__u32)(addr_t) count_data; 1250 ccw++; 1251 count_data++; 1252 } 1253 1254 /* Locate record for the first record on track 2. */ 1255 ccw[-1].flags |= CCW_FLAG_CC; 1256 locate_record(ccw++, LO_data++, 2, 0, 1, 1257 DASD_ECKD_CCW_READ_COUNT, device, 0); 1258 /* Read count ccw. */ 1259 ccw[-1].flags |= CCW_FLAG_CC; 1260 ccw->cmd_code = DASD_ECKD_CCW_READ_COUNT; 1261 ccw->flags = 0; 1262 ccw->count = 8; 1263 ccw->cda = (__u32)(addr_t) count_data; 1264 1265 cqr->block = NULL; 1266 cqr->startdev = device; 1267 cqr->memdev = device; 1268 cqr->retries = 255; 1269 cqr->buildclk = get_clock(); 1270 cqr->status = DASD_CQR_FILLED; 1271 return cqr; 1272 } 1273 1274 /* differentiate between 'no record found' and any other error */ 1275 static int dasd_eckd_analysis_evaluation(struct dasd_ccw_req *init_cqr) 1276 { 1277 char *sense; 1278 if (init_cqr->status == DASD_CQR_DONE) 1279 return INIT_CQR_OK; 1280 else if (init_cqr->status == DASD_CQR_NEED_ERP || 1281 init_cqr->status == DASD_CQR_FAILED) { 1282 sense = dasd_get_sense(&init_cqr->irb); 1283 if (sense && (sense[1] & SNS1_NO_REC_FOUND)) 1284 return INIT_CQR_UNFORMATTED; 1285 else 1286 return INIT_CQR_ERROR; 1287 } else 1288 return INIT_CQR_ERROR; 1289 } 1290 1291 /* 1292 * This is the callback function for the init_analysis cqr. It saves 1293 * the status of the initial analysis ccw before it frees it and kicks 1294 * the device to continue the startup sequence. This will call 1295 * dasd_eckd_do_analysis again (if the devices has not been marked 1296 * for deletion in the meantime). 1297 */ 1298 static void dasd_eckd_analysis_callback(struct dasd_ccw_req *init_cqr, 1299 void *data) 1300 { 1301 struct dasd_eckd_private *private; 1302 struct dasd_device *device; 1303 1304 device = init_cqr->startdev; 1305 private = (struct dasd_eckd_private *) device->private; 1306 private->init_cqr_status = dasd_eckd_analysis_evaluation(init_cqr); 1307 dasd_sfree_request(init_cqr, device); 1308 dasd_kick_device(device); 1309 } 1310 1311 static int dasd_eckd_start_analysis(struct dasd_block *block) 1312 { 1313 struct dasd_eckd_private *private; 1314 struct dasd_ccw_req *init_cqr; 1315 1316 private = (struct dasd_eckd_private *) block->base->private; 1317 init_cqr = dasd_eckd_analysis_ccw(block->base); 1318 if (IS_ERR(init_cqr)) 1319 return PTR_ERR(init_cqr); 1320 init_cqr->callback = dasd_eckd_analysis_callback; 1321 init_cqr->callback_data = NULL; 1322 init_cqr->expires = 5*HZ; 1323 /* first try without ERP, so we can later handle unformatted 1324 * devices as special case 1325 */ 1326 clear_bit(DASD_CQR_FLAGS_USE_ERP, &init_cqr->flags); 1327 init_cqr->retries = 0; 1328 dasd_add_request_head(init_cqr); 1329 return -EAGAIN; 1330 } 1331 1332 static int dasd_eckd_end_analysis(struct dasd_block *block) 1333 { 1334 struct dasd_device *device; 1335 struct dasd_eckd_private *private; 1336 struct eckd_count *count_area; 1337 unsigned int sb, blk_per_trk; 1338 int status, i; 1339 struct dasd_ccw_req *init_cqr; 1340 1341 device = block->base; 1342 private = (struct dasd_eckd_private *) device->private; 1343 status = private->init_cqr_status; 1344 private->init_cqr_status = -1; 1345 if (status == INIT_CQR_ERROR) { 1346 /* try again, this time with full ERP */ 1347 init_cqr = dasd_eckd_analysis_ccw(device); 1348 dasd_sleep_on(init_cqr); 1349 status = dasd_eckd_analysis_evaluation(init_cqr); 1350 dasd_sfree_request(init_cqr, device); 1351 } 1352 1353 if (status == INIT_CQR_UNFORMATTED) { 1354 dev_warn(&device->cdev->dev, "The DASD is not formatted\n"); 1355 return -EMEDIUMTYPE; 1356 } else if (status == INIT_CQR_ERROR) { 1357 dev_err(&device->cdev->dev, 1358 "Detecting the DASD disk layout failed because " 1359 "of an I/O error\n"); 1360 return -EIO; 1361 } 1362 1363 private->uses_cdl = 1; 1364 /* Check Track 0 for Compatible Disk Layout */ 1365 count_area = NULL; 1366 for (i = 0; i < 3; i++) { 1367 if (private->count_area[i].kl != 4 || 1368 private->count_area[i].dl != dasd_eckd_cdl_reclen(i) - 4) { 1369 private->uses_cdl = 0; 1370 break; 1371 } 1372 } 1373 if (i == 3) 1374 count_area = &private->count_area[4]; 1375 1376 if (private->uses_cdl == 0) { 1377 for (i = 0; i < 5; i++) { 1378 if ((private->count_area[i].kl != 0) || 1379 (private->count_area[i].dl != 1380 private->count_area[0].dl)) 1381 break; 1382 } 1383 if (i == 5) 1384 count_area = &private->count_area[0]; 1385 } else { 1386 if (private->count_area[3].record == 1) 1387 dev_warn(&device->cdev->dev, 1388 "Track 0 has no records following the VTOC\n"); 1389 } 1390 if (count_area != NULL && count_area->kl == 0) { 1391 /* we found notthing violating our disk layout */ 1392 if (dasd_check_blocksize(count_area->dl) == 0) 1393 block->bp_block = count_area->dl; 1394 } 1395 if (block->bp_block == 0) { 1396 dev_warn(&device->cdev->dev, 1397 "The disk layout of the DASD is not supported\n"); 1398 return -EMEDIUMTYPE; 1399 } 1400 block->s2b_shift = 0; /* bits to shift 512 to get a block */ 1401 for (sb = 512; sb < block->bp_block; sb = sb << 1) 1402 block->s2b_shift++; 1403 1404 blk_per_trk = recs_per_track(&private->rdc_data, 0, block->bp_block); 1405 block->blocks = (private->real_cyl * 1406 private->rdc_data.trk_per_cyl * 1407 blk_per_trk); 1408 1409 dev_info(&device->cdev->dev, 1410 "DASD with %d KB/block, %d KB total size, %d KB/track, " 1411 "%s\n", (block->bp_block >> 10), 1412 ((private->real_cyl * 1413 private->rdc_data.trk_per_cyl * 1414 blk_per_trk * (block->bp_block >> 9)) >> 1), 1415 ((blk_per_trk * block->bp_block) >> 10), 1416 private->uses_cdl ? 1417 "compatible disk layout" : "linux disk layout"); 1418 1419 return 0; 1420 } 1421 1422 static int dasd_eckd_do_analysis(struct dasd_block *block) 1423 { 1424 struct dasd_eckd_private *private; 1425 1426 private = (struct dasd_eckd_private *) block->base->private; 1427 if (private->init_cqr_status < 0) 1428 return dasd_eckd_start_analysis(block); 1429 else 1430 return dasd_eckd_end_analysis(block); 1431 } 1432 1433 static int dasd_eckd_ready_to_online(struct dasd_device *device) 1434 { 1435 return dasd_alias_add_device(device); 1436 }; 1437 1438 static int dasd_eckd_online_to_ready(struct dasd_device *device) 1439 { 1440 return dasd_alias_remove_device(device); 1441 }; 1442 1443 static int 1444 dasd_eckd_fill_geometry(struct dasd_block *block, struct hd_geometry *geo) 1445 { 1446 struct dasd_eckd_private *private; 1447 1448 private = (struct dasd_eckd_private *) block->base->private; 1449 if (dasd_check_blocksize(block->bp_block) == 0) { 1450 geo->sectors = recs_per_track(&private->rdc_data, 1451 0, block->bp_block); 1452 } 1453 geo->cylinders = private->rdc_data.no_cyl; 1454 geo->heads = private->rdc_data.trk_per_cyl; 1455 return 0; 1456 } 1457 1458 static struct dasd_ccw_req * 1459 dasd_eckd_format_device(struct dasd_device * device, 1460 struct format_data_t * fdata) 1461 { 1462 struct dasd_eckd_private *private; 1463 struct dasd_ccw_req *fcp; 1464 struct eckd_count *ect; 1465 struct ccw1 *ccw; 1466 void *data; 1467 int rpt; 1468 struct ch_t address; 1469 int cplength, datasize; 1470 int i; 1471 int intensity = 0; 1472 int r0_perm; 1473 1474 private = (struct dasd_eckd_private *) device->private; 1475 rpt = recs_per_track(&private->rdc_data, 0, fdata->blksize); 1476 set_ch_t(&address, 1477 fdata->start_unit / private->rdc_data.trk_per_cyl, 1478 fdata->start_unit % private->rdc_data.trk_per_cyl); 1479 1480 /* Sanity checks. */ 1481 if (fdata->start_unit >= 1482 (private->real_cyl * private->rdc_data.trk_per_cyl)) { 1483 dev_warn(&device->cdev->dev, "Start track number %d used in " 1484 "formatting is too big\n", fdata->start_unit); 1485 return ERR_PTR(-EINVAL); 1486 } 1487 if (fdata->start_unit > fdata->stop_unit) { 1488 dev_warn(&device->cdev->dev, "Start track %d used in " 1489 "formatting exceeds end track\n", fdata->start_unit); 1490 return ERR_PTR(-EINVAL); 1491 } 1492 if (dasd_check_blocksize(fdata->blksize) != 0) { 1493 dev_warn(&device->cdev->dev, 1494 "The DASD cannot be formatted with block size %d\n", 1495 fdata->blksize); 1496 return ERR_PTR(-EINVAL); 1497 } 1498 1499 /* 1500 * fdata->intensity is a bit string that tells us what to do: 1501 * Bit 0: write record zero 1502 * Bit 1: write home address, currently not supported 1503 * Bit 2: invalidate tracks 1504 * Bit 3: use OS/390 compatible disk layout (cdl) 1505 * Bit 4: do not allow storage subsystem to modify record zero 1506 * Only some bit combinations do make sense. 1507 */ 1508 if (fdata->intensity & 0x10) { 1509 r0_perm = 0; 1510 intensity = fdata->intensity & ~0x10; 1511 } else { 1512 r0_perm = 1; 1513 intensity = fdata->intensity; 1514 } 1515 switch (intensity) { 1516 case 0x00: /* Normal format */ 1517 case 0x08: /* Normal format, use cdl. */ 1518 cplength = 2 + rpt; 1519 datasize = sizeof(struct DE_eckd_data) + 1520 sizeof(struct LO_eckd_data) + 1521 rpt * sizeof(struct eckd_count); 1522 break; 1523 case 0x01: /* Write record zero and format track. */ 1524 case 0x09: /* Write record zero and format track, use cdl. */ 1525 cplength = 3 + rpt; 1526 datasize = sizeof(struct DE_eckd_data) + 1527 sizeof(struct LO_eckd_data) + 1528 sizeof(struct eckd_count) + 1529 rpt * sizeof(struct eckd_count); 1530 break; 1531 case 0x04: /* Invalidate track. */ 1532 case 0x0c: /* Invalidate track, use cdl. */ 1533 cplength = 3; 1534 datasize = sizeof(struct DE_eckd_data) + 1535 sizeof(struct LO_eckd_data) + 1536 sizeof(struct eckd_count); 1537 break; 1538 default: 1539 dev_warn(&device->cdev->dev, "An I/O control call used " 1540 "incorrect flags 0x%x\n", fdata->intensity); 1541 return ERR_PTR(-EINVAL); 1542 } 1543 /* Allocate the format ccw request. */ 1544 fcp = dasd_smalloc_request(DASD_ECKD_MAGIC, cplength, datasize, device); 1545 if (IS_ERR(fcp)) 1546 return fcp; 1547 1548 data = fcp->data; 1549 ccw = fcp->cpaddr; 1550 1551 switch (intensity & ~0x08) { 1552 case 0x00: /* Normal format. */ 1553 define_extent(ccw++, (struct DE_eckd_data *) data, 1554 fdata->start_unit, fdata->start_unit, 1555 DASD_ECKD_CCW_WRITE_CKD, device); 1556 /* grant subsystem permission to format R0 */ 1557 if (r0_perm) 1558 ((struct DE_eckd_data *)data)->ga_extended |= 0x04; 1559 data += sizeof(struct DE_eckd_data); 1560 ccw[-1].flags |= CCW_FLAG_CC; 1561 locate_record(ccw++, (struct LO_eckd_data *) data, 1562 fdata->start_unit, 0, rpt, 1563 DASD_ECKD_CCW_WRITE_CKD, device, 1564 fdata->blksize); 1565 data += sizeof(struct LO_eckd_data); 1566 break; 1567 case 0x01: /* Write record zero + format track. */ 1568 define_extent(ccw++, (struct DE_eckd_data *) data, 1569 fdata->start_unit, fdata->start_unit, 1570 DASD_ECKD_CCW_WRITE_RECORD_ZERO, 1571 device); 1572 data += sizeof(struct DE_eckd_data); 1573 ccw[-1].flags |= CCW_FLAG_CC; 1574 locate_record(ccw++, (struct LO_eckd_data *) data, 1575 fdata->start_unit, 0, rpt + 1, 1576 DASD_ECKD_CCW_WRITE_RECORD_ZERO, device, 1577 device->block->bp_block); 1578 data += sizeof(struct LO_eckd_data); 1579 break; 1580 case 0x04: /* Invalidate track. */ 1581 define_extent(ccw++, (struct DE_eckd_data *) data, 1582 fdata->start_unit, fdata->start_unit, 1583 DASD_ECKD_CCW_WRITE_CKD, device); 1584 data += sizeof(struct DE_eckd_data); 1585 ccw[-1].flags |= CCW_FLAG_CC; 1586 locate_record(ccw++, (struct LO_eckd_data *) data, 1587 fdata->start_unit, 0, 1, 1588 DASD_ECKD_CCW_WRITE_CKD, device, 8); 1589 data += sizeof(struct LO_eckd_data); 1590 break; 1591 } 1592 if (intensity & 0x01) { /* write record zero */ 1593 ect = (struct eckd_count *) data; 1594 data += sizeof(struct eckd_count); 1595 ect->cyl = address.cyl; 1596 ect->head = address.head; 1597 ect->record = 0; 1598 ect->kl = 0; 1599 ect->dl = 8; 1600 ccw[-1].flags |= CCW_FLAG_CC; 1601 ccw->cmd_code = DASD_ECKD_CCW_WRITE_RECORD_ZERO; 1602 ccw->flags = CCW_FLAG_SLI; 1603 ccw->count = 8; 1604 ccw->cda = (__u32)(addr_t) ect; 1605 ccw++; 1606 } 1607 if ((intensity & ~0x08) & 0x04) { /* erase track */ 1608 ect = (struct eckd_count *) data; 1609 data += sizeof(struct eckd_count); 1610 ect->cyl = address.cyl; 1611 ect->head = address.head; 1612 ect->record = 1; 1613 ect->kl = 0; 1614 ect->dl = 0; 1615 ccw[-1].flags |= CCW_FLAG_CC; 1616 ccw->cmd_code = DASD_ECKD_CCW_WRITE_CKD; 1617 ccw->flags = CCW_FLAG_SLI; 1618 ccw->count = 8; 1619 ccw->cda = (__u32)(addr_t) ect; 1620 } else { /* write remaining records */ 1621 for (i = 0; i < rpt; i++) { 1622 ect = (struct eckd_count *) data; 1623 data += sizeof(struct eckd_count); 1624 ect->cyl = address.cyl; 1625 ect->head = address.head; 1626 ect->record = i + 1; 1627 ect->kl = 0; 1628 ect->dl = fdata->blksize; 1629 /* Check for special tracks 0-1 when formatting CDL */ 1630 if ((intensity & 0x08) && 1631 fdata->start_unit == 0) { 1632 if (i < 3) { 1633 ect->kl = 4; 1634 ect->dl = sizes_trk0[i] - 4; 1635 } 1636 } 1637 if ((intensity & 0x08) && 1638 fdata->start_unit == 1) { 1639 ect->kl = 44; 1640 ect->dl = LABEL_SIZE - 44; 1641 } 1642 ccw[-1].flags |= CCW_FLAG_CC; 1643 ccw->cmd_code = DASD_ECKD_CCW_WRITE_CKD; 1644 ccw->flags = CCW_FLAG_SLI; 1645 ccw->count = 8; 1646 ccw->cda = (__u32)(addr_t) ect; 1647 ccw++; 1648 } 1649 } 1650 fcp->startdev = device; 1651 fcp->memdev = device; 1652 fcp->retries = 256; 1653 fcp->buildclk = get_clock(); 1654 fcp->status = DASD_CQR_FILLED; 1655 return fcp; 1656 } 1657 1658 static void dasd_eckd_handle_terminated_request(struct dasd_ccw_req *cqr) 1659 { 1660 cqr->status = DASD_CQR_FILLED; 1661 if (cqr->block && (cqr->startdev != cqr->block->base)) { 1662 dasd_eckd_reset_ccw_to_base_io(cqr); 1663 cqr->startdev = cqr->block->base; 1664 } 1665 }; 1666 1667 static dasd_erp_fn_t 1668 dasd_eckd_erp_action(struct dasd_ccw_req * cqr) 1669 { 1670 struct dasd_device *device = (struct dasd_device *) cqr->startdev; 1671 struct ccw_device *cdev = device->cdev; 1672 1673 switch (cdev->id.cu_type) { 1674 case 0x3990: 1675 case 0x2105: 1676 case 0x2107: 1677 case 0x1750: 1678 return dasd_3990_erp_action; 1679 case 0x9343: 1680 case 0x3880: 1681 default: 1682 return dasd_default_erp_action; 1683 } 1684 } 1685 1686 static dasd_erp_fn_t 1687 dasd_eckd_erp_postaction(struct dasd_ccw_req * cqr) 1688 { 1689 return dasd_default_erp_postaction; 1690 } 1691 1692 1693 static void dasd_eckd_handle_unsolicited_interrupt(struct dasd_device *device, 1694 struct irb *irb) 1695 { 1696 char mask; 1697 char *sense = NULL; 1698 1699 /* first of all check for state change pending interrupt */ 1700 mask = DEV_STAT_ATTENTION | DEV_STAT_DEV_END | DEV_STAT_UNIT_EXCEP; 1701 if ((scsw_dstat(&irb->scsw) & mask) == mask) { 1702 dasd_generic_handle_state_change(device); 1703 return; 1704 } 1705 1706 /* summary unit check */ 1707 if ((scsw_dstat(&irb->scsw) & DEV_STAT_UNIT_CHECK) && 1708 (irb->ecw[7] == 0x0D)) { 1709 dasd_alias_handle_summary_unit_check(device, irb); 1710 return; 1711 } 1712 1713 sense = dasd_get_sense(irb); 1714 /* service information message SIM */ 1715 if (sense && !(sense[27] & DASD_SENSE_BIT_0) && 1716 ((sense[6] & DASD_SIM_SENSE) == DASD_SIM_SENSE)) { 1717 dasd_3990_erp_handle_sim(device, sense); 1718 dasd_schedule_device_bh(device); 1719 return; 1720 } 1721 1722 if ((scsw_cc(&irb->scsw) == 1) && 1723 (scsw_fctl(&irb->scsw) & SCSW_FCTL_START_FUNC) && 1724 (scsw_actl(&irb->scsw) & SCSW_ACTL_START_PEND) && 1725 (scsw_stctl(&irb->scsw) & SCSW_STCTL_STATUS_PEND)) { 1726 /* fake irb do nothing, they are handled elsewhere */ 1727 dasd_schedule_device_bh(device); 1728 return; 1729 } 1730 1731 if (!sense) { 1732 /* just report other unsolicited interrupts */ 1733 DBF_DEV_EVENT(DBF_ERR, device, "%s", 1734 "unsolicited interrupt received"); 1735 } else { 1736 DBF_DEV_EVENT(DBF_ERR, device, "%s", 1737 "unsolicited interrupt received " 1738 "(sense available)"); 1739 device->discipline->dump_sense_dbf(device, irb, "unsolicited"); 1740 } 1741 1742 dasd_schedule_device_bh(device); 1743 return; 1744 }; 1745 1746 1747 static struct dasd_ccw_req *dasd_eckd_build_cp_cmd_single( 1748 struct dasd_device *startdev, 1749 struct dasd_block *block, 1750 struct request *req, 1751 sector_t first_rec, 1752 sector_t last_rec, 1753 sector_t first_trk, 1754 sector_t last_trk, 1755 unsigned int first_offs, 1756 unsigned int last_offs, 1757 unsigned int blk_per_trk, 1758 unsigned int blksize) 1759 { 1760 struct dasd_eckd_private *private; 1761 unsigned long *idaws; 1762 struct LO_eckd_data *LO_data; 1763 struct dasd_ccw_req *cqr; 1764 struct ccw1 *ccw; 1765 struct req_iterator iter; 1766 struct bio_vec *bv; 1767 char *dst; 1768 unsigned int off; 1769 int count, cidaw, cplength, datasize; 1770 sector_t recid; 1771 unsigned char cmd, rcmd; 1772 int use_prefix; 1773 struct dasd_device *basedev; 1774 1775 basedev = block->base; 1776 private = (struct dasd_eckd_private *) basedev->private; 1777 if (rq_data_dir(req) == READ) 1778 cmd = DASD_ECKD_CCW_READ_MT; 1779 else if (rq_data_dir(req) == WRITE) 1780 cmd = DASD_ECKD_CCW_WRITE_MT; 1781 else 1782 return ERR_PTR(-EINVAL); 1783 1784 /* Check struct bio and count the number of blocks for the request. */ 1785 count = 0; 1786 cidaw = 0; 1787 rq_for_each_segment(bv, req, iter) { 1788 if (bv->bv_len & (blksize - 1)) 1789 /* Eckd can only do full blocks. */ 1790 return ERR_PTR(-EINVAL); 1791 count += bv->bv_len >> (block->s2b_shift + 9); 1792 #if defined(CONFIG_64BIT) 1793 if (idal_is_needed (page_address(bv->bv_page), bv->bv_len)) 1794 cidaw += bv->bv_len >> (block->s2b_shift + 9); 1795 #endif 1796 } 1797 /* Paranoia. */ 1798 if (count != last_rec - first_rec + 1) 1799 return ERR_PTR(-EINVAL); 1800 1801 /* use the prefix command if available */ 1802 use_prefix = private->features.feature[8] & 0x01; 1803 if (use_prefix) { 1804 /* 1x prefix + number of blocks */ 1805 cplength = 2 + count; 1806 /* 1x prefix + cidaws*sizeof(long) */ 1807 datasize = sizeof(struct PFX_eckd_data) + 1808 sizeof(struct LO_eckd_data) + 1809 cidaw * sizeof(unsigned long); 1810 } else { 1811 /* 1x define extent + 1x locate record + number of blocks */ 1812 cplength = 2 + count; 1813 /* 1x define extent + 1x locate record + cidaws*sizeof(long) */ 1814 datasize = sizeof(struct DE_eckd_data) + 1815 sizeof(struct LO_eckd_data) + 1816 cidaw * sizeof(unsigned long); 1817 } 1818 /* Find out the number of additional locate record ccws for cdl. */ 1819 if (private->uses_cdl && first_rec < 2*blk_per_trk) { 1820 if (last_rec >= 2*blk_per_trk) 1821 count = 2*blk_per_trk - first_rec; 1822 cplength += count; 1823 datasize += count*sizeof(struct LO_eckd_data); 1824 } 1825 /* Allocate the ccw request. */ 1826 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, cplength, datasize, 1827 startdev); 1828 if (IS_ERR(cqr)) 1829 return cqr; 1830 ccw = cqr->cpaddr; 1831 /* First ccw is define extent or prefix. */ 1832 if (use_prefix) { 1833 if (prefix(ccw++, cqr->data, first_trk, 1834 last_trk, cmd, basedev, startdev) == -EAGAIN) { 1835 /* Clock not in sync and XRC is enabled. 1836 * Try again later. 1837 */ 1838 dasd_sfree_request(cqr, startdev); 1839 return ERR_PTR(-EAGAIN); 1840 } 1841 idaws = (unsigned long *) (cqr->data + 1842 sizeof(struct PFX_eckd_data)); 1843 } else { 1844 if (define_extent(ccw++, cqr->data, first_trk, 1845 last_trk, cmd, startdev) == -EAGAIN) { 1846 /* Clock not in sync and XRC is enabled. 1847 * Try again later. 1848 */ 1849 dasd_sfree_request(cqr, startdev); 1850 return ERR_PTR(-EAGAIN); 1851 } 1852 idaws = (unsigned long *) (cqr->data + 1853 sizeof(struct DE_eckd_data)); 1854 } 1855 /* Build locate_record+read/write/ccws. */ 1856 LO_data = (struct LO_eckd_data *) (idaws + cidaw); 1857 recid = first_rec; 1858 if (private->uses_cdl == 0 || recid > 2*blk_per_trk) { 1859 /* Only standard blocks so there is just one locate record. */ 1860 ccw[-1].flags |= CCW_FLAG_CC; 1861 locate_record(ccw++, LO_data++, first_trk, first_offs + 1, 1862 last_rec - recid + 1, cmd, basedev, blksize); 1863 } 1864 rq_for_each_segment(bv, req, iter) { 1865 dst = page_address(bv->bv_page) + bv->bv_offset; 1866 if (dasd_page_cache) { 1867 char *copy = kmem_cache_alloc(dasd_page_cache, 1868 GFP_DMA | __GFP_NOWARN); 1869 if (copy && rq_data_dir(req) == WRITE) 1870 memcpy(copy + bv->bv_offset, dst, bv->bv_len); 1871 if (copy) 1872 dst = copy + bv->bv_offset; 1873 } 1874 for (off = 0; off < bv->bv_len; off += blksize) { 1875 sector_t trkid = recid; 1876 unsigned int recoffs = sector_div(trkid, blk_per_trk); 1877 rcmd = cmd; 1878 count = blksize; 1879 /* Locate record for cdl special block ? */ 1880 if (private->uses_cdl && recid < 2*blk_per_trk) { 1881 if (dasd_eckd_cdl_special(blk_per_trk, recid)){ 1882 rcmd |= 0x8; 1883 count = dasd_eckd_cdl_reclen(recid); 1884 if (count < blksize && 1885 rq_data_dir(req) == READ) 1886 memset(dst + count, 0xe5, 1887 blksize - count); 1888 } 1889 ccw[-1].flags |= CCW_FLAG_CC; 1890 locate_record(ccw++, LO_data++, 1891 trkid, recoffs + 1, 1892 1, rcmd, basedev, count); 1893 } 1894 /* Locate record for standard blocks ? */ 1895 if (private->uses_cdl && recid == 2*blk_per_trk) { 1896 ccw[-1].flags |= CCW_FLAG_CC; 1897 locate_record(ccw++, LO_data++, 1898 trkid, recoffs + 1, 1899 last_rec - recid + 1, 1900 cmd, basedev, count); 1901 } 1902 /* Read/write ccw. */ 1903 ccw[-1].flags |= CCW_FLAG_CC; 1904 ccw->cmd_code = rcmd; 1905 ccw->count = count; 1906 if (idal_is_needed(dst, blksize)) { 1907 ccw->cda = (__u32)(addr_t) idaws; 1908 ccw->flags = CCW_FLAG_IDA; 1909 idaws = idal_create_words(idaws, dst, blksize); 1910 } else { 1911 ccw->cda = (__u32)(addr_t) dst; 1912 ccw->flags = 0; 1913 } 1914 ccw++; 1915 dst += blksize; 1916 recid++; 1917 } 1918 } 1919 if (blk_noretry_request(req) || 1920 block->base->features & DASD_FEATURE_FAILFAST) 1921 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 1922 cqr->startdev = startdev; 1923 cqr->memdev = startdev; 1924 cqr->block = block; 1925 cqr->expires = 5 * 60 * HZ; /* 5 minutes */ 1926 cqr->lpm = private->path_data.ppm; 1927 cqr->retries = 256; 1928 cqr->buildclk = get_clock(); 1929 cqr->status = DASD_CQR_FILLED; 1930 return cqr; 1931 } 1932 1933 static struct dasd_ccw_req *dasd_eckd_build_cp_cmd_track( 1934 struct dasd_device *startdev, 1935 struct dasd_block *block, 1936 struct request *req, 1937 sector_t first_rec, 1938 sector_t last_rec, 1939 sector_t first_trk, 1940 sector_t last_trk, 1941 unsigned int first_offs, 1942 unsigned int last_offs, 1943 unsigned int blk_per_trk, 1944 unsigned int blksize) 1945 { 1946 struct dasd_eckd_private *private; 1947 unsigned long *idaws; 1948 struct dasd_ccw_req *cqr; 1949 struct ccw1 *ccw; 1950 struct req_iterator iter; 1951 struct bio_vec *bv; 1952 char *dst, *idaw_dst; 1953 unsigned int cidaw, cplength, datasize; 1954 unsigned int tlf; 1955 sector_t recid; 1956 unsigned char cmd; 1957 struct dasd_device *basedev; 1958 unsigned int trkcount, count, count_to_trk_end; 1959 unsigned int idaw_len, seg_len, part_len, len_to_track_end; 1960 unsigned char new_track, end_idaw; 1961 sector_t trkid; 1962 unsigned int recoffs; 1963 1964 basedev = block->base; 1965 private = (struct dasd_eckd_private *) basedev->private; 1966 if (rq_data_dir(req) == READ) 1967 cmd = DASD_ECKD_CCW_READ_TRACK_DATA; 1968 else if (rq_data_dir(req) == WRITE) 1969 cmd = DASD_ECKD_CCW_WRITE_TRACK_DATA; 1970 else 1971 return ERR_PTR(-EINVAL); 1972 1973 /* Track based I/O needs IDAWs for each page, and not just for 1974 * 64 bit addresses. We need additional idals for pages 1975 * that get filled from two tracks, so we use the number 1976 * of records as upper limit. 1977 */ 1978 cidaw = last_rec - first_rec + 1; 1979 trkcount = last_trk - first_trk + 1; 1980 1981 /* 1x prefix + one read/write ccw per track */ 1982 cplength = 1 + trkcount; 1983 1984 /* on 31-bit we need space for two 32 bit addresses per page 1985 * on 64-bit one 64 bit address 1986 */ 1987 datasize = sizeof(struct PFX_eckd_data) + 1988 cidaw * sizeof(unsigned long long); 1989 1990 /* Allocate the ccw request. */ 1991 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, cplength, datasize, 1992 startdev); 1993 if (IS_ERR(cqr)) 1994 return cqr; 1995 ccw = cqr->cpaddr; 1996 /* transfer length factor: how many bytes to read from the last track */ 1997 if (first_trk == last_trk) 1998 tlf = last_offs - first_offs + 1; 1999 else 2000 tlf = last_offs + 1; 2001 tlf *= blksize; 2002 2003 if (prefix_LRE(ccw++, cqr->data, first_trk, 2004 last_trk, cmd, basedev, startdev, 2005 1 /* format */, first_offs + 1, 2006 trkcount, blksize, 2007 tlf) == -EAGAIN) { 2008 /* Clock not in sync and XRC is enabled. 2009 * Try again later. 2010 */ 2011 dasd_sfree_request(cqr, startdev); 2012 return ERR_PTR(-EAGAIN); 2013 } 2014 2015 /* 2016 * The translation of request into ccw programs must meet the 2017 * following conditions: 2018 * - all idaws but the first and the last must address full pages 2019 * (or 2K blocks on 31-bit) 2020 * - the scope of a ccw and it's idal ends with the track boundaries 2021 */ 2022 idaws = (unsigned long *) (cqr->data + sizeof(struct PFX_eckd_data)); 2023 recid = first_rec; 2024 new_track = 1; 2025 end_idaw = 0; 2026 len_to_track_end = 0; 2027 idaw_dst = 0; 2028 idaw_len = 0; 2029 rq_for_each_segment(bv, req, iter) { 2030 dst = page_address(bv->bv_page) + bv->bv_offset; 2031 seg_len = bv->bv_len; 2032 while (seg_len) { 2033 if (new_track) { 2034 trkid = recid; 2035 recoffs = sector_div(trkid, blk_per_trk); 2036 count_to_trk_end = blk_per_trk - recoffs; 2037 count = min((last_rec - recid + 1), 2038 (sector_t)count_to_trk_end); 2039 len_to_track_end = count * blksize; 2040 ccw[-1].flags |= CCW_FLAG_CC; 2041 ccw->cmd_code = cmd; 2042 ccw->count = len_to_track_end; 2043 ccw->cda = (__u32)(addr_t)idaws; 2044 ccw->flags = CCW_FLAG_IDA; 2045 ccw++; 2046 recid += count; 2047 new_track = 0; 2048 /* first idaw for a ccw may start anywhere */ 2049 if (!idaw_dst) 2050 idaw_dst = dst; 2051 } 2052 /* If we start a new idaw, we must make sure that it 2053 * starts on an IDA_BLOCK_SIZE boundary. 2054 * If we continue an idaw, we must make sure that the 2055 * current segment begins where the so far accumulated 2056 * idaw ends 2057 */ 2058 if (!idaw_dst) { 2059 if (__pa(dst) & (IDA_BLOCK_SIZE-1)) { 2060 dasd_sfree_request(cqr, startdev); 2061 return ERR_PTR(-ERANGE); 2062 } else 2063 idaw_dst = dst; 2064 } 2065 if ((idaw_dst + idaw_len) != dst) { 2066 dasd_sfree_request(cqr, startdev); 2067 return ERR_PTR(-ERANGE); 2068 } 2069 part_len = min(seg_len, len_to_track_end); 2070 seg_len -= part_len; 2071 dst += part_len; 2072 idaw_len += part_len; 2073 len_to_track_end -= part_len; 2074 /* collected memory area ends on an IDA_BLOCK border, 2075 * -> create an idaw 2076 * idal_create_words will handle cases where idaw_len 2077 * is larger then IDA_BLOCK_SIZE 2078 */ 2079 if (!(__pa(idaw_dst + idaw_len) & (IDA_BLOCK_SIZE-1))) 2080 end_idaw = 1; 2081 /* We also need to end the idaw at track end */ 2082 if (!len_to_track_end) { 2083 new_track = 1; 2084 end_idaw = 1; 2085 } 2086 if (end_idaw) { 2087 idaws = idal_create_words(idaws, idaw_dst, 2088 idaw_len); 2089 idaw_dst = 0; 2090 idaw_len = 0; 2091 end_idaw = 0; 2092 } 2093 } 2094 } 2095 2096 if (blk_noretry_request(req) || 2097 block->base->features & DASD_FEATURE_FAILFAST) 2098 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 2099 cqr->startdev = startdev; 2100 cqr->memdev = startdev; 2101 cqr->block = block; 2102 cqr->expires = 5 * 60 * HZ; /* 5 minutes */ 2103 cqr->lpm = private->path_data.ppm; 2104 cqr->retries = 256; 2105 cqr->buildclk = get_clock(); 2106 cqr->status = DASD_CQR_FILLED; 2107 return cqr; 2108 } 2109 2110 static int prepare_itcw(struct itcw *itcw, 2111 unsigned int trk, unsigned int totrk, int cmd, 2112 struct dasd_device *basedev, 2113 struct dasd_device *startdev, 2114 unsigned int rec_on_trk, int count, 2115 unsigned int blksize, 2116 unsigned int total_data_size, 2117 unsigned int tlf, 2118 unsigned int blk_per_trk) 2119 { 2120 struct PFX_eckd_data pfxdata; 2121 struct dasd_eckd_private *basepriv, *startpriv; 2122 struct DE_eckd_data *dedata; 2123 struct LRE_eckd_data *lredata; 2124 struct dcw *dcw; 2125 2126 u32 begcyl, endcyl; 2127 u16 heads, beghead, endhead; 2128 u8 pfx_cmd; 2129 2130 int rc = 0; 2131 int sector = 0; 2132 int dn, d; 2133 2134 2135 /* setup prefix data */ 2136 basepriv = (struct dasd_eckd_private *) basedev->private; 2137 startpriv = (struct dasd_eckd_private *) startdev->private; 2138 dedata = &pfxdata.define_extent; 2139 lredata = &pfxdata.locate_record; 2140 2141 memset(&pfxdata, 0, sizeof(pfxdata)); 2142 pfxdata.format = 1; /* PFX with LRE */ 2143 pfxdata.base_address = basepriv->ned->unit_addr; 2144 pfxdata.base_lss = basepriv->ned->ID; 2145 pfxdata.validity.define_extent = 1; 2146 2147 /* private uid is kept up to date, conf_data may be outdated */ 2148 if (startpriv->uid.type != UA_BASE_DEVICE) { 2149 pfxdata.validity.verify_base = 1; 2150 if (startpriv->uid.type == UA_HYPER_PAV_ALIAS) 2151 pfxdata.validity.hyper_pav = 1; 2152 } 2153 2154 switch (cmd) { 2155 case DASD_ECKD_CCW_READ_TRACK_DATA: 2156 dedata->mask.perm = 0x1; 2157 dedata->attributes.operation = basepriv->attrib.operation; 2158 dedata->blk_size = blksize; 2159 dedata->ga_extended |= 0x42; 2160 lredata->operation.orientation = 0x0; 2161 lredata->operation.operation = 0x0C; 2162 lredata->auxiliary.check_bytes = 0x01; 2163 pfx_cmd = DASD_ECKD_CCW_PFX_READ; 2164 break; 2165 case DASD_ECKD_CCW_WRITE_TRACK_DATA: 2166 dedata->mask.perm = 0x02; 2167 dedata->attributes.operation = basepriv->attrib.operation; 2168 dedata->blk_size = blksize; 2169 rc = check_XRC_on_prefix(&pfxdata, basedev); 2170 dedata->ga_extended |= 0x42; 2171 lredata->operation.orientation = 0x0; 2172 lredata->operation.operation = 0x3F; 2173 lredata->extended_operation = 0x23; 2174 lredata->auxiliary.check_bytes = 0x2; 2175 pfx_cmd = DASD_ECKD_CCW_PFX; 2176 break; 2177 default: 2178 DBF_DEV_EVENT(DBF_ERR, basedev, 2179 "prepare itcw, unknown opcode 0x%x", cmd); 2180 BUG(); 2181 break; 2182 } 2183 if (rc) 2184 return rc; 2185 2186 dedata->attributes.mode = 0x3; /* ECKD */ 2187 2188 heads = basepriv->rdc_data.trk_per_cyl; 2189 begcyl = trk / heads; 2190 beghead = trk % heads; 2191 endcyl = totrk / heads; 2192 endhead = totrk % heads; 2193 2194 /* check for sequential prestage - enhance cylinder range */ 2195 if (dedata->attributes.operation == DASD_SEQ_PRESTAGE || 2196 dedata->attributes.operation == DASD_SEQ_ACCESS) { 2197 2198 if (endcyl + basepriv->attrib.nr_cyl < basepriv->real_cyl) 2199 endcyl += basepriv->attrib.nr_cyl; 2200 else 2201 endcyl = (basepriv->real_cyl - 1); 2202 } 2203 2204 set_ch_t(&dedata->beg_ext, begcyl, beghead); 2205 set_ch_t(&dedata->end_ext, endcyl, endhead); 2206 2207 dedata->ep_format = 0x20; /* records per track is valid */ 2208 dedata->ep_rec_per_track = blk_per_trk; 2209 2210 if (rec_on_trk) { 2211 switch (basepriv->rdc_data.dev_type) { 2212 case 0x3390: 2213 dn = ceil_quot(blksize + 6, 232); 2214 d = 9 + ceil_quot(blksize + 6 * (dn + 1), 34); 2215 sector = (49 + (rec_on_trk - 1) * (10 + d)) / 8; 2216 break; 2217 case 0x3380: 2218 d = 7 + ceil_quot(blksize + 12, 32); 2219 sector = (39 + (rec_on_trk - 1) * (8 + d)) / 7; 2220 break; 2221 } 2222 } 2223 2224 lredata->auxiliary.length_valid = 1; 2225 lredata->auxiliary.length_scope = 1; 2226 lredata->auxiliary.imbedded_ccw_valid = 1; 2227 lredata->length = tlf; 2228 lredata->imbedded_ccw = cmd; 2229 lredata->count = count; 2230 lredata->sector = sector; 2231 set_ch_t(&lredata->seek_addr, begcyl, beghead); 2232 lredata->search_arg.cyl = lredata->seek_addr.cyl; 2233 lredata->search_arg.head = lredata->seek_addr.head; 2234 lredata->search_arg.record = rec_on_trk; 2235 2236 dcw = itcw_add_dcw(itcw, pfx_cmd, 0, 2237 &pfxdata, sizeof(pfxdata), total_data_size); 2238 2239 return rc; 2240 } 2241 2242 static struct dasd_ccw_req *dasd_eckd_build_cp_tpm_track( 2243 struct dasd_device *startdev, 2244 struct dasd_block *block, 2245 struct request *req, 2246 sector_t first_rec, 2247 sector_t last_rec, 2248 sector_t first_trk, 2249 sector_t last_trk, 2250 unsigned int first_offs, 2251 unsigned int last_offs, 2252 unsigned int blk_per_trk, 2253 unsigned int blksize) 2254 { 2255 struct dasd_eckd_private *private; 2256 struct dasd_ccw_req *cqr; 2257 struct req_iterator iter; 2258 struct bio_vec *bv; 2259 char *dst; 2260 unsigned int trkcount, ctidaw; 2261 unsigned char cmd; 2262 struct dasd_device *basedev; 2263 unsigned int tlf; 2264 struct itcw *itcw; 2265 struct tidaw *last_tidaw = NULL; 2266 int itcw_op; 2267 size_t itcw_size; 2268 2269 basedev = block->base; 2270 private = (struct dasd_eckd_private *) basedev->private; 2271 if (rq_data_dir(req) == READ) { 2272 cmd = DASD_ECKD_CCW_READ_TRACK_DATA; 2273 itcw_op = ITCW_OP_READ; 2274 } else if (rq_data_dir(req) == WRITE) { 2275 cmd = DASD_ECKD_CCW_WRITE_TRACK_DATA; 2276 itcw_op = ITCW_OP_WRITE; 2277 } else 2278 return ERR_PTR(-EINVAL); 2279 2280 /* trackbased I/O needs address all memory via TIDAWs, 2281 * not just for 64 bit addresses. This allows us to map 2282 * each segment directly to one tidaw. 2283 */ 2284 trkcount = last_trk - first_trk + 1; 2285 ctidaw = 0; 2286 rq_for_each_segment(bv, req, iter) { 2287 ++ctidaw; 2288 } 2289 2290 /* Allocate the ccw request. */ 2291 itcw_size = itcw_calc_size(0, ctidaw, 0); 2292 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 0, itcw_size, startdev); 2293 if (IS_ERR(cqr)) 2294 return cqr; 2295 2296 cqr->cpmode = 1; 2297 cqr->startdev = startdev; 2298 cqr->memdev = startdev; 2299 cqr->block = block; 2300 cqr->expires = 100*HZ; 2301 cqr->buildclk = get_clock(); 2302 cqr->status = DASD_CQR_FILLED; 2303 cqr->retries = 10; 2304 2305 /* transfer length factor: how many bytes to read from the last track */ 2306 if (first_trk == last_trk) 2307 tlf = last_offs - first_offs + 1; 2308 else 2309 tlf = last_offs + 1; 2310 tlf *= blksize; 2311 2312 itcw = itcw_init(cqr->data, itcw_size, itcw_op, 0, ctidaw, 0); 2313 cqr->cpaddr = itcw_get_tcw(itcw); 2314 2315 if (prepare_itcw(itcw, first_trk, last_trk, 2316 cmd, basedev, startdev, 2317 first_offs + 1, 2318 trkcount, blksize, 2319 (last_rec - first_rec + 1) * blksize, 2320 tlf, blk_per_trk) == -EAGAIN) { 2321 /* Clock not in sync and XRC is enabled. 2322 * Try again later. 2323 */ 2324 dasd_sfree_request(cqr, startdev); 2325 return ERR_PTR(-EAGAIN); 2326 } 2327 2328 /* 2329 * A tidaw can address 4k of memory, but must not cross page boundaries 2330 * We can let the block layer handle this by setting 2331 * blk_queue_segment_boundary to page boundaries and 2332 * blk_max_segment_size to page size when setting up the request queue. 2333 */ 2334 rq_for_each_segment(bv, req, iter) { 2335 dst = page_address(bv->bv_page) + bv->bv_offset; 2336 last_tidaw = itcw_add_tidaw(itcw, 0x00, dst, bv->bv_len); 2337 if (IS_ERR(last_tidaw)) 2338 return (struct dasd_ccw_req *)last_tidaw; 2339 } 2340 2341 last_tidaw->flags |= 0x80; 2342 itcw_finalize(itcw); 2343 2344 if (blk_noretry_request(req) || 2345 block->base->features & DASD_FEATURE_FAILFAST) 2346 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 2347 cqr->startdev = startdev; 2348 cqr->memdev = startdev; 2349 cqr->block = block; 2350 cqr->expires = 5 * 60 * HZ; /* 5 minutes */ 2351 cqr->lpm = private->path_data.ppm; 2352 cqr->retries = 256; 2353 cqr->buildclk = get_clock(); 2354 cqr->status = DASD_CQR_FILLED; 2355 return cqr; 2356 } 2357 2358 static struct dasd_ccw_req *dasd_eckd_build_cp(struct dasd_device *startdev, 2359 struct dasd_block *block, 2360 struct request *req) 2361 { 2362 int tpm, cmdrtd, cmdwtd; 2363 int use_prefix; 2364 #if defined(CONFIG_64BIT) 2365 int fcx_in_css, fcx_in_gneq, fcx_in_features; 2366 #endif 2367 struct dasd_eckd_private *private; 2368 struct dasd_device *basedev; 2369 sector_t first_rec, last_rec; 2370 sector_t first_trk, last_trk; 2371 unsigned int first_offs, last_offs; 2372 unsigned int blk_per_trk, blksize; 2373 int cdlspecial; 2374 struct dasd_ccw_req *cqr; 2375 2376 basedev = block->base; 2377 private = (struct dasd_eckd_private *) basedev->private; 2378 2379 /* Calculate number of blocks/records per track. */ 2380 blksize = block->bp_block; 2381 blk_per_trk = recs_per_track(&private->rdc_data, 0, blksize); 2382 if (blk_per_trk == 0) 2383 return ERR_PTR(-EINVAL); 2384 /* Calculate record id of first and last block. */ 2385 first_rec = first_trk = blk_rq_pos(req) >> block->s2b_shift; 2386 first_offs = sector_div(first_trk, blk_per_trk); 2387 last_rec = last_trk = 2388 (blk_rq_pos(req) + blk_rq_sectors(req) - 1) >> block->s2b_shift; 2389 last_offs = sector_div(last_trk, blk_per_trk); 2390 cdlspecial = (private->uses_cdl && first_rec < 2*blk_per_trk); 2391 2392 /* is transport mode supported? */ 2393 #if defined(CONFIG_64BIT) 2394 fcx_in_css = css_general_characteristics.fcx; 2395 fcx_in_gneq = private->gneq->reserved2[7] & 0x04; 2396 fcx_in_features = private->features.feature[40] & 0x80; 2397 tpm = fcx_in_css && fcx_in_gneq && fcx_in_features; 2398 #else 2399 tpm = 0; 2400 #endif 2401 2402 /* is read track data and write track data in command mode supported? */ 2403 cmdrtd = private->features.feature[9] & 0x20; 2404 cmdwtd = private->features.feature[12] & 0x40; 2405 use_prefix = private->features.feature[8] & 0x01; 2406 2407 cqr = NULL; 2408 if (cdlspecial || dasd_page_cache) { 2409 /* do nothing, just fall through to the cmd mode single case */ 2410 } else if (!dasd_nofcx && tpm && (first_trk == last_trk)) { 2411 cqr = dasd_eckd_build_cp_tpm_track(startdev, block, req, 2412 first_rec, last_rec, 2413 first_trk, last_trk, 2414 first_offs, last_offs, 2415 blk_per_trk, blksize); 2416 if (IS_ERR(cqr) && PTR_ERR(cqr) != -EAGAIN) 2417 cqr = NULL; 2418 } else if (use_prefix && 2419 (((rq_data_dir(req) == READ) && cmdrtd) || 2420 ((rq_data_dir(req) == WRITE) && cmdwtd))) { 2421 cqr = dasd_eckd_build_cp_cmd_track(startdev, block, req, 2422 first_rec, last_rec, 2423 first_trk, last_trk, 2424 first_offs, last_offs, 2425 blk_per_trk, blksize); 2426 if (IS_ERR(cqr) && PTR_ERR(cqr) != -EAGAIN) 2427 cqr = NULL; 2428 } 2429 if (!cqr) 2430 cqr = dasd_eckd_build_cp_cmd_single(startdev, block, req, 2431 first_rec, last_rec, 2432 first_trk, last_trk, 2433 first_offs, last_offs, 2434 blk_per_trk, blksize); 2435 return cqr; 2436 } 2437 2438 static int 2439 dasd_eckd_free_cp(struct dasd_ccw_req *cqr, struct request *req) 2440 { 2441 struct dasd_eckd_private *private; 2442 struct ccw1 *ccw; 2443 struct req_iterator iter; 2444 struct bio_vec *bv; 2445 char *dst, *cda; 2446 unsigned int blksize, blk_per_trk, off; 2447 sector_t recid; 2448 int status; 2449 2450 if (!dasd_page_cache) 2451 goto out; 2452 private = (struct dasd_eckd_private *) cqr->block->base->private; 2453 blksize = cqr->block->bp_block; 2454 blk_per_trk = recs_per_track(&private->rdc_data, 0, blksize); 2455 recid = blk_rq_pos(req) >> cqr->block->s2b_shift; 2456 ccw = cqr->cpaddr; 2457 /* Skip over define extent & locate record. */ 2458 ccw++; 2459 if (private->uses_cdl == 0 || recid > 2*blk_per_trk) 2460 ccw++; 2461 rq_for_each_segment(bv, req, iter) { 2462 dst = page_address(bv->bv_page) + bv->bv_offset; 2463 for (off = 0; off < bv->bv_len; off += blksize) { 2464 /* Skip locate record. */ 2465 if (private->uses_cdl && recid <= 2*blk_per_trk) 2466 ccw++; 2467 if (dst) { 2468 if (ccw->flags & CCW_FLAG_IDA) 2469 cda = *((char **)((addr_t) ccw->cda)); 2470 else 2471 cda = (char *)((addr_t) ccw->cda); 2472 if (dst != cda) { 2473 if (rq_data_dir(req) == READ) 2474 memcpy(dst, cda, bv->bv_len); 2475 kmem_cache_free(dasd_page_cache, 2476 (void *)((addr_t)cda & PAGE_MASK)); 2477 } 2478 dst = NULL; 2479 } 2480 ccw++; 2481 recid++; 2482 } 2483 } 2484 out: 2485 status = cqr->status == DASD_CQR_DONE; 2486 dasd_sfree_request(cqr, cqr->memdev); 2487 return status; 2488 } 2489 2490 /* 2491 * Modify ccw/tcw in cqr so it can be started on a base device. 2492 * 2493 * Note that this is not enough to restart the cqr! 2494 * Either reset cqr->startdev as well (summary unit check handling) 2495 * or restart via separate cqr (as in ERP handling). 2496 */ 2497 void dasd_eckd_reset_ccw_to_base_io(struct dasd_ccw_req *cqr) 2498 { 2499 struct ccw1 *ccw; 2500 struct PFX_eckd_data *pfxdata; 2501 struct tcw *tcw; 2502 struct tccb *tccb; 2503 struct dcw *dcw; 2504 2505 if (cqr->cpmode == 1) { 2506 tcw = cqr->cpaddr; 2507 tccb = tcw_get_tccb(tcw); 2508 dcw = (struct dcw *)&tccb->tca[0]; 2509 pfxdata = (struct PFX_eckd_data *)&dcw->cd[0]; 2510 pfxdata->validity.verify_base = 0; 2511 pfxdata->validity.hyper_pav = 0; 2512 } else { 2513 ccw = cqr->cpaddr; 2514 pfxdata = cqr->data; 2515 if (ccw->cmd_code == DASD_ECKD_CCW_PFX) { 2516 pfxdata->validity.verify_base = 0; 2517 pfxdata->validity.hyper_pav = 0; 2518 } 2519 } 2520 } 2521 2522 #define DASD_ECKD_CHANQ_MAX_SIZE 4 2523 2524 static struct dasd_ccw_req *dasd_eckd_build_alias_cp(struct dasd_device *base, 2525 struct dasd_block *block, 2526 struct request *req) 2527 { 2528 struct dasd_eckd_private *private; 2529 struct dasd_device *startdev; 2530 unsigned long flags; 2531 struct dasd_ccw_req *cqr; 2532 2533 startdev = dasd_alias_get_start_dev(base); 2534 if (!startdev) 2535 startdev = base; 2536 private = (struct dasd_eckd_private *) startdev->private; 2537 if (private->count >= DASD_ECKD_CHANQ_MAX_SIZE) 2538 return ERR_PTR(-EBUSY); 2539 2540 spin_lock_irqsave(get_ccwdev_lock(startdev->cdev), flags); 2541 private->count++; 2542 cqr = dasd_eckd_build_cp(startdev, block, req); 2543 if (IS_ERR(cqr)) 2544 private->count--; 2545 spin_unlock_irqrestore(get_ccwdev_lock(startdev->cdev), flags); 2546 return cqr; 2547 } 2548 2549 static int dasd_eckd_free_alias_cp(struct dasd_ccw_req *cqr, 2550 struct request *req) 2551 { 2552 struct dasd_eckd_private *private; 2553 unsigned long flags; 2554 2555 spin_lock_irqsave(get_ccwdev_lock(cqr->memdev->cdev), flags); 2556 private = (struct dasd_eckd_private *) cqr->memdev->private; 2557 private->count--; 2558 spin_unlock_irqrestore(get_ccwdev_lock(cqr->memdev->cdev), flags); 2559 return dasd_eckd_free_cp(cqr, req); 2560 } 2561 2562 static int 2563 dasd_eckd_fill_info(struct dasd_device * device, 2564 struct dasd_information2_t * info) 2565 { 2566 struct dasd_eckd_private *private; 2567 2568 private = (struct dasd_eckd_private *) device->private; 2569 info->label_block = 2; 2570 info->FBA_layout = private->uses_cdl ? 0 : 1; 2571 info->format = private->uses_cdl ? DASD_FORMAT_CDL : DASD_FORMAT_LDL; 2572 info->characteristics_size = sizeof(struct dasd_eckd_characteristics); 2573 memcpy(info->characteristics, &private->rdc_data, 2574 sizeof(struct dasd_eckd_characteristics)); 2575 info->confdata_size = min((unsigned long)private->conf_len, 2576 sizeof(info->configuration_data)); 2577 memcpy(info->configuration_data, private->conf_data, 2578 info->confdata_size); 2579 return 0; 2580 } 2581 2582 /* 2583 * SECTION: ioctl functions for eckd devices. 2584 */ 2585 2586 /* 2587 * Release device ioctl. 2588 * Buils a channel programm to releases a prior reserved 2589 * (see dasd_eckd_reserve) device. 2590 */ 2591 static int 2592 dasd_eckd_release(struct dasd_device *device) 2593 { 2594 struct dasd_ccw_req *cqr; 2595 int rc; 2596 struct ccw1 *ccw; 2597 2598 if (!capable(CAP_SYS_ADMIN)) 2599 return -EACCES; 2600 2601 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 1, 32, device); 2602 if (IS_ERR(cqr)) { 2603 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 2604 "Could not allocate initialization request"); 2605 return PTR_ERR(cqr); 2606 } 2607 ccw = cqr->cpaddr; 2608 ccw->cmd_code = DASD_ECKD_CCW_RELEASE; 2609 ccw->flags |= CCW_FLAG_SLI; 2610 ccw->count = 32; 2611 ccw->cda = (__u32)(addr_t) cqr->data; 2612 cqr->startdev = device; 2613 cqr->memdev = device; 2614 clear_bit(DASD_CQR_FLAGS_USE_ERP, &cqr->flags); 2615 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 2616 cqr->retries = 2; /* set retry counter to enable basic ERP */ 2617 cqr->expires = 2 * HZ; 2618 cqr->buildclk = get_clock(); 2619 cqr->status = DASD_CQR_FILLED; 2620 2621 rc = dasd_sleep_on_immediatly(cqr); 2622 2623 dasd_sfree_request(cqr, cqr->memdev); 2624 return rc; 2625 } 2626 2627 /* 2628 * Reserve device ioctl. 2629 * Options are set to 'synchronous wait for interrupt' and 2630 * 'timeout the request'. This leads to a terminate IO if 2631 * the interrupt is outstanding for a certain time. 2632 */ 2633 static int 2634 dasd_eckd_reserve(struct dasd_device *device) 2635 { 2636 struct dasd_ccw_req *cqr; 2637 int rc; 2638 struct ccw1 *ccw; 2639 2640 if (!capable(CAP_SYS_ADMIN)) 2641 return -EACCES; 2642 2643 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 1, 32, device); 2644 if (IS_ERR(cqr)) { 2645 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 2646 "Could not allocate initialization request"); 2647 return PTR_ERR(cqr); 2648 } 2649 ccw = cqr->cpaddr; 2650 ccw->cmd_code = DASD_ECKD_CCW_RESERVE; 2651 ccw->flags |= CCW_FLAG_SLI; 2652 ccw->count = 32; 2653 ccw->cda = (__u32)(addr_t) cqr->data; 2654 cqr->startdev = device; 2655 cqr->memdev = device; 2656 clear_bit(DASD_CQR_FLAGS_USE_ERP, &cqr->flags); 2657 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 2658 cqr->retries = 2; /* set retry counter to enable basic ERP */ 2659 cqr->expires = 2 * HZ; 2660 cqr->buildclk = get_clock(); 2661 cqr->status = DASD_CQR_FILLED; 2662 2663 rc = dasd_sleep_on_immediatly(cqr); 2664 2665 dasd_sfree_request(cqr, cqr->memdev); 2666 return rc; 2667 } 2668 2669 /* 2670 * Steal lock ioctl - unconditional reserve device. 2671 * Buils a channel programm to break a device's reservation. 2672 * (unconditional reserve) 2673 */ 2674 static int 2675 dasd_eckd_steal_lock(struct dasd_device *device) 2676 { 2677 struct dasd_ccw_req *cqr; 2678 int rc; 2679 struct ccw1 *ccw; 2680 2681 if (!capable(CAP_SYS_ADMIN)) 2682 return -EACCES; 2683 2684 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 1, 32, device); 2685 if (IS_ERR(cqr)) { 2686 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 2687 "Could not allocate initialization request"); 2688 return PTR_ERR(cqr); 2689 } 2690 ccw = cqr->cpaddr; 2691 ccw->cmd_code = DASD_ECKD_CCW_SLCK; 2692 ccw->flags |= CCW_FLAG_SLI; 2693 ccw->count = 32; 2694 ccw->cda = (__u32)(addr_t) cqr->data; 2695 cqr->startdev = device; 2696 cqr->memdev = device; 2697 clear_bit(DASD_CQR_FLAGS_USE_ERP, &cqr->flags); 2698 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 2699 cqr->retries = 2; /* set retry counter to enable basic ERP */ 2700 cqr->expires = 2 * HZ; 2701 cqr->buildclk = get_clock(); 2702 cqr->status = DASD_CQR_FILLED; 2703 2704 rc = dasd_sleep_on_immediatly(cqr); 2705 2706 dasd_sfree_request(cqr, cqr->memdev); 2707 return rc; 2708 } 2709 2710 /* 2711 * Read performance statistics 2712 */ 2713 static int 2714 dasd_eckd_performance(struct dasd_device *device, void __user *argp) 2715 { 2716 struct dasd_psf_prssd_data *prssdp; 2717 struct dasd_rssd_perf_stats_t *stats; 2718 struct dasd_ccw_req *cqr; 2719 struct ccw1 *ccw; 2720 int rc; 2721 2722 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 1 /* PSF */ + 1 /* RSSD */, 2723 (sizeof(struct dasd_psf_prssd_data) + 2724 sizeof(struct dasd_rssd_perf_stats_t)), 2725 device); 2726 if (IS_ERR(cqr)) { 2727 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 2728 "Could not allocate initialization request"); 2729 return PTR_ERR(cqr); 2730 } 2731 cqr->startdev = device; 2732 cqr->memdev = device; 2733 cqr->retries = 0; 2734 clear_bit(DASD_CQR_FLAGS_USE_ERP, &cqr->flags); 2735 cqr->expires = 10 * HZ; 2736 2737 /* Prepare for Read Subsystem Data */ 2738 prssdp = (struct dasd_psf_prssd_data *) cqr->data; 2739 memset(prssdp, 0, sizeof(struct dasd_psf_prssd_data)); 2740 prssdp->order = PSF_ORDER_PRSSD; 2741 prssdp->suborder = 0x01; /* Performance Statistics */ 2742 prssdp->varies[1] = 0x01; /* Perf Statistics for the Subsystem */ 2743 2744 ccw = cqr->cpaddr; 2745 ccw->cmd_code = DASD_ECKD_CCW_PSF; 2746 ccw->count = sizeof(struct dasd_psf_prssd_data); 2747 ccw->flags |= CCW_FLAG_CC; 2748 ccw->cda = (__u32)(addr_t) prssdp; 2749 2750 /* Read Subsystem Data - Performance Statistics */ 2751 stats = (struct dasd_rssd_perf_stats_t *) (prssdp + 1); 2752 memset(stats, 0, sizeof(struct dasd_rssd_perf_stats_t)); 2753 2754 ccw++; 2755 ccw->cmd_code = DASD_ECKD_CCW_RSSD; 2756 ccw->count = sizeof(struct dasd_rssd_perf_stats_t); 2757 ccw->cda = (__u32)(addr_t) stats; 2758 2759 cqr->buildclk = get_clock(); 2760 cqr->status = DASD_CQR_FILLED; 2761 rc = dasd_sleep_on(cqr); 2762 if (rc == 0) { 2763 prssdp = (struct dasd_psf_prssd_data *) cqr->data; 2764 stats = (struct dasd_rssd_perf_stats_t *) (prssdp + 1); 2765 if (copy_to_user(argp, stats, 2766 sizeof(struct dasd_rssd_perf_stats_t))) 2767 rc = -EFAULT; 2768 } 2769 dasd_sfree_request(cqr, cqr->memdev); 2770 return rc; 2771 } 2772 2773 /* 2774 * Get attributes (cache operations) 2775 * Returnes the cache attributes used in Define Extend (DE). 2776 */ 2777 static int 2778 dasd_eckd_get_attrib(struct dasd_device *device, void __user *argp) 2779 { 2780 struct dasd_eckd_private *private = 2781 (struct dasd_eckd_private *)device->private; 2782 struct attrib_data_t attrib = private->attrib; 2783 int rc; 2784 2785 if (!capable(CAP_SYS_ADMIN)) 2786 return -EACCES; 2787 if (!argp) 2788 return -EINVAL; 2789 2790 rc = 0; 2791 if (copy_to_user(argp, (long *) &attrib, 2792 sizeof(struct attrib_data_t))) 2793 rc = -EFAULT; 2794 2795 return rc; 2796 } 2797 2798 /* 2799 * Set attributes (cache operations) 2800 * Stores the attributes for cache operation to be used in Define Extend (DE). 2801 */ 2802 static int 2803 dasd_eckd_set_attrib(struct dasd_device *device, void __user *argp) 2804 { 2805 struct dasd_eckd_private *private = 2806 (struct dasd_eckd_private *)device->private; 2807 struct attrib_data_t attrib; 2808 2809 if (!capable(CAP_SYS_ADMIN)) 2810 return -EACCES; 2811 if (!argp) 2812 return -EINVAL; 2813 2814 if (copy_from_user(&attrib, argp, sizeof(struct attrib_data_t))) 2815 return -EFAULT; 2816 private->attrib = attrib; 2817 2818 dev_info(&device->cdev->dev, 2819 "The DASD cache mode was set to %x (%i cylinder prestage)\n", 2820 private->attrib.operation, private->attrib.nr_cyl); 2821 return 0; 2822 } 2823 2824 /* 2825 * Issue syscall I/O to EMC Symmetrix array. 2826 * CCWs are PSF and RSSD 2827 */ 2828 static int dasd_symm_io(struct dasd_device *device, void __user *argp) 2829 { 2830 struct dasd_symmio_parms usrparm; 2831 char *psf_data, *rssd_result; 2832 struct dasd_ccw_req *cqr; 2833 struct ccw1 *ccw; 2834 int rc; 2835 2836 /* Copy parms from caller */ 2837 rc = -EFAULT; 2838 if (copy_from_user(&usrparm, argp, sizeof(usrparm))) 2839 goto out; 2840 #ifndef CONFIG_64BIT 2841 /* Make sure pointers are sane even on 31 bit. */ 2842 if ((usrparm.psf_data >> 32) != 0 || (usrparm.rssd_result >> 32) != 0) { 2843 rc = -EINVAL; 2844 goto out; 2845 } 2846 #endif 2847 /* alloc I/O data area */ 2848 psf_data = kzalloc(usrparm.psf_data_len, GFP_KERNEL | GFP_DMA); 2849 rssd_result = kzalloc(usrparm.rssd_result_len, GFP_KERNEL | GFP_DMA); 2850 if (!psf_data || !rssd_result) { 2851 rc = -ENOMEM; 2852 goto out_free; 2853 } 2854 2855 /* get syscall header from user space */ 2856 rc = -EFAULT; 2857 if (copy_from_user(psf_data, 2858 (void __user *)(unsigned long) usrparm.psf_data, 2859 usrparm.psf_data_len)) 2860 goto out_free; 2861 2862 /* sanity check on syscall header */ 2863 if (psf_data[0] != 0x17 && psf_data[1] != 0xce) { 2864 rc = -EINVAL; 2865 goto out_free; 2866 } 2867 2868 /* setup CCWs for PSF + RSSD */ 2869 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 2 , 0, device); 2870 if (IS_ERR(cqr)) { 2871 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 2872 "Could not allocate initialization request"); 2873 rc = PTR_ERR(cqr); 2874 goto out_free; 2875 } 2876 2877 cqr->startdev = device; 2878 cqr->memdev = device; 2879 cqr->retries = 3; 2880 cqr->expires = 10 * HZ; 2881 cqr->buildclk = get_clock(); 2882 cqr->status = DASD_CQR_FILLED; 2883 2884 /* Build the ccws */ 2885 ccw = cqr->cpaddr; 2886 2887 /* PSF ccw */ 2888 ccw->cmd_code = DASD_ECKD_CCW_PSF; 2889 ccw->count = usrparm.psf_data_len; 2890 ccw->flags |= CCW_FLAG_CC; 2891 ccw->cda = (__u32)(addr_t) psf_data; 2892 2893 ccw++; 2894 2895 /* RSSD ccw */ 2896 ccw->cmd_code = DASD_ECKD_CCW_RSSD; 2897 ccw->count = usrparm.rssd_result_len; 2898 ccw->flags = CCW_FLAG_SLI ; 2899 ccw->cda = (__u32)(addr_t) rssd_result; 2900 2901 rc = dasd_sleep_on(cqr); 2902 if (rc) 2903 goto out_sfree; 2904 2905 rc = -EFAULT; 2906 if (copy_to_user((void __user *)(unsigned long) usrparm.rssd_result, 2907 rssd_result, usrparm.rssd_result_len)) 2908 goto out_sfree; 2909 rc = 0; 2910 2911 out_sfree: 2912 dasd_sfree_request(cqr, cqr->memdev); 2913 out_free: 2914 kfree(rssd_result); 2915 kfree(psf_data); 2916 out: 2917 DBF_DEV_EVENT(DBF_WARNING, device, "Symmetrix ioctl: rc=%d", rc); 2918 return rc; 2919 } 2920 2921 static int 2922 dasd_eckd_ioctl(struct dasd_block *block, unsigned int cmd, void __user *argp) 2923 { 2924 struct dasd_device *device = block->base; 2925 2926 switch (cmd) { 2927 case BIODASDGATTR: 2928 return dasd_eckd_get_attrib(device, argp); 2929 case BIODASDSATTR: 2930 return dasd_eckd_set_attrib(device, argp); 2931 case BIODASDPSRD: 2932 return dasd_eckd_performance(device, argp); 2933 case BIODASDRLSE: 2934 return dasd_eckd_release(device); 2935 case BIODASDRSRV: 2936 return dasd_eckd_reserve(device); 2937 case BIODASDSLCK: 2938 return dasd_eckd_steal_lock(device); 2939 case BIODASDSYMMIO: 2940 return dasd_symm_io(device, argp); 2941 default: 2942 return -ENOIOCTLCMD; 2943 } 2944 } 2945 2946 /* 2947 * Dump the range of CCWs into 'page' buffer 2948 * and return number of printed chars. 2949 */ 2950 static int 2951 dasd_eckd_dump_ccw_range(struct ccw1 *from, struct ccw1 *to, char *page) 2952 { 2953 int len, count; 2954 char *datap; 2955 2956 len = 0; 2957 while (from <= to) { 2958 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 2959 " CCW %p: %08X %08X DAT:", 2960 from, ((int *) from)[0], ((int *) from)[1]); 2961 2962 /* get pointer to data (consider IDALs) */ 2963 if (from->flags & CCW_FLAG_IDA) 2964 datap = (char *) *((addr_t *) (addr_t) from->cda); 2965 else 2966 datap = (char *) ((addr_t) from->cda); 2967 2968 /* dump data (max 32 bytes) */ 2969 for (count = 0; count < from->count && count < 32; count++) { 2970 if (count % 8 == 0) len += sprintf(page + len, " "); 2971 if (count % 4 == 0) len += sprintf(page + len, " "); 2972 len += sprintf(page + len, "%02x", datap[count]); 2973 } 2974 len += sprintf(page + len, "\n"); 2975 from++; 2976 } 2977 return len; 2978 } 2979 2980 static void 2981 dasd_eckd_dump_sense_dbf(struct dasd_device *device, struct irb *irb, 2982 char *reason) 2983 { 2984 u64 *sense; 2985 2986 sense = (u64 *) dasd_get_sense(irb); 2987 if (sense) { 2988 DBF_DEV_EVENT(DBF_EMERG, device, 2989 "%s: %s %02x%02x%02x %016llx %016llx %016llx " 2990 "%016llx", reason, 2991 scsw_is_tm(&irb->scsw) ? "t" : "c", 2992 scsw_cc(&irb->scsw), scsw_cstat(&irb->scsw), 2993 scsw_dstat(&irb->scsw), sense[0], sense[1], 2994 sense[2], sense[3]); 2995 } else { 2996 DBF_DEV_EVENT(DBF_EMERG, device, "%s", 2997 "SORRY - NO VALID SENSE AVAILABLE\n"); 2998 } 2999 } 3000 3001 /* 3002 * Print sense data and related channel program. 3003 * Parts are printed because printk buffer is only 1024 bytes. 3004 */ 3005 static void dasd_eckd_dump_sense_ccw(struct dasd_device *device, 3006 struct dasd_ccw_req *req, struct irb *irb) 3007 { 3008 char *page; 3009 struct ccw1 *first, *last, *fail, *from, *to; 3010 int len, sl, sct; 3011 3012 page = (char *) get_zeroed_page(GFP_ATOMIC); 3013 if (page == NULL) { 3014 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 3015 "No memory to dump sense data\n"); 3016 return; 3017 } 3018 /* dump the sense data */ 3019 len = sprintf(page, KERN_ERR PRINTK_HEADER 3020 " I/O status report for device %s:\n", 3021 dev_name(&device->cdev->dev)); 3022 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3023 " in req: %p CS: 0x%02X DS: 0x%02X CC: 0x%02X RC: %d\n", 3024 req, scsw_cstat(&irb->scsw), scsw_dstat(&irb->scsw), 3025 scsw_cc(&irb->scsw), req->intrc); 3026 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3027 " device %s: Failing CCW: %p\n", 3028 dev_name(&device->cdev->dev), 3029 (void *) (addr_t) irb->scsw.cmd.cpa); 3030 if (irb->esw.esw0.erw.cons) { 3031 for (sl = 0; sl < 4; sl++) { 3032 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3033 " Sense(hex) %2d-%2d:", 3034 (8 * sl), ((8 * sl) + 7)); 3035 3036 for (sct = 0; sct < 8; sct++) { 3037 len += sprintf(page + len, " %02x", 3038 irb->ecw[8 * sl + sct]); 3039 } 3040 len += sprintf(page + len, "\n"); 3041 } 3042 3043 if (irb->ecw[27] & DASD_SENSE_BIT_0) { 3044 /* 24 Byte Sense Data */ 3045 sprintf(page + len, KERN_ERR PRINTK_HEADER 3046 " 24 Byte: %x MSG %x, " 3047 "%s MSGb to SYSOP\n", 3048 irb->ecw[7] >> 4, irb->ecw[7] & 0x0f, 3049 irb->ecw[1] & 0x10 ? "" : "no"); 3050 } else { 3051 /* 32 Byte Sense Data */ 3052 sprintf(page + len, KERN_ERR PRINTK_HEADER 3053 " 32 Byte: Format: %x " 3054 "Exception class %x\n", 3055 irb->ecw[6] & 0x0f, irb->ecw[22] >> 4); 3056 } 3057 } else { 3058 sprintf(page + len, KERN_ERR PRINTK_HEADER 3059 " SORRY - NO VALID SENSE AVAILABLE\n"); 3060 } 3061 printk("%s", page); 3062 3063 if (req) { 3064 /* req == NULL for unsolicited interrupts */ 3065 /* dump the Channel Program (max 140 Bytes per line) */ 3066 /* Count CCW and print first CCWs (maximum 1024 % 140 = 7) */ 3067 first = req->cpaddr; 3068 for (last = first; last->flags & (CCW_FLAG_CC | CCW_FLAG_DC); last++); 3069 to = min(first + 6, last); 3070 len = sprintf(page, KERN_ERR PRINTK_HEADER 3071 " Related CP in req: %p\n", req); 3072 dasd_eckd_dump_ccw_range(first, to, page + len); 3073 printk("%s", page); 3074 3075 /* print failing CCW area (maximum 4) */ 3076 /* scsw->cda is either valid or zero */ 3077 len = 0; 3078 from = ++to; 3079 fail = (struct ccw1 *)(addr_t) 3080 irb->scsw.cmd.cpa; /* failing CCW */ 3081 if (from < fail - 2) { 3082 from = fail - 2; /* there is a gap - print header */ 3083 len += sprintf(page, KERN_ERR PRINTK_HEADER "......\n"); 3084 } 3085 to = min(fail + 1, last); 3086 len += dasd_eckd_dump_ccw_range(from, to, page + len); 3087 3088 /* print last CCWs (maximum 2) */ 3089 from = max(from, ++to); 3090 if (from < last - 1) { 3091 from = last - 1; /* there is a gap - print header */ 3092 len += sprintf(page + len, KERN_ERR PRINTK_HEADER "......\n"); 3093 } 3094 len += dasd_eckd_dump_ccw_range(from, last, page + len); 3095 if (len > 0) 3096 printk("%s", page); 3097 } 3098 free_page((unsigned long) page); 3099 } 3100 3101 3102 /* 3103 * Print sense data from a tcw. 3104 */ 3105 static void dasd_eckd_dump_sense_tcw(struct dasd_device *device, 3106 struct dasd_ccw_req *req, struct irb *irb) 3107 { 3108 char *page; 3109 int len, sl, sct, residual; 3110 3111 struct tsb *tsb; 3112 u8 *sense; 3113 3114 3115 page = (char *) get_zeroed_page(GFP_ATOMIC); 3116 if (page == NULL) { 3117 DBF_DEV_EVENT(DBF_WARNING, device, " %s", 3118 "No memory to dump sense data"); 3119 return; 3120 } 3121 /* dump the sense data */ 3122 len = sprintf(page, KERN_ERR PRINTK_HEADER 3123 " I/O status report for device %s:\n", 3124 dev_name(&device->cdev->dev)); 3125 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3126 " in req: %p CS: 0x%02X DS: 0x%02X CC: 0x%02X RC: %d " 3127 "fcxs: 0x%02X schxs: 0x%02X\n", req, 3128 scsw_cstat(&irb->scsw), scsw_dstat(&irb->scsw), 3129 scsw_cc(&irb->scsw), req->intrc, 3130 irb->scsw.tm.fcxs, irb->scsw.tm.schxs); 3131 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3132 " device %s: Failing TCW: %p\n", 3133 dev_name(&device->cdev->dev), 3134 (void *) (addr_t) irb->scsw.tm.tcw); 3135 3136 tsb = NULL; 3137 sense = NULL; 3138 if (irb->scsw.tm.tcw) 3139 tsb = tcw_get_tsb( 3140 (struct tcw *)(unsigned long)irb->scsw.tm.tcw); 3141 3142 if (tsb && (irb->scsw.tm.fcxs == 0x01)) { 3143 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3144 " tsb->length %d\n", tsb->length); 3145 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3146 " tsb->flags %x\n", tsb->flags); 3147 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3148 " tsb->dcw_offset %d\n", tsb->dcw_offset); 3149 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3150 " tsb->count %d\n", tsb->count); 3151 residual = tsb->count - 28; 3152 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3153 " residual %d\n", residual); 3154 3155 switch (tsb->flags & 0x07) { 3156 case 1: /* tsa_iostat */ 3157 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3158 " tsb->tsa.iostat.dev_time %d\n", 3159 tsb->tsa.iostat.dev_time); 3160 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3161 " tsb->tsa.iostat.def_time %d\n", 3162 tsb->tsa.iostat.def_time); 3163 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3164 " tsb->tsa.iostat.queue_time %d\n", 3165 tsb->tsa.iostat.queue_time); 3166 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3167 " tsb->tsa.iostat.dev_busy_time %d\n", 3168 tsb->tsa.iostat.dev_busy_time); 3169 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3170 " tsb->tsa.iostat.dev_act_time %d\n", 3171 tsb->tsa.iostat.dev_act_time); 3172 sense = tsb->tsa.iostat.sense; 3173 break; 3174 case 2: /* ts_ddpc */ 3175 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3176 " tsb->tsa.ddpc.rc %d\n", tsb->tsa.ddpc.rc); 3177 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3178 " tsb->tsa.ddpc.rcq: "); 3179 for (sl = 0; sl < 16; sl++) { 3180 for (sct = 0; sct < 8; sct++) { 3181 len += sprintf(page + len, " %02x", 3182 tsb->tsa.ddpc.rcq[sl]); 3183 } 3184 len += sprintf(page + len, "\n"); 3185 } 3186 sense = tsb->tsa.ddpc.sense; 3187 break; 3188 case 3: /* tsa_intrg */ 3189 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3190 " tsb->tsa.intrg.: not supportet yet \n"); 3191 break; 3192 } 3193 3194 if (sense) { 3195 for (sl = 0; sl < 4; sl++) { 3196 len += sprintf(page + len, 3197 KERN_ERR PRINTK_HEADER 3198 " Sense(hex) %2d-%2d:", 3199 (8 * sl), ((8 * sl) + 7)); 3200 for (sct = 0; sct < 8; sct++) { 3201 len += sprintf(page + len, " %02x", 3202 sense[8 * sl + sct]); 3203 } 3204 len += sprintf(page + len, "\n"); 3205 } 3206 3207 if (sense[27] & DASD_SENSE_BIT_0) { 3208 /* 24 Byte Sense Data */ 3209 sprintf(page + len, KERN_ERR PRINTK_HEADER 3210 " 24 Byte: %x MSG %x, " 3211 "%s MSGb to SYSOP\n", 3212 sense[7] >> 4, sense[7] & 0x0f, 3213 sense[1] & 0x10 ? "" : "no"); 3214 } else { 3215 /* 32 Byte Sense Data */ 3216 sprintf(page + len, KERN_ERR PRINTK_HEADER 3217 " 32 Byte: Format: %x " 3218 "Exception class %x\n", 3219 sense[6] & 0x0f, sense[22] >> 4); 3220 } 3221 } else { 3222 sprintf(page + len, KERN_ERR PRINTK_HEADER 3223 " SORRY - NO VALID SENSE AVAILABLE\n"); 3224 } 3225 } else { 3226 sprintf(page + len, KERN_ERR PRINTK_HEADER 3227 " SORRY - NO TSB DATA AVAILABLE\n"); 3228 } 3229 printk("%s", page); 3230 free_page((unsigned long) page); 3231 } 3232 3233 static void dasd_eckd_dump_sense(struct dasd_device *device, 3234 struct dasd_ccw_req *req, struct irb *irb) 3235 { 3236 if (req && scsw_is_tm(&req->irb.scsw)) 3237 dasd_eckd_dump_sense_tcw(device, req, irb); 3238 else 3239 dasd_eckd_dump_sense_ccw(device, req, irb); 3240 } 3241 3242 int dasd_eckd_pm_freeze(struct dasd_device *device) 3243 { 3244 /* 3245 * the device should be disconnected from our LCU structure 3246 * on restore we will reconnect it and reread LCU specific 3247 * information like PAV support that might have changed 3248 */ 3249 dasd_alias_remove_device(device); 3250 dasd_alias_disconnect_device_from_lcu(device); 3251 3252 return 0; 3253 } 3254 3255 int dasd_eckd_restore_device(struct dasd_device *device) 3256 { 3257 struct dasd_eckd_private *private; 3258 struct dasd_eckd_characteristics temp_rdc_data; 3259 int is_known, rc; 3260 struct dasd_uid temp_uid; 3261 unsigned long flags; 3262 3263 private = (struct dasd_eckd_private *) device->private; 3264 3265 /* Read Configuration Data */ 3266 rc = dasd_eckd_read_conf(device); 3267 if (rc) 3268 goto out_err; 3269 3270 /* Generate device unique id and register in devmap */ 3271 rc = dasd_eckd_generate_uid(device, &private->uid); 3272 dasd_get_uid(device->cdev, &temp_uid); 3273 if (memcmp(&private->uid, &temp_uid, sizeof(struct dasd_uid)) != 0) 3274 dev_err(&device->cdev->dev, "The UID of the DASD has " 3275 "changed\n"); 3276 if (rc) 3277 goto out_err; 3278 dasd_set_uid(device->cdev, &private->uid); 3279 3280 /* register lcu with alias handling, enable PAV if this is a new lcu */ 3281 is_known = dasd_alias_make_device_known_to_lcu(device); 3282 if (is_known < 0) 3283 return is_known; 3284 if (!is_known) { 3285 /* new lcu found */ 3286 rc = dasd_eckd_validate_server(device); /* will switch pav on */ 3287 if (rc) 3288 goto out_err; 3289 } 3290 3291 /* Read Feature Codes */ 3292 dasd_eckd_read_features(device); 3293 3294 /* Read Device Characteristics */ 3295 rc = dasd_generic_read_dev_chars(device, DASD_ECKD_MAGIC, 3296 &temp_rdc_data, 64); 3297 if (rc) { 3298 DBF_EVENT_DEVID(DBF_WARNING, device->cdev, 3299 "Read device characteristic failed, rc=%d", rc); 3300 goto out_err; 3301 } 3302 spin_lock_irqsave(get_ccwdev_lock(device->cdev), flags); 3303 memcpy(&private->rdc_data, &temp_rdc_data, sizeof(temp_rdc_data)); 3304 spin_unlock_irqrestore(get_ccwdev_lock(device->cdev), flags); 3305 3306 /* add device to alias management */ 3307 dasd_alias_add_device(device); 3308 3309 return 0; 3310 3311 out_err: 3312 return -1; 3313 } 3314 3315 static struct ccw_driver dasd_eckd_driver = { 3316 .name = "dasd-eckd", 3317 .owner = THIS_MODULE, 3318 .ids = dasd_eckd_ids, 3319 .probe = dasd_eckd_probe, 3320 .remove = dasd_generic_remove, 3321 .set_offline = dasd_generic_set_offline, 3322 .set_online = dasd_eckd_set_online, 3323 .notify = dasd_generic_notify, 3324 .freeze = dasd_generic_pm_freeze, 3325 .thaw = dasd_generic_restore_device, 3326 .restore = dasd_generic_restore_device, 3327 }; 3328 3329 /* 3330 * max_blocks is dependent on the amount of storage that is available 3331 * in the static io buffer for each device. Currently each device has 3332 * 8192 bytes (=2 pages). For 64 bit one dasd_mchunkt_t structure has 3333 * 24 bytes, the struct dasd_ccw_req has 136 bytes and each block can use 3334 * up to 16 bytes (8 for the ccw and 8 for the idal pointer). In 3335 * addition we have one define extent ccw + 16 bytes of data and one 3336 * locate record ccw + 16 bytes of data. That makes: 3337 * (8192 - 24 - 136 - 8 - 16 - 8 - 16) / 16 = 499 blocks at maximum. 3338 * We want to fit two into the available memory so that we can immediately 3339 * start the next request if one finishes off. That makes 249.5 blocks 3340 * for one request. Give a little safety and the result is 240. 3341 */ 3342 static struct dasd_discipline dasd_eckd_discipline = { 3343 .owner = THIS_MODULE, 3344 .name = "ECKD", 3345 .ebcname = "ECKD", 3346 .max_blocks = 240, 3347 .check_device = dasd_eckd_check_characteristics, 3348 .uncheck_device = dasd_eckd_uncheck_device, 3349 .do_analysis = dasd_eckd_do_analysis, 3350 .ready_to_online = dasd_eckd_ready_to_online, 3351 .online_to_ready = dasd_eckd_online_to_ready, 3352 .fill_geometry = dasd_eckd_fill_geometry, 3353 .start_IO = dasd_start_IO, 3354 .term_IO = dasd_term_IO, 3355 .handle_terminated_request = dasd_eckd_handle_terminated_request, 3356 .format_device = dasd_eckd_format_device, 3357 .erp_action = dasd_eckd_erp_action, 3358 .erp_postaction = dasd_eckd_erp_postaction, 3359 .handle_unsolicited_interrupt = dasd_eckd_handle_unsolicited_interrupt, 3360 .build_cp = dasd_eckd_build_alias_cp, 3361 .free_cp = dasd_eckd_free_alias_cp, 3362 .dump_sense = dasd_eckd_dump_sense, 3363 .dump_sense_dbf = dasd_eckd_dump_sense_dbf, 3364 .fill_info = dasd_eckd_fill_info, 3365 .ioctl = dasd_eckd_ioctl, 3366 .freeze = dasd_eckd_pm_freeze, 3367 .restore = dasd_eckd_restore_device, 3368 }; 3369 3370 static int __init 3371 dasd_eckd_init(void) 3372 { 3373 int ret; 3374 3375 ASCEBC(dasd_eckd_discipline.ebcname, 4); 3376 ret = ccw_driver_register(&dasd_eckd_driver); 3377 if (!ret) 3378 wait_for_device_probe(); 3379 3380 return ret; 3381 } 3382 3383 static void __exit 3384 dasd_eckd_cleanup(void) 3385 { 3386 ccw_driver_unregister(&dasd_eckd_driver); 3387 } 3388 3389 module_init(dasd_eckd_init); 3390 module_exit(dasd_eckd_cleanup); 3391