Rev 4420 | Rev 4537 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 4420 | Rev 4439 | ||
---|---|---|---|
1 | /* |
1 | /* |
2 | * Copyright (c) 2009 Jiri Svoboda |
2 | * Copyright (c) 2009 Jiri Svoboda |
3 | * All rights reserved. |
3 | * All rights reserved. |
4 | * |
4 | * |
5 | * Redistribution and use in source and binary forms, with or without |
5 | * Redistribution and use in source and binary forms, with or without |
6 | * modification, are permitted provided that the following conditions |
6 | * modification, are permitted provided that the following conditions |
7 | * are met: |
7 | * are met: |
8 | * |
8 | * |
9 | * - Redistributions of source code must retain the above copyright |
9 | * - Redistributions of source code must retain the above copyright |
10 | * notice, this list of conditions and the following disclaimer. |
10 | * notice, this list of conditions and the following disclaimer. |
11 | * - Redistributions in binary form must reproduce the above copyright |
11 | * - Redistributions in binary form must reproduce the above copyright |
12 | * notice, this list of conditions and the following disclaimer in the |
12 | * notice, this list of conditions and the following disclaimer in the |
13 | * documentation and/or other materials provided with the distribution. |
13 | * documentation and/or other materials provided with the distribution. |
14 | * - The name of the author may not be used to endorse or promote products |
14 | * - The name of the author may not be used to endorse or promote products |
15 | * derived from this software without specific prior written permission. |
15 | * derived from this software without specific prior written permission. |
16 | * |
16 | * |
17 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
17 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
18 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
18 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
19 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
19 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
20 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
20 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
22 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
22 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
23 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
23 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
24 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
24 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
25 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
25 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
26 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
26 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
27 | */ |
27 | */ |
28 | 28 | ||
29 | /** @addtogroup bd |
29 | /** @addtogroup bd |
30 | * @{ |
30 | * @{ |
31 | */ |
31 | */ |
32 | 32 | ||
33 | /** |
33 | /** |
34 | * @file |
34 | * @file |
35 | * @brief GXemul disk driver |
35 | * @brief GXemul disk driver |
36 | */ |
36 | */ |
37 | 37 | ||
38 | #include <stdio.h> |
38 | #include <stdio.h> |
39 | #include <libarch/ddi.h> |
39 | #include <libarch/ddi.h> |
40 | #include <ddi.h> |
40 | #include <ddi.h> |
41 | #include <ipc/ipc.h> |
41 | #include <ipc/ipc.h> |
42 | #include <ipc/bd.h> |
42 | #include <ipc/bd.h> |
43 | #include <async.h> |
43 | #include <async.h> |
44 | #include <as.h> |
44 | #include <as.h> |
45 | #include <futex.h> |
45 | #include <futex.h> |
46 | #include <devmap.h> |
46 | #include <devmap.h> |
47 | #include <sys/types.h> |
47 | #include <sys/types.h> |
48 | #include <errno.h> |
48 | #include <errno.h> |
49 | 49 | ||
50 | #define NAME "gxe_bd" |
50 | #define NAME "gxe_bd" |
51 | 51 | ||
52 | enum { |
52 | enum { |
53 | CTL_READ_START = 0, |
53 | CTL_READ_START = 0, |
54 | CTL_WRITE_START = 1, |
54 | CTL_WRITE_START = 1, |
55 | }; |
55 | }; |
56 | 56 | ||
57 | enum { |
57 | enum { |
58 | STATUS_FAILURE = 0 |
58 | STATUS_FAILURE = 0 |
59 | }; |
59 | }; |
60 | 60 | ||
61 | typedef struct { |
61 | typedef struct { |
62 | uint32_t offset_lo; |
62 | uint32_t offset_lo; |
63 | uint32_t pad0; |
63 | uint32_t pad0; |
64 | uint32_t offset_hi; |
64 | uint32_t offset_hi; |
65 | uint32_t pad1; |
65 | uint32_t pad1; |
66 | 66 | ||
67 | uint32_t disk_id; |
67 | uint32_t disk_id; |
68 | uint32_t pad2[3]; |
68 | uint32_t pad2[3]; |
69 | 69 | ||
70 | uint32_t control; |
70 | uint32_t control; |
71 | uint32_t pad3[3]; |
71 | uint32_t pad3[3]; |
72 | 72 | ||
73 | uint32_t status; |
73 | uint32_t status; |
74 | 74 | ||
75 | /* FIXME: Need to fix pio_enable() to support >= page_size areas. |
75 | /* FIXME: Need to fix pio_enable() to support >= page_size areas. |
76 | 76 | ||
77 | uint32_t pad4[3]; |
77 | uint32_t pad4[3]; |
78 | uint32_t pad5[0x3fc0]; |
78 | uint32_t pad5[0x3fc0]; |
79 | 79 | ||
80 | uint8_t buffer[512];*/ |
80 | uint8_t buffer[512];*/ |
81 | } gxe_bd_t; |
81 | } gxe_bd_t; |
82 | 82 | ||
83 | typedef struct { |
83 | typedef struct { |
84 | uint8_t buffer[512]; |
84 | uint8_t buffer[512]; |
85 | } gxe_buf_t; |
85 | } gxe_buf_t; |
86 | 86 | ||
87 | static size_t maxblock_size = 512; |
87 | static const size_t block_size = 512; |
- | 88 | static size_t comm_size; |
|
- | 89 | ||
88 | static uintptr_t dev_physical = 0x13000000; |
90 | static uintptr_t dev_physical = 0x13000000; |
89 | static gxe_bd_t *dev; |
91 | static gxe_bd_t *dev; |
90 | static gxe_buf_t *devbuf; |
92 | static gxe_buf_t *devbuf; |
91 | 93 | ||
92 | static uint32_t disk_id = 0; |
94 | static uint32_t disk_id = 0; |
93 | 95 | ||
94 | static atomic_t dev_futex = FUTEX_INITIALIZER; |
96 | static atomic_t dev_futex = FUTEX_INITIALIZER; |
95 | 97 | ||
96 | static int gxe_bd_init(void); |
98 | static int gxe_bd_init(void); |
97 | static void gxe_bd_connection(ipc_callid_t iid, ipc_call_t *icall); |
99 | static void gxe_bd_connection(ipc_callid_t iid, ipc_call_t *icall); |
98 | static int gxe_bd_read_block(uint64_t offset, size_t block_size, void *buf); |
100 | static int gx_bd_rdwr(ipcarg_t method, off_t offset, off_t size, void *buf); |
99 | static int gxe_bd_write_block(uint64_t offset, size_t block_size, |
101 | static int gxe_bd_read_block(uint64_t offset, size_t size, void *buf); |
100 | const void *buf); |
102 | static int gxe_bd_write_block(uint64_t offset, size_t size, const void *buf); |
101 | 103 | ||
102 | int main(int argc, char **argv) |
104 | int main(int argc, char **argv) |
103 | { |
105 | { |
104 | printf(NAME ": GXemul disk driver\n"); |
106 | printf(NAME ": GXemul disk driver\n"); |
105 | 107 | ||
106 | if (gxe_bd_init() != EOK) |
108 | if (gxe_bd_init() != EOK) |
107 | return -1; |
109 | return -1; |
108 | 110 | ||
109 | printf(NAME ": Accepting connections\n"); |
111 | printf(NAME ": Accepting connections\n"); |
110 | async_manager(); |
112 | async_manager(); |
111 | 113 | ||
112 | /* Not reached */ |
114 | /* Not reached */ |
113 | return 0; |
115 | return 0; |
114 | } |
116 | } |
115 | 117 | ||
116 | static int gxe_bd_init(void) |
118 | static int gxe_bd_init(void) |
117 | { |
119 | { |
118 | dev_handle_t dev_handle; |
120 | dev_handle_t dev_handle; |
119 | void *vaddr; |
121 | void *vaddr; |
120 | int rc; |
122 | int rc; |
121 | 123 | ||
122 | rc = devmap_driver_register(NAME, gxe_bd_connection); |
124 | rc = devmap_driver_register(NAME, gxe_bd_connection); |
123 | if (rc < 0) { |
125 | if (rc < 0) { |
124 | printf(NAME ": Unable to register driver.\n"); |
126 | printf(NAME ": Unable to register driver.\n"); |
125 | return rc; |
127 | return rc; |
126 | } |
128 | } |
127 | 129 | ||
128 | rc = pio_enable((void *) dev_physical, sizeof(gxe_bd_t), &vaddr); |
130 | rc = pio_enable((void *) dev_physical, sizeof(gxe_bd_t), &vaddr); |
129 | if (rc != EOK) { |
131 | if (rc != EOK) { |
130 | printf(NAME ": Could not initialize device I/O space.\n"); |
132 | printf(NAME ": Could not initialize device I/O space.\n"); |
131 | return rc; |
133 | return rc; |
132 | } |
134 | } |
133 | 135 | ||
134 | dev = vaddr; |
136 | dev = vaddr; |
135 | 137 | ||
136 | rc = pio_enable((void *) dev_physical + 0x4000, sizeof(gxe_buf_t), &vaddr); |
138 | rc = pio_enable((void *) dev_physical + 0x4000, sizeof(gxe_buf_t), &vaddr); |
137 | if (rc != EOK) { |
139 | if (rc != EOK) { |
138 | printf(NAME ": Could not initialize device I/O space.\n"); |
140 | printf(NAME ": Could not initialize device I/O space.\n"); |
139 | return rc; |
141 | return rc; |
140 | } |
142 | } |
141 | 143 | ||
142 | devbuf = vaddr; |
144 | devbuf = vaddr; |
143 | 145 | ||
144 | rc = devmap_device_register("disk0", &dev_handle); |
146 | rc = devmap_device_register("disk0", &dev_handle); |
145 | if (rc != EOK) { |
147 | if (rc != EOK) { |
146 | devmap_hangup_phone(DEVMAP_DRIVER); |
148 | devmap_hangup_phone(DEVMAP_DRIVER); |
147 | printf(NAME ": Unable to register device.\n"); |
149 | printf(NAME ": Unable to register device.\n"); |
148 | return rc; |
150 | return rc; |
149 | } |
151 | } |
150 | 152 | ||
151 | return EOK; |
153 | return EOK; |
152 | } |
154 | } |
153 | 155 | ||
154 | static void gxe_bd_connection(ipc_callid_t iid, ipc_call_t *icall) |
156 | static void gxe_bd_connection(ipc_callid_t iid, ipc_call_t *icall) |
155 | { |
157 | { |
156 | void *fs_va = NULL; |
158 | void *fs_va = NULL; |
157 | ipc_callid_t callid; |
159 | ipc_callid_t callid; |
158 | ipc_call_t call; |
160 | ipc_call_t call; |
- | 161 | ipcarg_t method; |
|
159 | int flags; |
162 | int flags; |
160 | int retval; |
163 | int retval; |
161 | off_t offset; |
164 | off_t idx; |
162 | size_t block_size; |
165 | off_t size; |
163 | 166 | ||
164 | /* Answer the IPC_M_CONNECT_ME_TO call. */ |
167 | /* Answer the IPC_M_CONNECT_ME_TO call. */ |
165 | ipc_answer_0(iid, EOK); |
168 | ipc_answer_0(iid, EOK); |
166 | 169 | ||
167 | if (!ipc_share_out_receive(&callid, &maxblock_size, &flags)) { |
170 | if (!ipc_share_out_receive(&callid, &comm_size, &flags)) { |
168 | ipc_answer_0(callid, EHANGUP); |
171 | ipc_answer_0(callid, EHANGUP); |
169 | return; |
172 | return; |
170 | } |
173 | } |
171 | maxblock_size = 512; |
- | |
172 | 174 | ||
173 | fs_va = as_get_mappable_page(maxblock_size); |
175 | fs_va = as_get_mappable_page(comm_size); |
174 | if (fs_va == NULL) { |
176 | if (fs_va == NULL) { |
175 | ipc_answer_0(callid, EHANGUP); |
177 | ipc_answer_0(callid, EHANGUP); |
176 | return; |
178 | return; |
177 | } |
179 | } |
178 | 180 | ||
179 | (void) ipc_share_out_finalize(callid, fs_va); |
181 | (void) ipc_share_out_finalize(callid, fs_va); |
180 | 182 | ||
181 | while (1) { |
183 | while (1) { |
182 | callid = async_get_call(&call); |
184 | callid = async_get_call(&call); |
183 | switch (IPC_GET_METHOD(call)) { |
185 | method = IPC_GET_METHOD(call); |
- | 186 | switch (method) { |
|
184 | case IPC_M_PHONE_HUNGUP: |
187 | case IPC_M_PHONE_HUNGUP: |
185 | /* The other side has hung up. */ |
188 | /* The other side has hung up. */ |
186 | ipc_answer_0(callid, EOK); |
189 | ipc_answer_0(callid, EOK); |
187 | return; |
190 | return; |
188 | case BD_READ_BLOCK: |
191 | case BD_READ_BLOCK: |
189 | offset = IPC_GET_ARG1(call); |
- | |
190 | block_size = IPC_GET_ARG2(call); |
- | |
191 | retval = gxe_bd_read_block(offset, block_size, fs_va); |
- | |
192 | break; |
- | |
193 | case BD_WRITE_BLOCK: |
192 | case BD_WRITE_BLOCK: |
194 | offset = IPC_GET_ARG1(call); |
193 | idx = IPC_GET_ARG1(call); |
195 | block_size = IPC_GET_ARG2(call); |
194 | size = IPC_GET_ARG2(call); |
- | 195 | if (size > comm_size) { |
|
- | 196 | retval = EINVAL; |
|
- | 197 | break; |
|
- | 198 | } |
|
196 | retval = gxe_bd_write_block(offset, block_size, fs_va); |
199 | retval = gx_bd_rdwr(method, idx * size, size, fs_va); |
197 | break; |
200 | break; |
198 | default: |
201 | default: |
199 | retval = EINVAL; |
202 | retval = EINVAL; |
200 | break; |
203 | break; |
201 | } |
204 | } |
202 | ipc_answer_0(callid, retval); |
205 | ipc_answer_0(callid, retval); |
203 | } |
206 | } |
204 | } |
207 | } |
205 | 208 | ||
- | 209 | static int gx_bd_rdwr(ipcarg_t method, off_t offset, off_t size, void *buf) |
|
- | 210 | { |
|
- | 211 | int rc; |
|
- | 212 | size_t now; |
|
- | 213 | ||
- | 214 | while (size > 0) { |
|
- | 215 | now = size < block_size ? size : block_size; |
|
- | 216 | ||
- | 217 | if (method == BD_READ_BLOCK) |
|
- | 218 | rc = gxe_bd_read_block(offset, now, buf); |
|
- | 219 | else |
|
- | 220 | rc = gxe_bd_write_block(offset, now, buf); |
|
- | 221 | ||
- | 222 | if (rc != EOK) |
|
- | 223 | return rc; |
|
- | 224 | ||
- | 225 | buf += block_size; |
|
- | 226 | offset += block_size; |
|
- | 227 | ||
- | 228 | if (size > block_size) |
|
- | 229 | size -= block_size; |
|
- | 230 | else |
|
- | 231 | size = 0; |
|
- | 232 | } |
|
- | 233 | ||
- | 234 | return EOK; |
|
- | 235 | } |
|
- | 236 | ||
206 | static int gxe_bd_read_block(uint64_t offset, size_t block_size, void *buf) |
237 | static int gxe_bd_read_block(uint64_t offset, size_t size, void *buf) |
207 | { |
238 | { |
208 | uint32_t status; |
239 | uint32_t status; |
209 | size_t i; |
240 | size_t i; |
210 | uint32_t w; |
241 | uint32_t w; |
211 | 242 | ||
212 | if (block_size != maxblock_size) { |
- | |
213 | printf("Failed: bs = %d, mbs = %d\n", block_size, |
- | |
214 | maxblock_size); |
- | |
215 | return EINVAL; |
- | |
216 | } |
- | |
217 | - | ||
218 | futex_down(&dev_futex); |
243 | futex_down(&dev_futex); |
219 | pio_write_32(&dev->offset_lo, (uint32_t) offset); |
244 | pio_write_32(&dev->offset_lo, (uint32_t) offset); |
220 | pio_write_32(&dev->offset_hi, offset >> 32); |
245 | pio_write_32(&dev->offset_hi, offset >> 32); |
221 | pio_write_32(&dev->disk_id, disk_id); |
246 | pio_write_32(&dev->disk_id, disk_id); |
222 | pio_write_32(&dev->control, CTL_READ_START); |
247 | pio_write_32(&dev->control, CTL_READ_START); |
223 | 248 | ||
224 | status = pio_read_32(&dev->status); |
249 | status = pio_read_32(&dev->status); |
225 | if (status == STATUS_FAILURE) { |
250 | if (status == STATUS_FAILURE) { |
226 | return EIO; |
251 | return EIO; |
227 | } |
252 | } |
228 | 253 | ||
229 | for (i = 0; i < maxblock_size; i++) { |
254 | for (i = 0; i < size; i++) { |
230 | ((uint8_t *) buf)[i] = w = |
255 | ((uint8_t *) buf)[i] = w = |
231 | pio_read_8(&devbuf->buffer[i]); |
256 | pio_read_8(&devbuf->buffer[i]); |
232 | } |
257 | } |
233 | 258 | ||
234 | futex_up(&dev_futex); |
259 | futex_up(&dev_futex); |
235 | return EOK; |
260 | return EOK; |
236 | } |
261 | } |
237 | 262 | ||
238 | static int gxe_bd_write_block(uint64_t offset, size_t block_size, |
263 | static int gxe_bd_write_block(uint64_t offset, size_t size, const void *buf) |
239 | const void *buf) |
- | |
240 | { |
264 | { |
241 | uint32_t status; |
265 | uint32_t status; |
242 | size_t i; |
266 | size_t i; |
243 | uint32_t w; |
267 | uint32_t w; |
244 | 268 | ||
245 | if (block_size != maxblock_size) { |
- | |
246 | printf("Failed: bs = %d, mbs = %d\n", block_size, |
- | |
247 | maxblock_size); |
- | |
248 | return EINVAL; |
- | |
249 | } |
- | |
250 | - | ||
251 | for (i = 0; i < maxblock_size; i++) { |
269 | for (i = 0; i < size; i++) { |
252 | pio_write_8(&devbuf->buffer[i], ((const uint8_t *) buf)[i]); |
270 | pio_write_8(&devbuf->buffer[i], ((const uint8_t *) buf)[i]); |
253 | } |
271 | } |
254 | 272 | ||
255 | futex_down(&dev_futex); |
273 | futex_down(&dev_futex); |
256 | pio_write_32(&dev->offset_lo, (uint32_t) offset); |
274 | pio_write_32(&dev->offset_lo, (uint32_t) offset); |
257 | pio_write_32(&dev->offset_hi, offset >> 32); |
275 | pio_write_32(&dev->offset_hi, offset >> 32); |
258 | pio_write_32(&dev->disk_id, disk_id); |
276 | pio_write_32(&dev->disk_id, disk_id); |
259 | pio_write_32(&dev->control, CTL_WRITE_START); |
277 | pio_write_32(&dev->control, CTL_WRITE_START); |
260 | 278 | ||
261 | status = pio_read_32(&dev->status); |
279 | status = pio_read_32(&dev->status); |
262 | if (status == STATUS_FAILURE) { |
280 | if (status == STATUS_FAILURE) { |
263 | return EIO; |
281 | return EIO; |
264 | } |
282 | } |
265 | 283 | ||
266 | futex_up(&dev_futex); |
284 | futex_up(&dev_futex); |
267 | return EOK; |
285 | return EOK; |
268 | } |
286 | } |
269 | 287 | ||
270 | /** |
288 | /** |
271 | * @} |
289 | * @} |
272 | */ |
290 | */ |
273 | 291 |