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 void 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 } 1080 1081 /* 1082 * Check device characteristics. 1083 * If the device is accessible using ECKD discipline, the device is enabled. 1084 */ 1085 static int 1086 dasd_eckd_check_characteristics(struct dasd_device *device) 1087 { 1088 struct dasd_eckd_private *private; 1089 struct dasd_block *block; 1090 int is_known, rc; 1091 1092 if (!ccw_device_is_pathgroup(device->cdev)) { 1093 dev_warn(&device->cdev->dev, 1094 "A channel path group could not be established\n"); 1095 return -EIO; 1096 } 1097 if (!ccw_device_is_multipath(device->cdev)) { 1098 dev_info(&device->cdev->dev, 1099 "The DASD is not operating in multipath mode\n"); 1100 } 1101 private = (struct dasd_eckd_private *) device->private; 1102 if (!private) { 1103 private = kzalloc(sizeof(*private), GFP_KERNEL | GFP_DMA); 1104 if (!private) { 1105 dev_warn(&device->cdev->dev, 1106 "Allocating memory for private DASD data " 1107 "failed\n"); 1108 return -ENOMEM; 1109 } 1110 device->private = (void *) private; 1111 } else { 1112 memset(private, 0, sizeof(*private)); 1113 } 1114 /* Invalidate status of initial analysis. */ 1115 private->init_cqr_status = -1; 1116 /* Set default cache operations. */ 1117 private->attrib.operation = DASD_NORMAL_CACHE; 1118 private->attrib.nr_cyl = 0; 1119 1120 /* Read Configuration Data */ 1121 rc = dasd_eckd_read_conf(device); 1122 if (rc) 1123 goto out_err1; 1124 1125 /* Generate device unique id and register in devmap */ 1126 rc = dasd_eckd_generate_uid(device, &private->uid); 1127 if (rc) 1128 goto out_err1; 1129 dasd_set_uid(device->cdev, &private->uid); 1130 1131 if (private->uid.type == UA_BASE_DEVICE) { 1132 block = dasd_alloc_block(); 1133 if (IS_ERR(block)) { 1134 DBF_EVENT_DEVID(DBF_WARNING, device->cdev, "%s", 1135 "could not allocate dasd " 1136 "block structure"); 1137 rc = PTR_ERR(block); 1138 goto out_err1; 1139 } 1140 device->block = block; 1141 block->base = device; 1142 } 1143 1144 /* register lcu with alias handling, enable PAV if this is a new lcu */ 1145 is_known = dasd_alias_make_device_known_to_lcu(device); 1146 if (is_known < 0) { 1147 rc = is_known; 1148 goto out_err2; 1149 } 1150 /* 1151 * dasd_eckd_vaildate_server is done on the first device that 1152 * is found for an LCU. All later other devices have to wait 1153 * for it, so they will read the correct feature codes. 1154 */ 1155 if (!is_known) { 1156 dasd_eckd_validate_server(device); 1157 dasd_alias_lcu_setup_complete(device); 1158 } else 1159 dasd_alias_wait_for_lcu_setup(device); 1160 1161 /* device may report different configuration data after LCU setup */ 1162 rc = dasd_eckd_read_conf(device); 1163 if (rc) 1164 goto out_err3; 1165 1166 /* Read Feature Codes */ 1167 dasd_eckd_read_features(device); 1168 1169 /* Read Device Characteristics */ 1170 rc = dasd_generic_read_dev_chars(device, DASD_ECKD_MAGIC, 1171 &private->rdc_data, 64); 1172 if (rc) { 1173 DBF_EVENT_DEVID(DBF_WARNING, device->cdev, 1174 "Read device characteristic failed, rc=%d", rc); 1175 goto out_err3; 1176 } 1177 /* find the vaild cylinder size */ 1178 if (private->rdc_data.no_cyl == LV_COMPAT_CYL && 1179 private->rdc_data.long_no_cyl) 1180 private->real_cyl = private->rdc_data.long_no_cyl; 1181 else 1182 private->real_cyl = private->rdc_data.no_cyl; 1183 1184 dev_info(&device->cdev->dev, "New DASD %04X/%02X (CU %04X/%02X) " 1185 "with %d cylinders, %d heads, %d sectors\n", 1186 private->rdc_data.dev_type, 1187 private->rdc_data.dev_model, 1188 private->rdc_data.cu_type, 1189 private->rdc_data.cu_model.model, 1190 private->real_cyl, 1191 private->rdc_data.trk_per_cyl, 1192 private->rdc_data.sec_per_trk); 1193 return 0; 1194 1195 out_err3: 1196 dasd_alias_disconnect_device_from_lcu(device); 1197 out_err2: 1198 dasd_free_block(device->block); 1199 device->block = NULL; 1200 out_err1: 1201 kfree(private->conf_data); 1202 kfree(device->private); 1203 device->private = NULL; 1204 return rc; 1205 } 1206 1207 static void dasd_eckd_uncheck_device(struct dasd_device *device) 1208 { 1209 struct dasd_eckd_private *private; 1210 1211 private = (struct dasd_eckd_private *) device->private; 1212 dasd_alias_disconnect_device_from_lcu(device); 1213 private->ned = NULL; 1214 private->sneq = NULL; 1215 private->vdsneq = NULL; 1216 private->gneq = NULL; 1217 private->conf_len = 0; 1218 kfree(private->conf_data); 1219 private->conf_data = NULL; 1220 } 1221 1222 static struct dasd_ccw_req * 1223 dasd_eckd_analysis_ccw(struct dasd_device *device) 1224 { 1225 struct dasd_eckd_private *private; 1226 struct eckd_count *count_data; 1227 struct LO_eckd_data *LO_data; 1228 struct dasd_ccw_req *cqr; 1229 struct ccw1 *ccw; 1230 int cplength, datasize; 1231 int i; 1232 1233 private = (struct dasd_eckd_private *) device->private; 1234 1235 cplength = 8; 1236 datasize = sizeof(struct DE_eckd_data) + 2*sizeof(struct LO_eckd_data); 1237 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, cplength, datasize, device); 1238 if (IS_ERR(cqr)) 1239 return cqr; 1240 ccw = cqr->cpaddr; 1241 /* Define extent for the first 3 tracks. */ 1242 define_extent(ccw++, cqr->data, 0, 2, 1243 DASD_ECKD_CCW_READ_COUNT, device); 1244 LO_data = cqr->data + sizeof(struct DE_eckd_data); 1245 /* Locate record for the first 4 records on track 0. */ 1246 ccw[-1].flags |= CCW_FLAG_CC; 1247 locate_record(ccw++, LO_data++, 0, 0, 4, 1248 DASD_ECKD_CCW_READ_COUNT, device, 0); 1249 1250 count_data = private->count_area; 1251 for (i = 0; i < 4; i++) { 1252 ccw[-1].flags |= CCW_FLAG_CC; 1253 ccw->cmd_code = DASD_ECKD_CCW_READ_COUNT; 1254 ccw->flags = 0; 1255 ccw->count = 8; 1256 ccw->cda = (__u32)(addr_t) count_data; 1257 ccw++; 1258 count_data++; 1259 } 1260 1261 /* Locate record for the first record on track 2. */ 1262 ccw[-1].flags |= CCW_FLAG_CC; 1263 locate_record(ccw++, LO_data++, 2, 0, 1, 1264 DASD_ECKD_CCW_READ_COUNT, device, 0); 1265 /* Read count ccw. */ 1266 ccw[-1].flags |= CCW_FLAG_CC; 1267 ccw->cmd_code = DASD_ECKD_CCW_READ_COUNT; 1268 ccw->flags = 0; 1269 ccw->count = 8; 1270 ccw->cda = (__u32)(addr_t) count_data; 1271 1272 cqr->block = NULL; 1273 cqr->startdev = device; 1274 cqr->memdev = device; 1275 cqr->retries = 255; 1276 cqr->buildclk = get_clock(); 1277 cqr->status = DASD_CQR_FILLED; 1278 return cqr; 1279 } 1280 1281 /* differentiate between 'no record found' and any other error */ 1282 static int dasd_eckd_analysis_evaluation(struct dasd_ccw_req *init_cqr) 1283 { 1284 char *sense; 1285 if (init_cqr->status == DASD_CQR_DONE) 1286 return INIT_CQR_OK; 1287 else if (init_cqr->status == DASD_CQR_NEED_ERP || 1288 init_cqr->status == DASD_CQR_FAILED) { 1289 sense = dasd_get_sense(&init_cqr->irb); 1290 if (sense && (sense[1] & SNS1_NO_REC_FOUND)) 1291 return INIT_CQR_UNFORMATTED; 1292 else 1293 return INIT_CQR_ERROR; 1294 } else 1295 return INIT_CQR_ERROR; 1296 } 1297 1298 /* 1299 * This is the callback function for the init_analysis cqr. It saves 1300 * the status of the initial analysis ccw before it frees it and kicks 1301 * the device to continue the startup sequence. This will call 1302 * dasd_eckd_do_analysis again (if the devices has not been marked 1303 * for deletion in the meantime). 1304 */ 1305 static void dasd_eckd_analysis_callback(struct dasd_ccw_req *init_cqr, 1306 void *data) 1307 { 1308 struct dasd_eckd_private *private; 1309 struct dasd_device *device; 1310 1311 device = init_cqr->startdev; 1312 private = (struct dasd_eckd_private *) device->private; 1313 private->init_cqr_status = dasd_eckd_analysis_evaluation(init_cqr); 1314 dasd_sfree_request(init_cqr, device); 1315 dasd_kick_device(device); 1316 } 1317 1318 static int dasd_eckd_start_analysis(struct dasd_block *block) 1319 { 1320 struct dasd_eckd_private *private; 1321 struct dasd_ccw_req *init_cqr; 1322 1323 private = (struct dasd_eckd_private *) block->base->private; 1324 init_cqr = dasd_eckd_analysis_ccw(block->base); 1325 if (IS_ERR(init_cqr)) 1326 return PTR_ERR(init_cqr); 1327 init_cqr->callback = dasd_eckd_analysis_callback; 1328 init_cqr->callback_data = NULL; 1329 init_cqr->expires = 5*HZ; 1330 /* first try without ERP, so we can later handle unformatted 1331 * devices as special case 1332 */ 1333 clear_bit(DASD_CQR_FLAGS_USE_ERP, &init_cqr->flags); 1334 init_cqr->retries = 0; 1335 dasd_add_request_head(init_cqr); 1336 return -EAGAIN; 1337 } 1338 1339 static int dasd_eckd_end_analysis(struct dasd_block *block) 1340 { 1341 struct dasd_device *device; 1342 struct dasd_eckd_private *private; 1343 struct eckd_count *count_area; 1344 unsigned int sb, blk_per_trk; 1345 int status, i; 1346 struct dasd_ccw_req *init_cqr; 1347 1348 device = block->base; 1349 private = (struct dasd_eckd_private *) device->private; 1350 status = private->init_cqr_status; 1351 private->init_cqr_status = -1; 1352 if (status == INIT_CQR_ERROR) { 1353 /* try again, this time with full ERP */ 1354 init_cqr = dasd_eckd_analysis_ccw(device); 1355 dasd_sleep_on(init_cqr); 1356 status = dasd_eckd_analysis_evaluation(init_cqr); 1357 dasd_sfree_request(init_cqr, device); 1358 } 1359 1360 if (status == INIT_CQR_UNFORMATTED) { 1361 dev_warn(&device->cdev->dev, "The DASD is not formatted\n"); 1362 return -EMEDIUMTYPE; 1363 } else if (status == INIT_CQR_ERROR) { 1364 dev_err(&device->cdev->dev, 1365 "Detecting the DASD disk layout failed because " 1366 "of an I/O error\n"); 1367 return -EIO; 1368 } 1369 1370 private->uses_cdl = 1; 1371 /* Check Track 0 for Compatible Disk Layout */ 1372 count_area = NULL; 1373 for (i = 0; i < 3; i++) { 1374 if (private->count_area[i].kl != 4 || 1375 private->count_area[i].dl != dasd_eckd_cdl_reclen(i) - 4) { 1376 private->uses_cdl = 0; 1377 break; 1378 } 1379 } 1380 if (i == 3) 1381 count_area = &private->count_area[4]; 1382 1383 if (private->uses_cdl == 0) { 1384 for (i = 0; i < 5; i++) { 1385 if ((private->count_area[i].kl != 0) || 1386 (private->count_area[i].dl != 1387 private->count_area[0].dl)) 1388 break; 1389 } 1390 if (i == 5) 1391 count_area = &private->count_area[0]; 1392 } else { 1393 if (private->count_area[3].record == 1) 1394 dev_warn(&device->cdev->dev, 1395 "Track 0 has no records following the VTOC\n"); 1396 } 1397 if (count_area != NULL && count_area->kl == 0) { 1398 /* we found notthing violating our disk layout */ 1399 if (dasd_check_blocksize(count_area->dl) == 0) 1400 block->bp_block = count_area->dl; 1401 } 1402 if (block->bp_block == 0) { 1403 dev_warn(&device->cdev->dev, 1404 "The disk layout of the DASD is not supported\n"); 1405 return -EMEDIUMTYPE; 1406 } 1407 block->s2b_shift = 0; /* bits to shift 512 to get a block */ 1408 for (sb = 512; sb < block->bp_block; sb = sb << 1) 1409 block->s2b_shift++; 1410 1411 blk_per_trk = recs_per_track(&private->rdc_data, 0, block->bp_block); 1412 block->blocks = (private->real_cyl * 1413 private->rdc_data.trk_per_cyl * 1414 blk_per_trk); 1415 1416 dev_info(&device->cdev->dev, 1417 "DASD with %d KB/block, %d KB total size, %d KB/track, " 1418 "%s\n", (block->bp_block >> 10), 1419 ((private->real_cyl * 1420 private->rdc_data.trk_per_cyl * 1421 blk_per_trk * (block->bp_block >> 9)) >> 1), 1422 ((blk_per_trk * block->bp_block) >> 10), 1423 private->uses_cdl ? 1424 "compatible disk layout" : "linux disk layout"); 1425 1426 return 0; 1427 } 1428 1429 static int dasd_eckd_do_analysis(struct dasd_block *block) 1430 { 1431 struct dasd_eckd_private *private; 1432 1433 private = (struct dasd_eckd_private *) block->base->private; 1434 if (private->init_cqr_status < 0) 1435 return dasd_eckd_start_analysis(block); 1436 else 1437 return dasd_eckd_end_analysis(block); 1438 } 1439 1440 static int dasd_eckd_ready_to_online(struct dasd_device *device) 1441 { 1442 return dasd_alias_add_device(device); 1443 }; 1444 1445 static int dasd_eckd_online_to_ready(struct dasd_device *device) 1446 { 1447 return dasd_alias_remove_device(device); 1448 }; 1449 1450 static int 1451 dasd_eckd_fill_geometry(struct dasd_block *block, struct hd_geometry *geo) 1452 { 1453 struct dasd_eckd_private *private; 1454 1455 private = (struct dasd_eckd_private *) block->base->private; 1456 if (dasd_check_blocksize(block->bp_block) == 0) { 1457 geo->sectors = recs_per_track(&private->rdc_data, 1458 0, block->bp_block); 1459 } 1460 geo->cylinders = private->rdc_data.no_cyl; 1461 geo->heads = private->rdc_data.trk_per_cyl; 1462 return 0; 1463 } 1464 1465 static struct dasd_ccw_req * 1466 dasd_eckd_format_device(struct dasd_device * device, 1467 struct format_data_t * fdata) 1468 { 1469 struct dasd_eckd_private *private; 1470 struct dasd_ccw_req *fcp; 1471 struct eckd_count *ect; 1472 struct ccw1 *ccw; 1473 void *data; 1474 int rpt; 1475 struct ch_t address; 1476 int cplength, datasize; 1477 int i; 1478 int intensity = 0; 1479 int r0_perm; 1480 1481 private = (struct dasd_eckd_private *) device->private; 1482 rpt = recs_per_track(&private->rdc_data, 0, fdata->blksize); 1483 set_ch_t(&address, 1484 fdata->start_unit / private->rdc_data.trk_per_cyl, 1485 fdata->start_unit % private->rdc_data.trk_per_cyl); 1486 1487 /* Sanity checks. */ 1488 if (fdata->start_unit >= 1489 (private->real_cyl * private->rdc_data.trk_per_cyl)) { 1490 dev_warn(&device->cdev->dev, "Start track number %d used in " 1491 "formatting is too big\n", fdata->start_unit); 1492 return ERR_PTR(-EINVAL); 1493 } 1494 if (fdata->start_unit > fdata->stop_unit) { 1495 dev_warn(&device->cdev->dev, "Start track %d used in " 1496 "formatting exceeds end track\n", fdata->start_unit); 1497 return ERR_PTR(-EINVAL); 1498 } 1499 if (dasd_check_blocksize(fdata->blksize) != 0) { 1500 dev_warn(&device->cdev->dev, 1501 "The DASD cannot be formatted with block size %d\n", 1502 fdata->blksize); 1503 return ERR_PTR(-EINVAL); 1504 } 1505 1506 /* 1507 * fdata->intensity is a bit string that tells us what to do: 1508 * Bit 0: write record zero 1509 * Bit 1: write home address, currently not supported 1510 * Bit 2: invalidate tracks 1511 * Bit 3: use OS/390 compatible disk layout (cdl) 1512 * Bit 4: do not allow storage subsystem to modify record zero 1513 * Only some bit combinations do make sense. 1514 */ 1515 if (fdata->intensity & 0x10) { 1516 r0_perm = 0; 1517 intensity = fdata->intensity & ~0x10; 1518 } else { 1519 r0_perm = 1; 1520 intensity = fdata->intensity; 1521 } 1522 switch (intensity) { 1523 case 0x00: /* Normal format */ 1524 case 0x08: /* Normal format, use cdl. */ 1525 cplength = 2 + rpt; 1526 datasize = sizeof(struct DE_eckd_data) + 1527 sizeof(struct LO_eckd_data) + 1528 rpt * sizeof(struct eckd_count); 1529 break; 1530 case 0x01: /* Write record zero and format track. */ 1531 case 0x09: /* Write record zero and format track, use cdl. */ 1532 cplength = 3 + rpt; 1533 datasize = sizeof(struct DE_eckd_data) + 1534 sizeof(struct LO_eckd_data) + 1535 sizeof(struct eckd_count) + 1536 rpt * sizeof(struct eckd_count); 1537 break; 1538 case 0x04: /* Invalidate track. */ 1539 case 0x0c: /* Invalidate track, use cdl. */ 1540 cplength = 3; 1541 datasize = sizeof(struct DE_eckd_data) + 1542 sizeof(struct LO_eckd_data) + 1543 sizeof(struct eckd_count); 1544 break; 1545 default: 1546 dev_warn(&device->cdev->dev, "An I/O control call used " 1547 "incorrect flags 0x%x\n", fdata->intensity); 1548 return ERR_PTR(-EINVAL); 1549 } 1550 /* Allocate the format ccw request. */ 1551 fcp = dasd_smalloc_request(DASD_ECKD_MAGIC, cplength, datasize, device); 1552 if (IS_ERR(fcp)) 1553 return fcp; 1554 1555 data = fcp->data; 1556 ccw = fcp->cpaddr; 1557 1558 switch (intensity & ~0x08) { 1559 case 0x00: /* Normal format. */ 1560 define_extent(ccw++, (struct DE_eckd_data *) data, 1561 fdata->start_unit, fdata->start_unit, 1562 DASD_ECKD_CCW_WRITE_CKD, device); 1563 /* grant subsystem permission to format R0 */ 1564 if (r0_perm) 1565 ((struct DE_eckd_data *)data)->ga_extended |= 0x04; 1566 data += sizeof(struct DE_eckd_data); 1567 ccw[-1].flags |= CCW_FLAG_CC; 1568 locate_record(ccw++, (struct LO_eckd_data *) data, 1569 fdata->start_unit, 0, rpt, 1570 DASD_ECKD_CCW_WRITE_CKD, device, 1571 fdata->blksize); 1572 data += sizeof(struct LO_eckd_data); 1573 break; 1574 case 0x01: /* Write record zero + format track. */ 1575 define_extent(ccw++, (struct DE_eckd_data *) data, 1576 fdata->start_unit, fdata->start_unit, 1577 DASD_ECKD_CCW_WRITE_RECORD_ZERO, 1578 device); 1579 data += sizeof(struct DE_eckd_data); 1580 ccw[-1].flags |= CCW_FLAG_CC; 1581 locate_record(ccw++, (struct LO_eckd_data *) data, 1582 fdata->start_unit, 0, rpt + 1, 1583 DASD_ECKD_CCW_WRITE_RECORD_ZERO, device, 1584 device->block->bp_block); 1585 data += sizeof(struct LO_eckd_data); 1586 break; 1587 case 0x04: /* Invalidate track. */ 1588 define_extent(ccw++, (struct DE_eckd_data *) data, 1589 fdata->start_unit, fdata->start_unit, 1590 DASD_ECKD_CCW_WRITE_CKD, device); 1591 data += sizeof(struct DE_eckd_data); 1592 ccw[-1].flags |= CCW_FLAG_CC; 1593 locate_record(ccw++, (struct LO_eckd_data *) data, 1594 fdata->start_unit, 0, 1, 1595 DASD_ECKD_CCW_WRITE_CKD, device, 8); 1596 data += sizeof(struct LO_eckd_data); 1597 break; 1598 } 1599 if (intensity & 0x01) { /* write record zero */ 1600 ect = (struct eckd_count *) data; 1601 data += sizeof(struct eckd_count); 1602 ect->cyl = address.cyl; 1603 ect->head = address.head; 1604 ect->record = 0; 1605 ect->kl = 0; 1606 ect->dl = 8; 1607 ccw[-1].flags |= CCW_FLAG_CC; 1608 ccw->cmd_code = DASD_ECKD_CCW_WRITE_RECORD_ZERO; 1609 ccw->flags = CCW_FLAG_SLI; 1610 ccw->count = 8; 1611 ccw->cda = (__u32)(addr_t) ect; 1612 ccw++; 1613 } 1614 if ((intensity & ~0x08) & 0x04) { /* erase track */ 1615 ect = (struct eckd_count *) data; 1616 data += sizeof(struct eckd_count); 1617 ect->cyl = address.cyl; 1618 ect->head = address.head; 1619 ect->record = 1; 1620 ect->kl = 0; 1621 ect->dl = 0; 1622 ccw[-1].flags |= CCW_FLAG_CC; 1623 ccw->cmd_code = DASD_ECKD_CCW_WRITE_CKD; 1624 ccw->flags = CCW_FLAG_SLI; 1625 ccw->count = 8; 1626 ccw->cda = (__u32)(addr_t) ect; 1627 } else { /* write remaining records */ 1628 for (i = 0; i < rpt; i++) { 1629 ect = (struct eckd_count *) data; 1630 data += sizeof(struct eckd_count); 1631 ect->cyl = address.cyl; 1632 ect->head = address.head; 1633 ect->record = i + 1; 1634 ect->kl = 0; 1635 ect->dl = fdata->blksize; 1636 /* Check for special tracks 0-1 when formatting CDL */ 1637 if ((intensity & 0x08) && 1638 fdata->start_unit == 0) { 1639 if (i < 3) { 1640 ect->kl = 4; 1641 ect->dl = sizes_trk0[i] - 4; 1642 } 1643 } 1644 if ((intensity & 0x08) && 1645 fdata->start_unit == 1) { 1646 ect->kl = 44; 1647 ect->dl = LABEL_SIZE - 44; 1648 } 1649 ccw[-1].flags |= CCW_FLAG_CC; 1650 ccw->cmd_code = DASD_ECKD_CCW_WRITE_CKD; 1651 ccw->flags = CCW_FLAG_SLI; 1652 ccw->count = 8; 1653 ccw->cda = (__u32)(addr_t) ect; 1654 ccw++; 1655 } 1656 } 1657 fcp->startdev = device; 1658 fcp->memdev = device; 1659 fcp->retries = 256; 1660 fcp->buildclk = get_clock(); 1661 fcp->status = DASD_CQR_FILLED; 1662 return fcp; 1663 } 1664 1665 static void dasd_eckd_handle_terminated_request(struct dasd_ccw_req *cqr) 1666 { 1667 cqr->status = DASD_CQR_FILLED; 1668 if (cqr->block && (cqr->startdev != cqr->block->base)) { 1669 dasd_eckd_reset_ccw_to_base_io(cqr); 1670 cqr->startdev = cqr->block->base; 1671 } 1672 }; 1673 1674 static dasd_erp_fn_t 1675 dasd_eckd_erp_action(struct dasd_ccw_req * cqr) 1676 { 1677 struct dasd_device *device = (struct dasd_device *) cqr->startdev; 1678 struct ccw_device *cdev = device->cdev; 1679 1680 switch (cdev->id.cu_type) { 1681 case 0x3990: 1682 case 0x2105: 1683 case 0x2107: 1684 case 0x1750: 1685 return dasd_3990_erp_action; 1686 case 0x9343: 1687 case 0x3880: 1688 default: 1689 return dasd_default_erp_action; 1690 } 1691 } 1692 1693 static dasd_erp_fn_t 1694 dasd_eckd_erp_postaction(struct dasd_ccw_req * cqr) 1695 { 1696 return dasd_default_erp_postaction; 1697 } 1698 1699 1700 static void dasd_eckd_handle_unsolicited_interrupt(struct dasd_device *device, 1701 struct irb *irb) 1702 { 1703 char mask; 1704 char *sense = NULL; 1705 1706 /* first of all check for state change pending interrupt */ 1707 mask = DEV_STAT_ATTENTION | DEV_STAT_DEV_END | DEV_STAT_UNIT_EXCEP; 1708 if ((scsw_dstat(&irb->scsw) & mask) == mask) { 1709 dasd_generic_handle_state_change(device); 1710 return; 1711 } 1712 1713 /* summary unit check */ 1714 if ((scsw_dstat(&irb->scsw) & DEV_STAT_UNIT_CHECK) && 1715 (irb->ecw[7] == 0x0D)) { 1716 dasd_alias_handle_summary_unit_check(device, irb); 1717 return; 1718 } 1719 1720 sense = dasd_get_sense(irb); 1721 /* service information message SIM */ 1722 if (sense && !(sense[27] & DASD_SENSE_BIT_0) && 1723 ((sense[6] & DASD_SIM_SENSE) == DASD_SIM_SENSE)) { 1724 dasd_3990_erp_handle_sim(device, sense); 1725 dasd_schedule_device_bh(device); 1726 return; 1727 } 1728 1729 if ((scsw_cc(&irb->scsw) == 1) && 1730 (scsw_fctl(&irb->scsw) & SCSW_FCTL_START_FUNC) && 1731 (scsw_actl(&irb->scsw) & SCSW_ACTL_START_PEND) && 1732 (scsw_stctl(&irb->scsw) & SCSW_STCTL_STATUS_PEND)) { 1733 /* fake irb do nothing, they are handled elsewhere */ 1734 dasd_schedule_device_bh(device); 1735 return; 1736 } 1737 1738 if (!sense) { 1739 /* just report other unsolicited interrupts */ 1740 DBF_DEV_EVENT(DBF_ERR, device, "%s", 1741 "unsolicited interrupt received"); 1742 } else { 1743 DBF_DEV_EVENT(DBF_ERR, device, "%s", 1744 "unsolicited interrupt received " 1745 "(sense available)"); 1746 device->discipline->dump_sense_dbf(device, irb, "unsolicited"); 1747 } 1748 1749 dasd_schedule_device_bh(device); 1750 return; 1751 }; 1752 1753 1754 static struct dasd_ccw_req *dasd_eckd_build_cp_cmd_single( 1755 struct dasd_device *startdev, 1756 struct dasd_block *block, 1757 struct request *req, 1758 sector_t first_rec, 1759 sector_t last_rec, 1760 sector_t first_trk, 1761 sector_t last_trk, 1762 unsigned int first_offs, 1763 unsigned int last_offs, 1764 unsigned int blk_per_trk, 1765 unsigned int blksize) 1766 { 1767 struct dasd_eckd_private *private; 1768 unsigned long *idaws; 1769 struct LO_eckd_data *LO_data; 1770 struct dasd_ccw_req *cqr; 1771 struct ccw1 *ccw; 1772 struct req_iterator iter; 1773 struct bio_vec *bv; 1774 char *dst; 1775 unsigned int off; 1776 int count, cidaw, cplength, datasize; 1777 sector_t recid; 1778 unsigned char cmd, rcmd; 1779 int use_prefix; 1780 struct dasd_device *basedev; 1781 1782 basedev = block->base; 1783 private = (struct dasd_eckd_private *) basedev->private; 1784 if (rq_data_dir(req) == READ) 1785 cmd = DASD_ECKD_CCW_READ_MT; 1786 else if (rq_data_dir(req) == WRITE) 1787 cmd = DASD_ECKD_CCW_WRITE_MT; 1788 else 1789 return ERR_PTR(-EINVAL); 1790 1791 /* Check struct bio and count the number of blocks for the request. */ 1792 count = 0; 1793 cidaw = 0; 1794 rq_for_each_segment(bv, req, iter) { 1795 if (bv->bv_len & (blksize - 1)) 1796 /* Eckd can only do full blocks. */ 1797 return ERR_PTR(-EINVAL); 1798 count += bv->bv_len >> (block->s2b_shift + 9); 1799 #if defined(CONFIG_64BIT) 1800 if (idal_is_needed (page_address(bv->bv_page), bv->bv_len)) 1801 cidaw += bv->bv_len >> (block->s2b_shift + 9); 1802 #endif 1803 } 1804 /* Paranoia. */ 1805 if (count != last_rec - first_rec + 1) 1806 return ERR_PTR(-EINVAL); 1807 1808 /* use the prefix command if available */ 1809 use_prefix = private->features.feature[8] & 0x01; 1810 if (use_prefix) { 1811 /* 1x prefix + number of blocks */ 1812 cplength = 2 + count; 1813 /* 1x prefix + cidaws*sizeof(long) */ 1814 datasize = sizeof(struct PFX_eckd_data) + 1815 sizeof(struct LO_eckd_data) + 1816 cidaw * sizeof(unsigned long); 1817 } else { 1818 /* 1x define extent + 1x locate record + number of blocks */ 1819 cplength = 2 + count; 1820 /* 1x define extent + 1x locate record + cidaws*sizeof(long) */ 1821 datasize = sizeof(struct DE_eckd_data) + 1822 sizeof(struct LO_eckd_data) + 1823 cidaw * sizeof(unsigned long); 1824 } 1825 /* Find out the number of additional locate record ccws for cdl. */ 1826 if (private->uses_cdl && first_rec < 2*blk_per_trk) { 1827 if (last_rec >= 2*blk_per_trk) 1828 count = 2*blk_per_trk - first_rec; 1829 cplength += count; 1830 datasize += count*sizeof(struct LO_eckd_data); 1831 } 1832 /* Allocate the ccw request. */ 1833 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, cplength, datasize, 1834 startdev); 1835 if (IS_ERR(cqr)) 1836 return cqr; 1837 ccw = cqr->cpaddr; 1838 /* First ccw is define extent or prefix. */ 1839 if (use_prefix) { 1840 if (prefix(ccw++, cqr->data, first_trk, 1841 last_trk, cmd, basedev, startdev) == -EAGAIN) { 1842 /* Clock not in sync and XRC is enabled. 1843 * Try again later. 1844 */ 1845 dasd_sfree_request(cqr, startdev); 1846 return ERR_PTR(-EAGAIN); 1847 } 1848 idaws = (unsigned long *) (cqr->data + 1849 sizeof(struct PFX_eckd_data)); 1850 } else { 1851 if (define_extent(ccw++, cqr->data, first_trk, 1852 last_trk, cmd, startdev) == -EAGAIN) { 1853 /* Clock not in sync and XRC is enabled. 1854 * Try again later. 1855 */ 1856 dasd_sfree_request(cqr, startdev); 1857 return ERR_PTR(-EAGAIN); 1858 } 1859 idaws = (unsigned long *) (cqr->data + 1860 sizeof(struct DE_eckd_data)); 1861 } 1862 /* Build locate_record+read/write/ccws. */ 1863 LO_data = (struct LO_eckd_data *) (idaws + cidaw); 1864 recid = first_rec; 1865 if (private->uses_cdl == 0 || recid > 2*blk_per_trk) { 1866 /* Only standard blocks so there is just one locate record. */ 1867 ccw[-1].flags |= CCW_FLAG_CC; 1868 locate_record(ccw++, LO_data++, first_trk, first_offs + 1, 1869 last_rec - recid + 1, cmd, basedev, blksize); 1870 } 1871 rq_for_each_segment(bv, req, iter) { 1872 dst = page_address(bv->bv_page) + bv->bv_offset; 1873 if (dasd_page_cache) { 1874 char *copy = kmem_cache_alloc(dasd_page_cache, 1875 GFP_DMA | __GFP_NOWARN); 1876 if (copy && rq_data_dir(req) == WRITE) 1877 memcpy(copy + bv->bv_offset, dst, bv->bv_len); 1878 if (copy) 1879 dst = copy + bv->bv_offset; 1880 } 1881 for (off = 0; off < bv->bv_len; off += blksize) { 1882 sector_t trkid = recid; 1883 unsigned int recoffs = sector_div(trkid, blk_per_trk); 1884 rcmd = cmd; 1885 count = blksize; 1886 /* Locate record for cdl special block ? */ 1887 if (private->uses_cdl && recid < 2*blk_per_trk) { 1888 if (dasd_eckd_cdl_special(blk_per_trk, recid)){ 1889 rcmd |= 0x8; 1890 count = dasd_eckd_cdl_reclen(recid); 1891 if (count < blksize && 1892 rq_data_dir(req) == READ) 1893 memset(dst + count, 0xe5, 1894 blksize - count); 1895 } 1896 ccw[-1].flags |= CCW_FLAG_CC; 1897 locate_record(ccw++, LO_data++, 1898 trkid, recoffs + 1, 1899 1, rcmd, basedev, count); 1900 } 1901 /* Locate record for standard blocks ? */ 1902 if (private->uses_cdl && recid == 2*blk_per_trk) { 1903 ccw[-1].flags |= CCW_FLAG_CC; 1904 locate_record(ccw++, LO_data++, 1905 trkid, recoffs + 1, 1906 last_rec - recid + 1, 1907 cmd, basedev, count); 1908 } 1909 /* Read/write ccw. */ 1910 ccw[-1].flags |= CCW_FLAG_CC; 1911 ccw->cmd_code = rcmd; 1912 ccw->count = count; 1913 if (idal_is_needed(dst, blksize)) { 1914 ccw->cda = (__u32)(addr_t) idaws; 1915 ccw->flags = CCW_FLAG_IDA; 1916 idaws = idal_create_words(idaws, dst, blksize); 1917 } else { 1918 ccw->cda = (__u32)(addr_t) dst; 1919 ccw->flags = 0; 1920 } 1921 ccw++; 1922 dst += blksize; 1923 recid++; 1924 } 1925 } 1926 if (blk_noretry_request(req) || 1927 block->base->features & DASD_FEATURE_FAILFAST) 1928 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 1929 cqr->startdev = startdev; 1930 cqr->memdev = startdev; 1931 cqr->block = block; 1932 cqr->expires = 5 * 60 * HZ; /* 5 minutes */ 1933 cqr->lpm = private->path_data.ppm; 1934 cqr->retries = 256; 1935 cqr->buildclk = get_clock(); 1936 cqr->status = DASD_CQR_FILLED; 1937 return cqr; 1938 } 1939 1940 static struct dasd_ccw_req *dasd_eckd_build_cp_cmd_track( 1941 struct dasd_device *startdev, 1942 struct dasd_block *block, 1943 struct request *req, 1944 sector_t first_rec, 1945 sector_t last_rec, 1946 sector_t first_trk, 1947 sector_t last_trk, 1948 unsigned int first_offs, 1949 unsigned int last_offs, 1950 unsigned int blk_per_trk, 1951 unsigned int blksize) 1952 { 1953 struct dasd_eckd_private *private; 1954 unsigned long *idaws; 1955 struct dasd_ccw_req *cqr; 1956 struct ccw1 *ccw; 1957 struct req_iterator iter; 1958 struct bio_vec *bv; 1959 char *dst, *idaw_dst; 1960 unsigned int cidaw, cplength, datasize; 1961 unsigned int tlf; 1962 sector_t recid; 1963 unsigned char cmd; 1964 struct dasd_device *basedev; 1965 unsigned int trkcount, count, count_to_trk_end; 1966 unsigned int idaw_len, seg_len, part_len, len_to_track_end; 1967 unsigned char new_track, end_idaw; 1968 sector_t trkid; 1969 unsigned int recoffs; 1970 1971 basedev = block->base; 1972 private = (struct dasd_eckd_private *) basedev->private; 1973 if (rq_data_dir(req) == READ) 1974 cmd = DASD_ECKD_CCW_READ_TRACK_DATA; 1975 else if (rq_data_dir(req) == WRITE) 1976 cmd = DASD_ECKD_CCW_WRITE_TRACK_DATA; 1977 else 1978 return ERR_PTR(-EINVAL); 1979 1980 /* Track based I/O needs IDAWs for each page, and not just for 1981 * 64 bit addresses. We need additional idals for pages 1982 * that get filled from two tracks, so we use the number 1983 * of records as upper limit. 1984 */ 1985 cidaw = last_rec - first_rec + 1; 1986 trkcount = last_trk - first_trk + 1; 1987 1988 /* 1x prefix + one read/write ccw per track */ 1989 cplength = 1 + trkcount; 1990 1991 /* on 31-bit we need space for two 32 bit addresses per page 1992 * on 64-bit one 64 bit address 1993 */ 1994 datasize = sizeof(struct PFX_eckd_data) + 1995 cidaw * sizeof(unsigned long long); 1996 1997 /* Allocate the ccw request. */ 1998 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, cplength, datasize, 1999 startdev); 2000 if (IS_ERR(cqr)) 2001 return cqr; 2002 ccw = cqr->cpaddr; 2003 /* transfer length factor: how many bytes to read from the last track */ 2004 if (first_trk == last_trk) 2005 tlf = last_offs - first_offs + 1; 2006 else 2007 tlf = last_offs + 1; 2008 tlf *= blksize; 2009 2010 if (prefix_LRE(ccw++, cqr->data, first_trk, 2011 last_trk, cmd, basedev, startdev, 2012 1 /* format */, first_offs + 1, 2013 trkcount, blksize, 2014 tlf) == -EAGAIN) { 2015 /* Clock not in sync and XRC is enabled. 2016 * Try again later. 2017 */ 2018 dasd_sfree_request(cqr, startdev); 2019 return ERR_PTR(-EAGAIN); 2020 } 2021 2022 /* 2023 * The translation of request into ccw programs must meet the 2024 * following conditions: 2025 * - all idaws but the first and the last must address full pages 2026 * (or 2K blocks on 31-bit) 2027 * - the scope of a ccw and it's idal ends with the track boundaries 2028 */ 2029 idaws = (unsigned long *) (cqr->data + sizeof(struct PFX_eckd_data)); 2030 recid = first_rec; 2031 new_track = 1; 2032 end_idaw = 0; 2033 len_to_track_end = 0; 2034 idaw_dst = 0; 2035 idaw_len = 0; 2036 rq_for_each_segment(bv, req, iter) { 2037 dst = page_address(bv->bv_page) + bv->bv_offset; 2038 seg_len = bv->bv_len; 2039 while (seg_len) { 2040 if (new_track) { 2041 trkid = recid; 2042 recoffs = sector_div(trkid, blk_per_trk); 2043 count_to_trk_end = blk_per_trk - recoffs; 2044 count = min((last_rec - recid + 1), 2045 (sector_t)count_to_trk_end); 2046 len_to_track_end = count * blksize; 2047 ccw[-1].flags |= CCW_FLAG_CC; 2048 ccw->cmd_code = cmd; 2049 ccw->count = len_to_track_end; 2050 ccw->cda = (__u32)(addr_t)idaws; 2051 ccw->flags = CCW_FLAG_IDA; 2052 ccw++; 2053 recid += count; 2054 new_track = 0; 2055 /* first idaw for a ccw may start anywhere */ 2056 if (!idaw_dst) 2057 idaw_dst = dst; 2058 } 2059 /* If we start a new idaw, we must make sure that it 2060 * starts on an IDA_BLOCK_SIZE boundary. 2061 * If we continue an idaw, we must make sure that the 2062 * current segment begins where the so far accumulated 2063 * idaw ends 2064 */ 2065 if (!idaw_dst) { 2066 if (__pa(dst) & (IDA_BLOCK_SIZE-1)) { 2067 dasd_sfree_request(cqr, startdev); 2068 return ERR_PTR(-ERANGE); 2069 } else 2070 idaw_dst = dst; 2071 } 2072 if ((idaw_dst + idaw_len) != dst) { 2073 dasd_sfree_request(cqr, startdev); 2074 return ERR_PTR(-ERANGE); 2075 } 2076 part_len = min(seg_len, len_to_track_end); 2077 seg_len -= part_len; 2078 dst += part_len; 2079 idaw_len += part_len; 2080 len_to_track_end -= part_len; 2081 /* collected memory area ends on an IDA_BLOCK border, 2082 * -> create an idaw 2083 * idal_create_words will handle cases where idaw_len 2084 * is larger then IDA_BLOCK_SIZE 2085 */ 2086 if (!(__pa(idaw_dst + idaw_len) & (IDA_BLOCK_SIZE-1))) 2087 end_idaw = 1; 2088 /* We also need to end the idaw at track end */ 2089 if (!len_to_track_end) { 2090 new_track = 1; 2091 end_idaw = 1; 2092 } 2093 if (end_idaw) { 2094 idaws = idal_create_words(idaws, idaw_dst, 2095 idaw_len); 2096 idaw_dst = 0; 2097 idaw_len = 0; 2098 end_idaw = 0; 2099 } 2100 } 2101 } 2102 2103 if (blk_noretry_request(req) || 2104 block->base->features & DASD_FEATURE_FAILFAST) 2105 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 2106 cqr->startdev = startdev; 2107 cqr->memdev = startdev; 2108 cqr->block = block; 2109 cqr->expires = 5 * 60 * HZ; /* 5 minutes */ 2110 cqr->lpm = private->path_data.ppm; 2111 cqr->retries = 256; 2112 cqr->buildclk = get_clock(); 2113 cqr->status = DASD_CQR_FILLED; 2114 return cqr; 2115 } 2116 2117 static int prepare_itcw(struct itcw *itcw, 2118 unsigned int trk, unsigned int totrk, int cmd, 2119 struct dasd_device *basedev, 2120 struct dasd_device *startdev, 2121 unsigned int rec_on_trk, int count, 2122 unsigned int blksize, 2123 unsigned int total_data_size, 2124 unsigned int tlf, 2125 unsigned int blk_per_trk) 2126 { 2127 struct PFX_eckd_data pfxdata; 2128 struct dasd_eckd_private *basepriv, *startpriv; 2129 struct DE_eckd_data *dedata; 2130 struct LRE_eckd_data *lredata; 2131 struct dcw *dcw; 2132 2133 u32 begcyl, endcyl; 2134 u16 heads, beghead, endhead; 2135 u8 pfx_cmd; 2136 2137 int rc = 0; 2138 int sector = 0; 2139 int dn, d; 2140 2141 2142 /* setup prefix data */ 2143 basepriv = (struct dasd_eckd_private *) basedev->private; 2144 startpriv = (struct dasd_eckd_private *) startdev->private; 2145 dedata = &pfxdata.define_extent; 2146 lredata = &pfxdata.locate_record; 2147 2148 memset(&pfxdata, 0, sizeof(pfxdata)); 2149 pfxdata.format = 1; /* PFX with LRE */ 2150 pfxdata.base_address = basepriv->ned->unit_addr; 2151 pfxdata.base_lss = basepriv->ned->ID; 2152 pfxdata.validity.define_extent = 1; 2153 2154 /* private uid is kept up to date, conf_data may be outdated */ 2155 if (startpriv->uid.type != UA_BASE_DEVICE) { 2156 pfxdata.validity.verify_base = 1; 2157 if (startpriv->uid.type == UA_HYPER_PAV_ALIAS) 2158 pfxdata.validity.hyper_pav = 1; 2159 } 2160 2161 switch (cmd) { 2162 case DASD_ECKD_CCW_READ_TRACK_DATA: 2163 dedata->mask.perm = 0x1; 2164 dedata->attributes.operation = basepriv->attrib.operation; 2165 dedata->blk_size = blksize; 2166 dedata->ga_extended |= 0x42; 2167 lredata->operation.orientation = 0x0; 2168 lredata->operation.operation = 0x0C; 2169 lredata->auxiliary.check_bytes = 0x01; 2170 pfx_cmd = DASD_ECKD_CCW_PFX_READ; 2171 break; 2172 case DASD_ECKD_CCW_WRITE_TRACK_DATA: 2173 dedata->mask.perm = 0x02; 2174 dedata->attributes.operation = basepriv->attrib.operation; 2175 dedata->blk_size = blksize; 2176 rc = check_XRC_on_prefix(&pfxdata, basedev); 2177 dedata->ga_extended |= 0x42; 2178 lredata->operation.orientation = 0x0; 2179 lredata->operation.operation = 0x3F; 2180 lredata->extended_operation = 0x23; 2181 lredata->auxiliary.check_bytes = 0x2; 2182 pfx_cmd = DASD_ECKD_CCW_PFX; 2183 break; 2184 default: 2185 DBF_DEV_EVENT(DBF_ERR, basedev, 2186 "prepare itcw, unknown opcode 0x%x", cmd); 2187 BUG(); 2188 break; 2189 } 2190 if (rc) 2191 return rc; 2192 2193 dedata->attributes.mode = 0x3; /* ECKD */ 2194 2195 heads = basepriv->rdc_data.trk_per_cyl; 2196 begcyl = trk / heads; 2197 beghead = trk % heads; 2198 endcyl = totrk / heads; 2199 endhead = totrk % heads; 2200 2201 /* check for sequential prestage - enhance cylinder range */ 2202 if (dedata->attributes.operation == DASD_SEQ_PRESTAGE || 2203 dedata->attributes.operation == DASD_SEQ_ACCESS) { 2204 2205 if (endcyl + basepriv->attrib.nr_cyl < basepriv->real_cyl) 2206 endcyl += basepriv->attrib.nr_cyl; 2207 else 2208 endcyl = (basepriv->real_cyl - 1); 2209 } 2210 2211 set_ch_t(&dedata->beg_ext, begcyl, beghead); 2212 set_ch_t(&dedata->end_ext, endcyl, endhead); 2213 2214 dedata->ep_format = 0x20; /* records per track is valid */ 2215 dedata->ep_rec_per_track = blk_per_trk; 2216 2217 if (rec_on_trk) { 2218 switch (basepriv->rdc_data.dev_type) { 2219 case 0x3390: 2220 dn = ceil_quot(blksize + 6, 232); 2221 d = 9 + ceil_quot(blksize + 6 * (dn + 1), 34); 2222 sector = (49 + (rec_on_trk - 1) * (10 + d)) / 8; 2223 break; 2224 case 0x3380: 2225 d = 7 + ceil_quot(blksize + 12, 32); 2226 sector = (39 + (rec_on_trk - 1) * (8 + d)) / 7; 2227 break; 2228 } 2229 } 2230 2231 lredata->auxiliary.length_valid = 1; 2232 lredata->auxiliary.length_scope = 1; 2233 lredata->auxiliary.imbedded_ccw_valid = 1; 2234 lredata->length = tlf; 2235 lredata->imbedded_ccw = cmd; 2236 lredata->count = count; 2237 lredata->sector = sector; 2238 set_ch_t(&lredata->seek_addr, begcyl, beghead); 2239 lredata->search_arg.cyl = lredata->seek_addr.cyl; 2240 lredata->search_arg.head = lredata->seek_addr.head; 2241 lredata->search_arg.record = rec_on_trk; 2242 2243 dcw = itcw_add_dcw(itcw, pfx_cmd, 0, 2244 &pfxdata, sizeof(pfxdata), total_data_size); 2245 2246 return rc; 2247 } 2248 2249 static struct dasd_ccw_req *dasd_eckd_build_cp_tpm_track( 2250 struct dasd_device *startdev, 2251 struct dasd_block *block, 2252 struct request *req, 2253 sector_t first_rec, 2254 sector_t last_rec, 2255 sector_t first_trk, 2256 sector_t last_trk, 2257 unsigned int first_offs, 2258 unsigned int last_offs, 2259 unsigned int blk_per_trk, 2260 unsigned int blksize) 2261 { 2262 struct dasd_eckd_private *private; 2263 struct dasd_ccw_req *cqr; 2264 struct req_iterator iter; 2265 struct bio_vec *bv; 2266 char *dst; 2267 unsigned int trkcount, ctidaw; 2268 unsigned char cmd; 2269 struct dasd_device *basedev; 2270 unsigned int tlf; 2271 struct itcw *itcw; 2272 struct tidaw *last_tidaw = NULL; 2273 int itcw_op; 2274 size_t itcw_size; 2275 2276 basedev = block->base; 2277 private = (struct dasd_eckd_private *) basedev->private; 2278 if (rq_data_dir(req) == READ) { 2279 cmd = DASD_ECKD_CCW_READ_TRACK_DATA; 2280 itcw_op = ITCW_OP_READ; 2281 } else if (rq_data_dir(req) == WRITE) { 2282 cmd = DASD_ECKD_CCW_WRITE_TRACK_DATA; 2283 itcw_op = ITCW_OP_WRITE; 2284 } else 2285 return ERR_PTR(-EINVAL); 2286 2287 /* trackbased I/O needs address all memory via TIDAWs, 2288 * not just for 64 bit addresses. This allows us to map 2289 * each segment directly to one tidaw. 2290 */ 2291 trkcount = last_trk - first_trk + 1; 2292 ctidaw = 0; 2293 rq_for_each_segment(bv, req, iter) { 2294 ++ctidaw; 2295 } 2296 2297 /* Allocate the ccw request. */ 2298 itcw_size = itcw_calc_size(0, ctidaw, 0); 2299 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 0, itcw_size, startdev); 2300 if (IS_ERR(cqr)) 2301 return cqr; 2302 2303 cqr->cpmode = 1; 2304 cqr->startdev = startdev; 2305 cqr->memdev = startdev; 2306 cqr->block = block; 2307 cqr->expires = 100*HZ; 2308 cqr->buildclk = get_clock(); 2309 cqr->status = DASD_CQR_FILLED; 2310 cqr->retries = 10; 2311 2312 /* transfer length factor: how many bytes to read from the last track */ 2313 if (first_trk == last_trk) 2314 tlf = last_offs - first_offs + 1; 2315 else 2316 tlf = last_offs + 1; 2317 tlf *= blksize; 2318 2319 itcw = itcw_init(cqr->data, itcw_size, itcw_op, 0, ctidaw, 0); 2320 cqr->cpaddr = itcw_get_tcw(itcw); 2321 2322 if (prepare_itcw(itcw, first_trk, last_trk, 2323 cmd, basedev, startdev, 2324 first_offs + 1, 2325 trkcount, blksize, 2326 (last_rec - first_rec + 1) * blksize, 2327 tlf, blk_per_trk) == -EAGAIN) { 2328 /* Clock not in sync and XRC is enabled. 2329 * Try again later. 2330 */ 2331 dasd_sfree_request(cqr, startdev); 2332 return ERR_PTR(-EAGAIN); 2333 } 2334 2335 /* 2336 * A tidaw can address 4k of memory, but must not cross page boundaries 2337 * We can let the block layer handle this by setting 2338 * blk_queue_segment_boundary to page boundaries and 2339 * blk_max_segment_size to page size when setting up the request queue. 2340 */ 2341 rq_for_each_segment(bv, req, iter) { 2342 dst = page_address(bv->bv_page) + bv->bv_offset; 2343 last_tidaw = itcw_add_tidaw(itcw, 0x00, dst, bv->bv_len); 2344 if (IS_ERR(last_tidaw)) 2345 return (struct dasd_ccw_req *)last_tidaw; 2346 } 2347 2348 last_tidaw->flags |= 0x80; 2349 itcw_finalize(itcw); 2350 2351 if (blk_noretry_request(req) || 2352 block->base->features & DASD_FEATURE_FAILFAST) 2353 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 2354 cqr->startdev = startdev; 2355 cqr->memdev = startdev; 2356 cqr->block = block; 2357 cqr->expires = 5 * 60 * HZ; /* 5 minutes */ 2358 cqr->lpm = private->path_data.ppm; 2359 cqr->retries = 256; 2360 cqr->buildclk = get_clock(); 2361 cqr->status = DASD_CQR_FILLED; 2362 return cqr; 2363 } 2364 2365 static struct dasd_ccw_req *dasd_eckd_build_cp(struct dasd_device *startdev, 2366 struct dasd_block *block, 2367 struct request *req) 2368 { 2369 int tpm, cmdrtd, cmdwtd; 2370 int use_prefix; 2371 #if defined(CONFIG_64BIT) 2372 int fcx_in_css, fcx_in_gneq, fcx_in_features; 2373 #endif 2374 struct dasd_eckd_private *private; 2375 struct dasd_device *basedev; 2376 sector_t first_rec, last_rec; 2377 sector_t first_trk, last_trk; 2378 unsigned int first_offs, last_offs; 2379 unsigned int blk_per_trk, blksize; 2380 int cdlspecial; 2381 struct dasd_ccw_req *cqr; 2382 2383 basedev = block->base; 2384 private = (struct dasd_eckd_private *) basedev->private; 2385 2386 /* Calculate number of blocks/records per track. */ 2387 blksize = block->bp_block; 2388 blk_per_trk = recs_per_track(&private->rdc_data, 0, blksize); 2389 if (blk_per_trk == 0) 2390 return ERR_PTR(-EINVAL); 2391 /* Calculate record id of first and last block. */ 2392 first_rec = first_trk = blk_rq_pos(req) >> block->s2b_shift; 2393 first_offs = sector_div(first_trk, blk_per_trk); 2394 last_rec = last_trk = 2395 (blk_rq_pos(req) + blk_rq_sectors(req) - 1) >> block->s2b_shift; 2396 last_offs = sector_div(last_trk, blk_per_trk); 2397 cdlspecial = (private->uses_cdl && first_rec < 2*blk_per_trk); 2398 2399 /* is transport mode supported? */ 2400 #if defined(CONFIG_64BIT) 2401 fcx_in_css = css_general_characteristics.fcx; 2402 fcx_in_gneq = private->gneq->reserved2[7] & 0x04; 2403 fcx_in_features = private->features.feature[40] & 0x80; 2404 tpm = fcx_in_css && fcx_in_gneq && fcx_in_features; 2405 #else 2406 tpm = 0; 2407 #endif 2408 2409 /* is read track data and write track data in command mode supported? */ 2410 cmdrtd = private->features.feature[9] & 0x20; 2411 cmdwtd = private->features.feature[12] & 0x40; 2412 use_prefix = private->features.feature[8] & 0x01; 2413 2414 cqr = NULL; 2415 if (cdlspecial || dasd_page_cache) { 2416 /* do nothing, just fall through to the cmd mode single case */ 2417 } else if (!dasd_nofcx && tpm && (first_trk == last_trk)) { 2418 cqr = dasd_eckd_build_cp_tpm_track(startdev, block, req, 2419 first_rec, last_rec, 2420 first_trk, last_trk, 2421 first_offs, last_offs, 2422 blk_per_trk, blksize); 2423 if (IS_ERR(cqr) && PTR_ERR(cqr) != -EAGAIN) 2424 cqr = NULL; 2425 } else if (use_prefix && 2426 (((rq_data_dir(req) == READ) && cmdrtd) || 2427 ((rq_data_dir(req) == WRITE) && cmdwtd))) { 2428 cqr = dasd_eckd_build_cp_cmd_track(startdev, block, req, 2429 first_rec, last_rec, 2430 first_trk, last_trk, 2431 first_offs, last_offs, 2432 blk_per_trk, blksize); 2433 if (IS_ERR(cqr) && PTR_ERR(cqr) != -EAGAIN) 2434 cqr = NULL; 2435 } 2436 if (!cqr) 2437 cqr = dasd_eckd_build_cp_cmd_single(startdev, block, req, 2438 first_rec, last_rec, 2439 first_trk, last_trk, 2440 first_offs, last_offs, 2441 blk_per_trk, blksize); 2442 return cqr; 2443 } 2444 2445 static int 2446 dasd_eckd_free_cp(struct dasd_ccw_req *cqr, struct request *req) 2447 { 2448 struct dasd_eckd_private *private; 2449 struct ccw1 *ccw; 2450 struct req_iterator iter; 2451 struct bio_vec *bv; 2452 char *dst, *cda; 2453 unsigned int blksize, blk_per_trk, off; 2454 sector_t recid; 2455 int status; 2456 2457 if (!dasd_page_cache) 2458 goto out; 2459 private = (struct dasd_eckd_private *) cqr->block->base->private; 2460 blksize = cqr->block->bp_block; 2461 blk_per_trk = recs_per_track(&private->rdc_data, 0, blksize); 2462 recid = blk_rq_pos(req) >> cqr->block->s2b_shift; 2463 ccw = cqr->cpaddr; 2464 /* Skip over define extent & locate record. */ 2465 ccw++; 2466 if (private->uses_cdl == 0 || recid > 2*blk_per_trk) 2467 ccw++; 2468 rq_for_each_segment(bv, req, iter) { 2469 dst = page_address(bv->bv_page) + bv->bv_offset; 2470 for (off = 0; off < bv->bv_len; off += blksize) { 2471 /* Skip locate record. */ 2472 if (private->uses_cdl && recid <= 2*blk_per_trk) 2473 ccw++; 2474 if (dst) { 2475 if (ccw->flags & CCW_FLAG_IDA) 2476 cda = *((char **)((addr_t) ccw->cda)); 2477 else 2478 cda = (char *)((addr_t) ccw->cda); 2479 if (dst != cda) { 2480 if (rq_data_dir(req) == READ) 2481 memcpy(dst, cda, bv->bv_len); 2482 kmem_cache_free(dasd_page_cache, 2483 (void *)((addr_t)cda & PAGE_MASK)); 2484 } 2485 dst = NULL; 2486 } 2487 ccw++; 2488 recid++; 2489 } 2490 } 2491 out: 2492 status = cqr->status == DASD_CQR_DONE; 2493 dasd_sfree_request(cqr, cqr->memdev); 2494 return status; 2495 } 2496 2497 /* 2498 * Modify ccw/tcw in cqr so it can be started on a base device. 2499 * 2500 * Note that this is not enough to restart the cqr! 2501 * Either reset cqr->startdev as well (summary unit check handling) 2502 * or restart via separate cqr (as in ERP handling). 2503 */ 2504 void dasd_eckd_reset_ccw_to_base_io(struct dasd_ccw_req *cqr) 2505 { 2506 struct ccw1 *ccw; 2507 struct PFX_eckd_data *pfxdata; 2508 struct tcw *tcw; 2509 struct tccb *tccb; 2510 struct dcw *dcw; 2511 2512 if (cqr->cpmode == 1) { 2513 tcw = cqr->cpaddr; 2514 tccb = tcw_get_tccb(tcw); 2515 dcw = (struct dcw *)&tccb->tca[0]; 2516 pfxdata = (struct PFX_eckd_data *)&dcw->cd[0]; 2517 pfxdata->validity.verify_base = 0; 2518 pfxdata->validity.hyper_pav = 0; 2519 } else { 2520 ccw = cqr->cpaddr; 2521 pfxdata = cqr->data; 2522 if (ccw->cmd_code == DASD_ECKD_CCW_PFX) { 2523 pfxdata->validity.verify_base = 0; 2524 pfxdata->validity.hyper_pav = 0; 2525 } 2526 } 2527 } 2528 2529 #define DASD_ECKD_CHANQ_MAX_SIZE 4 2530 2531 static struct dasd_ccw_req *dasd_eckd_build_alias_cp(struct dasd_device *base, 2532 struct dasd_block *block, 2533 struct request *req) 2534 { 2535 struct dasd_eckd_private *private; 2536 struct dasd_device *startdev; 2537 unsigned long flags; 2538 struct dasd_ccw_req *cqr; 2539 2540 startdev = dasd_alias_get_start_dev(base); 2541 if (!startdev) 2542 startdev = base; 2543 private = (struct dasd_eckd_private *) startdev->private; 2544 if (private->count >= DASD_ECKD_CHANQ_MAX_SIZE) 2545 return ERR_PTR(-EBUSY); 2546 2547 spin_lock_irqsave(get_ccwdev_lock(startdev->cdev), flags); 2548 private->count++; 2549 cqr = dasd_eckd_build_cp(startdev, block, req); 2550 if (IS_ERR(cqr)) 2551 private->count--; 2552 spin_unlock_irqrestore(get_ccwdev_lock(startdev->cdev), flags); 2553 return cqr; 2554 } 2555 2556 static int dasd_eckd_free_alias_cp(struct dasd_ccw_req *cqr, 2557 struct request *req) 2558 { 2559 struct dasd_eckd_private *private; 2560 unsigned long flags; 2561 2562 spin_lock_irqsave(get_ccwdev_lock(cqr->memdev->cdev), flags); 2563 private = (struct dasd_eckd_private *) cqr->memdev->private; 2564 private->count--; 2565 spin_unlock_irqrestore(get_ccwdev_lock(cqr->memdev->cdev), flags); 2566 return dasd_eckd_free_cp(cqr, req); 2567 } 2568 2569 static int 2570 dasd_eckd_fill_info(struct dasd_device * device, 2571 struct dasd_information2_t * info) 2572 { 2573 struct dasd_eckd_private *private; 2574 2575 private = (struct dasd_eckd_private *) device->private; 2576 info->label_block = 2; 2577 info->FBA_layout = private->uses_cdl ? 0 : 1; 2578 info->format = private->uses_cdl ? DASD_FORMAT_CDL : DASD_FORMAT_LDL; 2579 info->characteristics_size = sizeof(struct dasd_eckd_characteristics); 2580 memcpy(info->characteristics, &private->rdc_data, 2581 sizeof(struct dasd_eckd_characteristics)); 2582 info->confdata_size = min((unsigned long)private->conf_len, 2583 sizeof(info->configuration_data)); 2584 memcpy(info->configuration_data, private->conf_data, 2585 info->confdata_size); 2586 return 0; 2587 } 2588 2589 /* 2590 * SECTION: ioctl functions for eckd devices. 2591 */ 2592 2593 /* 2594 * Release device ioctl. 2595 * Buils a channel programm to releases a prior reserved 2596 * (see dasd_eckd_reserve) device. 2597 */ 2598 static int 2599 dasd_eckd_release(struct dasd_device *device) 2600 { 2601 struct dasd_ccw_req *cqr; 2602 int rc; 2603 struct ccw1 *ccw; 2604 2605 if (!capable(CAP_SYS_ADMIN)) 2606 return -EACCES; 2607 2608 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 1, 32, device); 2609 if (IS_ERR(cqr)) { 2610 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 2611 "Could not allocate initialization request"); 2612 return PTR_ERR(cqr); 2613 } 2614 ccw = cqr->cpaddr; 2615 ccw->cmd_code = DASD_ECKD_CCW_RELEASE; 2616 ccw->flags |= CCW_FLAG_SLI; 2617 ccw->count = 32; 2618 ccw->cda = (__u32)(addr_t) cqr->data; 2619 cqr->startdev = device; 2620 cqr->memdev = device; 2621 clear_bit(DASD_CQR_FLAGS_USE_ERP, &cqr->flags); 2622 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 2623 cqr->retries = 2; /* set retry counter to enable basic ERP */ 2624 cqr->expires = 2 * HZ; 2625 cqr->buildclk = get_clock(); 2626 cqr->status = DASD_CQR_FILLED; 2627 2628 rc = dasd_sleep_on_immediatly(cqr); 2629 2630 dasd_sfree_request(cqr, cqr->memdev); 2631 return rc; 2632 } 2633 2634 /* 2635 * Reserve device ioctl. 2636 * Options are set to 'synchronous wait for interrupt' and 2637 * 'timeout the request'. This leads to a terminate IO if 2638 * the interrupt is outstanding for a certain time. 2639 */ 2640 static int 2641 dasd_eckd_reserve(struct dasd_device *device) 2642 { 2643 struct dasd_ccw_req *cqr; 2644 int rc; 2645 struct ccw1 *ccw; 2646 2647 if (!capable(CAP_SYS_ADMIN)) 2648 return -EACCES; 2649 2650 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 1, 32, device); 2651 if (IS_ERR(cqr)) { 2652 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 2653 "Could not allocate initialization request"); 2654 return PTR_ERR(cqr); 2655 } 2656 ccw = cqr->cpaddr; 2657 ccw->cmd_code = DASD_ECKD_CCW_RESERVE; 2658 ccw->flags |= CCW_FLAG_SLI; 2659 ccw->count = 32; 2660 ccw->cda = (__u32)(addr_t) cqr->data; 2661 cqr->startdev = device; 2662 cqr->memdev = device; 2663 clear_bit(DASD_CQR_FLAGS_USE_ERP, &cqr->flags); 2664 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 2665 cqr->retries = 2; /* set retry counter to enable basic ERP */ 2666 cqr->expires = 2 * HZ; 2667 cqr->buildclk = get_clock(); 2668 cqr->status = DASD_CQR_FILLED; 2669 2670 rc = dasd_sleep_on_immediatly(cqr); 2671 2672 dasd_sfree_request(cqr, cqr->memdev); 2673 return rc; 2674 } 2675 2676 /* 2677 * Steal lock ioctl - unconditional reserve device. 2678 * Buils a channel programm to break a device's reservation. 2679 * (unconditional reserve) 2680 */ 2681 static int 2682 dasd_eckd_steal_lock(struct dasd_device *device) 2683 { 2684 struct dasd_ccw_req *cqr; 2685 int rc; 2686 struct ccw1 *ccw; 2687 2688 if (!capable(CAP_SYS_ADMIN)) 2689 return -EACCES; 2690 2691 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 1, 32, device); 2692 if (IS_ERR(cqr)) { 2693 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 2694 "Could not allocate initialization request"); 2695 return PTR_ERR(cqr); 2696 } 2697 ccw = cqr->cpaddr; 2698 ccw->cmd_code = DASD_ECKD_CCW_SLCK; 2699 ccw->flags |= CCW_FLAG_SLI; 2700 ccw->count = 32; 2701 ccw->cda = (__u32)(addr_t) cqr->data; 2702 cqr->startdev = device; 2703 cqr->memdev = device; 2704 clear_bit(DASD_CQR_FLAGS_USE_ERP, &cqr->flags); 2705 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 2706 cqr->retries = 2; /* set retry counter to enable basic ERP */ 2707 cqr->expires = 2 * HZ; 2708 cqr->buildclk = get_clock(); 2709 cqr->status = DASD_CQR_FILLED; 2710 2711 rc = dasd_sleep_on_immediatly(cqr); 2712 2713 dasd_sfree_request(cqr, cqr->memdev); 2714 return rc; 2715 } 2716 2717 /* 2718 * Read performance statistics 2719 */ 2720 static int 2721 dasd_eckd_performance(struct dasd_device *device, void __user *argp) 2722 { 2723 struct dasd_psf_prssd_data *prssdp; 2724 struct dasd_rssd_perf_stats_t *stats; 2725 struct dasd_ccw_req *cqr; 2726 struct ccw1 *ccw; 2727 int rc; 2728 2729 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 1 /* PSF */ + 1 /* RSSD */, 2730 (sizeof(struct dasd_psf_prssd_data) + 2731 sizeof(struct dasd_rssd_perf_stats_t)), 2732 device); 2733 if (IS_ERR(cqr)) { 2734 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 2735 "Could not allocate initialization request"); 2736 return PTR_ERR(cqr); 2737 } 2738 cqr->startdev = device; 2739 cqr->memdev = device; 2740 cqr->retries = 0; 2741 clear_bit(DASD_CQR_FLAGS_USE_ERP, &cqr->flags); 2742 cqr->expires = 10 * HZ; 2743 2744 /* Prepare for Read Subsystem Data */ 2745 prssdp = (struct dasd_psf_prssd_data *) cqr->data; 2746 memset(prssdp, 0, sizeof(struct dasd_psf_prssd_data)); 2747 prssdp->order = PSF_ORDER_PRSSD; 2748 prssdp->suborder = 0x01; /* Performance Statistics */ 2749 prssdp->varies[1] = 0x01; /* Perf Statistics for the Subsystem */ 2750 2751 ccw = cqr->cpaddr; 2752 ccw->cmd_code = DASD_ECKD_CCW_PSF; 2753 ccw->count = sizeof(struct dasd_psf_prssd_data); 2754 ccw->flags |= CCW_FLAG_CC; 2755 ccw->cda = (__u32)(addr_t) prssdp; 2756 2757 /* Read Subsystem Data - Performance Statistics */ 2758 stats = (struct dasd_rssd_perf_stats_t *) (prssdp + 1); 2759 memset(stats, 0, sizeof(struct dasd_rssd_perf_stats_t)); 2760 2761 ccw++; 2762 ccw->cmd_code = DASD_ECKD_CCW_RSSD; 2763 ccw->count = sizeof(struct dasd_rssd_perf_stats_t); 2764 ccw->cda = (__u32)(addr_t) stats; 2765 2766 cqr->buildclk = get_clock(); 2767 cqr->status = DASD_CQR_FILLED; 2768 rc = dasd_sleep_on(cqr); 2769 if (rc == 0) { 2770 prssdp = (struct dasd_psf_prssd_data *) cqr->data; 2771 stats = (struct dasd_rssd_perf_stats_t *) (prssdp + 1); 2772 if (copy_to_user(argp, stats, 2773 sizeof(struct dasd_rssd_perf_stats_t))) 2774 rc = -EFAULT; 2775 } 2776 dasd_sfree_request(cqr, cqr->memdev); 2777 return rc; 2778 } 2779 2780 /* 2781 * Get attributes (cache operations) 2782 * Returnes the cache attributes used in Define Extend (DE). 2783 */ 2784 static int 2785 dasd_eckd_get_attrib(struct dasd_device *device, void __user *argp) 2786 { 2787 struct dasd_eckd_private *private = 2788 (struct dasd_eckd_private *)device->private; 2789 struct attrib_data_t attrib = private->attrib; 2790 int rc; 2791 2792 if (!capable(CAP_SYS_ADMIN)) 2793 return -EACCES; 2794 if (!argp) 2795 return -EINVAL; 2796 2797 rc = 0; 2798 if (copy_to_user(argp, (long *) &attrib, 2799 sizeof(struct attrib_data_t))) 2800 rc = -EFAULT; 2801 2802 return rc; 2803 } 2804 2805 /* 2806 * Set attributes (cache operations) 2807 * Stores the attributes for cache operation to be used in Define Extend (DE). 2808 */ 2809 static int 2810 dasd_eckd_set_attrib(struct dasd_device *device, void __user *argp) 2811 { 2812 struct dasd_eckd_private *private = 2813 (struct dasd_eckd_private *)device->private; 2814 struct attrib_data_t attrib; 2815 2816 if (!capable(CAP_SYS_ADMIN)) 2817 return -EACCES; 2818 if (!argp) 2819 return -EINVAL; 2820 2821 if (copy_from_user(&attrib, argp, sizeof(struct attrib_data_t))) 2822 return -EFAULT; 2823 private->attrib = attrib; 2824 2825 dev_info(&device->cdev->dev, 2826 "The DASD cache mode was set to %x (%i cylinder prestage)\n", 2827 private->attrib.operation, private->attrib.nr_cyl); 2828 return 0; 2829 } 2830 2831 /* 2832 * Issue syscall I/O to EMC Symmetrix array. 2833 * CCWs are PSF and RSSD 2834 */ 2835 static int dasd_symm_io(struct dasd_device *device, void __user *argp) 2836 { 2837 struct dasd_symmio_parms usrparm; 2838 char *psf_data, *rssd_result; 2839 struct dasd_ccw_req *cqr; 2840 struct ccw1 *ccw; 2841 int rc; 2842 2843 /* Copy parms from caller */ 2844 rc = -EFAULT; 2845 if (copy_from_user(&usrparm, argp, sizeof(usrparm))) 2846 goto out; 2847 #ifndef CONFIG_64BIT 2848 /* Make sure pointers are sane even on 31 bit. */ 2849 if ((usrparm.psf_data >> 32) != 0 || (usrparm.rssd_result >> 32) != 0) { 2850 rc = -EINVAL; 2851 goto out; 2852 } 2853 #endif 2854 /* alloc I/O data area */ 2855 psf_data = kzalloc(usrparm.psf_data_len, GFP_KERNEL | GFP_DMA); 2856 rssd_result = kzalloc(usrparm.rssd_result_len, GFP_KERNEL | GFP_DMA); 2857 if (!psf_data || !rssd_result) { 2858 rc = -ENOMEM; 2859 goto out_free; 2860 } 2861 2862 /* get syscall header from user space */ 2863 rc = -EFAULT; 2864 if (copy_from_user(psf_data, 2865 (void __user *)(unsigned long) usrparm.psf_data, 2866 usrparm.psf_data_len)) 2867 goto out_free; 2868 2869 /* sanity check on syscall header */ 2870 if (psf_data[0] != 0x17 && psf_data[1] != 0xce) { 2871 rc = -EINVAL; 2872 goto out_free; 2873 } 2874 2875 /* setup CCWs for PSF + RSSD */ 2876 cqr = dasd_smalloc_request(DASD_ECKD_MAGIC, 2 , 0, device); 2877 if (IS_ERR(cqr)) { 2878 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 2879 "Could not allocate initialization request"); 2880 rc = PTR_ERR(cqr); 2881 goto out_free; 2882 } 2883 2884 cqr->startdev = device; 2885 cqr->memdev = device; 2886 cqr->retries = 3; 2887 cqr->expires = 10 * HZ; 2888 cqr->buildclk = get_clock(); 2889 cqr->status = DASD_CQR_FILLED; 2890 2891 /* Build the ccws */ 2892 ccw = cqr->cpaddr; 2893 2894 /* PSF ccw */ 2895 ccw->cmd_code = DASD_ECKD_CCW_PSF; 2896 ccw->count = usrparm.psf_data_len; 2897 ccw->flags |= CCW_FLAG_CC; 2898 ccw->cda = (__u32)(addr_t) psf_data; 2899 2900 ccw++; 2901 2902 /* RSSD ccw */ 2903 ccw->cmd_code = DASD_ECKD_CCW_RSSD; 2904 ccw->count = usrparm.rssd_result_len; 2905 ccw->flags = CCW_FLAG_SLI ; 2906 ccw->cda = (__u32)(addr_t) rssd_result; 2907 2908 rc = dasd_sleep_on(cqr); 2909 if (rc) 2910 goto out_sfree; 2911 2912 rc = -EFAULT; 2913 if (copy_to_user((void __user *)(unsigned long) usrparm.rssd_result, 2914 rssd_result, usrparm.rssd_result_len)) 2915 goto out_sfree; 2916 rc = 0; 2917 2918 out_sfree: 2919 dasd_sfree_request(cqr, cqr->memdev); 2920 out_free: 2921 kfree(rssd_result); 2922 kfree(psf_data); 2923 out: 2924 DBF_DEV_EVENT(DBF_WARNING, device, "Symmetrix ioctl: rc=%d", rc); 2925 return rc; 2926 } 2927 2928 static int 2929 dasd_eckd_ioctl(struct dasd_block *block, unsigned int cmd, void __user *argp) 2930 { 2931 struct dasd_device *device = block->base; 2932 2933 switch (cmd) { 2934 case BIODASDGATTR: 2935 return dasd_eckd_get_attrib(device, argp); 2936 case BIODASDSATTR: 2937 return dasd_eckd_set_attrib(device, argp); 2938 case BIODASDPSRD: 2939 return dasd_eckd_performance(device, argp); 2940 case BIODASDRLSE: 2941 return dasd_eckd_release(device); 2942 case BIODASDRSRV: 2943 return dasd_eckd_reserve(device); 2944 case BIODASDSLCK: 2945 return dasd_eckd_steal_lock(device); 2946 case BIODASDSYMMIO: 2947 return dasd_symm_io(device, argp); 2948 default: 2949 return -ENOIOCTLCMD; 2950 } 2951 } 2952 2953 /* 2954 * Dump the range of CCWs into 'page' buffer 2955 * and return number of printed chars. 2956 */ 2957 static int 2958 dasd_eckd_dump_ccw_range(struct ccw1 *from, struct ccw1 *to, char *page) 2959 { 2960 int len, count; 2961 char *datap; 2962 2963 len = 0; 2964 while (from <= to) { 2965 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 2966 " CCW %p: %08X %08X DAT:", 2967 from, ((int *) from)[0], ((int *) from)[1]); 2968 2969 /* get pointer to data (consider IDALs) */ 2970 if (from->flags & CCW_FLAG_IDA) 2971 datap = (char *) *((addr_t *) (addr_t) from->cda); 2972 else 2973 datap = (char *) ((addr_t) from->cda); 2974 2975 /* dump data (max 32 bytes) */ 2976 for (count = 0; count < from->count && count < 32; count++) { 2977 if (count % 8 == 0) len += sprintf(page + len, " "); 2978 if (count % 4 == 0) len += sprintf(page + len, " "); 2979 len += sprintf(page + len, "%02x", datap[count]); 2980 } 2981 len += sprintf(page + len, "\n"); 2982 from++; 2983 } 2984 return len; 2985 } 2986 2987 static void 2988 dasd_eckd_dump_sense_dbf(struct dasd_device *device, struct irb *irb, 2989 char *reason) 2990 { 2991 u64 *sense; 2992 2993 sense = (u64 *) dasd_get_sense(irb); 2994 if (sense) { 2995 DBF_DEV_EVENT(DBF_EMERG, device, 2996 "%s: %s %02x%02x%02x %016llx %016llx %016llx " 2997 "%016llx", reason, 2998 scsw_is_tm(&irb->scsw) ? "t" : "c", 2999 scsw_cc(&irb->scsw), scsw_cstat(&irb->scsw), 3000 scsw_dstat(&irb->scsw), sense[0], sense[1], 3001 sense[2], sense[3]); 3002 } else { 3003 DBF_DEV_EVENT(DBF_EMERG, device, "%s", 3004 "SORRY - NO VALID SENSE AVAILABLE\n"); 3005 } 3006 } 3007 3008 /* 3009 * Print sense data and related channel program. 3010 * Parts are printed because printk buffer is only 1024 bytes. 3011 */ 3012 static void dasd_eckd_dump_sense_ccw(struct dasd_device *device, 3013 struct dasd_ccw_req *req, struct irb *irb) 3014 { 3015 char *page; 3016 struct ccw1 *first, *last, *fail, *from, *to; 3017 int len, sl, sct; 3018 3019 page = (char *) get_zeroed_page(GFP_ATOMIC); 3020 if (page == NULL) { 3021 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 3022 "No memory to dump sense data\n"); 3023 return; 3024 } 3025 /* dump the sense data */ 3026 len = sprintf(page, KERN_ERR PRINTK_HEADER 3027 " I/O status report for device %s:\n", 3028 dev_name(&device->cdev->dev)); 3029 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3030 " in req: %p CS: 0x%02X DS: 0x%02X CC: 0x%02X RC: %d\n", 3031 req, scsw_cstat(&irb->scsw), scsw_dstat(&irb->scsw), 3032 scsw_cc(&irb->scsw), req->intrc); 3033 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3034 " device %s: Failing CCW: %p\n", 3035 dev_name(&device->cdev->dev), 3036 (void *) (addr_t) irb->scsw.cmd.cpa); 3037 if (irb->esw.esw0.erw.cons) { 3038 for (sl = 0; sl < 4; sl++) { 3039 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3040 " Sense(hex) %2d-%2d:", 3041 (8 * sl), ((8 * sl) + 7)); 3042 3043 for (sct = 0; sct < 8; sct++) { 3044 len += sprintf(page + len, " %02x", 3045 irb->ecw[8 * sl + sct]); 3046 } 3047 len += sprintf(page + len, "\n"); 3048 } 3049 3050 if (irb->ecw[27] & DASD_SENSE_BIT_0) { 3051 /* 24 Byte Sense Data */ 3052 sprintf(page + len, KERN_ERR PRINTK_HEADER 3053 " 24 Byte: %x MSG %x, " 3054 "%s MSGb to SYSOP\n", 3055 irb->ecw[7] >> 4, irb->ecw[7] & 0x0f, 3056 irb->ecw[1] & 0x10 ? "" : "no"); 3057 } else { 3058 /* 32 Byte Sense Data */ 3059 sprintf(page + len, KERN_ERR PRINTK_HEADER 3060 " 32 Byte: Format: %x " 3061 "Exception class %x\n", 3062 irb->ecw[6] & 0x0f, irb->ecw[22] >> 4); 3063 } 3064 } else { 3065 sprintf(page + len, KERN_ERR PRINTK_HEADER 3066 " SORRY - NO VALID SENSE AVAILABLE\n"); 3067 } 3068 printk("%s", page); 3069 3070 if (req) { 3071 /* req == NULL for unsolicited interrupts */ 3072 /* dump the Channel Program (max 140 Bytes per line) */ 3073 /* Count CCW and print first CCWs (maximum 1024 % 140 = 7) */ 3074 first = req->cpaddr; 3075 for (last = first; last->flags & (CCW_FLAG_CC | CCW_FLAG_DC); last++); 3076 to = min(first + 6, last); 3077 len = sprintf(page, KERN_ERR PRINTK_HEADER 3078 " Related CP in req: %p\n", req); 3079 dasd_eckd_dump_ccw_range(first, to, page + len); 3080 printk("%s", page); 3081 3082 /* print failing CCW area (maximum 4) */ 3083 /* scsw->cda is either valid or zero */ 3084 len = 0; 3085 from = ++to; 3086 fail = (struct ccw1 *)(addr_t) 3087 irb->scsw.cmd.cpa; /* failing CCW */ 3088 if (from < fail - 2) { 3089 from = fail - 2; /* there is a gap - print header */ 3090 len += sprintf(page, KERN_ERR PRINTK_HEADER "......\n"); 3091 } 3092 to = min(fail + 1, last); 3093 len += dasd_eckd_dump_ccw_range(from, to, page + len); 3094 3095 /* print last CCWs (maximum 2) */ 3096 from = max(from, ++to); 3097 if (from < last - 1) { 3098 from = last - 1; /* there is a gap - print header */ 3099 len += sprintf(page + len, KERN_ERR PRINTK_HEADER "......\n"); 3100 } 3101 len += dasd_eckd_dump_ccw_range(from, last, page + len); 3102 if (len > 0) 3103 printk("%s", page); 3104 } 3105 free_page((unsigned long) page); 3106 } 3107 3108 3109 /* 3110 * Print sense data from a tcw. 3111 */ 3112 static void dasd_eckd_dump_sense_tcw(struct dasd_device *device, 3113 struct dasd_ccw_req *req, struct irb *irb) 3114 { 3115 char *page; 3116 int len, sl, sct, residual; 3117 3118 struct tsb *tsb; 3119 u8 *sense; 3120 3121 3122 page = (char *) get_zeroed_page(GFP_ATOMIC); 3123 if (page == NULL) { 3124 DBF_DEV_EVENT(DBF_WARNING, device, " %s", 3125 "No memory to dump sense data"); 3126 return; 3127 } 3128 /* dump the sense data */ 3129 len = sprintf(page, KERN_ERR PRINTK_HEADER 3130 " I/O status report for device %s:\n", 3131 dev_name(&device->cdev->dev)); 3132 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3133 " in req: %p CS: 0x%02X DS: 0x%02X CC: 0x%02X RC: %d " 3134 "fcxs: 0x%02X schxs: 0x%02X\n", req, 3135 scsw_cstat(&irb->scsw), scsw_dstat(&irb->scsw), 3136 scsw_cc(&irb->scsw), req->intrc, 3137 irb->scsw.tm.fcxs, irb->scsw.tm.schxs); 3138 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3139 " device %s: Failing TCW: %p\n", 3140 dev_name(&device->cdev->dev), 3141 (void *) (addr_t) irb->scsw.tm.tcw); 3142 3143 tsb = NULL; 3144 sense = NULL; 3145 if (irb->scsw.tm.tcw) 3146 tsb = tcw_get_tsb( 3147 (struct tcw *)(unsigned long)irb->scsw.tm.tcw); 3148 3149 if (tsb && (irb->scsw.tm.fcxs == 0x01)) { 3150 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3151 " tsb->length %d\n", tsb->length); 3152 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3153 " tsb->flags %x\n", tsb->flags); 3154 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3155 " tsb->dcw_offset %d\n", tsb->dcw_offset); 3156 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3157 " tsb->count %d\n", tsb->count); 3158 residual = tsb->count - 28; 3159 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3160 " residual %d\n", residual); 3161 3162 switch (tsb->flags & 0x07) { 3163 case 1: /* tsa_iostat */ 3164 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3165 " tsb->tsa.iostat.dev_time %d\n", 3166 tsb->tsa.iostat.dev_time); 3167 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3168 " tsb->tsa.iostat.def_time %d\n", 3169 tsb->tsa.iostat.def_time); 3170 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3171 " tsb->tsa.iostat.queue_time %d\n", 3172 tsb->tsa.iostat.queue_time); 3173 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3174 " tsb->tsa.iostat.dev_busy_time %d\n", 3175 tsb->tsa.iostat.dev_busy_time); 3176 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3177 " tsb->tsa.iostat.dev_act_time %d\n", 3178 tsb->tsa.iostat.dev_act_time); 3179 sense = tsb->tsa.iostat.sense; 3180 break; 3181 case 2: /* ts_ddpc */ 3182 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3183 " tsb->tsa.ddpc.rc %d\n", tsb->tsa.ddpc.rc); 3184 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3185 " tsb->tsa.ddpc.rcq: "); 3186 for (sl = 0; sl < 16; sl++) { 3187 for (sct = 0; sct < 8; sct++) { 3188 len += sprintf(page + len, " %02x", 3189 tsb->tsa.ddpc.rcq[sl]); 3190 } 3191 len += sprintf(page + len, "\n"); 3192 } 3193 sense = tsb->tsa.ddpc.sense; 3194 break; 3195 case 3: /* tsa_intrg */ 3196 len += sprintf(page + len, KERN_ERR PRINTK_HEADER 3197 " tsb->tsa.intrg.: not supportet yet \n"); 3198 break; 3199 } 3200 3201 if (sense) { 3202 for (sl = 0; sl < 4; sl++) { 3203 len += sprintf(page + len, 3204 KERN_ERR PRINTK_HEADER 3205 " Sense(hex) %2d-%2d:", 3206 (8 * sl), ((8 * sl) + 7)); 3207 for (sct = 0; sct < 8; sct++) { 3208 len += sprintf(page + len, " %02x", 3209 sense[8 * sl + sct]); 3210 } 3211 len += sprintf(page + len, "\n"); 3212 } 3213 3214 if (sense[27] & DASD_SENSE_BIT_0) { 3215 /* 24 Byte Sense Data */ 3216 sprintf(page + len, KERN_ERR PRINTK_HEADER 3217 " 24 Byte: %x MSG %x, " 3218 "%s MSGb to SYSOP\n", 3219 sense[7] >> 4, sense[7] & 0x0f, 3220 sense[1] & 0x10 ? "" : "no"); 3221 } else { 3222 /* 32 Byte Sense Data */ 3223 sprintf(page + len, KERN_ERR PRINTK_HEADER 3224 " 32 Byte: Format: %x " 3225 "Exception class %x\n", 3226 sense[6] & 0x0f, sense[22] >> 4); 3227 } 3228 } else { 3229 sprintf(page + len, KERN_ERR PRINTK_HEADER 3230 " SORRY - NO VALID SENSE AVAILABLE\n"); 3231 } 3232 } else { 3233 sprintf(page + len, KERN_ERR PRINTK_HEADER 3234 " SORRY - NO TSB DATA AVAILABLE\n"); 3235 } 3236 printk("%s", page); 3237 free_page((unsigned long) page); 3238 } 3239 3240 static void dasd_eckd_dump_sense(struct dasd_device *device, 3241 struct dasd_ccw_req *req, struct irb *irb) 3242 { 3243 if (req && scsw_is_tm(&req->irb.scsw)) 3244 dasd_eckd_dump_sense_tcw(device, req, irb); 3245 else 3246 dasd_eckd_dump_sense_ccw(device, req, irb); 3247 } 3248 3249 int dasd_eckd_pm_freeze(struct dasd_device *device) 3250 { 3251 /* 3252 * the device should be disconnected from our LCU structure 3253 * on restore we will reconnect it and reread LCU specific 3254 * information like PAV support that might have changed 3255 */ 3256 dasd_alias_remove_device(device); 3257 dasd_alias_disconnect_device_from_lcu(device); 3258 3259 return 0; 3260 } 3261 3262 int dasd_eckd_restore_device(struct dasd_device *device) 3263 { 3264 struct dasd_eckd_private *private; 3265 struct dasd_eckd_characteristics temp_rdc_data; 3266 int is_known, rc; 3267 struct dasd_uid temp_uid; 3268 unsigned long flags; 3269 3270 private = (struct dasd_eckd_private *) device->private; 3271 3272 /* Read Configuration Data */ 3273 rc = dasd_eckd_read_conf(device); 3274 if (rc) 3275 goto out_err; 3276 3277 /* Generate device unique id and register in devmap */ 3278 rc = dasd_eckd_generate_uid(device, &private->uid); 3279 dasd_get_uid(device->cdev, &temp_uid); 3280 if (memcmp(&private->uid, &temp_uid, sizeof(struct dasd_uid)) != 0) 3281 dev_err(&device->cdev->dev, "The UID of the DASD has " 3282 "changed\n"); 3283 if (rc) 3284 goto out_err; 3285 dasd_set_uid(device->cdev, &private->uid); 3286 3287 /* register lcu with alias handling, enable PAV if this is a new lcu */ 3288 is_known = dasd_alias_make_device_known_to_lcu(device); 3289 if (is_known < 0) 3290 return is_known; 3291 if (!is_known) { 3292 dasd_eckd_validate_server(device); 3293 dasd_alias_lcu_setup_complete(device); 3294 } else 3295 dasd_alias_wait_for_lcu_setup(device); 3296 3297 /* RE-Read Configuration Data */ 3298 rc = dasd_eckd_read_conf(device); 3299 if (rc) 3300 goto out_err; 3301 3302 /* Read Feature Codes */ 3303 dasd_eckd_read_features(device); 3304 3305 /* Read Device Characteristics */ 3306 rc = dasd_generic_read_dev_chars(device, DASD_ECKD_MAGIC, 3307 &temp_rdc_data, 64); 3308 if (rc) { 3309 DBF_EVENT_DEVID(DBF_WARNING, device->cdev, 3310 "Read device characteristic failed, rc=%d", rc); 3311 goto out_err; 3312 } 3313 spin_lock_irqsave(get_ccwdev_lock(device->cdev), flags); 3314 memcpy(&private->rdc_data, &temp_rdc_data, sizeof(temp_rdc_data)); 3315 spin_unlock_irqrestore(get_ccwdev_lock(device->cdev), flags); 3316 3317 /* add device to alias management */ 3318 dasd_alias_add_device(device); 3319 3320 return 0; 3321 3322 out_err: 3323 return -1; 3324 } 3325 3326 static struct ccw_driver dasd_eckd_driver = { 3327 .name = "dasd-eckd", 3328 .owner = THIS_MODULE, 3329 .ids = dasd_eckd_ids, 3330 .probe = dasd_eckd_probe, 3331 .remove = dasd_generic_remove, 3332 .set_offline = dasd_generic_set_offline, 3333 .set_online = dasd_eckd_set_online, 3334 .notify = dasd_generic_notify, 3335 .freeze = dasd_generic_pm_freeze, 3336 .thaw = dasd_generic_restore_device, 3337 .restore = dasd_generic_restore_device, 3338 }; 3339 3340 /* 3341 * max_blocks is dependent on the amount of storage that is available 3342 * in the static io buffer for each device. Currently each device has 3343 * 8192 bytes (=2 pages). For 64 bit one dasd_mchunkt_t structure has 3344 * 24 bytes, the struct dasd_ccw_req has 136 bytes and each block can use 3345 * up to 16 bytes (8 for the ccw and 8 for the idal pointer). In 3346 * addition we have one define extent ccw + 16 bytes of data and one 3347 * locate record ccw + 16 bytes of data. That makes: 3348 * (8192 - 24 - 136 - 8 - 16 - 8 - 16) / 16 = 499 blocks at maximum. 3349 * We want to fit two into the available memory so that we can immediately 3350 * start the next request if one finishes off. That makes 249.5 blocks 3351 * for one request. Give a little safety and the result is 240. 3352 */ 3353 static struct dasd_discipline dasd_eckd_discipline = { 3354 .owner = THIS_MODULE, 3355 .name = "ECKD", 3356 .ebcname = "ECKD", 3357 .max_blocks = 240, 3358 .check_device = dasd_eckd_check_characteristics, 3359 .uncheck_device = dasd_eckd_uncheck_device, 3360 .do_analysis = dasd_eckd_do_analysis, 3361 .ready_to_online = dasd_eckd_ready_to_online, 3362 .online_to_ready = dasd_eckd_online_to_ready, 3363 .fill_geometry = dasd_eckd_fill_geometry, 3364 .start_IO = dasd_start_IO, 3365 .term_IO = dasd_term_IO, 3366 .handle_terminated_request = dasd_eckd_handle_terminated_request, 3367 .format_device = dasd_eckd_format_device, 3368 .erp_action = dasd_eckd_erp_action, 3369 .erp_postaction = dasd_eckd_erp_postaction, 3370 .handle_unsolicited_interrupt = dasd_eckd_handle_unsolicited_interrupt, 3371 .build_cp = dasd_eckd_build_alias_cp, 3372 .free_cp = dasd_eckd_free_alias_cp, 3373 .dump_sense = dasd_eckd_dump_sense, 3374 .dump_sense_dbf = dasd_eckd_dump_sense_dbf, 3375 .fill_info = dasd_eckd_fill_info, 3376 .ioctl = dasd_eckd_ioctl, 3377 .freeze = dasd_eckd_pm_freeze, 3378 .restore = dasd_eckd_restore_device, 3379 }; 3380 3381 static int __init 3382 dasd_eckd_init(void) 3383 { 3384 int ret; 3385 3386 ASCEBC(dasd_eckd_discipline.ebcname, 4); 3387 ret = ccw_driver_register(&dasd_eckd_driver); 3388 if (!ret) 3389 wait_for_device_probe(); 3390 3391 return ret; 3392 } 3393 3394 static void __exit 3395 dasd_eckd_cleanup(void) 3396 { 3397 ccw_driver_unregister(&dasd_eckd_driver); 3398 } 3399 3400 module_init(dasd_eckd_init); 3401 module_exit(dasd_eckd_cleanup); 3402