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 * (C) IBM Corporation, IBM Deutschland Entwicklung GmbH, 1999,2000
9 * EMC Symmetrix ioctl Copyright EMC Corporation, 2008
10 * Author.........: Nigel Hislop <hislop_nigel@emc.com>
14 #define KMSG_COMPONENT "dasd"
16 #include <linux/stddef.h>
17 #include <linux/kernel.h>
18 #include <linux/slab.h>
19 #include <linux/hdreg.h> /* HDIO_GETGEO */
20 #include <linux/bio.h>
21 #include <linux/module.h>
22 #include <linux/init.h>
24 #include <asm/debug.h>
25 #include <asm/idals.h>
26 #include <asm/ebcdic.h>
28 #include <asm/todclk.h>
29 #include <asm/uaccess.h>
31 #include <asm/ccwdev.h>
35 #include "dasd_eckd.h"
36 #include "../cio/chsc.h"
41 #endif /* PRINTK_HEADER */
42 #define PRINTK_HEADER "dasd(eckd):"
44 #define ECKD_C0(i) (i->home_bytes)
45 #define ECKD_F(i) (i->formula)
46 #define ECKD_F1(i) (ECKD_F(i)==0x01?(i->factors.f_0x01.f1):\
47 (i->factors.f_0x02.f1))
48 #define ECKD_F2(i) (ECKD_F(i)==0x01?(i->factors.f_0x01.f2):\
49 (i->factors.f_0x02.f2))
50 #define ECKD_F3(i) (ECKD_F(i)==0x01?(i->factors.f_0x01.f3):\
51 (i->factors.f_0x02.f3))
52 #define ECKD_F4(i) (ECKD_F(i)==0x02?(i->factors.f_0x02.f4):0)
53 #define ECKD_F5(i) (ECKD_F(i)==0x02?(i->factors.f_0x02.f5):0)
54 #define ECKD_F6(i) (i->factor6)
55 #define ECKD_F7(i) (i->factor7)
56 #define ECKD_F8(i) (i->factor8)
58 MODULE_LICENSE("GPL");
60 static struct dasd_discipline dasd_eckd_discipline
;
62 /* The ccw bus type uses this table to find devices that it sends to
64 static struct ccw_device_id dasd_eckd_ids
[] = {
65 { CCW_DEVICE_DEVTYPE (0x3990, 0, 0x3390, 0), .driver_info
= 0x1},
66 { CCW_DEVICE_DEVTYPE (0x2105, 0, 0x3390, 0), .driver_info
= 0x2},
67 { CCW_DEVICE_DEVTYPE (0x3880, 0, 0x3390, 0), .driver_info
= 0x3},
68 { CCW_DEVICE_DEVTYPE (0x3990, 0, 0x3380, 0), .driver_info
= 0x4},
69 { CCW_DEVICE_DEVTYPE (0x2105, 0, 0x3380, 0), .driver_info
= 0x5},
70 { CCW_DEVICE_DEVTYPE (0x9343, 0, 0x9345, 0), .driver_info
= 0x6},
71 { CCW_DEVICE_DEVTYPE (0x2107, 0, 0x3390, 0), .driver_info
= 0x7},
72 { CCW_DEVICE_DEVTYPE (0x2107, 0, 0x3380, 0), .driver_info
= 0x8},
73 { CCW_DEVICE_DEVTYPE (0x1750, 0, 0x3390, 0), .driver_info
= 0x9},
74 { CCW_DEVICE_DEVTYPE (0x1750, 0, 0x3380, 0), .driver_info
= 0xa},
75 { /* end of list */ },
78 MODULE_DEVICE_TABLE(ccw
, dasd_eckd_ids
);
80 static struct ccw_driver dasd_eckd_driver
; /* see below */
82 /* initial attempt at a probe function. this can be simplified once
83 * the other detection code is gone */
85 dasd_eckd_probe (struct ccw_device
*cdev
)
89 /* set ECKD specific ccw-device options */
90 ret
= ccw_device_set_options(cdev
, CCWDEV_ALLOW_FORCE
);
92 DBF_EVENT(DBF_WARNING
,
93 "dasd_eckd_probe: could not set ccw-device options "
94 "for %s\n", dev_name(&cdev
->dev
));
97 ret
= dasd_generic_probe(cdev
, &dasd_eckd_discipline
);
102 dasd_eckd_set_online(struct ccw_device
*cdev
)
104 return dasd_generic_set_online(cdev
, &dasd_eckd_discipline
);
107 static struct ccw_driver dasd_eckd_driver
= {
109 .owner
= THIS_MODULE
,
110 .ids
= dasd_eckd_ids
,
111 .probe
= dasd_eckd_probe
,
112 .remove
= dasd_generic_remove
,
113 .set_offline
= dasd_generic_set_offline
,
114 .set_online
= dasd_eckd_set_online
,
115 .notify
= dasd_generic_notify
,
118 static const int sizes_trk0
[] = { 28, 148, 84 };
119 #define LABEL_SIZE 140
121 static inline unsigned int
122 round_up_multiple(unsigned int no
, unsigned int mult
)
125 return (rem
? no
- rem
+ mult
: no
);
128 static inline unsigned int
129 ceil_quot(unsigned int d1
, unsigned int d2
)
131 return (d1
+ (d2
- 1)) / d2
;
135 recs_per_track(struct dasd_eckd_characteristics
* rdc
,
136 unsigned int kl
, unsigned int dl
)
140 switch (rdc
->dev_type
) {
143 return 1499 / (15 + 7 + ceil_quot(kl
+ 12, 32) +
144 ceil_quot(dl
+ 12, 32));
146 return 1499 / (15 + ceil_quot(dl
+ 12, 32));
148 dn
= ceil_quot(dl
+ 6, 232) + 1;
150 kn
= ceil_quot(kl
+ 6, 232) + 1;
151 return 1729 / (10 + 9 + ceil_quot(kl
+ 6 * kn
, 34) +
152 9 + ceil_quot(dl
+ 6 * dn
, 34));
154 return 1729 / (10 + 9 + ceil_quot(dl
+ 6 * dn
, 34));
156 dn
= ceil_quot(dl
+ 6, 232) + 1;
158 kn
= ceil_quot(kl
+ 6, 232) + 1;
159 return 1420 / (18 + 7 + ceil_quot(kl
+ 6 * kn
, 34) +
160 ceil_quot(dl
+ 6 * dn
, 34));
162 return 1420 / (18 + 7 + ceil_quot(dl
+ 6 * dn
, 34));
167 static void set_ch_t(struct ch_t
*geo
, __u32 cyl
, __u8 head
)
169 geo
->cyl
= (__u16
) cyl
;
170 geo
->head
= cyl
>> 16;
176 check_XRC (struct ccw1
*de_ccw
,
177 struct DE_eckd_data
*data
,
178 struct dasd_device
*device
)
180 struct dasd_eckd_private
*private;
183 private = (struct dasd_eckd_private
*) device
->private;
184 if (!private->rdc_data
.facilities
.XRC_supported
)
187 /* switch on System Time Stamp - needed for XRC Support */
188 data
->ga_extended
|= 0x08; /* switch on 'Time Stamp Valid' */
189 data
->ga_extended
|= 0x02; /* switch on 'Extended Parameter' */
191 rc
= get_sync_clock(&data
->ep_sys_time
);
192 /* Ignore return code if sync clock is switched off. */
193 if (rc
== -ENOSYS
|| rc
== -EACCES
)
196 de_ccw
->count
= sizeof(struct DE_eckd_data
);
197 de_ccw
->flags
|= CCW_FLAG_SLI
;
202 define_extent(struct ccw1
*ccw
, struct DE_eckd_data
*data
, unsigned int trk
,
203 unsigned int totrk
, int cmd
, struct dasd_device
*device
)
205 struct dasd_eckd_private
*private;
207 u16 heads
, beghead
, endhead
;
210 private = (struct dasd_eckd_private
*) device
->private;
212 ccw
->cmd_code
= DASD_ECKD_CCW_DEFINE_EXTENT
;
215 ccw
->cda
= (__u32
) __pa(data
);
217 memset(data
, 0, sizeof(struct DE_eckd_data
));
219 case DASD_ECKD_CCW_READ_HOME_ADDRESS
:
220 case DASD_ECKD_CCW_READ_RECORD_ZERO
:
221 case DASD_ECKD_CCW_READ
:
222 case DASD_ECKD_CCW_READ_MT
:
223 case DASD_ECKD_CCW_READ_CKD
:
224 case DASD_ECKD_CCW_READ_CKD_MT
:
225 case DASD_ECKD_CCW_READ_KD
:
226 case DASD_ECKD_CCW_READ_KD_MT
:
227 case DASD_ECKD_CCW_READ_COUNT
:
228 data
->mask
.perm
= 0x1;
229 data
->attributes
.operation
= private->attrib
.operation
;
231 case DASD_ECKD_CCW_WRITE
:
232 case DASD_ECKD_CCW_WRITE_MT
:
233 case DASD_ECKD_CCW_WRITE_KD
:
234 case DASD_ECKD_CCW_WRITE_KD_MT
:
235 data
->mask
.perm
= 0x02;
236 data
->attributes
.operation
= private->attrib
.operation
;
237 rc
= check_XRC (ccw
, data
, device
);
239 case DASD_ECKD_CCW_WRITE_CKD
:
240 case DASD_ECKD_CCW_WRITE_CKD_MT
:
241 data
->attributes
.operation
= DASD_BYPASS_CACHE
;
242 rc
= check_XRC (ccw
, data
, device
);
244 case DASD_ECKD_CCW_ERASE
:
245 case DASD_ECKD_CCW_WRITE_HOME_ADDRESS
:
246 case DASD_ECKD_CCW_WRITE_RECORD_ZERO
:
247 data
->mask
.perm
= 0x3;
248 data
->mask
.auth
= 0x1;
249 data
->attributes
.operation
= DASD_BYPASS_CACHE
;
250 rc
= check_XRC (ccw
, data
, device
);
253 dev_err(&device
->cdev
->dev
,
254 "0x%x is not a known command\n", cmd
);
258 data
->attributes
.mode
= 0x3; /* ECKD */
260 if ((private->rdc_data
.cu_type
== 0x2105 ||
261 private->rdc_data
.cu_type
== 0x2107 ||
262 private->rdc_data
.cu_type
== 0x1750)
263 && !(private->uses_cdl
&& trk
< 2))
264 data
->ga_extended
|= 0x40; /* Regular Data Format Mode */
266 heads
= private->rdc_data
.trk_per_cyl
;
267 begcyl
= trk
/ heads
;
268 beghead
= trk
% heads
;
269 endcyl
= totrk
/ heads
;
270 endhead
= totrk
% heads
;
272 /* check for sequential prestage - enhance cylinder range */
273 if (data
->attributes
.operation
== DASD_SEQ_PRESTAGE
||
274 data
->attributes
.operation
== DASD_SEQ_ACCESS
) {
276 if (endcyl
+ private->attrib
.nr_cyl
< private->real_cyl
)
277 endcyl
+= private->attrib
.nr_cyl
;
279 endcyl
= (private->real_cyl
- 1);
282 set_ch_t(&data
->beg_ext
, begcyl
, beghead
);
283 set_ch_t(&data
->end_ext
, endcyl
, endhead
);
287 static int check_XRC_on_prefix(struct PFX_eckd_data
*pfxdata
,
288 struct dasd_device
*device
)
290 struct dasd_eckd_private
*private;
293 private = (struct dasd_eckd_private
*) device
->private;
294 if (!private->rdc_data
.facilities
.XRC_supported
)
297 /* switch on System Time Stamp - needed for XRC Support */
298 pfxdata
->define_extent
.ga_extended
|= 0x08; /* 'Time Stamp Valid' */
299 pfxdata
->define_extent
.ga_extended
|= 0x02; /* 'Extended Parameter' */
300 pfxdata
->validity
.time_stamp
= 1; /* 'Time Stamp Valid' */
302 rc
= get_sync_clock(&pfxdata
->define_extent
.ep_sys_time
);
303 /* Ignore return code if sync clock is switched off. */
304 if (rc
== -ENOSYS
|| rc
== -EACCES
)
309 static void fill_LRE_data(struct LRE_eckd_data
*data
, unsigned int trk
,
310 unsigned int rec_on_trk
, int count
, int cmd
,
311 struct dasd_device
*device
, unsigned int reclen
,
314 struct dasd_eckd_private
*private;
318 private = (struct dasd_eckd_private
*) device
->private;
320 memset(data
, 0, sizeof(*data
));
323 switch (private->rdc_data
.dev_type
) {
325 dn
= ceil_quot(reclen
+ 6, 232);
326 d
= 9 + ceil_quot(reclen
+ 6 * (dn
+ 1), 34);
327 sector
= (49 + (rec_on_trk
- 1) * (10 + d
)) / 8;
330 d
= 7 + ceil_quot(reclen
+ 12, 32);
331 sector
= (39 + (rec_on_trk
- 1) * (8 + d
)) / 7;
335 data
->sector
= sector
;
336 /* note: meaning of count depends on the operation
337 * for record based I/O it's the number of records, but for
338 * track based I/O it's the number of tracks
342 case DASD_ECKD_CCW_WRITE_HOME_ADDRESS
:
343 data
->operation
.orientation
= 0x3;
344 data
->operation
.operation
= 0x03;
346 case DASD_ECKD_CCW_READ_HOME_ADDRESS
:
347 data
->operation
.orientation
= 0x3;
348 data
->operation
.operation
= 0x16;
350 case DASD_ECKD_CCW_WRITE_RECORD_ZERO
:
351 data
->operation
.orientation
= 0x1;
352 data
->operation
.operation
= 0x03;
355 case DASD_ECKD_CCW_READ_RECORD_ZERO
:
356 data
->operation
.orientation
= 0x3;
357 data
->operation
.operation
= 0x16;
360 case DASD_ECKD_CCW_WRITE
:
361 case DASD_ECKD_CCW_WRITE_MT
:
362 case DASD_ECKD_CCW_WRITE_KD
:
363 case DASD_ECKD_CCW_WRITE_KD_MT
:
364 data
->auxiliary
.length_valid
= 0x1;
365 data
->length
= reclen
;
366 data
->operation
.operation
= 0x01;
368 case DASD_ECKD_CCW_WRITE_CKD
:
369 case DASD_ECKD_CCW_WRITE_CKD_MT
:
370 data
->auxiliary
.length_valid
= 0x1;
371 data
->length
= reclen
;
372 data
->operation
.operation
= 0x03;
374 case DASD_ECKD_CCW_WRITE_TRACK_DATA
:
375 data
->auxiliary
.length_valid
= 0x1;
376 data
->length
= reclen
; /* not tlf, as one might think */
377 data
->operation
.operation
= 0x3F;
378 data
->extended_operation
= 0x23;
380 case DASD_ECKD_CCW_READ
:
381 case DASD_ECKD_CCW_READ_MT
:
382 case DASD_ECKD_CCW_READ_KD
:
383 case DASD_ECKD_CCW_READ_KD_MT
:
384 data
->auxiliary
.length_valid
= 0x1;
385 data
->length
= reclen
;
386 data
->operation
.operation
= 0x06;
388 case DASD_ECKD_CCW_READ_CKD
:
389 case DASD_ECKD_CCW_READ_CKD_MT
:
390 data
->auxiliary
.length_valid
= 0x1;
391 data
->length
= reclen
;
392 data
->operation
.operation
= 0x16;
394 case DASD_ECKD_CCW_READ_COUNT
:
395 data
->operation
.operation
= 0x06;
397 case DASD_ECKD_CCW_READ_TRACK_DATA
:
398 data
->auxiliary
.length_valid
= 0x1;
400 data
->operation
.operation
= 0x0C;
402 case DASD_ECKD_CCW_ERASE
:
403 data
->length
= reclen
;
404 data
->auxiliary
.length_valid
= 0x1;
405 data
->operation
.operation
= 0x0b;
408 DBF_DEV_EVENT(DBF_ERR
, device
,
409 "fill LRE unknown opcode 0x%x", cmd
);
412 set_ch_t(&data
->seek_addr
,
413 trk
/ private->rdc_data
.trk_per_cyl
,
414 trk
% private->rdc_data
.trk_per_cyl
);
415 data
->search_arg
.cyl
= data
->seek_addr
.cyl
;
416 data
->search_arg
.head
= data
->seek_addr
.head
;
417 data
->search_arg
.record
= rec_on_trk
;
420 static int prefix_LRE(struct ccw1
*ccw
, struct PFX_eckd_data
*pfxdata
,
421 unsigned int trk
, unsigned int totrk
, int cmd
,
422 struct dasd_device
*basedev
, struct dasd_device
*startdev
,
423 unsigned char format
, unsigned int rec_on_trk
, int count
,
424 unsigned int blksize
, unsigned int tlf
)
426 struct dasd_eckd_private
*basepriv
, *startpriv
;
427 struct DE_eckd_data
*dedata
;
428 struct LRE_eckd_data
*lredata
;
430 u16 heads
, beghead
, endhead
;
433 basepriv
= (struct dasd_eckd_private
*) basedev
->private;
434 startpriv
= (struct dasd_eckd_private
*) startdev
->private;
435 dedata
= &pfxdata
->define_extent
;
436 lredata
= &pfxdata
->locate_record
;
438 ccw
->cmd_code
= DASD_ECKD_CCW_PFX
;
440 ccw
->count
= sizeof(*pfxdata
);
441 ccw
->cda
= (__u32
) __pa(pfxdata
);
443 memset(pfxdata
, 0, sizeof(*pfxdata
));
446 DBF_DEV_EVENT(DBF_ERR
, basedev
,
447 "PFX LRE unknown format 0x%x", format
);
451 pfxdata
->format
= format
;
452 pfxdata
->base_address
= basepriv
->ned
->unit_addr
;
453 pfxdata
->base_lss
= basepriv
->ned
->ID
;
454 pfxdata
->validity
.define_extent
= 1;
456 /* private uid is kept up to date, conf_data may be outdated */
457 if (startpriv
->uid
.type
!= UA_BASE_DEVICE
) {
458 pfxdata
->validity
.verify_base
= 1;
459 if (startpriv
->uid
.type
== UA_HYPER_PAV_ALIAS
)
460 pfxdata
->validity
.hyper_pav
= 1;
463 /* define extend data (mostly)*/
465 case DASD_ECKD_CCW_READ_HOME_ADDRESS
:
466 case DASD_ECKD_CCW_READ_RECORD_ZERO
:
467 case DASD_ECKD_CCW_READ
:
468 case DASD_ECKD_CCW_READ_MT
:
469 case DASD_ECKD_CCW_READ_CKD
:
470 case DASD_ECKD_CCW_READ_CKD_MT
:
471 case DASD_ECKD_CCW_READ_KD
:
472 case DASD_ECKD_CCW_READ_KD_MT
:
473 case DASD_ECKD_CCW_READ_COUNT
:
474 dedata
->mask
.perm
= 0x1;
475 dedata
->attributes
.operation
= basepriv
->attrib
.operation
;
477 case DASD_ECKD_CCW_READ_TRACK_DATA
:
478 dedata
->mask
.perm
= 0x1;
479 dedata
->attributes
.operation
= basepriv
->attrib
.operation
;
480 dedata
->blk_size
= 0;
482 case DASD_ECKD_CCW_WRITE
:
483 case DASD_ECKD_CCW_WRITE_MT
:
484 case DASD_ECKD_CCW_WRITE_KD
:
485 case DASD_ECKD_CCW_WRITE_KD_MT
:
486 dedata
->mask
.perm
= 0x02;
487 dedata
->attributes
.operation
= basepriv
->attrib
.operation
;
488 rc
= check_XRC_on_prefix(pfxdata
, basedev
);
490 case DASD_ECKD_CCW_WRITE_CKD
:
491 case DASD_ECKD_CCW_WRITE_CKD_MT
:
492 dedata
->attributes
.operation
= DASD_BYPASS_CACHE
;
493 rc
= check_XRC_on_prefix(pfxdata
, basedev
);
495 case DASD_ECKD_CCW_ERASE
:
496 case DASD_ECKD_CCW_WRITE_HOME_ADDRESS
:
497 case DASD_ECKD_CCW_WRITE_RECORD_ZERO
:
498 dedata
->mask
.perm
= 0x3;
499 dedata
->mask
.auth
= 0x1;
500 dedata
->attributes
.operation
= DASD_BYPASS_CACHE
;
501 rc
= check_XRC_on_prefix(pfxdata
, basedev
);
503 case DASD_ECKD_CCW_WRITE_TRACK_DATA
:
504 dedata
->mask
.perm
= 0x02;
505 dedata
->attributes
.operation
= basepriv
->attrib
.operation
;
506 dedata
->blk_size
= blksize
;
507 rc
= check_XRC_on_prefix(pfxdata
, basedev
);
510 DBF_DEV_EVENT(DBF_ERR
, basedev
,
511 "PFX LRE unknown opcode 0x%x", cmd
);
516 dedata
->attributes
.mode
= 0x3; /* ECKD */
518 if ((basepriv
->rdc_data
.cu_type
== 0x2105 ||
519 basepriv
->rdc_data
.cu_type
== 0x2107 ||
520 basepriv
->rdc_data
.cu_type
== 0x1750)
521 && !(basepriv
->uses_cdl
&& trk
< 2))
522 dedata
->ga_extended
|= 0x40; /* Regular Data Format Mode */
524 heads
= basepriv
->rdc_data
.trk_per_cyl
;
525 begcyl
= trk
/ heads
;
526 beghead
= trk
% heads
;
527 endcyl
= totrk
/ heads
;
528 endhead
= totrk
% heads
;
530 /* check for sequential prestage - enhance cylinder range */
531 if (dedata
->attributes
.operation
== DASD_SEQ_PRESTAGE
||
532 dedata
->attributes
.operation
== DASD_SEQ_ACCESS
) {
534 if (endcyl
+ basepriv
->attrib
.nr_cyl
< basepriv
->real_cyl
)
535 endcyl
+= basepriv
->attrib
.nr_cyl
;
537 endcyl
= (basepriv
->real_cyl
- 1);
540 set_ch_t(&dedata
->beg_ext
, begcyl
, beghead
);
541 set_ch_t(&dedata
->end_ext
, endcyl
, endhead
);
544 fill_LRE_data(lredata
, trk
, rec_on_trk
, count
, cmd
,
545 basedev
, blksize
, tlf
);
551 static int prefix(struct ccw1
*ccw
, struct PFX_eckd_data
*pfxdata
,
552 unsigned int trk
, unsigned int totrk
, int cmd
,
553 struct dasd_device
*basedev
, struct dasd_device
*startdev
)
555 return prefix_LRE(ccw
, pfxdata
, trk
, totrk
, cmd
, basedev
, startdev
,
560 locate_record(struct ccw1
*ccw
, struct LO_eckd_data
*data
, unsigned int trk
,
561 unsigned int rec_on_trk
, int no_rec
, int cmd
,
562 struct dasd_device
* device
, int reclen
)
564 struct dasd_eckd_private
*private;
568 private = (struct dasd_eckd_private
*) device
->private;
570 DBF_DEV_EVENT(DBF_INFO
, device
,
571 "Locate: trk %d, rec %d, no_rec %d, cmd %d, reclen %d",
572 trk
, rec_on_trk
, no_rec
, cmd
, reclen
);
574 ccw
->cmd_code
= DASD_ECKD_CCW_LOCATE_RECORD
;
577 ccw
->cda
= (__u32
) __pa(data
);
579 memset(data
, 0, sizeof(struct LO_eckd_data
));
582 switch (private->rdc_data
.dev_type
) {
584 dn
= ceil_quot(reclen
+ 6, 232);
585 d
= 9 + ceil_quot(reclen
+ 6 * (dn
+ 1), 34);
586 sector
= (49 + (rec_on_trk
- 1) * (10 + d
)) / 8;
589 d
= 7 + ceil_quot(reclen
+ 12, 32);
590 sector
= (39 + (rec_on_trk
- 1) * (8 + d
)) / 7;
594 data
->sector
= sector
;
595 data
->count
= no_rec
;
597 case DASD_ECKD_CCW_WRITE_HOME_ADDRESS
:
598 data
->operation
.orientation
= 0x3;
599 data
->operation
.operation
= 0x03;
601 case DASD_ECKD_CCW_READ_HOME_ADDRESS
:
602 data
->operation
.orientation
= 0x3;
603 data
->operation
.operation
= 0x16;
605 case DASD_ECKD_CCW_WRITE_RECORD_ZERO
:
606 data
->operation
.orientation
= 0x1;
607 data
->operation
.operation
= 0x03;
610 case DASD_ECKD_CCW_READ_RECORD_ZERO
:
611 data
->operation
.orientation
= 0x3;
612 data
->operation
.operation
= 0x16;
615 case DASD_ECKD_CCW_WRITE
:
616 case DASD_ECKD_CCW_WRITE_MT
:
617 case DASD_ECKD_CCW_WRITE_KD
:
618 case DASD_ECKD_CCW_WRITE_KD_MT
:
619 data
->auxiliary
.last_bytes_used
= 0x1;
620 data
->length
= reclen
;
621 data
->operation
.operation
= 0x01;
623 case DASD_ECKD_CCW_WRITE_CKD
:
624 case DASD_ECKD_CCW_WRITE_CKD_MT
:
625 data
->auxiliary
.last_bytes_used
= 0x1;
626 data
->length
= reclen
;
627 data
->operation
.operation
= 0x03;
629 case DASD_ECKD_CCW_READ
:
630 case DASD_ECKD_CCW_READ_MT
:
631 case DASD_ECKD_CCW_READ_KD
:
632 case DASD_ECKD_CCW_READ_KD_MT
:
633 data
->auxiliary
.last_bytes_used
= 0x1;
634 data
->length
= reclen
;
635 data
->operation
.operation
= 0x06;
637 case DASD_ECKD_CCW_READ_CKD
:
638 case DASD_ECKD_CCW_READ_CKD_MT
:
639 data
->auxiliary
.last_bytes_used
= 0x1;
640 data
->length
= reclen
;
641 data
->operation
.operation
= 0x16;
643 case DASD_ECKD_CCW_READ_COUNT
:
644 data
->operation
.operation
= 0x06;
646 case DASD_ECKD_CCW_ERASE
:
647 data
->length
= reclen
;
648 data
->auxiliary
.last_bytes_used
= 0x1;
649 data
->operation
.operation
= 0x0b;
652 DBF_DEV_EVENT(DBF_ERR
, device
, "unknown locate record "
655 set_ch_t(&data
->seek_addr
,
656 trk
/ private->rdc_data
.trk_per_cyl
,
657 trk
% private->rdc_data
.trk_per_cyl
);
658 data
->search_arg
.cyl
= data
->seek_addr
.cyl
;
659 data
->search_arg
.head
= data
->seek_addr
.head
;
660 data
->search_arg
.record
= rec_on_trk
;
664 * Returns 1 if the block is one of the special blocks that needs
665 * to get read/written with the KD variant of the command.
666 * That is DASD_ECKD_READ_KD_MT instead of DASD_ECKD_READ_MT and
667 * DASD_ECKD_WRITE_KD_MT instead of DASD_ECKD_WRITE_MT.
668 * Luckily the KD variants differ only by one bit (0x08) from the
669 * normal variant. So don't wonder about code like:
670 * if (dasd_eckd_cdl_special(blk_per_trk, recid))
671 * ccw->cmd_code |= 0x8;
674 dasd_eckd_cdl_special(int blk_per_trk
, int recid
)
678 if (recid
< blk_per_trk
)
680 if (recid
< 2 * blk_per_trk
)
686 * Returns the record size for the special blocks of the cdl format.
687 * Only returns something useful if dasd_eckd_cdl_special is true
691 dasd_eckd_cdl_reclen(int recid
)
694 return sizes_trk0
[recid
];
699 * Generate device unique id that specifies the physical device.
701 static int dasd_eckd_generate_uid(struct dasd_device
*device
,
702 struct dasd_uid
*uid
)
704 struct dasd_eckd_private
*private;
707 private = (struct dasd_eckd_private
*) device
->private;
710 if (!private->ned
|| !private->gneq
)
713 memset(uid
, 0, sizeof(struct dasd_uid
));
714 memcpy(uid
->vendor
, private->ned
->HDA_manufacturer
,
715 sizeof(uid
->vendor
) - 1);
716 EBCASC(uid
->vendor
, sizeof(uid
->vendor
) - 1);
717 memcpy(uid
->serial
, private->ned
->HDA_location
,
718 sizeof(uid
->serial
) - 1);
719 EBCASC(uid
->serial
, sizeof(uid
->serial
) - 1);
720 uid
->ssid
= private->gneq
->subsystemID
;
721 uid
->real_unit_addr
= private->ned
->unit_addr
;;
723 uid
->type
= private->sneq
->sua_flags
;
724 if (uid
->type
== UA_BASE_PAV_ALIAS
)
725 uid
->base_unit_addr
= private->sneq
->base_unit_addr
;
727 uid
->type
= UA_BASE_DEVICE
;
729 if (private->vdsneq
) {
730 for (count
= 0; count
< 16; count
++) {
731 sprintf(uid
->vduit
+2*count
, "%02x",
732 private->vdsneq
->uit
[count
]);
738 static struct dasd_ccw_req
*dasd_eckd_build_rcd_lpm(struct dasd_device
*device
,
740 struct ciw
*ciw
, __u8 lpm
)
742 struct dasd_ccw_req
*cqr
;
745 cqr
= dasd_smalloc_request("ECKD", 1 /* RCD */, ciw
->count
, device
);
748 DBF_DEV_EVENT(DBF_WARNING
, device
, "%s",
749 "Could not allocate RCD request");
754 ccw
->cmd_code
= ciw
->cmd
;
755 ccw
->cda
= (__u32
)(addr_t
)rcd_buffer
;
756 ccw
->count
= ciw
->count
;
758 cqr
->startdev
= device
;
759 cqr
->memdev
= device
;
761 cqr
->expires
= 10*HZ
;
763 clear_bit(DASD_CQR_FLAGS_USE_ERP
, &cqr
->flags
);
765 cqr
->buildclk
= get_clock();
766 cqr
->status
= DASD_CQR_FILLED
;
770 static int dasd_eckd_read_conf_lpm(struct dasd_device
*device
,
772 int *rcd_buffer_size
, __u8 lpm
)
775 char *rcd_buf
= NULL
;
777 struct dasd_ccw_req
*cqr
;
780 * scan for RCD command in extended SenseID data
782 ciw
= ccw_device_get_ciw(device
->cdev
, CIW_TYPE_RCD
);
783 if (!ciw
|| ciw
->cmd
== 0) {
787 rcd_buf
= kzalloc(ciw
->count
, GFP_KERNEL
| GFP_DMA
);
794 * buffer has to start with EBCDIC "V1.0" to show
795 * support for virtual device SNEQ
801 cqr
= dasd_eckd_build_rcd_lpm(device
, rcd_buf
, ciw
, lpm
);
806 ret
= dasd_sleep_on(cqr
);
808 * on success we update the user input parms
810 dasd_sfree_request(cqr
, cqr
->memdev
);
814 *rcd_buffer_size
= ciw
->count
;
815 *rcd_buffer
= rcd_buf
;
820 *rcd_buffer_size
= 0;
824 static int dasd_eckd_identify_conf_parts(struct dasd_eckd_private
*private)
827 struct dasd_sneq
*sneq
;
831 private->sneq
= NULL
;
832 private->vdsneq
= NULL
;
833 private->gneq
= NULL
;
834 count
= private->conf_len
/ sizeof(struct dasd_sneq
);
835 sneq
= (struct dasd_sneq
*)private->conf_data
;
836 for (i
= 0; i
< count
; ++i
) {
837 if (sneq
->flags
.identifier
== 1 && sneq
->format
== 1)
838 private->sneq
= sneq
;
839 else if (sneq
->flags
.identifier
== 1 && sneq
->format
== 4)
840 private->vdsneq
= (struct vd_sneq
*)sneq
;
841 else if (sneq
->flags
.identifier
== 2)
842 private->gneq
= (struct dasd_gneq
*)sneq
;
843 else if (sneq
->flags
.identifier
== 3 && sneq
->res1
== 1)
844 private->ned
= (struct dasd_ned
*)sneq
;
847 if (!private->ned
|| !private->gneq
) {
849 private->sneq
= NULL
;
850 private->vdsneq
= NULL
;
851 private->gneq
= NULL
;
858 static unsigned char dasd_eckd_path_access(void *conf_data
, int conf_len
)
860 struct dasd_gneq
*gneq
;
863 count
= conf_len
/ sizeof(*gneq
);
864 gneq
= (struct dasd_gneq
*)conf_data
;
866 for (i
= 0; i
< count
; ++i
) {
867 if (gneq
->flags
.identifier
== 2) {
874 return ((char *)gneq
)[18] & 0x07;
879 static int dasd_eckd_read_conf(struct dasd_device
*device
)
882 int conf_len
, conf_data_saved
;
885 struct dasd_eckd_private
*private;
886 struct dasd_eckd_path
*path_data
;
888 private = (struct dasd_eckd_private
*) device
->private;
889 path_data
= (struct dasd_eckd_path
*) &private->path_data
;
890 path_data
->opm
= ccw_device_get_path_mask(device
->cdev
);
893 /* get configuration data per operational path */
894 for (lpm
= 0x80; lpm
; lpm
>>= 1) {
895 if (lpm
& path_data
->opm
){
896 rc
= dasd_eckd_read_conf_lpm(device
, &conf_data
,
898 if (rc
&& rc
!= -EOPNOTSUPP
) { /* -EOPNOTSUPP is ok */
899 DBF_EVENT(DBF_WARNING
,
900 "Read configuration data returned "
901 "error %d for device: %s", rc
,
902 dev_name(&device
->cdev
->dev
));
905 if (conf_data
== NULL
) {
906 DBF_EVENT(DBF_WARNING
, "No configuration "
907 "data retrieved for device: %s",
908 dev_name(&device
->cdev
->dev
));
909 continue; /* no error */
911 /* save first valid configuration data */
912 if (!conf_data_saved
) {
913 kfree(private->conf_data
);
914 private->conf_data
= conf_data
;
915 private->conf_len
= conf_len
;
916 if (dasd_eckd_identify_conf_parts(private)) {
917 private->conf_data
= NULL
;
918 private->conf_len
= 0;
924 switch (dasd_eckd_path_access(conf_data
, conf_len
)) {
926 path_data
->npm
|= lpm
;
929 path_data
->ppm
|= lpm
;
932 if (conf_data
!= private->conf_data
)
939 static int dasd_eckd_read_features(struct dasd_device
*device
)
941 struct dasd_psf_prssd_data
*prssdp
;
942 struct dasd_rssd_features
*features
;
943 struct dasd_ccw_req
*cqr
;
946 struct dasd_eckd_private
*private;
948 private = (struct dasd_eckd_private
*) device
->private;
949 cqr
= dasd_smalloc_request(dasd_eckd_discipline
.name
,
950 1 /* PSF */ + 1 /* RSSD */ ,
951 (sizeof(struct dasd_psf_prssd_data
) +
952 sizeof(struct dasd_rssd_features
)),
955 DBF_EVENT(DBF_WARNING
, "Could not allocate initialization "
956 "request for device: %s",
957 dev_name(&device
->cdev
->dev
));
960 cqr
->startdev
= device
;
961 cqr
->memdev
= device
;
963 clear_bit(DASD_CQR_FLAGS_USE_ERP
, &cqr
->flags
);
965 cqr
->expires
= 10 * HZ
;
967 /* Prepare for Read Subsystem Data */
968 prssdp
= (struct dasd_psf_prssd_data
*) cqr
->data
;
969 memset(prssdp
, 0, sizeof(struct dasd_psf_prssd_data
));
970 prssdp
->order
= PSF_ORDER_PRSSD
;
971 prssdp
->suborder
= 0x41; /* Read Feature Codes */
972 /* all other bytes of prssdp must be zero */
975 ccw
->cmd_code
= DASD_ECKD_CCW_PSF
;
976 ccw
->count
= sizeof(struct dasd_psf_prssd_data
);
977 ccw
->flags
|= CCW_FLAG_CC
;
978 ccw
->cda
= (__u32
)(addr_t
) prssdp
;
980 /* Read Subsystem Data - feature codes */
981 features
= (struct dasd_rssd_features
*) (prssdp
+ 1);
982 memset(features
, 0, sizeof(struct dasd_rssd_features
));
985 ccw
->cmd_code
= DASD_ECKD_CCW_RSSD
;
986 ccw
->count
= sizeof(struct dasd_rssd_features
);
987 ccw
->cda
= (__u32
)(addr_t
) features
;
989 cqr
->buildclk
= get_clock();
990 cqr
->status
= DASD_CQR_FILLED
;
991 rc
= dasd_sleep_on(cqr
);
993 prssdp
= (struct dasd_psf_prssd_data
*) cqr
->data
;
994 features
= (struct dasd_rssd_features
*) (prssdp
+ 1);
995 memcpy(&private->features
, features
,
996 sizeof(struct dasd_rssd_features
));
998 dasd_sfree_request(cqr
, cqr
->memdev
);
1004 * Build CP for Perform Subsystem Function - SSC.
1006 static struct dasd_ccw_req
*dasd_eckd_build_psf_ssc(struct dasd_device
*device
,
1009 struct dasd_ccw_req
*cqr
;
1010 struct dasd_psf_ssc_data
*psf_ssc_data
;
1013 cqr
= dasd_smalloc_request("ECKD", 1 /* PSF */ ,
1014 sizeof(struct dasd_psf_ssc_data
),
1018 DBF_DEV_EVENT(DBF_WARNING
, device
, "%s",
1019 "Could not allocate PSF-SSC request");
1022 psf_ssc_data
= (struct dasd_psf_ssc_data
*)cqr
->data
;
1023 psf_ssc_data
->order
= PSF_ORDER_SSC
;
1024 psf_ssc_data
->suborder
= 0x40;
1026 psf_ssc_data
->suborder
|= 0x88;
1027 psf_ssc_data
->reserved
[0] = 0x88;
1030 ccw
->cmd_code
= DASD_ECKD_CCW_PSF
;
1031 ccw
->cda
= (__u32
)(addr_t
)psf_ssc_data
;
1034 cqr
->startdev
= device
;
1035 cqr
->memdev
= device
;
1037 cqr
->expires
= 10*HZ
;
1038 cqr
->buildclk
= get_clock();
1039 cqr
->status
= DASD_CQR_FILLED
;
1044 * Perform Subsystem Function.
1045 * It is necessary to trigger CIO for channel revalidation since this
1046 * call might change behaviour of DASD devices.
1049 dasd_eckd_psf_ssc(struct dasd_device
*device
, int enable_pav
)
1051 struct dasd_ccw_req
*cqr
;
1054 cqr
= dasd_eckd_build_psf_ssc(device
, enable_pav
);
1056 return PTR_ERR(cqr
);
1058 rc
= dasd_sleep_on(cqr
);
1060 /* trigger CIO to reprobe devices */
1061 css_schedule_reprobe();
1062 dasd_sfree_request(cqr
, cqr
->memdev
);
1067 * Valide storage server of current device.
1069 static int dasd_eckd_validate_server(struct dasd_device
*device
)
1072 struct dasd_eckd_private
*private;
1075 if (dasd_nopav
|| MACHINE_IS_VM
)
1079 rc
= dasd_eckd_psf_ssc(device
, enable_pav
);
1080 /* may be requested feature is not available on server,
1081 * therefore just report error and go ahead */
1082 private = (struct dasd_eckd_private
*) device
->private;
1083 DBF_EVENT(DBF_WARNING
, "PSF-SSC on storage subsystem %s.%s.%04x "
1084 "returned rc=%d for device: %s",
1085 private->uid
.vendor
, private->uid
.serial
,
1086 private->uid
.ssid
, rc
, dev_name(&device
->cdev
->dev
));
1087 /* RE-Read Configuration Data */
1088 return dasd_eckd_read_conf(device
);
1092 * Check device characteristics.
1093 * If the device is accessible using ECKD discipline, the device is enabled.
1096 dasd_eckd_check_characteristics(struct dasd_device
*device
)
1098 struct dasd_eckd_private
*private;
1099 struct dasd_block
*block
;
1102 private = (struct dasd_eckd_private
*) device
->private;
1104 private = kzalloc(sizeof(*private), GFP_KERNEL
| GFP_DMA
);
1106 dev_warn(&device
->cdev
->dev
,
1107 "Allocating memory for private DASD data "
1111 device
->private = (void *) private;
1113 memset(private, 0, sizeof(*private));
1115 /* Invalidate status of initial analysis. */
1116 private->init_cqr_status
= -1;
1117 /* Set default cache operations. */
1118 private->attrib
.operation
= DASD_NORMAL_CACHE
;
1119 private->attrib
.nr_cyl
= 0;
1121 /* Read Configuration Data */
1122 rc
= dasd_eckd_read_conf(device
);
1126 /* Generate device unique id and register in devmap */
1127 rc
= dasd_eckd_generate_uid(device
, &private->uid
);
1130 dasd_set_uid(device
->cdev
, &private->uid
);
1132 if (private->uid
.type
== UA_BASE_DEVICE
) {
1133 block
= dasd_alloc_block();
1134 if (IS_ERR(block
)) {
1135 DBF_EVENT(DBF_WARNING
, "could not allocate dasd "
1136 "block structure for device: %s",
1137 dev_name(&device
->cdev
->dev
));
1138 rc
= PTR_ERR(block
);
1141 device
->block
= block
;
1142 block
->base
= device
;
1145 /* register lcu with alias handling, enable PAV if this is a new lcu */
1146 is_known
= dasd_alias_make_device_known_to_lcu(device
);
1153 rc
= dasd_eckd_validate_server(device
); /* will switch pav on */
1158 /* Read Feature Codes */
1159 rc
= dasd_eckd_read_features(device
);
1163 /* Read Device Characteristics */
1164 rc
= dasd_generic_read_dev_chars(device
, "ECKD", &private->rdc_data
,
1167 DBF_EVENT(DBF_WARNING
,
1168 "Read device characteristics failed, rc=%d for "
1169 "device: %s", rc
, dev_name(&device
->cdev
->dev
));
1172 /* find the vaild cylinder size */
1173 if (private->rdc_data
.no_cyl
== LV_COMPAT_CYL
&&
1174 private->rdc_data
.long_no_cyl
)
1175 private->real_cyl
= private->rdc_data
.long_no_cyl
;
1177 private->real_cyl
= private->rdc_data
.no_cyl
;
1179 dev_info(&device
->cdev
->dev
, "New DASD %04X/%02X (CU %04X/%02X) "
1180 "with %d cylinders, %d heads, %d sectors\n",
1181 private->rdc_data
.dev_type
,
1182 private->rdc_data
.dev_model
,
1183 private->rdc_data
.cu_type
,
1184 private->rdc_data
.cu_model
.model
,
1186 private->rdc_data
.trk_per_cyl
,
1187 private->rdc_data
.sec_per_trk
);
1191 dasd_alias_disconnect_device_from_lcu(device
);
1193 dasd_free_block(device
->block
);
1194 device
->block
= NULL
;
1196 kfree(private->conf_data
);
1197 kfree(device
->private);
1198 device
->private = NULL
;
1202 static void dasd_eckd_uncheck_device(struct dasd_device
*device
)
1204 struct dasd_eckd_private
*private;
1206 private = (struct dasd_eckd_private
*) device
->private;
1207 dasd_alias_disconnect_device_from_lcu(device
);
1208 private->ned
= NULL
;
1209 private->sneq
= NULL
;
1210 private->vdsneq
= NULL
;
1211 private->gneq
= NULL
;
1212 private->conf_len
= 0;
1213 kfree(private->conf_data
);
1214 private->conf_data
= NULL
;
1217 static struct dasd_ccw_req
*
1218 dasd_eckd_analysis_ccw(struct dasd_device
*device
)
1220 struct dasd_eckd_private
*private;
1221 struct eckd_count
*count_data
;
1222 struct LO_eckd_data
*LO_data
;
1223 struct dasd_ccw_req
*cqr
;
1225 int cplength
, datasize
;
1228 private = (struct dasd_eckd_private
*) device
->private;
1231 datasize
= sizeof(struct DE_eckd_data
) + 2*sizeof(struct LO_eckd_data
);
1232 cqr
= dasd_smalloc_request(dasd_eckd_discipline
.name
,
1233 cplength
, datasize
, device
);
1237 /* Define extent for the first 3 tracks. */
1238 define_extent(ccw
++, cqr
->data
, 0, 2,
1239 DASD_ECKD_CCW_READ_COUNT
, device
);
1240 LO_data
= cqr
->data
+ sizeof(struct DE_eckd_data
);
1241 /* Locate record for the first 4 records on track 0. */
1242 ccw
[-1].flags
|= CCW_FLAG_CC
;
1243 locate_record(ccw
++, LO_data
++, 0, 0, 4,
1244 DASD_ECKD_CCW_READ_COUNT
, device
, 0);
1246 count_data
= private->count_area
;
1247 for (i
= 0; i
< 4; i
++) {
1248 ccw
[-1].flags
|= CCW_FLAG_CC
;
1249 ccw
->cmd_code
= DASD_ECKD_CCW_READ_COUNT
;
1252 ccw
->cda
= (__u32
)(addr_t
) count_data
;
1257 /* Locate record for the first record on track 2. */
1258 ccw
[-1].flags
|= CCW_FLAG_CC
;
1259 locate_record(ccw
++, LO_data
++, 2, 0, 1,
1260 DASD_ECKD_CCW_READ_COUNT
, device
, 0);
1261 /* Read count ccw. */
1262 ccw
[-1].flags
|= CCW_FLAG_CC
;
1263 ccw
->cmd_code
= DASD_ECKD_CCW_READ_COUNT
;
1266 ccw
->cda
= (__u32
)(addr_t
) count_data
;
1269 cqr
->startdev
= device
;
1270 cqr
->memdev
= device
;
1272 cqr
->buildclk
= get_clock();
1273 cqr
->status
= DASD_CQR_FILLED
;
1278 * This is the callback function for the init_analysis cqr. It saves
1279 * the status of the initial analysis ccw before it frees it and kicks
1280 * the device to continue the startup sequence. This will call
1281 * dasd_eckd_do_analysis again (if the devices has not been marked
1282 * for deletion in the meantime).
1285 dasd_eckd_analysis_callback(struct dasd_ccw_req
*init_cqr
, void *data
)
1287 struct dasd_eckd_private
*private;
1288 struct dasd_device
*device
;
1290 device
= init_cqr
->startdev
;
1291 private = (struct dasd_eckd_private
*) device
->private;
1292 private->init_cqr_status
= init_cqr
->status
;
1293 dasd_sfree_request(init_cqr
, device
);
1294 dasd_kick_device(device
);
1298 dasd_eckd_start_analysis(struct dasd_block
*block
)
1300 struct dasd_eckd_private
*private;
1301 struct dasd_ccw_req
*init_cqr
;
1303 private = (struct dasd_eckd_private
*) block
->base
->private;
1304 init_cqr
= dasd_eckd_analysis_ccw(block
->base
);
1305 if (IS_ERR(init_cqr
))
1306 return PTR_ERR(init_cqr
);
1307 init_cqr
->callback
= dasd_eckd_analysis_callback
;
1308 init_cqr
->callback_data
= NULL
;
1309 init_cqr
->expires
= 5*HZ
;
1310 dasd_add_request_head(init_cqr
);
1315 dasd_eckd_end_analysis(struct dasd_block
*block
)
1317 struct dasd_device
*device
;
1318 struct dasd_eckd_private
*private;
1319 struct eckd_count
*count_area
;
1320 unsigned int sb
, blk_per_trk
;
1323 device
= block
->base
;
1324 private = (struct dasd_eckd_private
*) device
->private;
1325 status
= private->init_cqr_status
;
1326 private->init_cqr_status
= -1;
1327 if (status
!= DASD_CQR_DONE
) {
1328 dev_warn(&device
->cdev
->dev
,
1329 "The DASD is not formatted\n");
1330 return -EMEDIUMTYPE
;
1333 private->uses_cdl
= 1;
1334 /* Check Track 0 for Compatible Disk Layout */
1336 for (i
= 0; i
< 3; i
++) {
1337 if (private->count_area
[i
].kl
!= 4 ||
1338 private->count_area
[i
].dl
!= dasd_eckd_cdl_reclen(i
) - 4) {
1339 private->uses_cdl
= 0;
1344 count_area
= &private->count_area
[4];
1346 if (private->uses_cdl
== 0) {
1347 for (i
= 0; i
< 5; i
++) {
1348 if ((private->count_area
[i
].kl
!= 0) ||
1349 (private->count_area
[i
].dl
!=
1350 private->count_area
[0].dl
))
1354 count_area
= &private->count_area
[0];
1356 if (private->count_area
[3].record
== 1)
1357 dev_warn(&device
->cdev
->dev
,
1358 "Track 0 has no records following the VTOC\n");
1360 if (count_area
!= NULL
&& count_area
->kl
== 0) {
1361 /* we found notthing violating our disk layout */
1362 if (dasd_check_blocksize(count_area
->dl
) == 0)
1363 block
->bp_block
= count_area
->dl
;
1365 if (block
->bp_block
== 0) {
1366 dev_warn(&device
->cdev
->dev
,
1367 "The disk layout of the DASD is not supported\n");
1368 return -EMEDIUMTYPE
;
1370 block
->s2b_shift
= 0; /* bits to shift 512 to get a block */
1371 for (sb
= 512; sb
< block
->bp_block
; sb
= sb
<< 1)
1374 blk_per_trk
= recs_per_track(&private->rdc_data
, 0, block
->bp_block
);
1375 block
->blocks
= (private->real_cyl
*
1376 private->rdc_data
.trk_per_cyl
*
1379 dev_info(&device
->cdev
->dev
,
1380 "DASD with %d KB/block, %d KB total size, %d KB/track, "
1381 "%s\n", (block
->bp_block
>> 10),
1382 ((private->real_cyl
*
1383 private->rdc_data
.trk_per_cyl
*
1384 blk_per_trk
* (block
->bp_block
>> 9)) >> 1),
1385 ((blk_per_trk
* block
->bp_block
) >> 10),
1387 "compatible disk layout" : "linux disk layout");
1392 static int dasd_eckd_do_analysis(struct dasd_block
*block
)
1394 struct dasd_eckd_private
*private;
1396 private = (struct dasd_eckd_private
*) block
->base
->private;
1397 if (private->init_cqr_status
< 0)
1398 return dasd_eckd_start_analysis(block
);
1400 return dasd_eckd_end_analysis(block
);
1403 static int dasd_eckd_ready_to_online(struct dasd_device
*device
)
1405 return dasd_alias_add_device(device
);
1408 static int dasd_eckd_online_to_ready(struct dasd_device
*device
)
1410 return dasd_alias_remove_device(device
);
1414 dasd_eckd_fill_geometry(struct dasd_block
*block
, struct hd_geometry
*geo
)
1416 struct dasd_eckd_private
*private;
1418 private = (struct dasd_eckd_private
*) block
->base
->private;
1419 if (dasd_check_blocksize(block
->bp_block
) == 0) {
1420 geo
->sectors
= recs_per_track(&private->rdc_data
,
1421 0, block
->bp_block
);
1423 geo
->cylinders
= private->rdc_data
.no_cyl
;
1424 geo
->heads
= private->rdc_data
.trk_per_cyl
;
1428 static struct dasd_ccw_req
*
1429 dasd_eckd_format_device(struct dasd_device
* device
,
1430 struct format_data_t
* fdata
)
1432 struct dasd_eckd_private
*private;
1433 struct dasd_ccw_req
*fcp
;
1434 struct eckd_count
*ect
;
1438 struct ch_t address
;
1439 int cplength
, datasize
;
1444 private = (struct dasd_eckd_private
*) device
->private;
1445 rpt
= recs_per_track(&private->rdc_data
, 0, fdata
->blksize
);
1447 fdata
->start_unit
/ private->rdc_data
.trk_per_cyl
,
1448 fdata
->start_unit
% private->rdc_data
.trk_per_cyl
);
1450 /* Sanity checks. */
1451 if (fdata
->start_unit
>=
1452 (private->real_cyl
* private->rdc_data
.trk_per_cyl
)) {
1453 dev_warn(&device
->cdev
->dev
, "Start track number %d used in "
1454 "formatting is too big\n", fdata
->start_unit
);
1455 return ERR_PTR(-EINVAL
);
1457 if (fdata
->start_unit
> fdata
->stop_unit
) {
1458 dev_warn(&device
->cdev
->dev
, "Start track %d used in "
1459 "formatting exceeds end track\n", fdata
->start_unit
);
1460 return ERR_PTR(-EINVAL
);
1462 if (dasd_check_blocksize(fdata
->blksize
) != 0) {
1463 dev_warn(&device
->cdev
->dev
,
1464 "The DASD cannot be formatted with block size %d\n",
1466 return ERR_PTR(-EINVAL
);
1470 * fdata->intensity is a bit string that tells us what to do:
1471 * Bit 0: write record zero
1472 * Bit 1: write home address, currently not supported
1473 * Bit 2: invalidate tracks
1474 * Bit 3: use OS/390 compatible disk layout (cdl)
1475 * Bit 4: do not allow storage subsystem to modify record zero
1476 * Only some bit combinations do make sense.
1478 if (fdata
->intensity
& 0x10) {
1480 intensity
= fdata
->intensity
& ~0x10;
1483 intensity
= fdata
->intensity
;
1485 switch (intensity
) {
1486 case 0x00: /* Normal format */
1487 case 0x08: /* Normal format, use cdl. */
1489 datasize
= sizeof(struct DE_eckd_data
) +
1490 sizeof(struct LO_eckd_data
) +
1491 rpt
* sizeof(struct eckd_count
);
1493 case 0x01: /* Write record zero and format track. */
1494 case 0x09: /* Write record zero and format track, use cdl. */
1496 datasize
= sizeof(struct DE_eckd_data
) +
1497 sizeof(struct LO_eckd_data
) +
1498 sizeof(struct eckd_count
) +
1499 rpt
* sizeof(struct eckd_count
);
1501 case 0x04: /* Invalidate track. */
1502 case 0x0c: /* Invalidate track, use cdl. */
1504 datasize
= sizeof(struct DE_eckd_data
) +
1505 sizeof(struct LO_eckd_data
) +
1506 sizeof(struct eckd_count
);
1509 dev_warn(&device
->cdev
->dev
, "An I/O control call used "
1510 "incorrect flags 0x%x\n", fdata
->intensity
);
1511 return ERR_PTR(-EINVAL
);
1513 /* Allocate the format ccw request. */
1514 fcp
= dasd_smalloc_request(dasd_eckd_discipline
.name
,
1515 cplength
, datasize
, device
);
1522 switch (intensity
& ~0x08) {
1523 case 0x00: /* Normal format. */
1524 define_extent(ccw
++, (struct DE_eckd_data
*) data
,
1525 fdata
->start_unit
, fdata
->start_unit
,
1526 DASD_ECKD_CCW_WRITE_CKD
, device
);
1527 /* grant subsystem permission to format R0 */
1529 ((struct DE_eckd_data
*)data
)->ga_extended
|= 0x04;
1530 data
+= sizeof(struct DE_eckd_data
);
1531 ccw
[-1].flags
|= CCW_FLAG_CC
;
1532 locate_record(ccw
++, (struct LO_eckd_data
*) data
,
1533 fdata
->start_unit
, 0, rpt
,
1534 DASD_ECKD_CCW_WRITE_CKD
, device
,
1536 data
+= sizeof(struct LO_eckd_data
);
1538 case 0x01: /* Write record zero + format track. */
1539 define_extent(ccw
++, (struct DE_eckd_data
*) data
,
1540 fdata
->start_unit
, fdata
->start_unit
,
1541 DASD_ECKD_CCW_WRITE_RECORD_ZERO
,
1543 data
+= sizeof(struct DE_eckd_data
);
1544 ccw
[-1].flags
|= CCW_FLAG_CC
;
1545 locate_record(ccw
++, (struct LO_eckd_data
*) data
,
1546 fdata
->start_unit
, 0, rpt
+ 1,
1547 DASD_ECKD_CCW_WRITE_RECORD_ZERO
, device
,
1548 device
->block
->bp_block
);
1549 data
+= sizeof(struct LO_eckd_data
);
1551 case 0x04: /* Invalidate track. */
1552 define_extent(ccw
++, (struct DE_eckd_data
*) data
,
1553 fdata
->start_unit
, fdata
->start_unit
,
1554 DASD_ECKD_CCW_WRITE_CKD
, device
);
1555 data
+= sizeof(struct DE_eckd_data
);
1556 ccw
[-1].flags
|= CCW_FLAG_CC
;
1557 locate_record(ccw
++, (struct LO_eckd_data
*) data
,
1558 fdata
->start_unit
, 0, 1,
1559 DASD_ECKD_CCW_WRITE_CKD
, device
, 8);
1560 data
+= sizeof(struct LO_eckd_data
);
1563 if (intensity
& 0x01) { /* write record zero */
1564 ect
= (struct eckd_count
*) data
;
1565 data
+= sizeof(struct eckd_count
);
1566 ect
->cyl
= address
.cyl
;
1567 ect
->head
= address
.head
;
1571 ccw
[-1].flags
|= CCW_FLAG_CC
;
1572 ccw
->cmd_code
= DASD_ECKD_CCW_WRITE_RECORD_ZERO
;
1573 ccw
->flags
= CCW_FLAG_SLI
;
1575 ccw
->cda
= (__u32
)(addr_t
) ect
;
1578 if ((intensity
& ~0x08) & 0x04) { /* erase track */
1579 ect
= (struct eckd_count
*) data
;
1580 data
+= sizeof(struct eckd_count
);
1581 ect
->cyl
= address
.cyl
;
1582 ect
->head
= address
.head
;
1586 ccw
[-1].flags
|= CCW_FLAG_CC
;
1587 ccw
->cmd_code
= DASD_ECKD_CCW_WRITE_CKD
;
1588 ccw
->flags
= CCW_FLAG_SLI
;
1590 ccw
->cda
= (__u32
)(addr_t
) ect
;
1591 } else { /* write remaining records */
1592 for (i
= 0; i
< rpt
; i
++) {
1593 ect
= (struct eckd_count
*) data
;
1594 data
+= sizeof(struct eckd_count
);
1595 ect
->cyl
= address
.cyl
;
1596 ect
->head
= address
.head
;
1597 ect
->record
= i
+ 1;
1599 ect
->dl
= fdata
->blksize
;
1600 /* Check for special tracks 0-1 when formatting CDL */
1601 if ((intensity
& 0x08) &&
1602 fdata
->start_unit
== 0) {
1605 ect
->dl
= sizes_trk0
[i
] - 4;
1608 if ((intensity
& 0x08) &&
1609 fdata
->start_unit
== 1) {
1611 ect
->dl
= LABEL_SIZE
- 44;
1613 ccw
[-1].flags
|= CCW_FLAG_CC
;
1614 ccw
->cmd_code
= DASD_ECKD_CCW_WRITE_CKD
;
1615 ccw
->flags
= CCW_FLAG_SLI
;
1617 ccw
->cda
= (__u32
)(addr_t
) ect
;
1621 fcp
->startdev
= device
;
1622 fcp
->memdev
= device
;
1623 clear_bit(DASD_CQR_FLAGS_USE_ERP
, &fcp
->flags
);
1624 fcp
->retries
= 5; /* set retry counter to enable default ERP */
1625 fcp
->buildclk
= get_clock();
1626 fcp
->status
= DASD_CQR_FILLED
;
1630 static void dasd_eckd_handle_terminated_request(struct dasd_ccw_req
*cqr
)
1632 cqr
->status
= DASD_CQR_FILLED
;
1633 if (cqr
->block
&& (cqr
->startdev
!= cqr
->block
->base
)) {
1634 dasd_eckd_reset_ccw_to_base_io(cqr
);
1635 cqr
->startdev
= cqr
->block
->base
;
1639 static dasd_erp_fn_t
1640 dasd_eckd_erp_action(struct dasd_ccw_req
* cqr
)
1642 struct dasd_device
*device
= (struct dasd_device
*) cqr
->startdev
;
1643 struct ccw_device
*cdev
= device
->cdev
;
1645 switch (cdev
->id
.cu_type
) {
1650 return dasd_3990_erp_action
;
1654 return dasd_default_erp_action
;
1658 static dasd_erp_fn_t
1659 dasd_eckd_erp_postaction(struct dasd_ccw_req
* cqr
)
1661 return dasd_default_erp_postaction
;
1665 static void dasd_eckd_handle_unsolicited_interrupt(struct dasd_device
*device
,
1671 /* first of all check for state change pending interrupt */
1672 mask
= DEV_STAT_ATTENTION
| DEV_STAT_DEV_END
| DEV_STAT_UNIT_EXCEP
;
1673 if ((scsw_dstat(&irb
->scsw
) & mask
) == mask
) {
1674 dasd_generic_handle_state_change(device
);
1678 /* summary unit check */
1679 if ((scsw_dstat(&irb
->scsw
) & DEV_STAT_UNIT_CHECK
) &&
1680 (irb
->ecw
[7] == 0x0D)) {
1681 dasd_alias_handle_summary_unit_check(device
, irb
);
1685 sense
= dasd_get_sense(irb
);
1686 /* service information message SIM */
1687 if (sense
&& !(sense
[27] & DASD_SENSE_BIT_0
) &&
1688 ((sense
[6] & DASD_SIM_SENSE
) == DASD_SIM_SENSE
)) {
1689 dasd_3990_erp_handle_sim(device
, sense
);
1690 dasd_schedule_device_bh(device
);
1694 if ((scsw_cc(&irb
->scsw
) == 1) &&
1695 (scsw_fctl(&irb
->scsw
) & SCSW_FCTL_START_FUNC
) &&
1696 (scsw_actl(&irb
->scsw
) & SCSW_ACTL_START_PEND
) &&
1697 (scsw_stctl(&irb
->scsw
) & SCSW_STCTL_STATUS_PEND
)) {
1698 /* fake irb do nothing, they are handled elsewhere */
1699 dasd_schedule_device_bh(device
);
1704 /* just report other unsolicited interrupts */
1705 DBF_DEV_EVENT(DBF_ERR
, device
, "%s",
1706 "unsolicited interrupt received");
1708 DBF_DEV_EVENT(DBF_ERR
, device
, "%s",
1709 "unsolicited interrupt received "
1710 "(sense available)");
1711 device
->discipline
->dump_sense_dbf(device
, NULL
, irb
,
1715 dasd_schedule_device_bh(device
);
1720 static struct dasd_ccw_req
*dasd_eckd_build_cp_cmd_single(
1721 struct dasd_device
*startdev
,
1722 struct dasd_block
*block
,
1723 struct request
*req
,
1728 unsigned int first_offs
,
1729 unsigned int last_offs
,
1730 unsigned int blk_per_trk
,
1731 unsigned int blksize
)
1733 struct dasd_eckd_private
*private;
1734 unsigned long *idaws
;
1735 struct LO_eckd_data
*LO_data
;
1736 struct dasd_ccw_req
*cqr
;
1738 struct req_iterator iter
;
1742 int count
, cidaw
, cplength
, datasize
;
1744 unsigned char cmd
, rcmd
;
1746 struct dasd_device
*basedev
;
1748 basedev
= block
->base
;
1749 private = (struct dasd_eckd_private
*) basedev
->private;
1750 if (rq_data_dir(req
) == READ
)
1751 cmd
= DASD_ECKD_CCW_READ_MT
;
1752 else if (rq_data_dir(req
) == WRITE
)
1753 cmd
= DASD_ECKD_CCW_WRITE_MT
;
1755 return ERR_PTR(-EINVAL
);
1757 /* Check struct bio and count the number of blocks for the request. */
1760 rq_for_each_segment(bv
, req
, iter
) {
1761 if (bv
->bv_len
& (blksize
- 1))
1762 /* Eckd can only do full blocks. */
1763 return ERR_PTR(-EINVAL
);
1764 count
+= bv
->bv_len
>> (block
->s2b_shift
+ 9);
1765 #if defined(CONFIG_64BIT)
1766 if (idal_is_needed (page_address(bv
->bv_page
), bv
->bv_len
))
1767 cidaw
+= bv
->bv_len
>> (block
->s2b_shift
+ 9);
1771 if (count
!= last_rec
- first_rec
+ 1)
1772 return ERR_PTR(-EINVAL
);
1774 /* use the prefix command if available */
1775 use_prefix
= private->features
.feature
[8] & 0x01;
1777 /* 1x prefix + number of blocks */
1778 cplength
= 2 + count
;
1779 /* 1x prefix + cidaws*sizeof(long) */
1780 datasize
= sizeof(struct PFX_eckd_data
) +
1781 sizeof(struct LO_eckd_data
) +
1782 cidaw
* sizeof(unsigned long);
1784 /* 1x define extent + 1x locate record + number of blocks */
1785 cplength
= 2 + count
;
1786 /* 1x define extent + 1x locate record + cidaws*sizeof(long) */
1787 datasize
= sizeof(struct DE_eckd_data
) +
1788 sizeof(struct LO_eckd_data
) +
1789 cidaw
* sizeof(unsigned long);
1791 /* Find out the number of additional locate record ccws for cdl. */
1792 if (private->uses_cdl
&& first_rec
< 2*blk_per_trk
) {
1793 if (last_rec
>= 2*blk_per_trk
)
1794 count
= 2*blk_per_trk
- first_rec
;
1796 datasize
+= count
*sizeof(struct LO_eckd_data
);
1798 /* Allocate the ccw request. */
1799 cqr
= dasd_smalloc_request(dasd_eckd_discipline
.name
,
1800 cplength
, datasize
, startdev
);
1804 /* First ccw is define extent or prefix. */
1806 if (prefix(ccw
++, cqr
->data
, first_trk
,
1807 last_trk
, cmd
, basedev
, startdev
) == -EAGAIN
) {
1808 /* Clock not in sync and XRC is enabled.
1811 dasd_sfree_request(cqr
, startdev
);
1812 return ERR_PTR(-EAGAIN
);
1814 idaws
= (unsigned long *) (cqr
->data
+
1815 sizeof(struct PFX_eckd_data
));
1817 if (define_extent(ccw
++, cqr
->data
, first_trk
,
1818 last_trk
, cmd
, startdev
) == -EAGAIN
) {
1819 /* Clock not in sync and XRC is enabled.
1822 dasd_sfree_request(cqr
, startdev
);
1823 return ERR_PTR(-EAGAIN
);
1825 idaws
= (unsigned long *) (cqr
->data
+
1826 sizeof(struct DE_eckd_data
));
1828 /* Build locate_record+read/write/ccws. */
1829 LO_data
= (struct LO_eckd_data
*) (idaws
+ cidaw
);
1831 if (private->uses_cdl
== 0 || recid
> 2*blk_per_trk
) {
1832 /* Only standard blocks so there is just one locate record. */
1833 ccw
[-1].flags
|= CCW_FLAG_CC
;
1834 locate_record(ccw
++, LO_data
++, first_trk
, first_offs
+ 1,
1835 last_rec
- recid
+ 1, cmd
, basedev
, blksize
);
1837 rq_for_each_segment(bv
, req
, iter
) {
1838 dst
= page_address(bv
->bv_page
) + bv
->bv_offset
;
1839 if (dasd_page_cache
) {
1840 char *copy
= kmem_cache_alloc(dasd_page_cache
,
1841 GFP_DMA
| __GFP_NOWARN
);
1842 if (copy
&& rq_data_dir(req
) == WRITE
)
1843 memcpy(copy
+ bv
->bv_offset
, dst
, bv
->bv_len
);
1845 dst
= copy
+ bv
->bv_offset
;
1847 for (off
= 0; off
< bv
->bv_len
; off
+= blksize
) {
1848 sector_t trkid
= recid
;
1849 unsigned int recoffs
= sector_div(trkid
, blk_per_trk
);
1852 /* Locate record for cdl special block ? */
1853 if (private->uses_cdl
&& recid
< 2*blk_per_trk
) {
1854 if (dasd_eckd_cdl_special(blk_per_trk
, recid
)){
1856 count
= dasd_eckd_cdl_reclen(recid
);
1857 if (count
< blksize
&&
1858 rq_data_dir(req
) == READ
)
1859 memset(dst
+ count
, 0xe5,
1862 ccw
[-1].flags
|= CCW_FLAG_CC
;
1863 locate_record(ccw
++, LO_data
++,
1865 1, rcmd
, basedev
, count
);
1867 /* Locate record for standard blocks ? */
1868 if (private->uses_cdl
&& recid
== 2*blk_per_trk
) {
1869 ccw
[-1].flags
|= CCW_FLAG_CC
;
1870 locate_record(ccw
++, LO_data
++,
1872 last_rec
- recid
+ 1,
1873 cmd
, basedev
, count
);
1875 /* Read/write ccw. */
1876 ccw
[-1].flags
|= CCW_FLAG_CC
;
1877 ccw
->cmd_code
= rcmd
;
1879 if (idal_is_needed(dst
, blksize
)) {
1880 ccw
->cda
= (__u32
)(addr_t
) idaws
;
1881 ccw
->flags
= CCW_FLAG_IDA
;
1882 idaws
= idal_create_words(idaws
, dst
, blksize
);
1884 ccw
->cda
= (__u32
)(addr_t
) dst
;
1892 if (blk_noretry_request(req
) ||
1893 block
->base
->features
& DASD_FEATURE_FAILFAST
)
1894 set_bit(DASD_CQR_FLAGS_FAILFAST
, &cqr
->flags
);
1895 cqr
->startdev
= startdev
;
1896 cqr
->memdev
= startdev
;
1898 cqr
->expires
= 5 * 60 * HZ
; /* 5 minutes */
1899 cqr
->lpm
= private->path_data
.ppm
;
1901 cqr
->buildclk
= get_clock();
1902 cqr
->status
= DASD_CQR_FILLED
;
1906 static struct dasd_ccw_req
*dasd_eckd_build_cp_cmd_track(
1907 struct dasd_device
*startdev
,
1908 struct dasd_block
*block
,
1909 struct request
*req
,
1914 unsigned int first_offs
,
1915 unsigned int last_offs
,
1916 unsigned int blk_per_trk
,
1917 unsigned int blksize
)
1919 struct dasd_eckd_private
*private;
1920 unsigned long *idaws
;
1921 struct dasd_ccw_req
*cqr
;
1923 struct req_iterator iter
;
1925 char *dst
, *idaw_dst
;
1926 unsigned int cidaw
, cplength
, datasize
;
1930 struct dasd_device
*basedev
;
1931 unsigned int trkcount
, count
, count_to_trk_end
;
1932 unsigned int idaw_len
, seg_len
, part_len
, len_to_track_end
;
1933 unsigned char new_track
, end_idaw
;
1935 unsigned int recoffs
;
1937 basedev
= block
->base
;
1938 private = (struct dasd_eckd_private
*) basedev
->private;
1939 if (rq_data_dir(req
) == READ
)
1940 cmd
= DASD_ECKD_CCW_READ_TRACK_DATA
;
1941 else if (rq_data_dir(req
) == WRITE
)
1942 cmd
= DASD_ECKD_CCW_WRITE_TRACK_DATA
;
1944 return ERR_PTR(-EINVAL
);
1946 /* Track based I/O needs IDAWs for each page, and not just for
1947 * 64 bit addresses. We need additional idals for pages
1948 * that get filled from two tracks, so we use the number
1949 * of records as upper limit.
1951 cidaw
= last_rec
- first_rec
+ 1;
1952 trkcount
= last_trk
- first_trk
+ 1;
1954 /* 1x prefix + one read/write ccw per track */
1955 cplength
= 1 + trkcount
;
1957 /* on 31-bit we need space for two 32 bit addresses per page
1958 * on 64-bit one 64 bit address
1960 datasize
= sizeof(struct PFX_eckd_data
) +
1961 cidaw
* sizeof(unsigned long long);
1963 /* Allocate the ccw request. */
1964 cqr
= dasd_smalloc_request(dasd_eckd_discipline
.name
,
1965 cplength
, datasize
, startdev
);
1969 /* transfer length factor: how many bytes to read from the last track */
1970 if (first_trk
== last_trk
)
1971 tlf
= last_offs
- first_offs
+ 1;
1973 tlf
= last_offs
+ 1;
1976 if (prefix_LRE(ccw
++, cqr
->data
, first_trk
,
1977 last_trk
, cmd
, basedev
, startdev
,
1978 1 /* format */, first_offs
+ 1,
1981 /* Clock not in sync and XRC is enabled.
1984 dasd_sfree_request(cqr
, startdev
);
1985 return ERR_PTR(-EAGAIN
);
1989 * The translation of request into ccw programs must meet the
1990 * following conditions:
1991 * - all idaws but the first and the last must address full pages
1992 * (or 2K blocks on 31-bit)
1993 * - the scope of a ccw and it's idal ends with the track boundaries
1995 idaws
= (unsigned long *) (cqr
->data
+ sizeof(struct PFX_eckd_data
));
1999 len_to_track_end
= 0;
2002 rq_for_each_segment(bv
, req
, iter
) {
2003 dst
= page_address(bv
->bv_page
) + bv
->bv_offset
;
2004 seg_len
= bv
->bv_len
;
2008 recoffs
= sector_div(trkid
, blk_per_trk
);
2009 count_to_trk_end
= blk_per_trk
- recoffs
;
2010 count
= min((last_rec
- recid
+ 1),
2011 (sector_t
)count_to_trk_end
);
2012 len_to_track_end
= count
* blksize
;
2013 ccw
[-1].flags
|= CCW_FLAG_CC
;
2014 ccw
->cmd_code
= cmd
;
2015 ccw
->count
= len_to_track_end
;
2016 ccw
->cda
= (__u32
)(addr_t
)idaws
;
2017 ccw
->flags
= CCW_FLAG_IDA
;
2021 /* first idaw for a ccw may start anywhere */
2025 /* If we start a new idaw, we must make sure that it
2026 * starts on an IDA_BLOCK_SIZE boundary.
2027 * If we continue an idaw, we must make sure that the
2028 * current segment begins where the so far accumulated
2032 if (__pa(dst
) & (IDA_BLOCK_SIZE
-1)) {
2033 dasd_sfree_request(cqr
, startdev
);
2034 return ERR_PTR(-ERANGE
);
2038 if ((idaw_dst
+ idaw_len
) != dst
) {
2039 dasd_sfree_request(cqr
, startdev
);
2040 return ERR_PTR(-ERANGE
);
2042 part_len
= min(seg_len
, len_to_track_end
);
2043 seg_len
-= part_len
;
2045 idaw_len
+= part_len
;
2046 len_to_track_end
-= part_len
;
2047 /* collected memory area ends on an IDA_BLOCK border,
2049 * idal_create_words will handle cases where idaw_len
2050 * is larger then IDA_BLOCK_SIZE
2052 if (!(__pa(idaw_dst
+ idaw_len
) & (IDA_BLOCK_SIZE
-1)))
2054 /* We also need to end the idaw at track end */
2055 if (!len_to_track_end
) {
2060 idaws
= idal_create_words(idaws
, idaw_dst
,
2069 if (blk_noretry_request(req
) ||
2070 block
->base
->features
& DASD_FEATURE_FAILFAST
)
2071 set_bit(DASD_CQR_FLAGS_FAILFAST
, &cqr
->flags
);
2072 cqr
->startdev
= startdev
;
2073 cqr
->memdev
= startdev
;
2075 cqr
->expires
= 5 * 60 * HZ
; /* 5 minutes */
2076 cqr
->lpm
= private->path_data
.ppm
;
2078 cqr
->buildclk
= get_clock();
2079 cqr
->status
= DASD_CQR_FILLED
;
2083 static int prepare_itcw(struct itcw
*itcw
,
2084 unsigned int trk
, unsigned int totrk
, int cmd
,
2085 struct dasd_device
*basedev
,
2086 struct dasd_device
*startdev
,
2087 unsigned int rec_on_trk
, int count
,
2088 unsigned int blksize
,
2089 unsigned int total_data_size
,
2091 unsigned int blk_per_trk
)
2093 struct PFX_eckd_data pfxdata
;
2094 struct dasd_eckd_private
*basepriv
, *startpriv
;
2095 struct DE_eckd_data
*dedata
;
2096 struct LRE_eckd_data
*lredata
;
2100 u16 heads
, beghead
, endhead
;
2108 /* setup prefix data */
2109 basepriv
= (struct dasd_eckd_private
*) basedev
->private;
2110 startpriv
= (struct dasd_eckd_private
*) startdev
->private;
2111 dedata
= &pfxdata
.define_extent
;
2112 lredata
= &pfxdata
.locate_record
;
2114 memset(&pfxdata
, 0, sizeof(pfxdata
));
2115 pfxdata
.format
= 1; /* PFX with LRE */
2116 pfxdata
.base_address
= basepriv
->ned
->unit_addr
;
2117 pfxdata
.base_lss
= basepriv
->ned
->ID
;
2118 pfxdata
.validity
.define_extent
= 1;
2120 /* private uid is kept up to date, conf_data may be outdated */
2121 if (startpriv
->uid
.type
!= UA_BASE_DEVICE
) {
2122 pfxdata
.validity
.verify_base
= 1;
2123 if (startpriv
->uid
.type
== UA_HYPER_PAV_ALIAS
)
2124 pfxdata
.validity
.hyper_pav
= 1;
2128 case DASD_ECKD_CCW_READ_TRACK_DATA
:
2129 dedata
->mask
.perm
= 0x1;
2130 dedata
->attributes
.operation
= basepriv
->attrib
.operation
;
2131 dedata
->blk_size
= blksize
;
2132 dedata
->ga_extended
|= 0x42;
2133 lredata
->operation
.orientation
= 0x0;
2134 lredata
->operation
.operation
= 0x0C;
2135 lredata
->auxiliary
.check_bytes
= 0x01;
2136 pfx_cmd
= DASD_ECKD_CCW_PFX_READ
;
2138 case DASD_ECKD_CCW_WRITE_TRACK_DATA
:
2139 dedata
->mask
.perm
= 0x02;
2140 dedata
->attributes
.operation
= basepriv
->attrib
.operation
;
2141 dedata
->blk_size
= blksize
;
2142 rc
= check_XRC_on_prefix(&pfxdata
, basedev
);
2143 dedata
->ga_extended
|= 0x42;
2144 lredata
->operation
.orientation
= 0x0;
2145 lredata
->operation
.operation
= 0x3F;
2146 lredata
->extended_operation
= 0x23;
2147 lredata
->auxiliary
.check_bytes
= 0x2;
2148 pfx_cmd
= DASD_ECKD_CCW_PFX
;
2151 DBF_DEV_EVENT(DBF_ERR
, basedev
,
2152 "prepare itcw, unknown opcode 0x%x", cmd
);
2159 dedata
->attributes
.mode
= 0x3; /* ECKD */
2161 heads
= basepriv
->rdc_data
.trk_per_cyl
;
2162 begcyl
= trk
/ heads
;
2163 beghead
= trk
% heads
;
2164 endcyl
= totrk
/ heads
;
2165 endhead
= totrk
% heads
;
2167 /* check for sequential prestage - enhance cylinder range */
2168 if (dedata
->attributes
.operation
== DASD_SEQ_PRESTAGE
||
2169 dedata
->attributes
.operation
== DASD_SEQ_ACCESS
) {
2171 if (endcyl
+ basepriv
->attrib
.nr_cyl
< basepriv
->real_cyl
)
2172 endcyl
+= basepriv
->attrib
.nr_cyl
;
2174 endcyl
= (basepriv
->real_cyl
- 1);
2177 set_ch_t(&dedata
->beg_ext
, begcyl
, beghead
);
2178 set_ch_t(&dedata
->end_ext
, endcyl
, endhead
);
2180 dedata
->ep_format
= 0x20; /* records per track is valid */
2181 dedata
->ep_rec_per_track
= blk_per_trk
;
2184 switch (basepriv
->rdc_data
.dev_type
) {
2186 dn
= ceil_quot(blksize
+ 6, 232);
2187 d
= 9 + ceil_quot(blksize
+ 6 * (dn
+ 1), 34);
2188 sector
= (49 + (rec_on_trk
- 1) * (10 + d
)) / 8;
2191 d
= 7 + ceil_quot(blksize
+ 12, 32);
2192 sector
= (39 + (rec_on_trk
- 1) * (8 + d
)) / 7;
2197 lredata
->auxiliary
.length_valid
= 1;
2198 lredata
->auxiliary
.length_scope
= 1;
2199 lredata
->auxiliary
.imbedded_ccw_valid
= 1;
2200 lredata
->length
= tlf
;
2201 lredata
->imbedded_ccw
= cmd
;
2202 lredata
->count
= count
;
2203 lredata
->sector
= sector
;
2204 set_ch_t(&lredata
->seek_addr
, begcyl
, beghead
);
2205 lredata
->search_arg
.cyl
= lredata
->seek_addr
.cyl
;
2206 lredata
->search_arg
.head
= lredata
->seek_addr
.head
;
2207 lredata
->search_arg
.record
= rec_on_trk
;
2209 dcw
= itcw_add_dcw(itcw
, pfx_cmd
, 0,
2210 &pfxdata
, sizeof(pfxdata
), total_data_size
);
2215 static struct dasd_ccw_req
*dasd_eckd_build_cp_tpm_track(
2216 struct dasd_device
*startdev
,
2217 struct dasd_block
*block
,
2218 struct request
*req
,
2223 unsigned int first_offs
,
2224 unsigned int last_offs
,
2225 unsigned int blk_per_trk
,
2226 unsigned int blksize
)
2228 struct dasd_eckd_private
*private;
2229 struct dasd_ccw_req
*cqr
;
2230 struct req_iterator iter
;
2233 unsigned int trkcount
, ctidaw
;
2235 struct dasd_device
*basedev
;
2238 struct tidaw
*last_tidaw
= NULL
;
2242 basedev
= block
->base
;
2243 private = (struct dasd_eckd_private
*) basedev
->private;
2244 if (rq_data_dir(req
) == READ
) {
2245 cmd
= DASD_ECKD_CCW_READ_TRACK_DATA
;
2246 itcw_op
= ITCW_OP_READ
;
2247 } else if (rq_data_dir(req
) == WRITE
) {
2248 cmd
= DASD_ECKD_CCW_WRITE_TRACK_DATA
;
2249 itcw_op
= ITCW_OP_WRITE
;
2251 return ERR_PTR(-EINVAL
);
2253 /* trackbased I/O needs address all memory via TIDAWs,
2254 * not just for 64 bit addresses. This allows us to map
2255 * each segment directly to one tidaw.
2257 trkcount
= last_trk
- first_trk
+ 1;
2259 rq_for_each_segment(bv
, req
, iter
) {
2263 /* Allocate the ccw request. */
2264 itcw_size
= itcw_calc_size(0, ctidaw
, 0);
2265 cqr
= dasd_smalloc_request(dasd_eckd_discipline
.name
,
2266 0, itcw_size
, startdev
);
2271 cqr
->startdev
= startdev
;
2272 cqr
->memdev
= startdev
;
2274 cqr
->expires
= 100*HZ
;
2275 cqr
->buildclk
= get_clock();
2276 cqr
->status
= DASD_CQR_FILLED
;
2279 /* transfer length factor: how many bytes to read from the last track */
2280 if (first_trk
== last_trk
)
2281 tlf
= last_offs
- first_offs
+ 1;
2283 tlf
= last_offs
+ 1;
2286 itcw
= itcw_init(cqr
->data
, itcw_size
, itcw_op
, 0, ctidaw
, 0);
2287 cqr
->cpaddr
= itcw_get_tcw(itcw
);
2289 if (prepare_itcw(itcw
, first_trk
, last_trk
,
2290 cmd
, basedev
, startdev
,
2293 (last_rec
- first_rec
+ 1) * blksize
,
2294 tlf
, blk_per_trk
) == -EAGAIN
) {
2295 /* Clock not in sync and XRC is enabled.
2298 dasd_sfree_request(cqr
, startdev
);
2299 return ERR_PTR(-EAGAIN
);
2303 * A tidaw can address 4k of memory, but must not cross page boundaries
2304 * We can let the block layer handle this by setting
2305 * blk_queue_segment_boundary to page boundaries and
2306 * blk_max_segment_size to page size when setting up the request queue.
2308 rq_for_each_segment(bv
, req
, iter
) {
2309 dst
= page_address(bv
->bv_page
) + bv
->bv_offset
;
2310 last_tidaw
= itcw_add_tidaw(itcw
, 0x00, dst
, bv
->bv_len
);
2311 if (IS_ERR(last_tidaw
))
2312 return (struct dasd_ccw_req
*)last_tidaw
;
2315 last_tidaw
->flags
|= 0x80;
2316 itcw_finalize(itcw
);
2318 if (blk_noretry_request(req
) ||
2319 block
->base
->features
& DASD_FEATURE_FAILFAST
)
2320 set_bit(DASD_CQR_FLAGS_FAILFAST
, &cqr
->flags
);
2321 cqr
->startdev
= startdev
;
2322 cqr
->memdev
= startdev
;
2324 cqr
->expires
= 5 * 60 * HZ
; /* 5 minutes */
2325 cqr
->lpm
= private->path_data
.ppm
;
2327 cqr
->buildclk
= get_clock();
2328 cqr
->status
= DASD_CQR_FILLED
;
2332 static struct dasd_ccw_req
*dasd_eckd_build_cp(struct dasd_device
*startdev
,
2333 struct dasd_block
*block
,
2334 struct request
*req
)
2336 int tpm
, cmdrtd
, cmdwtd
;
2338 #if defined(CONFIG_64BIT)
2339 int fcx_in_css
, fcx_in_gneq
, fcx_in_features
;
2341 struct dasd_eckd_private
*private;
2342 struct dasd_device
*basedev
;
2343 sector_t first_rec
, last_rec
;
2344 sector_t first_trk
, last_trk
;
2345 unsigned int first_offs
, last_offs
;
2346 unsigned int blk_per_trk
, blksize
;
2348 struct dasd_ccw_req
*cqr
;
2350 basedev
= block
->base
;
2351 private = (struct dasd_eckd_private
*) basedev
->private;
2353 /* Calculate number of blocks/records per track. */
2354 blksize
= block
->bp_block
;
2355 blk_per_trk
= recs_per_track(&private->rdc_data
, 0, blksize
);
2356 /* Calculate record id of first and last block. */
2357 first_rec
= first_trk
= blk_rq_pos(req
) >> block
->s2b_shift
;
2358 first_offs
= sector_div(first_trk
, blk_per_trk
);
2359 last_rec
= last_trk
=
2360 (blk_rq_pos(req
) + blk_rq_sectors(req
) - 1) >> block
->s2b_shift
;
2361 last_offs
= sector_div(last_trk
, blk_per_trk
);
2362 cdlspecial
= (private->uses_cdl
&& first_rec
< 2*blk_per_trk
);
2364 /* is transport mode supported? */
2365 #if defined(CONFIG_64BIT)
2366 fcx_in_css
= css_general_characteristics
.fcx
;
2367 fcx_in_gneq
= private->gneq
->reserved2
[7] & 0x04;
2368 fcx_in_features
= private->features
.feature
[40] & 0x80;
2369 tpm
= fcx_in_css
&& fcx_in_gneq
&& fcx_in_features
;
2374 /* is read track data and write track data in command mode supported? */
2375 cmdrtd
= private->features
.feature
[9] & 0x20;
2376 cmdwtd
= private->features
.feature
[12] & 0x40;
2377 use_prefix
= private->features
.feature
[8] & 0x01;
2380 if (cdlspecial
|| dasd_page_cache
) {
2381 /* do nothing, just fall through to the cmd mode single case */
2382 } else if (!dasd_nofcx
&& tpm
&& (first_trk
== last_trk
)) {
2383 cqr
= dasd_eckd_build_cp_tpm_track(startdev
, block
, req
,
2384 first_rec
, last_rec
,
2385 first_trk
, last_trk
,
2386 first_offs
, last_offs
,
2387 blk_per_trk
, blksize
);
2388 if (IS_ERR(cqr
) && PTR_ERR(cqr
) != -EAGAIN
)
2390 } else if (use_prefix
&&
2391 (((rq_data_dir(req
) == READ
) && cmdrtd
) ||
2392 ((rq_data_dir(req
) == WRITE
) && cmdwtd
))) {
2393 cqr
= dasd_eckd_build_cp_cmd_track(startdev
, block
, req
,
2394 first_rec
, last_rec
,
2395 first_trk
, last_trk
,
2396 first_offs
, last_offs
,
2397 blk_per_trk
, blksize
);
2398 if (IS_ERR(cqr
) && PTR_ERR(cqr
) != -EAGAIN
)
2402 cqr
= dasd_eckd_build_cp_cmd_single(startdev
, block
, req
,
2403 first_rec
, last_rec
,
2404 first_trk
, last_trk
,
2405 first_offs
, last_offs
,
2406 blk_per_trk
, blksize
);
2411 dasd_eckd_free_cp(struct dasd_ccw_req
*cqr
, struct request
*req
)
2413 struct dasd_eckd_private
*private;
2415 struct req_iterator iter
;
2418 unsigned int blksize
, blk_per_trk
, off
;
2422 if (!dasd_page_cache
)
2424 private = (struct dasd_eckd_private
*) cqr
->block
->base
->private;
2425 blksize
= cqr
->block
->bp_block
;
2426 blk_per_trk
= recs_per_track(&private->rdc_data
, 0, blksize
);
2427 recid
= blk_rq_pos(req
) >> cqr
->block
->s2b_shift
;
2429 /* Skip over define extent & locate record. */
2431 if (private->uses_cdl
== 0 || recid
> 2*blk_per_trk
)
2433 rq_for_each_segment(bv
, req
, iter
) {
2434 dst
= page_address(bv
->bv_page
) + bv
->bv_offset
;
2435 for (off
= 0; off
< bv
->bv_len
; off
+= blksize
) {
2436 /* Skip locate record. */
2437 if (private->uses_cdl
&& recid
<= 2*blk_per_trk
)
2440 if (ccw
->flags
& CCW_FLAG_IDA
)
2441 cda
= *((char **)((addr_t
) ccw
->cda
));
2443 cda
= (char *)((addr_t
) ccw
->cda
);
2445 if (rq_data_dir(req
) == READ
)
2446 memcpy(dst
, cda
, bv
->bv_len
);
2447 kmem_cache_free(dasd_page_cache
,
2448 (void *)((addr_t
)cda
& PAGE_MASK
));
2457 status
= cqr
->status
== DASD_CQR_DONE
;
2458 dasd_sfree_request(cqr
, cqr
->memdev
);
2463 * Modify ccw/tcw in cqr so it can be started on a base device.
2465 * Note that this is not enough to restart the cqr!
2466 * Either reset cqr->startdev as well (summary unit check handling)
2467 * or restart via separate cqr (as in ERP handling).
2469 void dasd_eckd_reset_ccw_to_base_io(struct dasd_ccw_req
*cqr
)
2472 struct PFX_eckd_data
*pfxdata
;
2477 if (cqr
->cpmode
== 1) {
2479 tccb
= tcw_get_tccb(tcw
);
2480 dcw
= (struct dcw
*)&tccb
->tca
[0];
2481 pfxdata
= (struct PFX_eckd_data
*)&dcw
->cd
[0];
2482 pfxdata
->validity
.verify_base
= 0;
2483 pfxdata
->validity
.hyper_pav
= 0;
2486 pfxdata
= cqr
->data
;
2487 if (ccw
->cmd_code
== DASD_ECKD_CCW_PFX
) {
2488 pfxdata
->validity
.verify_base
= 0;
2489 pfxdata
->validity
.hyper_pav
= 0;
2494 #define DASD_ECKD_CHANQ_MAX_SIZE 4
2496 static struct dasd_ccw_req
*dasd_eckd_build_alias_cp(struct dasd_device
*base
,
2497 struct dasd_block
*block
,
2498 struct request
*req
)
2500 struct dasd_eckd_private
*private;
2501 struct dasd_device
*startdev
;
2502 unsigned long flags
;
2503 struct dasd_ccw_req
*cqr
;
2505 startdev
= dasd_alias_get_start_dev(base
);
2508 private = (struct dasd_eckd_private
*) startdev
->private;
2509 if (private->count
>= DASD_ECKD_CHANQ_MAX_SIZE
)
2510 return ERR_PTR(-EBUSY
);
2512 spin_lock_irqsave(get_ccwdev_lock(startdev
->cdev
), flags
);
2514 cqr
= dasd_eckd_build_cp(startdev
, block
, req
);
2517 spin_unlock_irqrestore(get_ccwdev_lock(startdev
->cdev
), flags
);
2521 static int dasd_eckd_free_alias_cp(struct dasd_ccw_req
*cqr
,
2522 struct request
*req
)
2524 struct dasd_eckd_private
*private;
2525 unsigned long flags
;
2527 spin_lock_irqsave(get_ccwdev_lock(cqr
->memdev
->cdev
), flags
);
2528 private = (struct dasd_eckd_private
*) cqr
->memdev
->private;
2530 spin_unlock_irqrestore(get_ccwdev_lock(cqr
->memdev
->cdev
), flags
);
2531 return dasd_eckd_free_cp(cqr
, req
);
2535 dasd_eckd_fill_info(struct dasd_device
* device
,
2536 struct dasd_information2_t
* info
)
2538 struct dasd_eckd_private
*private;
2540 private = (struct dasd_eckd_private
*) device
->private;
2541 info
->label_block
= 2;
2542 info
->FBA_layout
= private->uses_cdl
? 0 : 1;
2543 info
->format
= private->uses_cdl
? DASD_FORMAT_CDL
: DASD_FORMAT_LDL
;
2544 info
->characteristics_size
= sizeof(struct dasd_eckd_characteristics
);
2545 memcpy(info
->characteristics
, &private->rdc_data
,
2546 sizeof(struct dasd_eckd_characteristics
));
2547 info
->confdata_size
= min((unsigned long)private->conf_len
,
2548 sizeof(info
->configuration_data
));
2549 memcpy(info
->configuration_data
, private->conf_data
,
2550 info
->confdata_size
);
2555 * SECTION: ioctl functions for eckd devices.
2559 * Release device ioctl.
2560 * Buils a channel programm to releases a prior reserved
2561 * (see dasd_eckd_reserve) device.
2564 dasd_eckd_release(struct dasd_device
*device
)
2566 struct dasd_ccw_req
*cqr
;
2570 if (!capable(CAP_SYS_ADMIN
))
2573 cqr
= dasd_smalloc_request(dasd_eckd_discipline
.name
,
2576 DBF_DEV_EVENT(DBF_WARNING
, device
, "%s",
2577 "Could not allocate initialization request");
2578 return PTR_ERR(cqr
);
2581 ccw
->cmd_code
= DASD_ECKD_CCW_RELEASE
;
2582 ccw
->flags
|= CCW_FLAG_SLI
;
2584 ccw
->cda
= (__u32
)(addr_t
) cqr
->data
;
2585 cqr
->startdev
= device
;
2586 cqr
->memdev
= device
;
2587 clear_bit(DASD_CQR_FLAGS_USE_ERP
, &cqr
->flags
);
2588 set_bit(DASD_CQR_FLAGS_FAILFAST
, &cqr
->flags
);
2589 cqr
->retries
= 2; /* set retry counter to enable basic ERP */
2590 cqr
->expires
= 2 * HZ
;
2591 cqr
->buildclk
= get_clock();
2592 cqr
->status
= DASD_CQR_FILLED
;
2594 rc
= dasd_sleep_on_immediatly(cqr
);
2596 dasd_sfree_request(cqr
, cqr
->memdev
);
2601 * Reserve device ioctl.
2602 * Options are set to 'synchronous wait for interrupt' and
2603 * 'timeout the request'. This leads to a terminate IO if
2604 * the interrupt is outstanding for a certain time.
2607 dasd_eckd_reserve(struct dasd_device
*device
)
2609 struct dasd_ccw_req
*cqr
;
2613 if (!capable(CAP_SYS_ADMIN
))
2616 cqr
= dasd_smalloc_request(dasd_eckd_discipline
.name
,
2619 DBF_DEV_EVENT(DBF_WARNING
, device
, "%s",
2620 "Could not allocate initialization request");
2621 return PTR_ERR(cqr
);
2624 ccw
->cmd_code
= DASD_ECKD_CCW_RESERVE
;
2625 ccw
->flags
|= CCW_FLAG_SLI
;
2627 ccw
->cda
= (__u32
)(addr_t
) cqr
->data
;
2628 cqr
->startdev
= device
;
2629 cqr
->memdev
= device
;
2630 clear_bit(DASD_CQR_FLAGS_USE_ERP
, &cqr
->flags
);
2631 set_bit(DASD_CQR_FLAGS_FAILFAST
, &cqr
->flags
);
2632 cqr
->retries
= 2; /* set retry counter to enable basic ERP */
2633 cqr
->expires
= 2 * HZ
;
2634 cqr
->buildclk
= get_clock();
2635 cqr
->status
= DASD_CQR_FILLED
;
2637 rc
= dasd_sleep_on_immediatly(cqr
);
2639 dasd_sfree_request(cqr
, cqr
->memdev
);
2644 * Steal lock ioctl - unconditional reserve device.
2645 * Buils a channel programm to break a device's reservation.
2646 * (unconditional reserve)
2649 dasd_eckd_steal_lock(struct dasd_device
*device
)
2651 struct dasd_ccw_req
*cqr
;
2655 if (!capable(CAP_SYS_ADMIN
))
2658 cqr
= dasd_smalloc_request(dasd_eckd_discipline
.name
,
2661 DBF_DEV_EVENT(DBF_WARNING
, device
, "%s",
2662 "Could not allocate initialization request");
2663 return PTR_ERR(cqr
);
2666 ccw
->cmd_code
= DASD_ECKD_CCW_SLCK
;
2667 ccw
->flags
|= CCW_FLAG_SLI
;
2669 ccw
->cda
= (__u32
)(addr_t
) cqr
->data
;
2670 cqr
->startdev
= device
;
2671 cqr
->memdev
= device
;
2672 clear_bit(DASD_CQR_FLAGS_USE_ERP
, &cqr
->flags
);
2673 set_bit(DASD_CQR_FLAGS_FAILFAST
, &cqr
->flags
);
2674 cqr
->retries
= 2; /* set retry counter to enable basic ERP */
2675 cqr
->expires
= 2 * HZ
;
2676 cqr
->buildclk
= get_clock();
2677 cqr
->status
= DASD_CQR_FILLED
;
2679 rc
= dasd_sleep_on_immediatly(cqr
);
2681 dasd_sfree_request(cqr
, cqr
->memdev
);
2686 * Read performance statistics
2689 dasd_eckd_performance(struct dasd_device
*device
, void __user
*argp
)
2691 struct dasd_psf_prssd_data
*prssdp
;
2692 struct dasd_rssd_perf_stats_t
*stats
;
2693 struct dasd_ccw_req
*cqr
;
2697 cqr
= dasd_smalloc_request(dasd_eckd_discipline
.name
,
2698 1 /* PSF */ + 1 /* RSSD */ ,
2699 (sizeof(struct dasd_psf_prssd_data
) +
2700 sizeof(struct dasd_rssd_perf_stats_t
)),
2703 DBF_DEV_EVENT(DBF_WARNING
, device
, "%s",
2704 "Could not allocate initialization request");
2705 return PTR_ERR(cqr
);
2707 cqr
->startdev
= device
;
2708 cqr
->memdev
= device
;
2710 cqr
->expires
= 10 * HZ
;
2712 /* Prepare for Read Subsystem Data */
2713 prssdp
= (struct dasd_psf_prssd_data
*) cqr
->data
;
2714 memset(prssdp
, 0, sizeof(struct dasd_psf_prssd_data
));
2715 prssdp
->order
= PSF_ORDER_PRSSD
;
2716 prssdp
->suborder
= 0x01; /* Performance Statistics */
2717 prssdp
->varies
[1] = 0x01; /* Perf Statistics for the Subsystem */
2720 ccw
->cmd_code
= DASD_ECKD_CCW_PSF
;
2721 ccw
->count
= sizeof(struct dasd_psf_prssd_data
);
2722 ccw
->flags
|= CCW_FLAG_CC
;
2723 ccw
->cda
= (__u32
)(addr_t
) prssdp
;
2725 /* Read Subsystem Data - Performance Statistics */
2726 stats
= (struct dasd_rssd_perf_stats_t
*) (prssdp
+ 1);
2727 memset(stats
, 0, sizeof(struct dasd_rssd_perf_stats_t
));
2730 ccw
->cmd_code
= DASD_ECKD_CCW_RSSD
;
2731 ccw
->count
= sizeof(struct dasd_rssd_perf_stats_t
);
2732 ccw
->cda
= (__u32
)(addr_t
) stats
;
2734 cqr
->buildclk
= get_clock();
2735 cqr
->status
= DASD_CQR_FILLED
;
2736 rc
= dasd_sleep_on(cqr
);
2738 prssdp
= (struct dasd_psf_prssd_data
*) cqr
->data
;
2739 stats
= (struct dasd_rssd_perf_stats_t
*) (prssdp
+ 1);
2740 if (copy_to_user(argp
, stats
,
2741 sizeof(struct dasd_rssd_perf_stats_t
)))
2744 dasd_sfree_request(cqr
, cqr
->memdev
);
2749 * Get attributes (cache operations)
2750 * Returnes the cache attributes used in Define Extend (DE).
2753 dasd_eckd_get_attrib(struct dasd_device
*device
, void __user
*argp
)
2755 struct dasd_eckd_private
*private =
2756 (struct dasd_eckd_private
*)device
->private;
2757 struct attrib_data_t attrib
= private->attrib
;
2760 if (!capable(CAP_SYS_ADMIN
))
2766 if (copy_to_user(argp
, (long *) &attrib
,
2767 sizeof(struct attrib_data_t
)))
2774 * Set attributes (cache operations)
2775 * Stores the attributes for cache operation to be used in Define Extend (DE).
2778 dasd_eckd_set_attrib(struct dasd_device
*device
, void __user
*argp
)
2780 struct dasd_eckd_private
*private =
2781 (struct dasd_eckd_private
*)device
->private;
2782 struct attrib_data_t attrib
;
2784 if (!capable(CAP_SYS_ADMIN
))
2789 if (copy_from_user(&attrib
, argp
, sizeof(struct attrib_data_t
)))
2791 private->attrib
= attrib
;
2793 dev_info(&device
->cdev
->dev
,
2794 "The DASD cache mode was set to %x (%i cylinder prestage)\n",
2795 private->attrib
.operation
, private->attrib
.nr_cyl
);
2800 * Issue syscall I/O to EMC Symmetrix array.
2801 * CCWs are PSF and RSSD
2803 static int dasd_symm_io(struct dasd_device
*device
, void __user
*argp
)
2805 struct dasd_symmio_parms usrparm
;
2806 char *psf_data
, *rssd_result
;
2807 struct dasd_ccw_req
*cqr
;
2811 /* Copy parms from caller */
2813 if (copy_from_user(&usrparm
, argp
, sizeof(usrparm
)))
2815 #ifndef CONFIG_64BIT
2816 /* Make sure pointers are sane even on 31 bit. */
2817 if ((usrparm
.psf_data
>> 32) != 0 || (usrparm
.rssd_result
>> 32) != 0) {
2822 /* alloc I/O data area */
2823 psf_data
= kzalloc(usrparm
.psf_data_len
, GFP_KERNEL
| GFP_DMA
);
2824 rssd_result
= kzalloc(usrparm
.rssd_result_len
, GFP_KERNEL
| GFP_DMA
);
2825 if (!psf_data
|| !rssd_result
) {
2830 /* get syscall header from user space */
2832 if (copy_from_user(psf_data
,
2833 (void __user
*)(unsigned long) usrparm
.psf_data
,
2834 usrparm
.psf_data_len
))
2837 /* sanity check on syscall header */
2838 if (psf_data
[0] != 0x17 && psf_data
[1] != 0xce) {
2843 /* setup CCWs for PSF + RSSD */
2844 cqr
= dasd_smalloc_request("ECKD", 2 , 0, device
);
2846 DBF_DEV_EVENT(DBF_WARNING
, device
, "%s",
2847 "Could not allocate initialization request");
2852 cqr
->startdev
= device
;
2853 cqr
->memdev
= device
;
2855 cqr
->expires
= 10 * HZ
;
2856 cqr
->buildclk
= get_clock();
2857 cqr
->status
= DASD_CQR_FILLED
;
2859 /* Build the ccws */
2863 ccw
->cmd_code
= DASD_ECKD_CCW_PSF
;
2864 ccw
->count
= usrparm
.psf_data_len
;
2865 ccw
->flags
|= CCW_FLAG_CC
;
2866 ccw
->cda
= (__u32
)(addr_t
) psf_data
;
2871 ccw
->cmd_code
= DASD_ECKD_CCW_RSSD
;
2872 ccw
->count
= usrparm
.rssd_result_len
;
2873 ccw
->flags
= CCW_FLAG_SLI
;
2874 ccw
->cda
= (__u32
)(addr_t
) rssd_result
;
2876 rc
= dasd_sleep_on(cqr
);
2881 if (copy_to_user((void __user
*)(unsigned long) usrparm
.rssd_result
,
2882 rssd_result
, usrparm
.rssd_result_len
))
2887 dasd_sfree_request(cqr
, cqr
->memdev
);
2892 DBF_DEV_EVENT(DBF_WARNING
, device
, "Symmetrix ioctl: rc=%d", rc
);
2897 dasd_eckd_ioctl(struct dasd_block
*block
, unsigned int cmd
, void __user
*argp
)
2899 struct dasd_device
*device
= block
->base
;
2903 return dasd_eckd_get_attrib(device
, argp
);
2905 return dasd_eckd_set_attrib(device
, argp
);
2907 return dasd_eckd_performance(device
, argp
);
2909 return dasd_eckd_release(device
);
2911 return dasd_eckd_reserve(device
);
2913 return dasd_eckd_steal_lock(device
);
2915 return dasd_symm_io(device
, argp
);
2917 return -ENOIOCTLCMD
;
2922 * Dump the range of CCWs into 'page' buffer
2923 * and return number of printed chars.
2926 dasd_eckd_dump_ccw_range(struct ccw1
*from
, struct ccw1
*to
, char *page
)
2932 while (from
<= to
) {
2933 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
2934 " CCW %p: %08X %08X DAT:",
2935 from
, ((int *) from
)[0], ((int *) from
)[1]);
2937 /* get pointer to data (consider IDALs) */
2938 if (from
->flags
& CCW_FLAG_IDA
)
2939 datap
= (char *) *((addr_t
*) (addr_t
) from
->cda
);
2941 datap
= (char *) ((addr_t
) from
->cda
);
2943 /* dump data (max 32 bytes) */
2944 for (count
= 0; count
< from
->count
&& count
< 32; count
++) {
2945 if (count
% 8 == 0) len
+= sprintf(page
+ len
, " ");
2946 if (count
% 4 == 0) len
+= sprintf(page
+ len
, " ");
2947 len
+= sprintf(page
+ len
, "%02x", datap
[count
]);
2949 len
+= sprintf(page
+ len
, "\n");
2956 dasd_eckd_dump_sense_dbf(struct dasd_device
*device
, struct dasd_ccw_req
*req
,
2957 struct irb
*irb
, char *reason
)
2965 if (req
&& scsw_is_tm(&req
->irb
.scsw
)) {
2966 if (irb
->scsw
.tm
.tcw
)
2968 (struct tcw
*)(unsigned long)irb
->scsw
.tm
.tcw
);
2969 if (tsb
&& (irb
->scsw
.tm
.fcxs
== 0x01)) {
2970 switch (tsb
->flags
& 0x07) {
2971 case 1: /* tsa_iostat */
2972 sense
= (u64
*)tsb
->tsa
.iostat
.sense
;
2974 case 2: /* ts_ddpc */
2975 sense
= (u64
*)tsb
->tsa
.ddpc
.sense
;
2977 case 3: /* tsa_intrg */
2982 if (irb
->esw
.esw0
.erw
.cons
)
2983 sense
= (u64
*)irb
->ecw
;
2986 for (sl
= 0; sl
< 4; sl
++) {
2987 DBF_DEV_EVENT(DBF_EMERG
, device
,
2988 "%s: %016llx %016llx %016llx %016llx",
2989 reason
, sense
[0], sense
[1], sense
[2],
2993 DBF_DEV_EVENT(DBF_EMERG
, device
, "%s",
2994 "SORRY - NO VALID SENSE AVAILABLE\n");
2999 * Print sense data and related channel program.
3000 * Parts are printed because printk buffer is only 1024 bytes.
3002 static void dasd_eckd_dump_sense_ccw(struct dasd_device
*device
,
3003 struct dasd_ccw_req
*req
, struct irb
*irb
)
3006 struct ccw1
*first
, *last
, *fail
, *from
, *to
;
3009 page
= (char *) get_zeroed_page(GFP_ATOMIC
);
3011 DBF_DEV_EVENT(DBF_WARNING
, device
, "%s",
3012 "No memory to dump sense data\n");
3015 /* dump the sense data */
3016 len
= sprintf(page
, KERN_ERR PRINTK_HEADER
3017 " I/O status report for device %s:\n",
3018 dev_name(&device
->cdev
->dev
));
3019 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3020 " in req: %p CS: 0x%02X DS: 0x%02X CC: 0x%02X RC: %d\n",
3021 req
, scsw_cstat(&irb
->scsw
), scsw_dstat(&irb
->scsw
),
3022 scsw_cc(&irb
->scsw
), req
->intrc
);
3023 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3024 " device %s: Failing CCW: %p\n",
3025 dev_name(&device
->cdev
->dev
),
3026 (void *) (addr_t
) irb
->scsw
.cmd
.cpa
);
3027 if (irb
->esw
.esw0
.erw
.cons
) {
3028 for (sl
= 0; sl
< 4; sl
++) {
3029 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3030 " Sense(hex) %2d-%2d:",
3031 (8 * sl
), ((8 * sl
) + 7));
3033 for (sct
= 0; sct
< 8; sct
++) {
3034 len
+= sprintf(page
+ len
, " %02x",
3035 irb
->ecw
[8 * sl
+ sct
]);
3037 len
+= sprintf(page
+ len
, "\n");
3040 if (irb
->ecw
[27] & DASD_SENSE_BIT_0
) {
3041 /* 24 Byte Sense Data */
3042 sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3043 " 24 Byte: %x MSG %x, "
3044 "%s MSGb to SYSOP\n",
3045 irb
->ecw
[7] >> 4, irb
->ecw
[7] & 0x0f,
3046 irb
->ecw
[1] & 0x10 ? "" : "no");
3048 /* 32 Byte Sense Data */
3049 sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3050 " 32 Byte: Format: %x "
3051 "Exception class %x\n",
3052 irb
->ecw
[6] & 0x0f, irb
->ecw
[22] >> 4);
3055 sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3056 " SORRY - NO VALID SENSE AVAILABLE\n");
3061 /* req == NULL for unsolicited interrupts */
3062 /* dump the Channel Program (max 140 Bytes per line) */
3063 /* Count CCW and print first CCWs (maximum 1024 % 140 = 7) */
3064 first
= req
->cpaddr
;
3065 for (last
= first
; last
->flags
& (CCW_FLAG_CC
| CCW_FLAG_DC
); last
++);
3066 to
= min(first
+ 6, last
);
3067 len
= sprintf(page
, KERN_ERR PRINTK_HEADER
3068 " Related CP in req: %p\n", req
);
3069 dasd_eckd_dump_ccw_range(first
, to
, page
+ len
);
3072 /* print failing CCW area (maximum 4) */
3073 /* scsw->cda is either valid or zero */
3076 fail
= (struct ccw1
*)(addr_t
)
3077 irb
->scsw
.cmd
.cpa
; /* failing CCW */
3078 if (from
< fail
- 2) {
3079 from
= fail
- 2; /* there is a gap - print header */
3080 len
+= sprintf(page
, KERN_ERR PRINTK_HEADER
"......\n");
3082 to
= min(fail
+ 1, last
);
3083 len
+= dasd_eckd_dump_ccw_range(from
, to
, page
+ len
);
3085 /* print last CCWs (maximum 2) */
3086 from
= max(from
, ++to
);
3087 if (from
< last
- 1) {
3088 from
= last
- 1; /* there is a gap - print header */
3089 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
"......\n");
3091 len
+= dasd_eckd_dump_ccw_range(from
, last
, page
+ len
);
3095 free_page((unsigned long) page
);
3100 * Print sense data from a tcw.
3102 static void dasd_eckd_dump_sense_tcw(struct dasd_device
*device
,
3103 struct dasd_ccw_req
*req
, struct irb
*irb
)
3106 int len
, sl
, sct
, residual
;
3112 page
= (char *) get_zeroed_page(GFP_ATOMIC
);
3114 DBF_DEV_EVENT(DBF_WARNING
, device
, " %s",
3115 "No memory to dump sense data");
3118 /* dump the sense data */
3119 len
= sprintf(page
, KERN_ERR PRINTK_HEADER
3120 " I/O status report for device %s:\n",
3121 dev_name(&device
->cdev
->dev
));
3122 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3123 " in req: %p CS: 0x%02X DS: 0x%02X CC: 0x%02X RC: %d "
3124 "fcxs: 0x%02X schxs: 0x%02X\n", req
,
3125 scsw_cstat(&irb
->scsw
), scsw_dstat(&irb
->scsw
),
3126 scsw_cc(&irb
->scsw
), req
->intrc
,
3127 irb
->scsw
.tm
.fcxs
, irb
->scsw
.tm
.schxs
);
3128 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3129 " device %s: Failing TCW: %p\n",
3130 dev_name(&device
->cdev
->dev
),
3131 (void *) (addr_t
) irb
->scsw
.tm
.tcw
);
3135 if (irb
->scsw
.tm
.tcw
)
3137 (struct tcw
*)(unsigned long)irb
->scsw
.tm
.tcw
);
3139 if (tsb
&& (irb
->scsw
.tm
.fcxs
== 0x01)) {
3140 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3141 " tsb->length %d\n", tsb
->length
);
3142 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3143 " tsb->flags %x\n", tsb
->flags
);
3144 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3145 " tsb->dcw_offset %d\n", tsb
->dcw_offset
);
3146 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3147 " tsb->count %d\n", tsb
->count
);
3148 residual
= tsb
->count
- 28;
3149 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3150 " residual %d\n", residual
);
3152 switch (tsb
->flags
& 0x07) {
3153 case 1: /* tsa_iostat */
3154 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3155 " tsb->tsa.iostat.dev_time %d\n",
3156 tsb
->tsa
.iostat
.dev_time
);
3157 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3158 " tsb->tsa.iostat.def_time %d\n",
3159 tsb
->tsa
.iostat
.def_time
);
3160 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3161 " tsb->tsa.iostat.queue_time %d\n",
3162 tsb
->tsa
.iostat
.queue_time
);
3163 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3164 " tsb->tsa.iostat.dev_busy_time %d\n",
3165 tsb
->tsa
.iostat
.dev_busy_time
);
3166 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3167 " tsb->tsa.iostat.dev_act_time %d\n",
3168 tsb
->tsa
.iostat
.dev_act_time
);
3169 sense
= tsb
->tsa
.iostat
.sense
;
3171 case 2: /* ts_ddpc */
3172 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3173 " tsb->tsa.ddpc.rc %d\n", tsb
->tsa
.ddpc
.rc
);
3174 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3175 " tsb->tsa.ddpc.rcq: ");
3176 for (sl
= 0; sl
< 16; sl
++) {
3177 for (sct
= 0; sct
< 8; sct
++) {
3178 len
+= sprintf(page
+ len
, " %02x",
3179 tsb
->tsa
.ddpc
.rcq
[sl
]);
3181 len
+= sprintf(page
+ len
, "\n");
3183 sense
= tsb
->tsa
.ddpc
.sense
;
3185 case 3: /* tsa_intrg */
3186 len
+= sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3187 " tsb->tsa.intrg.: not supportet yet \n");
3192 for (sl
= 0; sl
< 4; sl
++) {
3193 len
+= sprintf(page
+ len
,
3194 KERN_ERR PRINTK_HEADER
3195 " Sense(hex) %2d-%2d:",
3196 (8 * sl
), ((8 * sl
) + 7));
3197 for (sct
= 0; sct
< 8; sct
++) {
3198 len
+= sprintf(page
+ len
, " %02x",
3199 sense
[8 * sl
+ sct
]);
3201 len
+= sprintf(page
+ len
, "\n");
3204 if (sense
[27] & DASD_SENSE_BIT_0
) {
3205 /* 24 Byte Sense Data */
3206 sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3207 " 24 Byte: %x MSG %x, "
3208 "%s MSGb to SYSOP\n",
3209 sense
[7] >> 4, sense
[7] & 0x0f,
3210 sense
[1] & 0x10 ? "" : "no");
3212 /* 32 Byte Sense Data */
3213 sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3214 " 32 Byte: Format: %x "
3215 "Exception class %x\n",
3216 sense
[6] & 0x0f, sense
[22] >> 4);
3219 sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3220 " SORRY - NO VALID SENSE AVAILABLE\n");
3223 sprintf(page
+ len
, KERN_ERR PRINTK_HEADER
3224 " SORRY - NO TSB DATA AVAILABLE\n");
3227 free_page((unsigned long) page
);
3230 static void dasd_eckd_dump_sense(struct dasd_device
*device
,
3231 struct dasd_ccw_req
*req
, struct irb
*irb
)
3233 if (req
&& scsw_is_tm(&req
->irb
.scsw
))
3234 dasd_eckd_dump_sense_tcw(device
, req
, irb
);
3236 dasd_eckd_dump_sense_ccw(device
, req
, irb
);
3241 * max_blocks is dependent on the amount of storage that is available
3242 * in the static io buffer for each device. Currently each device has
3243 * 8192 bytes (=2 pages). For 64 bit one dasd_mchunkt_t structure has
3244 * 24 bytes, the struct dasd_ccw_req has 136 bytes and each block can use
3245 * up to 16 bytes (8 for the ccw and 8 for the idal pointer). In
3246 * addition we have one define extent ccw + 16 bytes of data and one
3247 * locate record ccw + 16 bytes of data. That makes:
3248 * (8192 - 24 - 136 - 8 - 16 - 8 - 16) / 16 = 499 blocks at maximum.
3249 * We want to fit two into the available memory so that we can immediately
3250 * start the next request if one finishes off. That makes 249.5 blocks
3251 * for one request. Give a little safety and the result is 240.
3253 static struct dasd_discipline dasd_eckd_discipline
= {
3254 .owner
= THIS_MODULE
,
3258 .check_device
= dasd_eckd_check_characteristics
,
3259 .uncheck_device
= dasd_eckd_uncheck_device
,
3260 .do_analysis
= dasd_eckd_do_analysis
,
3261 .ready_to_online
= dasd_eckd_ready_to_online
,
3262 .online_to_ready
= dasd_eckd_online_to_ready
,
3263 .fill_geometry
= dasd_eckd_fill_geometry
,
3264 .start_IO
= dasd_start_IO
,
3265 .term_IO
= dasd_term_IO
,
3266 .handle_terminated_request
= dasd_eckd_handle_terminated_request
,
3267 .format_device
= dasd_eckd_format_device
,
3268 .erp_action
= dasd_eckd_erp_action
,
3269 .erp_postaction
= dasd_eckd_erp_postaction
,
3270 .handle_unsolicited_interrupt
= dasd_eckd_handle_unsolicited_interrupt
,
3271 .build_cp
= dasd_eckd_build_alias_cp
,
3272 .free_cp
= dasd_eckd_free_alias_cp
,
3273 .dump_sense
= dasd_eckd_dump_sense
,
3274 .dump_sense_dbf
= dasd_eckd_dump_sense_dbf
,
3275 .fill_info
= dasd_eckd_fill_info
,
3276 .ioctl
= dasd_eckd_ioctl
,
3280 dasd_eckd_init(void)
3284 ASCEBC(dasd_eckd_discipline
.ebcname
, 4);
3285 ret
= ccw_driver_register(&dasd_eckd_driver
);
3287 wait_for_device_probe();
3293 dasd_eckd_cleanup(void)
3295 ccw_driver_unregister(&dasd_eckd_driver
);
3298 module_init(dasd_eckd_init
);
3299 module_exit(dasd_eckd_cleanup
);