Merge from vendor branch BZIP:
[dragonfly.git] / sys / dev / virtual / disk / vdisk.c
1 /*
2  * Copyright (c) 2006 The DragonFly Project.  All rights reserved.
3  * 
4  * This code is derived from software contributed to The DragonFly Project
5  * by Matthew Dillon <dillon@backplane.com>
6  * 
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in
15  *    the documentation and/or other materials provided with the
16  *    distribution.
17  * 3. Neither the name of The DragonFly Project nor the names of its
18  *    contributors may be used to endorse or promote products derived
19  *    from this software without specific, prior written permission.
20  * 
21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
24  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
25  * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
27  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
28  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
29  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
30  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
31  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  * 
34  * $DragonFly: src/sys/dev/virtual/disk/vdisk.c,v 1.2 2007/01/09 18:26:56 dillon Exp $
35  */
36
37 /*
38  * Virtual disk driver
39  */
40 #include <sys/types.h>
41 #include <sys/param.h>
42 #include <sys/systm.h>
43 #include <sys/kernel.h>
44 #include <sys/malloc.h>
45 #include <sys/conf.h>
46 #include <sys/buf.h>
47 #include <sys/devicestat.h>
48 #include <sys/disklabel.h>
49 #include <sys/disk.h>
50 #include <machine/md_var.h>
51
52 #include <sys/buf2.h>
53
54 #include <sys/stat.h>
55 #include <unistd.h>
56
57 struct vkd_softc {
58         struct bio_queue_head bio_queue;
59         struct devstat stats;
60         struct disk disk;
61         cdev_t dev;
62         int unit;
63         int fd;
64 };
65
66
67
68 #define CDEV_MAJOR      97
69
70 static d_strategy_t     vkdstrategy;
71 static d_open_t         vkdopen;
72
73 static struct dev_ops vkd_ops = {
74         { "vkd", CDEV_MAJOR, D_DISK },
75         .d_open =       vkdopen,
76         .d_close =      nullclose,
77         .d_read =       physread,
78         .d_write =      physwrite,
79         .d_strategy =   vkdstrategy,
80 };
81
82 static void
83 vkdinit(void *dummy __unused)
84 {
85         struct vkd_softc *sc;
86         struct stat st;
87
88         if (RootImageFd < 0 || fstat(RootImageFd, &st) < 0)
89                 return;
90
91         sc = kmalloc(sizeof(*sc), M_DEVBUF, M_WAITOK|M_ZERO);
92         sc->unit = 0;
93         sc->fd = RootImageFd;
94         bioq_init(&sc->bio_queue);
95         devstat_add_entry(&sc->stats, "vkd", sc->unit, DEV_BSIZE,
96                           DEVSTAT_NO_ORDERED_TAGS,
97                           DEVSTAT_TYPE_DIRECT | DEVSTAT_TYPE_IF_OTHER,
98                           DEVSTAT_PRIORITY_DISK);
99         sc->dev = disk_create(sc->unit, &sc->disk, 0, &vkd_ops);
100         sc->dev->si_drv1 = sc;
101         sc->dev->si_iosize_max = 256 * 1024;
102 #if 0
103         dl = &sc->disk.d_label;
104         bzero(dl, sizeof(*dl));
105         dl->d_secsize = DEV_BSIZE;
106         dl->d_nsectors = st.st_size / dl->d_secsize;
107         dl->d_ntracks = 1;
108         dl->d_secpercyl = dl->d_nsectors;
109         dl->d_ncylinders = 1;
110 #endif
111 }
112
113 SYSINIT(vkdisk, SI_SUB_DRIVERS, SI_ORDER_FIRST, vkdinit, NULL);
114
115 static int
116 vkdopen(struct dev_open_args *ap)
117 {
118         struct vkd_softc *sc;
119         struct disklabel *dl;
120         struct stat st;
121         cdev_t dev;
122
123         dev = ap->a_head.a_dev;
124         sc = dev->si_drv1;
125         if (sc->unit != 0)
126                 return(ENXIO);
127         if (fstat(sc->fd, &st) < 0 || st.st_size == 0)
128                 return(ENXIO);
129
130         dl = &sc->disk.d_label;
131         bzero(dl, sizeof(*dl));
132         dl->d_secsize = DEV_BSIZE;
133         dl->d_nsectors = st.st_size / dl->d_secsize;
134         dl->d_ntracks = 1;
135         dl->d_secpercyl = dl->d_nsectors;
136         dl->d_ncylinders = 1;
137         dl->d_secperunit = dl->d_nsectors;
138         return(0);
139 }
140
141 static int
142 vkdstrategy(struct dev_strategy_args *ap)
143 {
144         struct bio *bio = ap->a_bio;
145         struct buf *bp;
146         struct vkd_softc *sc;
147         cdev_t dev;
148         int n;
149
150         dev = ap->a_head.a_dev;
151         sc = dev->si_drv1;
152
153         bioqdisksort(&sc->bio_queue, bio);
154         while ((bio = bioq_first(&sc->bio_queue)) != NULL) {
155                 bioq_remove(&sc->bio_queue, bio);
156                 bp = bio->bio_buf;
157
158                 devstat_start_transaction(&sc->stats);
159
160                 switch(bp->b_cmd) {
161                 case BUF_CMD_READ:
162                         lseek(sc->fd, bio->bio_offset, 0);
163                         n = read(sc->fd, bp->b_data, bp->b_bcount);
164                         break;
165                 case BUF_CMD_WRITE:
166                         /* XXX HANDLE SHORT WRITE XXX */
167                         lseek(sc->fd, bio->bio_offset, 0);
168                         n = write(sc->fd, bp->b_data, bp->b_bcount);
169                         break;
170                 default:
171                         panic("vkd: bad b_cmd %d", bp->b_cmd);
172                         break; /* not reached */
173                 }
174                 if (n != bp->b_bcount) {
175                         bp->b_error = EIO;
176                         bp->b_flags |= B_ERROR;
177                 }
178                         
179                 bp->b_resid = bp->b_bcount - n;
180                 devstat_end_transaction_buf(&sc->stats, bp);
181                 biodone(bio);
182         }
183         return(0);
184 }
185