Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * drivers/s390/char/tape_block.c | |
3 | * block device frontend for tape device driver | |
4 | * | |
5 | * S390 and zSeries version | |
6 | * Copyright (C) 2001,2003 IBM Deutschland Entwicklung GmbH, IBM Corporation | |
7 | * Author(s): Carsten Otte <cotte@de.ibm.com> | |
8 | * Tuan Ngo-Anh <ngoanh@de.ibm.com> | |
9 | * Martin Schwidefsky <schwidefsky@de.ibm.com> | |
10 | * Stefan Bader <shbader@de.ibm.com> | |
11 | */ | |
12 | ||
13 | #include <linux/fs.h> | |
1da177e4 LT |
14 | #include <linux/module.h> |
15 | #include <linux/blkdev.h> | |
16 | #include <linux/interrupt.h> | |
17 | #include <linux/buffer_head.h> | |
c1637532 | 18 | #include <linux/kernel.h> |
1da177e4 LT |
19 | |
20 | #include <asm/debug.h> | |
21 | ||
22 | #define TAPE_DBF_AREA tape_core_dbf | |
23 | ||
24 | #include "tape.h" | |
25 | ||
26 | #define PRINTK_HEADER "TAPE_BLOCK: " | |
27 | ||
28 | #define TAPEBLOCK_MAX_SEC 100 | |
29 | #define TAPEBLOCK_MIN_REQUEUE 3 | |
30 | ||
31 | /* | |
32 | * 2003/11/25 Stefan Bader <shbader@de.ibm.com> | |
33 | * | |
34 | * In 2.5/2.6 the block device request function is very likely to be called | |
35 | * with disabled interrupts (e.g. generic_unplug_device). So the driver can't | |
36 | * just call any function that tries to allocate CCW requests from that con- | |
37 | * text since it might sleep. There are two choices to work around this: | |
38 | * a) do not allocate with kmalloc but use its own memory pool | |
39 | * b) take requests from the queue outside that context, knowing that | |
40 | * allocation might sleep | |
41 | */ | |
42 | ||
43 | /* | |
44 | * file operation structure for tape block frontend | |
45 | */ | |
4e999af9 AV |
46 | static int tapeblock_open(struct block_device *, fmode_t); |
47 | static int tapeblock_release(struct gendisk *, fmode_t); | |
48 | static int tapeblock_ioctl(struct block_device *, fmode_t, unsigned int, | |
1da177e4 LT |
49 | unsigned long); |
50 | static int tapeblock_medium_changed(struct gendisk *); | |
51 | static int tapeblock_revalidate_disk(struct gendisk *); | |
52 | ||
53 | static struct block_device_operations tapeblock_fops = { | |
54 | .owner = THIS_MODULE, | |
4e999af9 AV |
55 | .open = tapeblock_open, |
56 | .release = tapeblock_release, | |
57 | .locked_ioctl = tapeblock_ioctl, | |
1da177e4 LT |
58 | .media_changed = tapeblock_medium_changed, |
59 | .revalidate_disk = tapeblock_revalidate_disk, | |
60 | }; | |
61 | ||
62 | static int tapeblock_major = 0; | |
63 | ||
64 | static void | |
65 | tapeblock_trigger_requeue(struct tape_device *device) | |
66 | { | |
67 | /* Protect against rescheduling. */ | |
973bd993 | 68 | if (atomic_cmpxchg(&device->blk_data.requeue_scheduled, 0, 1) != 0) |
1da177e4 LT |
69 | return; |
70 | schedule_work(&device->blk_data.requeue_task); | |
71 | } | |
72 | ||
73 | /* | |
74 | * Post finished request. | |
75 | */ | |
4d284cac | 76 | static void |
4c4e2148 | 77 | tapeblock_end_request(struct request *req, int error) |
1da177e4 | 78 | { |
4c4e2148 | 79 | if (__blk_end_request(req, error, blk_rq_bytes(req))) |
1da177e4 | 80 | BUG(); |
1da177e4 LT |
81 | } |
82 | ||
83 | static void | |
84 | __tapeblock_end_request(struct tape_request *ccw_req, void *data) | |
85 | { | |
86 | struct tape_device *device; | |
87 | struct request *req; | |
88 | ||
89 | DBF_LH(6, "__tapeblock_end_request()\n"); | |
90 | ||
91 | device = ccw_req->device; | |
92 | req = (struct request *) data; | |
4c4e2148 | 93 | tapeblock_end_request(req, (ccw_req->rc == 0) ? 0 : -EIO); |
1da177e4 LT |
94 | if (ccw_req->rc == 0) |
95 | /* Update position. */ | |
96 | device->blk_data.block_position = | |
97 | (req->sector + req->nr_sectors) >> TAPEBLOCK_HSEC_S2B; | |
98 | else | |
99 | /* We lost the position information due to an error. */ | |
100 | device->blk_data.block_position = -1; | |
101 | device->discipline->free_bread(ccw_req); | |
102 | if (!list_empty(&device->req_queue) || | |
103 | elv_next_request(device->blk_data.request_queue)) | |
104 | tapeblock_trigger_requeue(device); | |
105 | } | |
106 | ||
107 | /* | |
108 | * Feed the tape device CCW queue with requests supplied in a list. | |
109 | */ | |
4d284cac | 110 | static int |
1da177e4 LT |
111 | tapeblock_start_request(struct tape_device *device, struct request *req) |
112 | { | |
113 | struct tape_request * ccw_req; | |
114 | int rc; | |
115 | ||
116 | DBF_LH(6, "tapeblock_start_request(%p, %p)\n", device, req); | |
117 | ||
118 | ccw_req = device->discipline->bread(device, req); | |
119 | if (IS_ERR(ccw_req)) { | |
120 | DBF_EVENT(1, "TBLOCK: bread failed\n"); | |
4c4e2148 | 121 | tapeblock_end_request(req, -EIO); |
1da177e4 LT |
122 | return PTR_ERR(ccw_req); |
123 | } | |
124 | ccw_req->callback = __tapeblock_end_request; | |
125 | ccw_req->callback_data = (void *) req; | |
126 | ccw_req->retries = TAPEBLOCK_RETRIES; | |
127 | ||
128 | rc = tape_do_io_async(device, ccw_req); | |
129 | if (rc) { | |
130 | /* | |
131 | * Start/enqueueing failed. No retries in | |
132 | * this case. | |
133 | */ | |
4c4e2148 | 134 | tapeblock_end_request(req, -EIO); |
1da177e4 LT |
135 | device->discipline->free_bread(ccw_req); |
136 | } | |
137 | ||
138 | return rc; | |
139 | } | |
140 | ||
141 | /* | |
142 | * Move requests from the block device request queue to the tape device ccw | |
143 | * queue. | |
144 | */ | |
145 | static void | |
c1637532 MS |
146 | tapeblock_requeue(struct work_struct *work) { |
147 | struct tape_blk_data * blkdat; | |
1da177e4 | 148 | struct tape_device * device; |
165125e1 | 149 | struct request_queue * queue; |
1da177e4 LT |
150 | int nr_queued; |
151 | struct request * req; | |
152 | struct list_head * l; | |
153 | int rc; | |
154 | ||
c1637532 MS |
155 | blkdat = container_of(work, struct tape_blk_data, requeue_task); |
156 | device = blkdat->device; | |
1da177e4 LT |
157 | if (!device) |
158 | return; | |
159 | ||
160 | spin_lock_irq(get_ccwdev_lock(device->cdev)); | |
161 | queue = device->blk_data.request_queue; | |
162 | ||
163 | /* Count number of requests on ccw queue. */ | |
164 | nr_queued = 0; | |
165 | list_for_each(l, &device->req_queue) | |
166 | nr_queued++; | |
167 | spin_unlock(get_ccwdev_lock(device->cdev)); | |
168 | ||
169 | spin_lock(&device->blk_data.request_queue_lock); | |
170 | while ( | |
171 | !blk_queue_plugged(queue) && | |
172 | elv_next_request(queue) && | |
173 | nr_queued < TAPEBLOCK_MIN_REQUEUE | |
174 | ) { | |
175 | req = elv_next_request(queue); | |
176 | if (rq_data_dir(req) == WRITE) { | |
177 | DBF_EVENT(1, "TBLOCK: Rejecting write request\n"); | |
178 | blkdev_dequeue_request(req); | |
4c4e2148 | 179 | tapeblock_end_request(req, -EIO); |
1da177e4 LT |
180 | continue; |
181 | } | |
f71ad62a MH |
182 | blkdev_dequeue_request(req); |
183 | nr_queued++; | |
1da177e4 LT |
184 | spin_unlock_irq(&device->blk_data.request_queue_lock); |
185 | rc = tapeblock_start_request(device, req); | |
186 | spin_lock_irq(&device->blk_data.request_queue_lock); | |
1da177e4 LT |
187 | } |
188 | spin_unlock_irq(&device->blk_data.request_queue_lock); | |
189 | atomic_set(&device->blk_data.requeue_scheduled, 0); | |
190 | } | |
191 | ||
192 | /* | |
193 | * Tape request queue function. Called from ll_rw_blk.c | |
194 | */ | |
195 | static void | |
165125e1 | 196 | tapeblock_request_fn(struct request_queue *queue) |
1da177e4 LT |
197 | { |
198 | struct tape_device *device; | |
199 | ||
200 | device = (struct tape_device *) queue->queuedata; | |
201 | DBF_LH(6, "tapeblock_request_fn(device=%p)\n", device); | |
3a8dc893 | 202 | BUG_ON(device == NULL); |
1da177e4 LT |
203 | tapeblock_trigger_requeue(device); |
204 | } | |
205 | ||
206 | /* | |
207 | * This function is called for every new tapedevice | |
208 | */ | |
209 | int | |
210 | tapeblock_setup_device(struct tape_device * device) | |
211 | { | |
212 | struct tape_blk_data * blkdat; | |
213 | struct gendisk * disk; | |
214 | int rc; | |
215 | ||
216 | blkdat = &device->blk_data; | |
c1637532 | 217 | blkdat->device = device; |
1da177e4 LT |
218 | spin_lock_init(&blkdat->request_queue_lock); |
219 | atomic_set(&blkdat->requeue_scheduled, 0); | |
220 | ||
221 | blkdat->request_queue = blk_init_queue( | |
222 | tapeblock_request_fn, | |
223 | &blkdat->request_queue_lock | |
224 | ); | |
225 | if (!blkdat->request_queue) | |
226 | return -ENOMEM; | |
227 | ||
228 | elevator_exit(blkdat->request_queue->elevator); | |
229 | rc = elevator_init(blkdat->request_queue, "noop"); | |
230 | if (rc) | |
231 | goto cleanup_queue; | |
232 | ||
233 | blk_queue_hardsect_size(blkdat->request_queue, TAPEBLOCK_HSEC_SIZE); | |
234 | blk_queue_max_sectors(blkdat->request_queue, TAPEBLOCK_MAX_SEC); | |
235 | blk_queue_max_phys_segments(blkdat->request_queue, -1L); | |
236 | blk_queue_max_hw_segments(blkdat->request_queue, -1L); | |
237 | blk_queue_max_segment_size(blkdat->request_queue, -1L); | |
238 | blk_queue_segment_boundary(blkdat->request_queue, -1L); | |
239 | ||
240 | disk = alloc_disk(1); | |
241 | if (!disk) { | |
242 | rc = -ENOMEM; | |
243 | goto cleanup_queue; | |
244 | } | |
245 | ||
246 | disk->major = tapeblock_major; | |
247 | disk->first_minor = device->first_minor; | |
248 | disk->fops = &tapeblock_fops; | |
249 | disk->private_data = tape_get_device_reference(device); | |
250 | disk->queue = blkdat->request_queue; | |
251 | set_capacity(disk, 0); | |
252 | sprintf(disk->disk_name, "btibm%d", | |
253 | device->first_minor / TAPE_MINORS_PER_DEV); | |
254 | ||
255 | blkdat->disk = disk; | |
256 | blkdat->medium_changed = 1; | |
257 | blkdat->request_queue->queuedata = tape_get_device_reference(device); | |
258 | ||
259 | add_disk(disk); | |
260 | ||
c1637532 MS |
261 | tape_get_device_reference(device); |
262 | INIT_WORK(&blkdat->requeue_task, tapeblock_requeue); | |
1da177e4 LT |
263 | |
264 | return 0; | |
265 | ||
266 | cleanup_queue: | |
267 | blk_cleanup_queue(blkdat->request_queue); | |
268 | blkdat->request_queue = NULL; | |
269 | ||
270 | return rc; | |
271 | } | |
272 | ||
273 | void | |
274 | tapeblock_cleanup_device(struct tape_device *device) | |
275 | { | |
276 | flush_scheduled_work(); | |
c1637532 | 277 | tape_put_device(device); |
1da177e4 LT |
278 | |
279 | if (!device->blk_data.disk) { | |
280 | PRINT_ERR("(%s): No gendisk to clean up!\n", | |
2a0217d5 | 281 | dev_name(&device->cdev->dev)); |
1da177e4 LT |
282 | goto cleanup_queue; |
283 | } | |
284 | ||
285 | del_gendisk(device->blk_data.disk); | |
286 | device->blk_data.disk->private_data = | |
287 | tape_put_device(device->blk_data.disk->private_data); | |
288 | put_disk(device->blk_data.disk); | |
289 | ||
290 | device->blk_data.disk = NULL; | |
291 | cleanup_queue: | |
292 | device->blk_data.request_queue->queuedata = tape_put_device(device); | |
293 | ||
294 | blk_cleanup_queue(device->blk_data.request_queue); | |
295 | device->blk_data.request_queue = NULL; | |
296 | } | |
297 | ||
298 | /* | |
299 | * Detect number of blocks of the tape. | |
300 | * FIXME: can we extent this to detect the blocks size as well ? | |
301 | */ | |
302 | static int | |
303 | tapeblock_revalidate_disk(struct gendisk *disk) | |
304 | { | |
305 | struct tape_device * device; | |
306 | unsigned int nr_of_blks; | |
307 | int rc; | |
308 | ||
309 | device = (struct tape_device *) disk->private_data; | |
3a8dc893 | 310 | BUG_ON(!device); |
1da177e4 LT |
311 | |
312 | if (!device->blk_data.medium_changed) | |
313 | return 0; | |
314 | ||
315 | PRINT_INFO("Detecting media size...\n"); | |
316 | rc = tape_mtop(device, MTFSFM, 1); | |
317 | if (rc) | |
318 | return rc; | |
319 | ||
320 | rc = tape_mtop(device, MTTELL, 1); | |
321 | if (rc < 0) | |
322 | return rc; | |
323 | ||
324 | DBF_LH(3, "Image file ends at %d\n", rc); | |
325 | nr_of_blks = rc; | |
326 | ||
327 | /* This will fail for the first file. Catch the error by checking the | |
328 | * position. */ | |
329 | tape_mtop(device, MTBSF, 1); | |
330 | ||
331 | rc = tape_mtop(device, MTTELL, 1); | |
332 | if (rc < 0) | |
333 | return rc; | |
334 | ||
335 | if (rc > nr_of_blks) | |
336 | return -EINVAL; | |
337 | ||
338 | DBF_LH(3, "Image file starts at %d\n", rc); | |
339 | device->bof = rc; | |
340 | nr_of_blks -= rc; | |
341 | ||
342 | PRINT_INFO("Found %i blocks on media\n", nr_of_blks); | |
343 | set_capacity(device->blk_data.disk, | |
344 | nr_of_blks*(TAPEBLOCK_HSEC_SIZE/512)); | |
345 | ||
346 | device->blk_data.block_position = 0; | |
347 | device->blk_data.medium_changed = 0; | |
348 | return 0; | |
349 | } | |
350 | ||
351 | static int | |
352 | tapeblock_medium_changed(struct gendisk *disk) | |
353 | { | |
354 | struct tape_device *device; | |
355 | ||
356 | device = (struct tape_device *) disk->private_data; | |
357 | DBF_LH(6, "tapeblock_medium_changed(%p) = %d\n", | |
358 | device, device->blk_data.medium_changed); | |
359 | ||
360 | return device->blk_data.medium_changed; | |
361 | } | |
362 | ||
363 | /* | |
364 | * Block frontend tape device open function. | |
365 | */ | |
366 | static int | |
4e999af9 | 367 | tapeblock_open(struct block_device *bdev, fmode_t mode) |
1da177e4 | 368 | { |
4e999af9 | 369 | struct gendisk * disk = bdev->bd_disk; |
1da177e4 LT |
370 | struct tape_device * device; |
371 | int rc; | |
372 | ||
1da177e4 LT |
373 | device = tape_get_device_reference(disk->private_data); |
374 | ||
375 | if (device->required_tapemarks) { | |
376 | DBF_EVENT(2, "TBLOCK: missing tapemarks\n"); | |
377 | PRINT_ERR("TBLOCK: Refusing to open tape with missing" | |
378 | " end of file marks.\n"); | |
379 | rc = -EPERM; | |
380 | goto put_device; | |
381 | } | |
382 | ||
383 | rc = tape_open(device); | |
384 | if (rc) | |
385 | goto put_device; | |
386 | ||
387 | rc = tapeblock_revalidate_disk(disk); | |
388 | if (rc) | |
389 | goto release; | |
390 | ||
391 | /* | |
392 | * Note: The reference to <device> is hold until the release function | |
393 | * is called. | |
394 | */ | |
395 | tape_state_set(device, TS_BLKUSE); | |
396 | return 0; | |
397 | ||
398 | release: | |
399 | tape_release(device); | |
400 | put_device: | |
401 | tape_put_device(device); | |
402 | return rc; | |
403 | } | |
404 | ||
405 | /* | |
406 | * Block frontend tape device release function. | |
407 | * | |
408 | * Note: One reference to the tape device was made by the open function. So | |
409 | * we just get the pointer here and release the reference. | |
410 | */ | |
411 | static int | |
4e999af9 | 412 | tapeblock_release(struct gendisk *disk, fmode_t mode) |
1da177e4 | 413 | { |
1da177e4 LT |
414 | struct tape_device *device = disk->private_data; |
415 | ||
416 | tape_state_set(device, TS_IN_USE); | |
417 | tape_release(device); | |
418 | tape_put_device(device); | |
419 | ||
420 | return 0; | |
421 | } | |
422 | ||
423 | /* | |
424 | * Support of some generic block device IOCTLs. | |
425 | */ | |
426 | static int | |
427 | tapeblock_ioctl( | |
4e999af9 AV |
428 | struct block_device * bdev, |
429 | fmode_t mode, | |
1da177e4 LT |
430 | unsigned int command, |
431 | unsigned long arg | |
432 | ) { | |
433 | int rc; | |
434 | int minor; | |
4e999af9 | 435 | struct gendisk *disk = bdev->bd_disk; |
f976069a | 436 | struct tape_device *device; |
1da177e4 LT |
437 | |
438 | rc = 0; | |
3a8dc893 | 439 | BUG_ON(!disk); |
1da177e4 | 440 | device = disk->private_data; |
3a8dc893 | 441 | BUG_ON(!device); |
4e999af9 | 442 | minor = MINOR(bdev->bd_dev); |
1da177e4 LT |
443 | |
444 | DBF_LH(6, "tapeblock_ioctl(0x%0x)\n", command); | |
445 | DBF_LH(6, "device = %d:%d\n", tapeblock_major, minor); | |
446 | ||
447 | switch (command) { | |
448 | /* Refuse some IOCTL calls without complaining (mount). */ | |
449 | case 0x5310: /* CDROMMULTISESSION */ | |
450 | rc = -EINVAL; | |
451 | break; | |
452 | default: | |
453 | PRINT_WARN("invalid ioctl 0x%x\n", command); | |
454 | rc = -EINVAL; | |
455 | } | |
456 | ||
457 | return rc; | |
458 | } | |
459 | ||
460 | /* | |
461 | * Initialize block device frontend. | |
462 | */ | |
463 | int | |
464 | tapeblock_init(void) | |
465 | { | |
466 | int rc; | |
467 | ||
468 | /* Register the tape major number to the kernel */ | |
469 | rc = register_blkdev(tapeblock_major, "tBLK"); | |
470 | if (rc < 0) | |
471 | return rc; | |
472 | ||
473 | if (tapeblock_major == 0) | |
474 | tapeblock_major = rc; | |
475 | PRINT_INFO("tape gets major %d for block device\n", tapeblock_major); | |
476 | return 0; | |
477 | } | |
478 | ||
479 | /* | |
480 | * Deregister major for block device frontend | |
481 | */ | |
482 | void | |
483 | tapeblock_exit(void) | |
484 | { | |
485 | unregister_blkdev(tapeblock_major, "tBLK"); | |
486 | } |