1 // SPDX-License-Identifier: GPL-2.0 2 /* 3 * Author(s)......: Holger Smolinski <Holger.Smolinski@de.ibm.com> 4 * Bugreports.to..: <Linux390@de.ibm.com> 5 * Copyright IBM Corp. 1999, 2009 6 */ 7 8 #define KMSG_COMPONENT "dasd-fba" 9 10 #include <linux/stddef.h> 11 #include <linux/kernel.h> 12 #include <asm/debug.h> 13 14 #include <linux/slab.h> 15 #include <linux/hdreg.h> /* HDIO_GETGEO */ 16 #include <linux/bio.h> 17 #include <linux/module.h> 18 #include <linux/init.h> 19 20 #include <asm/idals.h> 21 #include <asm/ebcdic.h> 22 #include <asm/io.h> 23 #include <asm/ccwdev.h> 24 25 #include "dasd_int.h" 26 #include "dasd_fba.h" 27 28 #ifdef PRINTK_HEADER 29 #undef PRINTK_HEADER 30 #endif /* PRINTK_HEADER */ 31 #define PRINTK_HEADER "dasd(fba):" 32 33 #define FBA_DEFAULT_RETRIES 32 34 35 #define DASD_FBA_CCW_WRITE 0x41 36 #define DASD_FBA_CCW_READ 0x42 37 #define DASD_FBA_CCW_LOCATE 0x43 38 #define DASD_FBA_CCW_DEFINE_EXTENT 0x63 39 40 MODULE_LICENSE("GPL"); 41 42 static struct dasd_discipline dasd_fba_discipline; 43 44 struct dasd_fba_private { 45 struct dasd_fba_characteristics rdc_data; 46 }; 47 48 static struct ccw_device_id dasd_fba_ids[] = { 49 { CCW_DEVICE_DEVTYPE (0x6310, 0, 0x9336, 0), .driver_info = 0x1}, 50 { CCW_DEVICE_DEVTYPE (0x3880, 0, 0x3370, 0), .driver_info = 0x2}, 51 { /* end of list */ }, 52 }; 53 54 MODULE_DEVICE_TABLE(ccw, dasd_fba_ids); 55 56 static struct ccw_driver dasd_fba_driver; /* see below */ 57 static int 58 dasd_fba_probe(struct ccw_device *cdev) 59 { 60 return dasd_generic_probe(cdev, &dasd_fba_discipline); 61 } 62 63 static int 64 dasd_fba_set_online(struct ccw_device *cdev) 65 { 66 return dasd_generic_set_online(cdev, &dasd_fba_discipline); 67 } 68 69 static struct ccw_driver dasd_fba_driver = { 70 .driver = { 71 .name = "dasd-fba", 72 .owner = THIS_MODULE, 73 }, 74 .ids = dasd_fba_ids, 75 .probe = dasd_fba_probe, 76 .remove = dasd_generic_remove, 77 .set_offline = dasd_generic_set_offline, 78 .set_online = dasd_fba_set_online, 79 .notify = dasd_generic_notify, 80 .path_event = dasd_generic_path_event, 81 .freeze = dasd_generic_pm_freeze, 82 .thaw = dasd_generic_restore_device, 83 .restore = dasd_generic_restore_device, 84 .int_class = IRQIO_DAS, 85 }; 86 87 static void 88 define_extent(struct ccw1 * ccw, struct DE_fba_data *data, int rw, 89 int blksize, int beg, int nr) 90 { 91 ccw->cmd_code = DASD_FBA_CCW_DEFINE_EXTENT; 92 ccw->flags = 0; 93 ccw->count = 16; 94 ccw->cda = (__u32) __pa(data); 95 memset(data, 0, sizeof (struct DE_fba_data)); 96 if (rw == WRITE) 97 (data->mask).perm = 0x0; 98 else if (rw == READ) 99 (data->mask).perm = 0x1; 100 else 101 data->mask.perm = 0x2; 102 data->blk_size = blksize; 103 data->ext_loc = beg; 104 data->ext_end = nr - 1; 105 } 106 107 static void 108 locate_record(struct ccw1 * ccw, struct LO_fba_data *data, int rw, 109 int block_nr, int block_ct) 110 { 111 ccw->cmd_code = DASD_FBA_CCW_LOCATE; 112 ccw->flags = 0; 113 ccw->count = 8; 114 ccw->cda = (__u32) __pa(data); 115 memset(data, 0, sizeof (struct LO_fba_data)); 116 if (rw == WRITE) 117 data->operation.cmd = 0x5; 118 else if (rw == READ) 119 data->operation.cmd = 0x6; 120 else 121 data->operation.cmd = 0x8; 122 data->blk_nr = block_nr; 123 data->blk_ct = block_ct; 124 } 125 126 static int 127 dasd_fba_check_characteristics(struct dasd_device *device) 128 { 129 struct dasd_fba_private *private = device->private; 130 struct ccw_device *cdev = device->cdev; 131 struct dasd_block *block; 132 int readonly, rc; 133 134 if (!private) { 135 private = kzalloc(sizeof(*private), GFP_KERNEL | GFP_DMA); 136 if (!private) { 137 dev_warn(&device->cdev->dev, 138 "Allocating memory for private DASD " 139 "data failed\n"); 140 return -ENOMEM; 141 } 142 device->private = private; 143 } else { 144 memset(private, 0, sizeof(*private)); 145 } 146 block = dasd_alloc_block(); 147 if (IS_ERR(block)) { 148 DBF_EVENT_DEVID(DBF_WARNING, cdev, "%s", "could not allocate " 149 "dasd block structure"); 150 device->private = NULL; 151 kfree(private); 152 return PTR_ERR(block); 153 } 154 device->block = block; 155 block->base = device; 156 157 /* Read Device Characteristics */ 158 rc = dasd_generic_read_dev_chars(device, DASD_FBA_MAGIC, 159 &private->rdc_data, 32); 160 if (rc) { 161 DBF_EVENT_DEVID(DBF_WARNING, cdev, "Read device " 162 "characteristics returned error %d", rc); 163 device->block = NULL; 164 dasd_free_block(block); 165 device->private = NULL; 166 kfree(private); 167 return rc; 168 } 169 170 device->default_expires = DASD_EXPIRES; 171 device->default_retries = FBA_DEFAULT_RETRIES; 172 dasd_path_set_opm(device, LPM_ANYPATH); 173 174 readonly = dasd_device_is_ro(device); 175 if (readonly) 176 set_bit(DASD_FLAG_DEVICE_RO, &device->flags); 177 178 /* FBA supports discard, set the according feature bit */ 179 dasd_set_feature(cdev, DASD_FEATURE_DISCARD, 1); 180 181 dev_info(&device->cdev->dev, 182 "New FBA DASD %04X/%02X (CU %04X/%02X) with %d MB " 183 "and %d B/blk%s\n", 184 cdev->id.dev_type, 185 cdev->id.dev_model, 186 cdev->id.cu_type, 187 cdev->id.cu_model, 188 ((private->rdc_data.blk_bdsa * 189 (private->rdc_data.blk_size >> 9)) >> 11), 190 private->rdc_data.blk_size, 191 readonly ? ", read-only device" : ""); 192 return 0; 193 } 194 195 static int dasd_fba_do_analysis(struct dasd_block *block) 196 { 197 struct dasd_fba_private *private = block->base->private; 198 int sb, rc; 199 200 rc = dasd_check_blocksize(private->rdc_data.blk_size); 201 if (rc) { 202 DBF_DEV_EVENT(DBF_WARNING, block->base, "unknown blocksize %d", 203 private->rdc_data.blk_size); 204 return rc; 205 } 206 block->blocks = private->rdc_data.blk_bdsa; 207 block->bp_block = private->rdc_data.blk_size; 208 block->s2b_shift = 0; /* bits to shift 512 to get a block */ 209 for (sb = 512; sb < private->rdc_data.blk_size; sb = sb << 1) 210 block->s2b_shift++; 211 return 0; 212 } 213 214 static int dasd_fba_fill_geometry(struct dasd_block *block, 215 struct hd_geometry *geo) 216 { 217 if (dasd_check_blocksize(block->bp_block) != 0) 218 return -EINVAL; 219 geo->cylinders = (block->blocks << block->s2b_shift) >> 10; 220 geo->heads = 16; 221 geo->sectors = 128 >> block->s2b_shift; 222 return 0; 223 } 224 225 static dasd_erp_fn_t 226 dasd_fba_erp_action(struct dasd_ccw_req * cqr) 227 { 228 return dasd_default_erp_action; 229 } 230 231 static dasd_erp_fn_t 232 dasd_fba_erp_postaction(struct dasd_ccw_req * cqr) 233 { 234 if (cqr->function == dasd_default_erp_action) 235 return dasd_default_erp_postaction; 236 237 DBF_DEV_EVENT(DBF_WARNING, cqr->startdev, "unknown ERP action %p", 238 cqr->function); 239 return NULL; 240 } 241 242 static void dasd_fba_check_for_device_change(struct dasd_device *device, 243 struct dasd_ccw_req *cqr, 244 struct irb *irb) 245 { 246 char mask; 247 248 /* first of all check for state change pending interrupt */ 249 mask = DEV_STAT_ATTENTION | DEV_STAT_DEV_END | DEV_STAT_UNIT_EXCEP; 250 if ((irb->scsw.cmd.dstat & mask) == mask) 251 dasd_generic_handle_state_change(device); 252 }; 253 254 255 /* 256 * Builds a CCW with no data payload 257 */ 258 static void ccw_write_no_data(struct ccw1 *ccw) 259 { 260 ccw->cmd_code = DASD_FBA_CCW_WRITE; 261 ccw->flags |= CCW_FLAG_SLI; 262 ccw->count = 0; 263 } 264 265 /* 266 * Builds a CCW that writes only zeroes. 267 */ 268 static void ccw_write_zero(struct ccw1 *ccw, int count) 269 { 270 ccw->cmd_code = DASD_FBA_CCW_WRITE; 271 ccw->flags |= CCW_FLAG_SLI; 272 ccw->count = count; 273 ccw->cda = (__u32) (addr_t) page_to_phys(ZERO_PAGE(0)); 274 } 275 276 /* 277 * Helper function to count the amount of necessary CCWs within a given range 278 * with 4k alignment and command chaining in mind. 279 */ 280 static int count_ccws(sector_t first_rec, sector_t last_rec, 281 unsigned int blocks_per_page) 282 { 283 sector_t wz_stop = 0, d_stop = 0; 284 int cur_pos = 0; 285 int count = 0; 286 287 if (first_rec % blocks_per_page != 0) { 288 wz_stop = first_rec + blocks_per_page - 289 (first_rec % blocks_per_page) - 1; 290 if (wz_stop > last_rec) 291 wz_stop = last_rec; 292 cur_pos = wz_stop - first_rec + 1; 293 count++; 294 } 295 296 if (last_rec - (first_rec + cur_pos) + 1 >= blocks_per_page) { 297 if ((last_rec - blocks_per_page + 1) % blocks_per_page != 0) 298 d_stop = last_rec - ((last_rec - blocks_per_page + 1) % 299 blocks_per_page); 300 else 301 d_stop = last_rec; 302 303 cur_pos += d_stop - (first_rec + cur_pos) + 1; 304 count++; 305 } 306 307 if (cur_pos == 0 || first_rec + cur_pos - 1 < last_rec) 308 count++; 309 310 return count; 311 } 312 313 /* 314 * This function builds a CCW request for block layer discard requests. 315 * Each page in the z/VM hypervisor that represents certain records of an FBA 316 * device will be padded with zeros. This is a special behaviour of the WRITE 317 * command which is triggered when no data payload is added to the CCW. 318 * 319 * Note: Due to issues in some z/VM versions, we can't fully utilise this 320 * special behaviour. We have to keep a 4k (or 8 block) alignment in mind to 321 * work around those issues and write actual zeroes to the unaligned parts in 322 * the request. This workaround might be removed in the future. 323 */ 324 static struct dasd_ccw_req *dasd_fba_build_cp_discard( 325 struct dasd_device *memdev, 326 struct dasd_block *block, 327 struct request *req) 328 { 329 struct LO_fba_data *LO_data; 330 struct dasd_ccw_req *cqr; 331 struct ccw1 *ccw; 332 333 sector_t wz_stop = 0, d_stop = 0; 334 sector_t first_rec, last_rec; 335 336 unsigned int blksize = block->bp_block; 337 unsigned int blocks_per_page; 338 int wz_count = 0; 339 int d_count = 0; 340 int cur_pos = 0; /* Current position within the extent */ 341 int count = 0; 342 int cplength; 343 int datasize; 344 int nr_ccws; 345 346 first_rec = blk_rq_pos(req) >> block->s2b_shift; 347 last_rec = 348 (blk_rq_pos(req) + blk_rq_sectors(req) - 1) >> block->s2b_shift; 349 count = last_rec - first_rec + 1; 350 351 blocks_per_page = BLOCKS_PER_PAGE(blksize); 352 nr_ccws = count_ccws(first_rec, last_rec, blocks_per_page); 353 354 /* define extent + nr_ccws * locate record + nr_ccws * single CCW */ 355 cplength = 1 + 2 * nr_ccws; 356 datasize = sizeof(struct DE_fba_data) + 357 nr_ccws * (sizeof(struct LO_fba_data) + sizeof(struct ccw1)); 358 359 cqr = dasd_smalloc_request(DASD_FBA_MAGIC, cplength, datasize, memdev); 360 if (IS_ERR(cqr)) 361 return cqr; 362 363 ccw = cqr->cpaddr; 364 365 define_extent(ccw++, cqr->data, WRITE, blksize, first_rec, count); 366 LO_data = cqr->data + sizeof(struct DE_fba_data); 367 368 /* First part is not aligned. Calculate range to write zeroes. */ 369 if (first_rec % blocks_per_page != 0) { 370 wz_stop = first_rec + blocks_per_page - 371 (first_rec % blocks_per_page) - 1; 372 if (wz_stop > last_rec) 373 wz_stop = last_rec; 374 wz_count = wz_stop - first_rec + 1; 375 376 ccw[-1].flags |= CCW_FLAG_CC; 377 locate_record(ccw++, LO_data++, WRITE, cur_pos, wz_count); 378 379 ccw[-1].flags |= CCW_FLAG_CC; 380 ccw_write_zero(ccw++, wz_count * blksize); 381 382 cur_pos = wz_count; 383 } 384 385 /* We can do proper discard when we've got at least blocks_per_page blocks. */ 386 if (last_rec - (first_rec + cur_pos) + 1 >= blocks_per_page) { 387 /* is last record at page boundary? */ 388 if ((last_rec - blocks_per_page + 1) % blocks_per_page != 0) 389 d_stop = last_rec - ((last_rec - blocks_per_page + 1) % 390 blocks_per_page); 391 else 392 d_stop = last_rec; 393 394 d_count = d_stop - (first_rec + cur_pos) + 1; 395 396 ccw[-1].flags |= CCW_FLAG_CC; 397 locate_record(ccw++, LO_data++, WRITE, cur_pos, d_count); 398 399 ccw[-1].flags |= CCW_FLAG_CC; 400 ccw_write_no_data(ccw++); 401 402 cur_pos += d_count; 403 } 404 405 /* We might still have some bits left which need to be zeroed. */ 406 if (cur_pos == 0 || first_rec + cur_pos - 1 < last_rec) { 407 if (d_stop != 0) 408 wz_count = last_rec - d_stop; 409 else if (wz_stop != 0) 410 wz_count = last_rec - wz_stop; 411 else 412 wz_count = count; 413 414 ccw[-1].flags |= CCW_FLAG_CC; 415 locate_record(ccw++, LO_data++, WRITE, cur_pos, wz_count); 416 417 ccw[-1].flags |= CCW_FLAG_CC; 418 ccw_write_zero(ccw++, wz_count * blksize); 419 } 420 421 if (blk_noretry_request(req) || 422 block->base->features & DASD_FEATURE_FAILFAST) 423 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 424 425 cqr->startdev = memdev; 426 cqr->memdev = memdev; 427 cqr->block = block; 428 cqr->expires = memdev->default_expires * HZ; /* default 5 minutes */ 429 cqr->retries = memdev->default_retries; 430 cqr->buildclk = get_tod_clock(); 431 cqr->status = DASD_CQR_FILLED; 432 433 return cqr; 434 } 435 436 static struct dasd_ccw_req *dasd_fba_build_cp_regular( 437 struct dasd_device *memdev, 438 struct dasd_block *block, 439 struct request *req) 440 { 441 struct dasd_fba_private *private = block->base->private; 442 unsigned long *idaws; 443 struct LO_fba_data *LO_data; 444 struct dasd_ccw_req *cqr; 445 struct ccw1 *ccw; 446 struct req_iterator iter; 447 struct bio_vec bv; 448 char *dst; 449 int count, cidaw, cplength, datasize; 450 sector_t recid, first_rec, last_rec; 451 unsigned int blksize, off; 452 unsigned char cmd; 453 454 if (rq_data_dir(req) == READ) { 455 cmd = DASD_FBA_CCW_READ; 456 } else if (rq_data_dir(req) == WRITE) { 457 cmd = DASD_FBA_CCW_WRITE; 458 } else 459 return ERR_PTR(-EINVAL); 460 blksize = block->bp_block; 461 /* Calculate record id of first and last block. */ 462 first_rec = blk_rq_pos(req) >> block->s2b_shift; 463 last_rec = 464 (blk_rq_pos(req) + blk_rq_sectors(req) - 1) >> block->s2b_shift; 465 /* Check struct bio and count the number of blocks for the request. */ 466 count = 0; 467 cidaw = 0; 468 rq_for_each_segment(bv, req, iter) { 469 if (bv.bv_len & (blksize - 1)) 470 /* Fba can only do full blocks. */ 471 return ERR_PTR(-EINVAL); 472 count += bv.bv_len >> (block->s2b_shift + 9); 473 if (idal_is_needed (page_address(bv.bv_page), bv.bv_len)) 474 cidaw += bv.bv_len / blksize; 475 } 476 /* Paranoia. */ 477 if (count != last_rec - first_rec + 1) 478 return ERR_PTR(-EINVAL); 479 /* 1x define extent + 1x locate record + number of blocks */ 480 cplength = 2 + count; 481 /* 1x define extent + 1x locate record */ 482 datasize = sizeof(struct DE_fba_data) + sizeof(struct LO_fba_data) + 483 cidaw * sizeof(unsigned long); 484 /* 485 * Find out number of additional locate record ccws if the device 486 * can't do data chaining. 487 */ 488 if (private->rdc_data.mode.bits.data_chain == 0) { 489 cplength += count - 1; 490 datasize += (count - 1)*sizeof(struct LO_fba_data); 491 } 492 /* Allocate the ccw request. */ 493 cqr = dasd_smalloc_request(DASD_FBA_MAGIC, cplength, datasize, memdev); 494 if (IS_ERR(cqr)) 495 return cqr; 496 ccw = cqr->cpaddr; 497 /* First ccw is define extent. */ 498 define_extent(ccw++, cqr->data, rq_data_dir(req), 499 block->bp_block, blk_rq_pos(req), blk_rq_sectors(req)); 500 /* Build locate_record + read/write ccws. */ 501 idaws = (unsigned long *) (cqr->data + sizeof(struct DE_fba_data)); 502 LO_data = (struct LO_fba_data *) (idaws + cidaw); 503 /* Locate record for all blocks for smart devices. */ 504 if (private->rdc_data.mode.bits.data_chain != 0) { 505 ccw[-1].flags |= CCW_FLAG_CC; 506 locate_record(ccw++, LO_data++, rq_data_dir(req), 0, count); 507 } 508 recid = first_rec; 509 rq_for_each_segment(bv, req, iter) { 510 dst = page_address(bv.bv_page) + bv.bv_offset; 511 if (dasd_page_cache) { 512 char *copy = kmem_cache_alloc(dasd_page_cache, 513 GFP_DMA | __GFP_NOWARN); 514 if (copy && rq_data_dir(req) == WRITE) 515 memcpy(copy + bv.bv_offset, dst, bv.bv_len); 516 if (copy) 517 dst = copy + bv.bv_offset; 518 } 519 for (off = 0; off < bv.bv_len; off += blksize) { 520 /* Locate record for stupid devices. */ 521 if (private->rdc_data.mode.bits.data_chain == 0) { 522 ccw[-1].flags |= CCW_FLAG_CC; 523 locate_record(ccw, LO_data++, 524 rq_data_dir(req), 525 recid - first_rec, 1); 526 ccw->flags = CCW_FLAG_CC; 527 ccw++; 528 } else { 529 if (recid > first_rec) 530 ccw[-1].flags |= CCW_FLAG_DC; 531 else 532 ccw[-1].flags |= CCW_FLAG_CC; 533 } 534 ccw->cmd_code = cmd; 535 ccw->count = block->bp_block; 536 if (idal_is_needed(dst, blksize)) { 537 ccw->cda = (__u32)(addr_t) idaws; 538 ccw->flags = CCW_FLAG_IDA; 539 idaws = idal_create_words(idaws, dst, blksize); 540 } else { 541 ccw->cda = (__u32)(addr_t) dst; 542 ccw->flags = 0; 543 } 544 ccw++; 545 dst += blksize; 546 recid++; 547 } 548 } 549 if (blk_noretry_request(req) || 550 block->base->features & DASD_FEATURE_FAILFAST) 551 set_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags); 552 cqr->startdev = memdev; 553 cqr->memdev = memdev; 554 cqr->block = block; 555 cqr->expires = memdev->default_expires * HZ; /* default 5 minutes */ 556 cqr->retries = memdev->default_retries; 557 cqr->buildclk = get_tod_clock(); 558 cqr->status = DASD_CQR_FILLED; 559 return cqr; 560 } 561 562 static struct dasd_ccw_req *dasd_fba_build_cp(struct dasd_device *memdev, 563 struct dasd_block *block, 564 struct request *req) 565 { 566 if (req_op(req) == REQ_OP_DISCARD || req_op(req) == REQ_OP_WRITE_ZEROES) 567 return dasd_fba_build_cp_discard(memdev, block, req); 568 else 569 return dasd_fba_build_cp_regular(memdev, block, req); 570 } 571 572 static int 573 dasd_fba_free_cp(struct dasd_ccw_req *cqr, struct request *req) 574 { 575 struct dasd_fba_private *private = cqr->block->base->private; 576 struct ccw1 *ccw; 577 struct req_iterator iter; 578 struct bio_vec bv; 579 char *dst, *cda; 580 unsigned int blksize, off; 581 int status; 582 583 if (!dasd_page_cache) 584 goto out; 585 blksize = cqr->block->bp_block; 586 ccw = cqr->cpaddr; 587 /* Skip over define extent & locate record. */ 588 ccw++; 589 if (private->rdc_data.mode.bits.data_chain != 0) 590 ccw++; 591 rq_for_each_segment(bv, req, iter) { 592 dst = page_address(bv.bv_page) + bv.bv_offset; 593 for (off = 0; off < bv.bv_len; off += blksize) { 594 /* Skip locate record. */ 595 if (private->rdc_data.mode.bits.data_chain == 0) 596 ccw++; 597 if (dst) { 598 if (ccw->flags & CCW_FLAG_IDA) 599 cda = *((char **)((addr_t) ccw->cda)); 600 else 601 cda = (char *)((addr_t) ccw->cda); 602 if (dst != cda) { 603 if (rq_data_dir(req) == READ) 604 memcpy(dst, cda, bv.bv_len); 605 kmem_cache_free(dasd_page_cache, 606 (void *)((addr_t)cda & PAGE_MASK)); 607 } 608 dst = NULL; 609 } 610 ccw++; 611 } 612 } 613 out: 614 status = cqr->status == DASD_CQR_DONE; 615 dasd_sfree_request(cqr, cqr->memdev); 616 return status; 617 } 618 619 static void dasd_fba_handle_terminated_request(struct dasd_ccw_req *cqr) 620 { 621 if (cqr->retries < 0) 622 cqr->status = DASD_CQR_FAILED; 623 else 624 cqr->status = DASD_CQR_FILLED; 625 }; 626 627 static int 628 dasd_fba_fill_info(struct dasd_device * device, 629 struct dasd_information2_t * info) 630 { 631 struct dasd_fba_private *private = device->private; 632 633 info->label_block = 1; 634 info->FBA_layout = 1; 635 info->format = DASD_FORMAT_LDL; 636 info->characteristics_size = sizeof(private->rdc_data); 637 memcpy(info->characteristics, &private->rdc_data, 638 sizeof(private->rdc_data)); 639 info->confdata_size = 0; 640 return 0; 641 } 642 643 static void 644 dasd_fba_dump_sense_dbf(struct dasd_device *device, struct irb *irb, 645 char *reason) 646 { 647 u64 *sense; 648 649 sense = (u64 *) dasd_get_sense(irb); 650 if (sense) { 651 DBF_DEV_EVENT(DBF_EMERG, device, 652 "%s: %s %02x%02x%02x %016llx %016llx %016llx " 653 "%016llx", reason, 654 scsw_is_tm(&irb->scsw) ? "t" : "c", 655 scsw_cc(&irb->scsw), scsw_cstat(&irb->scsw), 656 scsw_dstat(&irb->scsw), sense[0], sense[1], 657 sense[2], sense[3]); 658 } else { 659 DBF_DEV_EVENT(DBF_EMERG, device, "%s", 660 "SORRY - NO VALID SENSE AVAILABLE\n"); 661 } 662 } 663 664 665 static void 666 dasd_fba_dump_sense(struct dasd_device *device, struct dasd_ccw_req * req, 667 struct irb *irb) 668 { 669 char *page; 670 struct ccw1 *act, *end, *last; 671 int len, sl, sct, count; 672 673 page = (char *) get_zeroed_page(GFP_ATOMIC); 674 if (page == NULL) { 675 DBF_DEV_EVENT(DBF_WARNING, device, "%s", 676 "No memory to dump sense data"); 677 return; 678 } 679 len = sprintf(page, PRINTK_HEADER 680 " I/O status report for device %s:\n", 681 dev_name(&device->cdev->dev)); 682 len += sprintf(page + len, PRINTK_HEADER 683 " in req: %p CS: 0x%02X DS: 0x%02X\n", req, 684 irb->scsw.cmd.cstat, irb->scsw.cmd.dstat); 685 len += sprintf(page + len, PRINTK_HEADER 686 " device %s: Failing CCW: %p\n", 687 dev_name(&device->cdev->dev), 688 (void *) (addr_t) irb->scsw.cmd.cpa); 689 if (irb->esw.esw0.erw.cons) { 690 for (sl = 0; sl < 4; sl++) { 691 len += sprintf(page + len, PRINTK_HEADER 692 " Sense(hex) %2d-%2d:", 693 (8 * sl), ((8 * sl) + 7)); 694 695 for (sct = 0; sct < 8; sct++) { 696 len += sprintf(page + len, " %02x", 697 irb->ecw[8 * sl + sct]); 698 } 699 len += sprintf(page + len, "\n"); 700 } 701 } else { 702 len += sprintf(page + len, PRINTK_HEADER 703 " SORRY - NO VALID SENSE AVAILABLE\n"); 704 } 705 printk(KERN_ERR "%s", page); 706 707 /* dump the Channel Program */ 708 /* print first CCWs (maximum 8) */ 709 act = req->cpaddr; 710 for (last = act; last->flags & (CCW_FLAG_CC | CCW_FLAG_DC); last++); 711 end = min(act + 8, last); 712 len = sprintf(page, PRINTK_HEADER " Related CP in req: %p\n", req); 713 while (act <= end) { 714 len += sprintf(page + len, PRINTK_HEADER 715 " CCW %p: %08X %08X DAT:", 716 act, ((int *) act)[0], ((int *) act)[1]); 717 for (count = 0; count < 32 && count < act->count; 718 count += sizeof(int)) 719 len += sprintf(page + len, " %08X", 720 ((int *) (addr_t) act->cda) 721 [(count>>2)]); 722 len += sprintf(page + len, "\n"); 723 act++; 724 } 725 printk(KERN_ERR "%s", page); 726 727 728 /* print failing CCW area */ 729 len = 0; 730 if (act < ((struct ccw1 *)(addr_t) irb->scsw.cmd.cpa) - 2) { 731 act = ((struct ccw1 *)(addr_t) irb->scsw.cmd.cpa) - 2; 732 len += sprintf(page + len, PRINTK_HEADER "......\n"); 733 } 734 end = min((struct ccw1 *)(addr_t) irb->scsw.cmd.cpa + 2, last); 735 while (act <= end) { 736 len += sprintf(page + len, PRINTK_HEADER 737 " CCW %p: %08X %08X DAT:", 738 act, ((int *) act)[0], ((int *) act)[1]); 739 for (count = 0; count < 32 && count < act->count; 740 count += sizeof(int)) 741 len += sprintf(page + len, " %08X", 742 ((int *) (addr_t) act->cda) 743 [(count>>2)]); 744 len += sprintf(page + len, "\n"); 745 act++; 746 } 747 748 /* print last CCWs */ 749 if (act < last - 2) { 750 act = last - 2; 751 len += sprintf(page + len, PRINTK_HEADER "......\n"); 752 } 753 while (act <= last) { 754 len += sprintf(page + len, PRINTK_HEADER 755 " CCW %p: %08X %08X DAT:", 756 act, ((int *) act)[0], ((int *) act)[1]); 757 for (count = 0; count < 32 && count < act->count; 758 count += sizeof(int)) 759 len += sprintf(page + len, " %08X", 760 ((int *) (addr_t) act->cda) 761 [(count>>2)]); 762 len += sprintf(page + len, "\n"); 763 act++; 764 } 765 if (len > 0) 766 printk(KERN_ERR "%s", page); 767 free_page((unsigned long) page); 768 } 769 770 /* 771 * max_blocks is dependent on the amount of storage that is available 772 * in the static io buffer for each device. Currently each device has 773 * 8192 bytes (=2 pages). For 64 bit one dasd_mchunkt_t structure has 774 * 24 bytes, the struct dasd_ccw_req has 136 bytes and each block can use 775 * up to 16 bytes (8 for the ccw and 8 for the idal pointer). In 776 * addition we have one define extent ccw + 16 bytes of data and a 777 * locate record ccw for each block (stupid devices!) + 16 bytes of data. 778 * That makes: 779 * (8192 - 24 - 136 - 8 - 16) / 40 = 200.2 blocks at maximum. 780 * We want to fit two into the available memory so that we can immediately 781 * start the next request if one finishes off. That makes 100.1 blocks 782 * for one request. Give a little safety and the result is 96. 783 */ 784 static struct dasd_discipline dasd_fba_discipline = { 785 .owner = THIS_MODULE, 786 .name = "FBA ", 787 .ebcname = "FBA ", 788 .max_blocks = 96, 789 .check_device = dasd_fba_check_characteristics, 790 .do_analysis = dasd_fba_do_analysis, 791 .verify_path = dasd_generic_verify_path, 792 .fill_geometry = dasd_fba_fill_geometry, 793 .start_IO = dasd_start_IO, 794 .term_IO = dasd_term_IO, 795 .handle_terminated_request = dasd_fba_handle_terminated_request, 796 .erp_action = dasd_fba_erp_action, 797 .erp_postaction = dasd_fba_erp_postaction, 798 .check_for_device_change = dasd_fba_check_for_device_change, 799 .build_cp = dasd_fba_build_cp, 800 .free_cp = dasd_fba_free_cp, 801 .dump_sense = dasd_fba_dump_sense, 802 .dump_sense_dbf = dasd_fba_dump_sense_dbf, 803 .fill_info = dasd_fba_fill_info, 804 }; 805 806 static int __init 807 dasd_fba_init(void) 808 { 809 int ret; 810 811 ASCEBC(dasd_fba_discipline.ebcname, 4); 812 ret = ccw_driver_register(&dasd_fba_driver); 813 if (!ret) 814 wait_for_device_probe(); 815 816 return ret; 817 } 818 819 static void __exit 820 dasd_fba_cleanup(void) 821 { 822 ccw_driver_unregister(&dasd_fba_driver); 823 } 824 825 module_init(dasd_fba_init); 826 module_exit(dasd_fba_cleanup); 827