Loading...
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * Author(s)......: Holger Smolinski <Holger.Smolinski@de.ibm.com>
4 * Horst Hummel <Horst.Hummel@de.ibm.com>
5 * Carsten Otte <Cotte@de.ibm.com>
6 * Martin Schwidefsky <schwidefsky@de.ibm.com>
7 * Bugreports.to..: <Linux390@de.ibm.com>
8 * Copyright IBM Corp. 1999, 2001
9 *
10 * i/o controls for the dasd driver.
11 */
12
13#define KMSG_COMPONENT "dasd"
14
15#include <linux/interrupt.h>
16#include <linux/compat.h>
17#include <linux/major.h>
18#include <linux/fs.h>
19#include <linux/blkpg.h>
20#include <linux/slab.h>
21#include <asm/ccwdev.h>
22#include <asm/schid.h>
23#include <asm/cmb.h>
24#include <linux/uaccess.h>
25#include <linux/dasd_mod.h>
26
27/* This is ugly... */
28#define PRINTK_HEADER "dasd_ioctl:"
29
30#include "dasd_int.h"
31
32
33static int
34dasd_ioctl_api_version(void __user *argp)
35{
36 int ver = DASD_API_VERSION;
37 return put_user(ver, (int __user *)argp);
38}
39
40/*
41 * Enable device.
42 * used by dasdfmt after BIODASDDISABLE to retrigger blocksize detection
43 */
44static int
45dasd_ioctl_enable(struct block_device *bdev)
46{
47 struct dasd_device *base;
48
49 if (!capable(CAP_SYS_ADMIN))
50 return -EACCES;
51
52 base = dasd_device_from_gendisk(bdev->bd_disk);
53 if (!base)
54 return -ENODEV;
55
56 dasd_enable_device(base);
57 dasd_put_device(base);
58 return 0;
59}
60
61/*
62 * Disable device.
63 * Used by dasdfmt. Disable I/O operations but allow ioctls.
64 */
65static int
66dasd_ioctl_disable(struct block_device *bdev)
67{
68 struct dasd_device *base;
69
70 if (!capable(CAP_SYS_ADMIN))
71 return -EACCES;
72
73 base = dasd_device_from_gendisk(bdev->bd_disk);
74 if (!base)
75 return -ENODEV;
76 /*
77 * Man this is sick. We don't do a real disable but only downgrade
78 * the device to DASD_STATE_BASIC. The reason is that dasdfmt uses
79 * BIODASDDISABLE to disable accesses to the device via the block
80 * device layer but it still wants to do i/o on the device by
81 * using the BIODASDFMT ioctl. Therefore the correct state for the
82 * device is DASD_STATE_BASIC that allows to do basic i/o.
83 */
84 dasd_set_target_state(base, DASD_STATE_BASIC);
85 /*
86 * Set i_size to zero, since read, write, etc. check against this
87 * value.
88 */
89 set_capacity(bdev->bd_disk, 0);
90 dasd_put_device(base);
91 return 0;
92}
93
94/*
95 * Quiesce device.
96 */
97static int dasd_ioctl_quiesce(struct dasd_block *block)
98{
99 unsigned long flags;
100 struct dasd_device *base;
101
102 base = block->base;
103 if (!capable (CAP_SYS_ADMIN))
104 return -EACCES;
105
106 pr_info("%s: The DASD has been put in the quiesce "
107 "state\n", dev_name(&base->cdev->dev));
108 spin_lock_irqsave(get_ccwdev_lock(base->cdev), flags);
109 dasd_device_set_stop_bits(base, DASD_STOPPED_QUIESCE);
110 spin_unlock_irqrestore(get_ccwdev_lock(base->cdev), flags);
111 return 0;
112}
113
114
115/*
116 * Resume device.
117 */
118static int dasd_ioctl_resume(struct dasd_block *block)
119{
120 unsigned long flags;
121 struct dasd_device *base;
122
123 base = block->base;
124 if (!capable (CAP_SYS_ADMIN))
125 return -EACCES;
126
127 pr_info("%s: I/O operations have been resumed "
128 "on the DASD\n", dev_name(&base->cdev->dev));
129 spin_lock_irqsave(get_ccwdev_lock(base->cdev), flags);
130 dasd_device_remove_stop_bits(base, DASD_STOPPED_QUIESCE);
131 spin_unlock_irqrestore(get_ccwdev_lock(base->cdev), flags);
132
133 dasd_schedule_block_bh(block);
134 dasd_schedule_device_bh(base);
135 return 0;
136}
137
138/*
139 * Abort all failfast I/O on a device.
140 */
141static int dasd_ioctl_abortio(struct dasd_block *block)
142{
143 unsigned long flags;
144 struct dasd_device *base;
145 struct dasd_ccw_req *cqr, *n;
146
147 base = block->base;
148 if (!capable(CAP_SYS_ADMIN))
149 return -EACCES;
150
151 if (test_and_set_bit(DASD_FLAG_ABORTALL, &base->flags))
152 return 0;
153 DBF_DEV_EVENT(DBF_NOTICE, base, "%s", "abortall flag set");
154
155 spin_lock_irqsave(&block->request_queue_lock, flags);
156 spin_lock(&block->queue_lock);
157 list_for_each_entry_safe(cqr, n, &block->ccw_queue, blocklist) {
158 if (test_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags) &&
159 cqr->callback_data &&
160 cqr->callback_data != DASD_SLEEPON_START_TAG &&
161 cqr->callback_data != DASD_SLEEPON_END_TAG) {
162 spin_unlock(&block->queue_lock);
163 blk_abort_request(cqr->callback_data);
164 spin_lock(&block->queue_lock);
165 }
166 }
167 spin_unlock(&block->queue_lock);
168 spin_unlock_irqrestore(&block->request_queue_lock, flags);
169
170 dasd_schedule_block_bh(block);
171 return 0;
172}
173
174/*
175 * Allow I/O on a device
176 */
177static int dasd_ioctl_allowio(struct dasd_block *block)
178{
179 struct dasd_device *base;
180
181 base = block->base;
182 if (!capable(CAP_SYS_ADMIN))
183 return -EACCES;
184
185 if (test_and_clear_bit(DASD_FLAG_ABORTALL, &base->flags))
186 DBF_DEV_EVENT(DBF_NOTICE, base, "%s", "abortall flag unset");
187
188 return 0;
189}
190
191/*
192 * performs formatting of _device_ according to _fdata_
193 * Note: The discipline's format_function is assumed to deliver formatting
194 * commands to format multiple units of the device. In terms of the ECKD
195 * devices this means CCWs are generated to format multiple tracks.
196 */
197static int
198dasd_format(struct dasd_block *block, struct format_data_t *fdata)
199{
200 struct dasd_device *base;
201 int rc;
202
203 base = block->base;
204 if (base->discipline->format_device == NULL)
205 return -EPERM;
206
207 if (base->state != DASD_STATE_BASIC) {
208 pr_warn("%s: The DASD cannot be formatted while it is enabled\n",
209 dev_name(&base->cdev->dev));
210 return -EBUSY;
211 }
212
213 DBF_DEV_EVENT(DBF_NOTICE, base,
214 "formatting units %u to %u (%u B blocks) flags %u",
215 fdata->start_unit,
216 fdata->stop_unit, fdata->blksize, fdata->intensity);
217
218 /* Since dasdfmt keeps the device open after it was disabled,
219 * there still exists an inode for this device.
220 * We must update i_blkbits, otherwise we might get errors when
221 * enabling the device later.
222 */
223 if (fdata->start_unit == 0) {
224 block->gdp->part0->bd_inode->i_blkbits =
225 blksize_bits(fdata->blksize);
226 }
227
228 rc = base->discipline->format_device(base, fdata, 1);
229 if (rc == -EAGAIN)
230 rc = base->discipline->format_device(base, fdata, 0);
231
232 return rc;
233}
234
235static int dasd_check_format(struct dasd_block *block,
236 struct format_check_t *cdata)
237{
238 struct dasd_device *base;
239 int rc;
240
241 base = block->base;
242 if (!base->discipline->check_device_format)
243 return -ENOTTY;
244
245 rc = base->discipline->check_device_format(base, cdata, 1);
246 if (rc == -EAGAIN)
247 rc = base->discipline->check_device_format(base, cdata, 0);
248
249 return rc;
250}
251
252/*
253 * Format device.
254 */
255static int
256dasd_ioctl_format(struct block_device *bdev, void __user *argp)
257{
258 struct dasd_device *base;
259 struct format_data_t fdata;
260 int rc;
261
262 if (!capable(CAP_SYS_ADMIN))
263 return -EACCES;
264 if (!argp)
265 return -EINVAL;
266 base = dasd_device_from_gendisk(bdev->bd_disk);
267 if (!base)
268 return -ENODEV;
269 if (base->features & DASD_FEATURE_READONLY ||
270 test_bit(DASD_FLAG_DEVICE_RO, &base->flags)) {
271 dasd_put_device(base);
272 return -EROFS;
273 }
274 if (copy_from_user(&fdata, argp, sizeof(struct format_data_t))) {
275 dasd_put_device(base);
276 return -EFAULT;
277 }
278 if (bdev_is_partition(bdev)) {
279 pr_warn("%s: The specified DASD is a partition and cannot be formatted\n",
280 dev_name(&base->cdev->dev));
281 dasd_put_device(base);
282 return -EINVAL;
283 }
284 rc = dasd_format(base->block, &fdata);
285 dasd_put_device(base);
286
287 return rc;
288}
289
290/*
291 * Check device format
292 */
293static int dasd_ioctl_check_format(struct block_device *bdev, void __user *argp)
294{
295 struct format_check_t cdata;
296 struct dasd_device *base;
297 int rc = 0;
298
299 if (!argp)
300 return -EINVAL;
301
302 base = dasd_device_from_gendisk(bdev->bd_disk);
303 if (!base)
304 return -ENODEV;
305 if (bdev_is_partition(bdev)) {
306 pr_warn("%s: The specified DASD is a partition and cannot be checked\n",
307 dev_name(&base->cdev->dev));
308 rc = -EINVAL;
309 goto out_err;
310 }
311
312 if (copy_from_user(&cdata, argp, sizeof(cdata))) {
313 rc = -EFAULT;
314 goto out_err;
315 }
316
317 rc = dasd_check_format(base->block, &cdata);
318 if (rc)
319 goto out_err;
320
321 if (copy_to_user(argp, &cdata, sizeof(cdata)))
322 rc = -EFAULT;
323
324out_err:
325 dasd_put_device(base);
326
327 return rc;
328}
329
330static int dasd_release_space(struct dasd_device *device,
331 struct format_data_t *rdata)
332{
333 if (!device->discipline->is_ese && !device->discipline->is_ese(device))
334 return -ENOTSUPP;
335 if (!device->discipline->release_space)
336 return -ENOTSUPP;
337
338 return device->discipline->release_space(device, rdata);
339}
340
341/*
342 * Release allocated space
343 */
344static int dasd_ioctl_release_space(struct block_device *bdev, void __user *argp)
345{
346 struct format_data_t rdata;
347 struct dasd_device *base;
348 int rc = 0;
349
350 if (!capable(CAP_SYS_ADMIN))
351 return -EACCES;
352 if (!argp)
353 return -EINVAL;
354
355 base = dasd_device_from_gendisk(bdev->bd_disk);
356 if (!base)
357 return -ENODEV;
358 if (base->features & DASD_FEATURE_READONLY ||
359 test_bit(DASD_FLAG_DEVICE_RO, &base->flags)) {
360 rc = -EROFS;
361 goto out_err;
362 }
363 if (bdev_is_partition(bdev)) {
364 pr_warn("%s: The specified DASD is a partition and tracks cannot be released\n",
365 dev_name(&base->cdev->dev));
366 rc = -EINVAL;
367 goto out_err;
368 }
369
370 if (copy_from_user(&rdata, argp, sizeof(rdata))) {
371 rc = -EFAULT;
372 goto out_err;
373 }
374
375 rc = dasd_release_space(base, &rdata);
376
377out_err:
378 dasd_put_device(base);
379
380 return rc;
381}
382
383/*
384 * Swap driver iternal copy relation.
385 */
386static int
387dasd_ioctl_copy_pair_swap(struct block_device *bdev, void __user *argp)
388{
389 struct dasd_copypair_swap_data_t data;
390 struct dasd_device *device;
391 int rc;
392
393 if (!capable(CAP_SYS_ADMIN))
394 return -EACCES;
395
396 device = dasd_device_from_gendisk(bdev->bd_disk);
397 if (!device)
398 return -ENODEV;
399
400 if (copy_from_user(&data, argp, sizeof(struct dasd_copypair_swap_data_t))) {
401 dasd_put_device(device);
402 return -EFAULT;
403 }
404 if (memchr_inv(data.reserved, 0, sizeof(data.reserved))) {
405 pr_warn("%s: Invalid swap data specified\n",
406 dev_name(&device->cdev->dev));
407 dasd_put_device(device);
408 return DASD_COPYPAIRSWAP_INVALID;
409 }
410 if (bdev_is_partition(bdev)) {
411 pr_warn("%s: The specified DASD is a partition and cannot be swapped\n",
412 dev_name(&device->cdev->dev));
413 dasd_put_device(device);
414 return DASD_COPYPAIRSWAP_INVALID;
415 }
416 if (!device->copy) {
417 pr_warn("%s: The specified DASD has no copy pair set up\n",
418 dev_name(&device->cdev->dev));
419 dasd_put_device(device);
420 return -ENODEV;
421 }
422 if (!device->discipline->copy_pair_swap) {
423 dasd_put_device(device);
424 return -EOPNOTSUPP;
425 }
426 rc = device->discipline->copy_pair_swap(device, data.primary,
427 data.secondary);
428 dasd_put_device(device);
429
430 return rc;
431}
432
433#ifdef CONFIG_DASD_PROFILE
434/*
435 * Reset device profile information
436 */
437static int dasd_ioctl_reset_profile(struct dasd_block *block)
438{
439 dasd_profile_reset(&block->profile);
440 return 0;
441}
442
443/*
444 * Return device profile information
445 */
446static int dasd_ioctl_read_profile(struct dasd_block *block, void __user *argp)
447{
448 struct dasd_profile_info_t *data;
449 int rc = 0;
450
451 data = kmalloc(sizeof(*data), GFP_KERNEL);
452 if (!data)
453 return -ENOMEM;
454
455 spin_lock_bh(&block->profile.lock);
456 if (block->profile.data) {
457 data->dasd_io_reqs = block->profile.data->dasd_io_reqs;
458 data->dasd_io_sects = block->profile.data->dasd_io_sects;
459 memcpy(data->dasd_io_secs, block->profile.data->dasd_io_secs,
460 sizeof(data->dasd_io_secs));
461 memcpy(data->dasd_io_times, block->profile.data->dasd_io_times,
462 sizeof(data->dasd_io_times));
463 memcpy(data->dasd_io_timps, block->profile.data->dasd_io_timps,
464 sizeof(data->dasd_io_timps));
465 memcpy(data->dasd_io_time1, block->profile.data->dasd_io_time1,
466 sizeof(data->dasd_io_time1));
467 memcpy(data->dasd_io_time2, block->profile.data->dasd_io_time2,
468 sizeof(data->dasd_io_time2));
469 memcpy(data->dasd_io_time2ps,
470 block->profile.data->dasd_io_time2ps,
471 sizeof(data->dasd_io_time2ps));
472 memcpy(data->dasd_io_time3, block->profile.data->dasd_io_time3,
473 sizeof(data->dasd_io_time3));
474 memcpy(data->dasd_io_nr_req,
475 block->profile.data->dasd_io_nr_req,
476 sizeof(data->dasd_io_nr_req));
477 spin_unlock_bh(&block->profile.lock);
478 } else {
479 spin_unlock_bh(&block->profile.lock);
480 rc = -EIO;
481 goto out;
482 }
483 if (copy_to_user(argp, data, sizeof(*data)))
484 rc = -EFAULT;
485out:
486 kfree(data);
487 return rc;
488}
489#else
490static int dasd_ioctl_reset_profile(struct dasd_block *block)
491{
492 return -ENOTTY;
493}
494
495static int dasd_ioctl_read_profile(struct dasd_block *block, void __user *argp)
496{
497 return -ENOTTY;
498}
499#endif
500
501/*
502 * Return dasd information. Used for BIODASDINFO and BIODASDINFO2.
503 */
504static int __dasd_ioctl_information(struct dasd_block *block,
505 struct dasd_information2_t *dasd_info)
506{
507 struct subchannel_id sch_id;
508 struct ccw_dev_id dev_id;
509 struct dasd_device *base;
510 struct ccw_device *cdev;
511 struct list_head *l;
512 unsigned long flags;
513 int rc;
514
515 base = block->base;
516 if (!base->discipline || !base->discipline->fill_info)
517 return -EINVAL;
518
519 rc = base->discipline->fill_info(base, dasd_info);
520 if (rc)
521 return rc;
522
523 cdev = base->cdev;
524 ccw_device_get_id(cdev, &dev_id);
525 ccw_device_get_schid(cdev, &sch_id);
526
527 dasd_info->devno = dev_id.devno;
528 dasd_info->schid = sch_id.sch_no;
529 dasd_info->cu_type = cdev->id.cu_type;
530 dasd_info->cu_model = cdev->id.cu_model;
531 dasd_info->dev_type = cdev->id.dev_type;
532 dasd_info->dev_model = cdev->id.dev_model;
533 dasd_info->status = base->state;
534 /*
535 * The open_count is increased for every opener, that includes
536 * the blkdev_get in dasd_scan_partitions.
537 * This must be hidden from user-space.
538 */
539 dasd_info->open_count = atomic_read(&block->open_count);
540 if (!block->bdev_handle)
541 dasd_info->open_count++;
542
543 /*
544 * check if device is really formatted
545 * LDL / CDL was returned by 'fill_info'
546 */
547 if ((base->state < DASD_STATE_READY) ||
548 (dasd_check_blocksize(block->bp_block)))
549 dasd_info->format = DASD_FORMAT_NONE;
550
551 dasd_info->features |=
552 ((base->features & DASD_FEATURE_READONLY) != 0);
553
554 memcpy(dasd_info->type, base->discipline->name, 4);
555
556 spin_lock_irqsave(get_ccwdev_lock(base->cdev), flags);
557 list_for_each(l, &base->ccw_queue)
558 dasd_info->chanq_len++;
559 spin_unlock_irqrestore(get_ccwdev_lock(base->cdev), flags);
560 return 0;
561}
562
563static int dasd_ioctl_information(struct dasd_block *block, void __user *argp,
564 size_t copy_size)
565{
566 struct dasd_information2_t *dasd_info;
567 int error;
568
569 dasd_info = kzalloc(sizeof(*dasd_info), GFP_KERNEL);
570 if (!dasd_info)
571 return -ENOMEM;
572
573 error = __dasd_ioctl_information(block, dasd_info);
574 if (!error && copy_to_user(argp, dasd_info, copy_size))
575 error = -EFAULT;
576 kfree(dasd_info);
577 return error;
578}
579
580/*
581 * Set read only
582 */
583int dasd_set_read_only(struct block_device *bdev, bool ro)
584{
585 struct dasd_device *base;
586 int rc;
587
588 /* do not manipulate hardware state for partitions */
589 if (bdev_is_partition(bdev))
590 return 0;
591
592 base = dasd_device_from_gendisk(bdev->bd_disk);
593 if (!base)
594 return -ENODEV;
595 if (!ro && test_bit(DASD_FLAG_DEVICE_RO, &base->flags))
596 rc = -EROFS;
597 else
598 rc = dasd_set_feature(base->cdev, DASD_FEATURE_READONLY, ro);
599 dasd_put_device(base);
600 return rc;
601}
602
603static int dasd_ioctl_readall_cmb(struct dasd_block *block, unsigned int cmd,
604 struct cmbdata __user *argp)
605{
606 size_t size = _IOC_SIZE(cmd);
607 struct cmbdata data;
608 int ret;
609
610 ret = cmf_readall(block->base->cdev, &data);
611 if (!ret && copy_to_user(argp, &data, min(size, sizeof(*argp))))
612 return -EFAULT;
613 return ret;
614}
615
616int dasd_ioctl(struct block_device *bdev, blk_mode_t mode,
617 unsigned int cmd, unsigned long arg)
618{
619 struct dasd_block *block;
620 struct dasd_device *base;
621 void __user *argp;
622 int rc;
623
624 if (is_compat_task())
625 argp = compat_ptr(arg);
626 else
627 argp = (void __user *)arg;
628
629 if ((_IOC_DIR(cmd) != _IOC_NONE) && !arg)
630 return -EINVAL;
631
632 base = dasd_device_from_gendisk(bdev->bd_disk);
633 if (!base)
634 return -ENODEV;
635 block = base->block;
636 rc = 0;
637 switch (cmd) {
638 case BIODASDDISABLE:
639 rc = dasd_ioctl_disable(bdev);
640 break;
641 case BIODASDENABLE:
642 rc = dasd_ioctl_enable(bdev);
643 break;
644 case BIODASDQUIESCE:
645 rc = dasd_ioctl_quiesce(block);
646 break;
647 case BIODASDRESUME:
648 rc = dasd_ioctl_resume(block);
649 break;
650 case BIODASDABORTIO:
651 rc = dasd_ioctl_abortio(block);
652 break;
653 case BIODASDALLOWIO:
654 rc = dasd_ioctl_allowio(block);
655 break;
656 case BIODASDFMT:
657 rc = dasd_ioctl_format(bdev, argp);
658 break;
659 case BIODASDCHECKFMT:
660 rc = dasd_ioctl_check_format(bdev, argp);
661 break;
662 case BIODASDINFO:
663 rc = dasd_ioctl_information(block, argp,
664 sizeof(struct dasd_information_t));
665 break;
666 case BIODASDINFO2:
667 rc = dasd_ioctl_information(block, argp,
668 sizeof(struct dasd_information2_t));
669 break;
670 case BIODASDPRRD:
671 rc = dasd_ioctl_read_profile(block, argp);
672 break;
673 case BIODASDPRRST:
674 rc = dasd_ioctl_reset_profile(block);
675 break;
676 case DASDAPIVER:
677 rc = dasd_ioctl_api_version(argp);
678 break;
679 case BIODASDCMFENABLE:
680 rc = enable_cmf(base->cdev);
681 break;
682 case BIODASDCMFDISABLE:
683 rc = disable_cmf(base->cdev);
684 break;
685 case BIODASDREADALLCMB:
686 rc = dasd_ioctl_readall_cmb(block, cmd, argp);
687 break;
688 case BIODASDRAS:
689 rc = dasd_ioctl_release_space(bdev, argp);
690 break;
691 case BIODASDCOPYPAIRSWAP:
692 rc = dasd_ioctl_copy_pair_swap(bdev, argp);
693 break;
694 default:
695 /* if the discipline has an ioctl method try it. */
696 rc = -ENOTTY;
697 if (base->discipline->ioctl)
698 rc = base->discipline->ioctl(block, cmd, argp);
699 }
700 dasd_put_device(base);
701 return rc;
702}
703
704
705/**
706 * dasd_biodasdinfo() - fill out the dasd information structure
707 * @disk: [in] pointer to gendisk structure that references a DASD
708 * @info: [out] pointer to the dasd_information2_t structure
709 *
710 * Provide access to DASD specific information.
711 * The gendisk structure is checked if it belongs to the DASD driver by
712 * comparing the gendisk->fops pointer.
713 * If it does not belong to the DASD driver -EINVAL is returned.
714 * Otherwise the provided dasd_information2_t structure is filled out.
715 *
716 * Returns:
717 * %0 on success and a negative error value on failure.
718 */
719int dasd_biodasdinfo(struct gendisk *disk, struct dasd_information2_t *info)
720{
721 struct dasd_device *base;
722 int error;
723
724 if (disk->fops != &dasd_device_operations)
725 return -EINVAL;
726
727 base = dasd_device_from_gendisk(disk);
728 if (!base)
729 return -ENODEV;
730 error = __dasd_ioctl_information(base->block, info);
731 dasd_put_device(base);
732 return error;
733}
734/* export that symbol_get in partition detection is possible */
735EXPORT_SYMBOL_GPL(dasd_biodasdinfo);
1/*
2 * Author(s)......: Holger Smolinski <Holger.Smolinski@de.ibm.com>
3 * Horst Hummel <Horst.Hummel@de.ibm.com>
4 * Carsten Otte <Cotte@de.ibm.com>
5 * Martin Schwidefsky <schwidefsky@de.ibm.com>
6 * Bugreports.to..: <Linux390@de.ibm.com>
7 * Copyright IBM Corp. 1999, 2001
8 *
9 * i/o controls for the dasd driver.
10 */
11
12#define KMSG_COMPONENT "dasd"
13
14#include <linux/interrupt.h>
15#include <linux/compat.h>
16#include <linux/major.h>
17#include <linux/fs.h>
18#include <linux/blkpg.h>
19#include <linux/slab.h>
20#include <asm/compat.h>
21#include <asm/ccwdev.h>
22#include <asm/schid.h>
23#include <asm/cmb.h>
24#include <asm/uaccess.h>
25
26/* This is ugly... */
27#define PRINTK_HEADER "dasd_ioctl:"
28
29#include "dasd_int.h"
30
31
32static int
33dasd_ioctl_api_version(void __user *argp)
34{
35 int ver = DASD_API_VERSION;
36 return put_user(ver, (int __user *)argp);
37}
38
39/*
40 * Enable device.
41 * used by dasdfmt after BIODASDDISABLE to retrigger blocksize detection
42 */
43static int
44dasd_ioctl_enable(struct block_device *bdev)
45{
46 struct dasd_device *base;
47
48 if (!capable(CAP_SYS_ADMIN))
49 return -EACCES;
50
51 base = dasd_device_from_gendisk(bdev->bd_disk);
52 if (!base)
53 return -ENODEV;
54
55 dasd_enable_device(base);
56 /* Formatting the dasd device can change the capacity. */
57 mutex_lock(&bdev->bd_mutex);
58 i_size_write(bdev->bd_inode,
59 (loff_t)get_capacity(base->block->gdp) << 9);
60 mutex_unlock(&bdev->bd_mutex);
61 dasd_put_device(base);
62 return 0;
63}
64
65/*
66 * Disable device.
67 * Used by dasdfmt. Disable I/O operations but allow ioctls.
68 */
69static int
70dasd_ioctl_disable(struct block_device *bdev)
71{
72 struct dasd_device *base;
73
74 if (!capable(CAP_SYS_ADMIN))
75 return -EACCES;
76
77 base = dasd_device_from_gendisk(bdev->bd_disk);
78 if (!base)
79 return -ENODEV;
80 /*
81 * Man this is sick. We don't do a real disable but only downgrade
82 * the device to DASD_STATE_BASIC. The reason is that dasdfmt uses
83 * BIODASDDISABLE to disable accesses to the device via the block
84 * device layer but it still wants to do i/o on the device by
85 * using the BIODASDFMT ioctl. Therefore the correct state for the
86 * device is DASD_STATE_BASIC that allows to do basic i/o.
87 */
88 dasd_set_target_state(base, DASD_STATE_BASIC);
89 /*
90 * Set i_size to zero, since read, write, etc. check against this
91 * value.
92 */
93 mutex_lock(&bdev->bd_mutex);
94 i_size_write(bdev->bd_inode, 0);
95 mutex_unlock(&bdev->bd_mutex);
96 dasd_put_device(base);
97 return 0;
98}
99
100/*
101 * Quiesce device.
102 */
103static int dasd_ioctl_quiesce(struct dasd_block *block)
104{
105 unsigned long flags;
106 struct dasd_device *base;
107
108 base = block->base;
109 if (!capable (CAP_SYS_ADMIN))
110 return -EACCES;
111
112 pr_info("%s: The DASD has been put in the quiesce "
113 "state\n", dev_name(&base->cdev->dev));
114 spin_lock_irqsave(get_ccwdev_lock(base->cdev), flags);
115 dasd_device_set_stop_bits(base, DASD_STOPPED_QUIESCE);
116 spin_unlock_irqrestore(get_ccwdev_lock(base->cdev), flags);
117 return 0;
118}
119
120
121/*
122 * Resume device.
123 */
124static int dasd_ioctl_resume(struct dasd_block *block)
125{
126 unsigned long flags;
127 struct dasd_device *base;
128
129 base = block->base;
130 if (!capable (CAP_SYS_ADMIN))
131 return -EACCES;
132
133 pr_info("%s: I/O operations have been resumed "
134 "on the DASD\n", dev_name(&base->cdev->dev));
135 spin_lock_irqsave(get_ccwdev_lock(base->cdev), flags);
136 dasd_device_remove_stop_bits(base, DASD_STOPPED_QUIESCE);
137 spin_unlock_irqrestore(get_ccwdev_lock(base->cdev), flags);
138
139 dasd_schedule_block_bh(block);
140 return 0;
141}
142
143/*
144 * Abort all failfast I/O on a device.
145 */
146static int dasd_ioctl_abortio(struct dasd_block *block)
147{
148 unsigned long flags;
149 struct dasd_device *base;
150 struct dasd_ccw_req *cqr, *n;
151
152 base = block->base;
153 if (!capable(CAP_SYS_ADMIN))
154 return -EACCES;
155
156 if (test_and_set_bit(DASD_FLAG_ABORTALL, &base->flags))
157 return 0;
158 DBF_DEV_EVENT(DBF_NOTICE, base, "%s", "abortall flag set");
159
160 spin_lock_irqsave(&block->request_queue_lock, flags);
161 spin_lock(&block->queue_lock);
162 list_for_each_entry_safe(cqr, n, &block->ccw_queue, blocklist) {
163 if (test_bit(DASD_CQR_FLAGS_FAILFAST, &cqr->flags) &&
164 cqr->callback_data &&
165 cqr->callback_data != DASD_SLEEPON_START_TAG &&
166 cqr->callback_data != DASD_SLEEPON_END_TAG) {
167 spin_unlock(&block->queue_lock);
168 blk_abort_request(cqr->callback_data);
169 spin_lock(&block->queue_lock);
170 }
171 }
172 spin_unlock(&block->queue_lock);
173 spin_unlock_irqrestore(&block->request_queue_lock, flags);
174
175 dasd_schedule_block_bh(block);
176 return 0;
177}
178
179/*
180 * Allow I/O on a device
181 */
182static int dasd_ioctl_allowio(struct dasd_block *block)
183{
184 struct dasd_device *base;
185
186 base = block->base;
187 if (!capable(CAP_SYS_ADMIN))
188 return -EACCES;
189
190 if (test_and_clear_bit(DASD_FLAG_ABORTALL, &base->flags))
191 DBF_DEV_EVENT(DBF_NOTICE, base, "%s", "abortall flag unset");
192
193 return 0;
194}
195
196/*
197 * performs formatting of _device_ according to _fdata_
198 * Note: The discipline's format_function is assumed to deliver formatting
199 * commands to format multiple units of the device. In terms of the ECKD
200 * devices this means CCWs are generated to format multiple tracks.
201 */
202static int
203dasd_format(struct dasd_block *block, struct format_data_t *fdata)
204{
205 struct dasd_device *base;
206 int rc;
207
208 base = block->base;
209 if (base->discipline->format_device == NULL)
210 return -EPERM;
211
212 if (base->state != DASD_STATE_BASIC) {
213 pr_warn("%s: The DASD cannot be formatted while it is enabled\n",
214 dev_name(&base->cdev->dev));
215 return -EBUSY;
216 }
217
218 DBF_DEV_EVENT(DBF_NOTICE, base,
219 "formatting units %u to %u (%u B blocks) flags %u",
220 fdata->start_unit,
221 fdata->stop_unit, fdata->blksize, fdata->intensity);
222
223 /* Since dasdfmt keeps the device open after it was disabled,
224 * there still exists an inode for this device.
225 * We must update i_blkbits, otherwise we might get errors when
226 * enabling the device later.
227 */
228 if (fdata->start_unit == 0) {
229 struct block_device *bdev = bdget_disk(block->gdp, 0);
230 bdev->bd_inode->i_blkbits = blksize_bits(fdata->blksize);
231 bdput(bdev);
232 }
233
234 rc = base->discipline->format_device(base, fdata, 1);
235 if (rc == -EAGAIN)
236 rc = base->discipline->format_device(base, fdata, 0);
237
238 return rc;
239}
240
241/*
242 * Format device.
243 */
244static int
245dasd_ioctl_format(struct block_device *bdev, void __user *argp)
246{
247 struct dasd_device *base;
248 struct format_data_t fdata;
249 int rc;
250
251 if (!capable(CAP_SYS_ADMIN))
252 return -EACCES;
253 if (!argp)
254 return -EINVAL;
255 base = dasd_device_from_gendisk(bdev->bd_disk);
256 if (!base)
257 return -ENODEV;
258 if (base->features & DASD_FEATURE_READONLY ||
259 test_bit(DASD_FLAG_DEVICE_RO, &base->flags)) {
260 dasd_put_device(base);
261 return -EROFS;
262 }
263 if (copy_from_user(&fdata, argp, sizeof(struct format_data_t))) {
264 dasd_put_device(base);
265 return -EFAULT;
266 }
267 if (bdev != bdev->bd_contains) {
268 pr_warn("%s: The specified DASD is a partition and cannot be formatted\n",
269 dev_name(&base->cdev->dev));
270 dasd_put_device(base);
271 return -EINVAL;
272 }
273 rc = dasd_format(base->block, &fdata);
274 dasd_put_device(base);
275 return rc;
276}
277
278#ifdef CONFIG_DASD_PROFILE
279/*
280 * Reset device profile information
281 */
282static int dasd_ioctl_reset_profile(struct dasd_block *block)
283{
284 dasd_profile_reset(&block->profile);
285 return 0;
286}
287
288/*
289 * Return device profile information
290 */
291static int dasd_ioctl_read_profile(struct dasd_block *block, void __user *argp)
292{
293 struct dasd_profile_info_t *data;
294 int rc = 0;
295
296 data = kmalloc(sizeof(*data), GFP_KERNEL);
297 if (!data)
298 return -ENOMEM;
299
300 spin_lock_bh(&block->profile.lock);
301 if (block->profile.data) {
302 data->dasd_io_reqs = block->profile.data->dasd_io_reqs;
303 data->dasd_io_sects = block->profile.data->dasd_io_sects;
304 memcpy(data->dasd_io_secs, block->profile.data->dasd_io_secs,
305 sizeof(data->dasd_io_secs));
306 memcpy(data->dasd_io_times, block->profile.data->dasd_io_times,
307 sizeof(data->dasd_io_times));
308 memcpy(data->dasd_io_timps, block->profile.data->dasd_io_timps,
309 sizeof(data->dasd_io_timps));
310 memcpy(data->dasd_io_time1, block->profile.data->dasd_io_time1,
311 sizeof(data->dasd_io_time1));
312 memcpy(data->dasd_io_time2, block->profile.data->dasd_io_time2,
313 sizeof(data->dasd_io_time2));
314 memcpy(data->dasd_io_time2ps,
315 block->profile.data->dasd_io_time2ps,
316 sizeof(data->dasd_io_time2ps));
317 memcpy(data->dasd_io_time3, block->profile.data->dasd_io_time3,
318 sizeof(data->dasd_io_time3));
319 memcpy(data->dasd_io_nr_req,
320 block->profile.data->dasd_io_nr_req,
321 sizeof(data->dasd_io_nr_req));
322 spin_unlock_bh(&block->profile.lock);
323 } else {
324 spin_unlock_bh(&block->profile.lock);
325 rc = -EIO;
326 goto out;
327 }
328 if (copy_to_user(argp, data, sizeof(*data)))
329 rc = -EFAULT;
330out:
331 kfree(data);
332 return rc;
333}
334#else
335static int dasd_ioctl_reset_profile(struct dasd_block *block)
336{
337 return -ENOTTY;
338}
339
340static int dasd_ioctl_read_profile(struct dasd_block *block, void __user *argp)
341{
342 return -ENOTTY;
343}
344#endif
345
346/*
347 * Return dasd information. Used for BIODASDINFO and BIODASDINFO2.
348 */
349static int dasd_ioctl_information(struct dasd_block *block,
350 unsigned int cmd, void __user *argp)
351{
352 struct dasd_information2_t *dasd_info;
353 struct subchannel_id sch_id;
354 struct ccw_dev_id dev_id;
355 struct dasd_device *base;
356 struct ccw_device *cdev;
357 unsigned long flags;
358 int rc;
359
360 base = block->base;
361 if (!base->discipline || !base->discipline->fill_info)
362 return -EINVAL;
363
364 dasd_info = kzalloc(sizeof(struct dasd_information2_t), GFP_KERNEL);
365 if (dasd_info == NULL)
366 return -ENOMEM;
367
368 rc = base->discipline->fill_info(base, dasd_info);
369 if (rc) {
370 kfree(dasd_info);
371 return rc;
372 }
373
374 cdev = base->cdev;
375 ccw_device_get_id(cdev, &dev_id);
376 ccw_device_get_schid(cdev, &sch_id);
377
378 dasd_info->devno = dev_id.devno;
379 dasd_info->schid = sch_id.sch_no;
380 dasd_info->cu_type = cdev->id.cu_type;
381 dasd_info->cu_model = cdev->id.cu_model;
382 dasd_info->dev_type = cdev->id.dev_type;
383 dasd_info->dev_model = cdev->id.dev_model;
384 dasd_info->status = base->state;
385 /*
386 * The open_count is increased for every opener, that includes
387 * the blkdev_get in dasd_scan_partitions.
388 * This must be hidden from user-space.
389 */
390 dasd_info->open_count = atomic_read(&block->open_count);
391 if (!block->bdev)
392 dasd_info->open_count++;
393
394 /*
395 * check if device is really formatted
396 * LDL / CDL was returned by 'fill_info'
397 */
398 if ((base->state < DASD_STATE_READY) ||
399 (dasd_check_blocksize(block->bp_block)))
400 dasd_info->format = DASD_FORMAT_NONE;
401
402 dasd_info->features |=
403 ((base->features & DASD_FEATURE_READONLY) != 0);
404
405 memcpy(dasd_info->type, base->discipline->name, 4);
406
407 if (block->request_queue->request_fn) {
408 struct list_head *l;
409#ifdef DASD_EXTENDED_PROFILING
410 {
411 struct list_head *l;
412 spin_lock_irqsave(&block->lock, flags);
413 list_for_each(l, &block->request_queue->queue_head)
414 dasd_info->req_queue_len++;
415 spin_unlock_irqrestore(&block->lock, flags);
416 }
417#endif /* DASD_EXTENDED_PROFILING */
418 spin_lock_irqsave(get_ccwdev_lock(base->cdev), flags);
419 list_for_each(l, &base->ccw_queue)
420 dasd_info->chanq_len++;
421 spin_unlock_irqrestore(get_ccwdev_lock(base->cdev),
422 flags);
423 }
424
425 rc = 0;
426 if (copy_to_user(argp, dasd_info,
427 ((cmd == (unsigned int) BIODASDINFO2) ?
428 sizeof(struct dasd_information2_t) :
429 sizeof(struct dasd_information_t))))
430 rc = -EFAULT;
431 kfree(dasd_info);
432 return rc;
433}
434
435/*
436 * Set read only
437 */
438static int
439dasd_ioctl_set_ro(struct block_device *bdev, void __user *argp)
440{
441 struct dasd_device *base;
442 int intval, rc;
443
444 if (!capable(CAP_SYS_ADMIN))
445 return -EACCES;
446 if (bdev != bdev->bd_contains)
447 // ro setting is not allowed for partitions
448 return -EINVAL;
449 if (get_user(intval, (int __user *)argp))
450 return -EFAULT;
451 base = dasd_device_from_gendisk(bdev->bd_disk);
452 if (!base)
453 return -ENODEV;
454 if (!intval && test_bit(DASD_FLAG_DEVICE_RO, &base->flags)) {
455 dasd_put_device(base);
456 return -EROFS;
457 }
458 set_disk_ro(bdev->bd_disk, intval);
459 rc = dasd_set_feature(base->cdev, DASD_FEATURE_READONLY, intval);
460 dasd_put_device(base);
461 return rc;
462}
463
464static int dasd_ioctl_readall_cmb(struct dasd_block *block, unsigned int cmd,
465 struct cmbdata __user *argp)
466{
467 size_t size = _IOC_SIZE(cmd);
468 struct cmbdata data;
469 int ret;
470
471 ret = cmf_readall(block->base->cdev, &data);
472 if (!ret && copy_to_user(argp, &data, min(size, sizeof(*argp))))
473 return -EFAULT;
474 return ret;
475}
476
477int dasd_ioctl(struct block_device *bdev, fmode_t mode,
478 unsigned int cmd, unsigned long arg)
479{
480 struct dasd_block *block;
481 struct dasd_device *base;
482 void __user *argp;
483 int rc;
484
485 if (is_compat_task())
486 argp = compat_ptr(arg);
487 else
488 argp = (void __user *)arg;
489
490 if ((_IOC_DIR(cmd) != _IOC_NONE) && !arg) {
491 PRINT_DEBUG("empty data ptr");
492 return -EINVAL;
493 }
494
495 base = dasd_device_from_gendisk(bdev->bd_disk);
496 if (!base)
497 return -ENODEV;
498 block = base->block;
499 rc = 0;
500 switch (cmd) {
501 case BIODASDDISABLE:
502 rc = dasd_ioctl_disable(bdev);
503 break;
504 case BIODASDENABLE:
505 rc = dasd_ioctl_enable(bdev);
506 break;
507 case BIODASDQUIESCE:
508 rc = dasd_ioctl_quiesce(block);
509 break;
510 case BIODASDRESUME:
511 rc = dasd_ioctl_resume(block);
512 break;
513 case BIODASDABORTIO:
514 rc = dasd_ioctl_abortio(block);
515 break;
516 case BIODASDALLOWIO:
517 rc = dasd_ioctl_allowio(block);
518 break;
519 case BIODASDFMT:
520 rc = dasd_ioctl_format(bdev, argp);
521 break;
522 case BIODASDINFO:
523 rc = dasd_ioctl_information(block, cmd, argp);
524 break;
525 case BIODASDINFO2:
526 rc = dasd_ioctl_information(block, cmd, argp);
527 break;
528 case BIODASDPRRD:
529 rc = dasd_ioctl_read_profile(block, argp);
530 break;
531 case BIODASDPRRST:
532 rc = dasd_ioctl_reset_profile(block);
533 break;
534 case BLKROSET:
535 rc = dasd_ioctl_set_ro(bdev, argp);
536 break;
537 case DASDAPIVER:
538 rc = dasd_ioctl_api_version(argp);
539 break;
540 case BIODASDCMFENABLE:
541 rc = enable_cmf(base->cdev);
542 break;
543 case BIODASDCMFDISABLE:
544 rc = disable_cmf(base->cdev);
545 break;
546 case BIODASDREADALLCMB:
547 rc = dasd_ioctl_readall_cmb(block, cmd, argp);
548 break;
549 default:
550 /* if the discipline has an ioctl method try it. */
551 rc = -ENOTTY;
552 if (base->discipline->ioctl)
553 rc = base->discipline->ioctl(block, cmd, argp);
554 }
555 dasd_put_device(base);
556 return rc;
557}