diff options
author | Mikael Starvik <mikael.starvik@axis.com> | 2005-07-27 14:44:44 -0400 |
---|---|---|
committer | Linus Torvalds <torvalds@g5.osdl.org> | 2005-07-27 19:26:01 -0400 |
commit | 51533b615e605d86154ec1b4e585c8ca1b0b15b7 (patch) | |
tree | 4a6d7d8494d2017632d83624fb71b36031e0e7e5 /arch/cris/arch-v32/drivers | |
parent | 5d01e6ce785884a5db5792cd2e5bb36fa82fe23c (diff) |
[PATCH] CRIS update: new subarchitecture v32
New CRIS sub architecture named v32.
From: Dave Jones <davej@redhat.com>
Fix swapped kmalloc args
Signed-off-by: Mikael Starvik <starvik@axis.com>
Signed-off-by: Dave Jones <davej@redhat.com>
Signed-off-by: Andrew Morton <akpm@osdl.org>
Signed-off-by: Linus Torvalds <torvalds@osdl.org>
Diffstat (limited to 'arch/cris/arch-v32/drivers')
-rw-r--r-- | arch/cris/arch-v32/drivers/Kconfig | 625 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/Makefile | 13 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/axisflashmap.c | 455 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/cryptocop.c | 3522 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/gpio.c | 766 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/i2c.c | 611 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/i2c.h | 15 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/iop_fw_load.c | 219 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/nandflash.c | 157 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/pcf8563.c | 341 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/pci/Makefile | 5 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/pci/bios.c | 131 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/pci/dma.c | 149 | ||||
-rw-r--r-- | arch/cris/arch-v32/drivers/sync_serial.c | 1283 |
14 files changed, 8292 insertions, 0 deletions
diff --git a/arch/cris/arch-v32/drivers/Kconfig b/arch/cris/arch-v32/drivers/Kconfig new file mode 100644 index 000000000000..a33097f95362 --- /dev/null +++ b/arch/cris/arch-v32/drivers/Kconfig | |||
@@ -0,0 +1,625 @@ | |||
1 | config ETRAX_ETHERNET | ||
2 | bool "Ethernet support" | ||
3 | depends on ETRAX_ARCH_V32 | ||
4 | select NET_ETHERNET | ||
5 | help | ||
6 | This option enables the ETRAX FS built-in 10/100Mbit Ethernet | ||
7 | controller. | ||
8 | |||
9 | config ETRAX_ETHERNET_HW_CSUM | ||
10 | bool "Hardware accelerated ethernet checksum and scatter/gather" | ||
11 | depends on ETRAX_ETHERNET | ||
12 | depends on ETRAX_STREAMCOPROC | ||
13 | default y | ||
14 | help | ||
15 | Hardware acceleration of checksumming and scatter/gather | ||
16 | |||
17 | config ETRAX_ETHERNET_IFACE0 | ||
18 | depends on ETRAX_ETHERNET | ||
19 | bool "Enable network interface 0" | ||
20 | |||
21 | config ETRAX_ETHERNET_IFACE1 | ||
22 | depends on ETRAX_ETHERNET | ||
23 | bool "Enable network interface 1 (uses DMA6 and DMA7)" | ||
24 | |||
25 | choice | ||
26 | prompt "Network LED behavior" | ||
27 | depends on ETRAX_ETHERNET | ||
28 | default ETRAX_NETWORK_LED_ON_WHEN_ACTIVITY | ||
29 | |||
30 | config ETRAX_NETWORK_LED_ON_WHEN_LINK | ||
31 | bool "LED_on_when_link" | ||
32 | help | ||
33 | Selecting LED_on_when_link will light the LED when there is a | ||
34 | connection and will flash off when there is activity. | ||
35 | |||
36 | Selecting LED_on_when_activity will light the LED only when | ||
37 | there is activity. | ||
38 | |||
39 | This setting will also affect the behaviour of other activity LEDs | ||
40 | e.g. Bluetooth. | ||
41 | |||
42 | config ETRAX_NETWORK_LED_ON_WHEN_ACTIVITY | ||
43 | bool "LED_on_when_activity" | ||
44 | help | ||
45 | Selecting LED_on_when_link will light the LED when there is a | ||
46 | connection and will flash off when there is activity. | ||
47 | |||
48 | Selecting LED_on_when_activity will light the LED only when | ||
49 | there is activity. | ||
50 | |||
51 | This setting will also affect the behaviour of other activity LEDs | ||
52 | e.g. Bluetooth. | ||
53 | |||
54 | endchoice | ||
55 | |||
56 | config ETRAXFS_SERIAL | ||
57 | bool "Serial-port support" | ||
58 | depends on ETRAX_ARCH_V32 | ||
59 | help | ||
60 | Enables the ETRAX FS serial driver for ser0 (ttyS0) | ||
61 | You probably want this enabled. | ||
62 | |||
63 | config ETRAX_SERIAL_PORT0 | ||
64 | bool "Serial port 0 enabled" | ||
65 | depends on ETRAXFS_SERIAL | ||
66 | help | ||
67 | Enables the ETRAX FS serial driver for ser0 (ttyS0) | ||
68 | Normally you want this on. You can control what DMA channels to use | ||
69 | if you do not need DMA to something else. | ||
70 | ser0 can use dma4 or dma6 for output and dma5 or dma7 for input. | ||
71 | |||
72 | choice | ||
73 | prompt "Ser0 DMA in channel " | ||
74 | depends on ETRAX_SERIAL_PORT0 | ||
75 | default ETRAX_SERIAL_PORT0_NO_DMA_IN | ||
76 | help | ||
77 | What DMA channel to use for ser0. | ||
78 | |||
79 | |||
80 | config ETRAX_SERIAL_PORT0_NO_DMA_IN | ||
81 | bool "Ser0 uses no DMA for input" | ||
82 | help | ||
83 | Do not use DMA for ser0 input. | ||
84 | |||
85 | config ETRAX_SERIAL_PORT0_DMA7_IN | ||
86 | bool "Ser0 uses DMA7 for input" | ||
87 | depends on ETRAX_SERIAL_PORT0 | ||
88 | help | ||
89 | Enables the DMA7 input channel for ser0 (ttyS0). | ||
90 | If you do not enable DMA, an interrupt for each character will be | ||
91 | used when receiveing data. | ||
92 | Normally you want to use DMA, unless you use the DMA channel for | ||
93 | something else. | ||
94 | |||
95 | endchoice | ||
96 | |||
97 | choice | ||
98 | prompt "Ser0 DMA out channel" | ||
99 | depends on ETRAX_SERIAL_PORT0 | ||
100 | default ETRAX_SERIAL_PORT0_NO_DMA_OUT | ||
101 | |||
102 | config ETRAX_SERIAL_PORT0_NO_DMA_OUT | ||
103 | bool "Ser0 uses no DMA for output" | ||
104 | help | ||
105 | Do not use DMA for ser0 output. | ||
106 | |||
107 | config ETRAX_SERIAL_PORT0_DMA6_OUT | ||
108 | bool "Ser0 uses DMA6 for output" | ||
109 | depends on ETRAX_SERIAL_PORT0 | ||
110 | help | ||
111 | Enables the DMA6 output channel for ser0 (ttyS0). | ||
112 | If you do not enable DMA, an interrupt for each character will be | ||
113 | used when transmitting data. | ||
114 | Normally you want to use DMA, unless you use the DMA channel for | ||
115 | something else. | ||
116 | |||
117 | endchoice | ||
118 | |||
119 | config ETRAX_SER0_DTR_BIT | ||
120 | string "Ser 0 DTR bit (empty = not used)" | ||
121 | depends on ETRAX_SERIAL_PORT0 | ||
122 | |||
123 | config ETRAX_SER0_RI_BIT | ||
124 | string "Ser 0 RI bit (empty = not used)" | ||
125 | depends on ETRAX_SERIAL_PORT0 | ||
126 | |||
127 | config ETRAX_SER0_DSR_BIT | ||
128 | string "Ser 0 DSR bit (empty = not used)" | ||
129 | depends on ETRAX_SERIAL_PORT0 | ||
130 | |||
131 | config ETRAX_SER0_CD_BIT | ||
132 | string "Ser 0 CD bit (empty = not used)" | ||
133 | depends on ETRAX_SERIAL_PORT0 | ||
134 | |||
135 | config ETRAX_SERIAL_PORT1 | ||
136 | bool "Serial port 1 enabled" | ||
137 | depends on ETRAXFS_SERIAL | ||
138 | help | ||
139 | Enables the ETRAX FS serial driver for ser1 (ttyS1). | ||
140 | |||
141 | choice | ||
142 | prompt "Ser1 DMA in channel " | ||
143 | depends on ETRAX_SERIAL_PORT1 | ||
144 | default ETRAX_SERIAL_PORT1_NO_DMA_IN | ||
145 | help | ||
146 | What DMA channel to use for ser1. | ||
147 | |||
148 | |||
149 | config ETRAX_SERIAL_PORT1_NO_DMA_IN | ||
150 | bool "Ser1 uses no DMA for input" | ||
151 | help | ||
152 | Do not use DMA for ser1 input. | ||
153 | |||
154 | config ETRAX_SERIAL_PORT1_DMA5_IN | ||
155 | bool "Ser1 uses DMA5 for input" | ||
156 | depends on ETRAX_SERIAL_PORT1 | ||
157 | help | ||
158 | Enables the DMA5 input channel for ser1 (ttyS1). | ||
159 | If you do not enable DMA, an interrupt for each character will be | ||
160 | used when receiveing data. | ||
161 | Normally you want this on, unless you use the DMA channel for | ||
162 | something else. | ||
163 | |||
164 | endchoice | ||
165 | |||
166 | choice | ||
167 | prompt "Ser1 DMA out channel " | ||
168 | depends on ETRAX_SERIAL_PORT1 | ||
169 | default ETRAX_SERIAL_PORT1_NO_DMA_OUT | ||
170 | help | ||
171 | What DMA channel to use for ser1. | ||
172 | |||
173 | config ETRAX_SERIAL_PORT1_NO_DMA_OUT | ||
174 | bool "Ser1 uses no DMA for output" | ||
175 | help | ||
176 | Do not use DMA for ser1 output. | ||
177 | |||
178 | config ETRAX_SERIAL_PORT1_DMA4_OUT | ||
179 | bool "Ser1 uses DMA4 for output" | ||
180 | depends on ETRAX_SERIAL_PORT1 | ||
181 | help | ||
182 | Enables the DMA4 output channel for ser1 (ttyS1). | ||
183 | If you do not enable DMA, an interrupt for each character will be | ||
184 | used when transmitting data. | ||
185 | Normally you want this on, unless you use the DMA channel for | ||
186 | something else. | ||
187 | |||
188 | endchoice | ||
189 | |||
190 | config ETRAX_SER1_DTR_BIT | ||
191 | string "Ser 1 DTR bit (empty = not used)" | ||
192 | depends on ETRAX_SERIAL_PORT1 | ||
193 | |||
194 | config ETRAX_SER1_RI_BIT | ||
195 | string "Ser 1 RI bit (empty = not used)" | ||
196 | depends on ETRAX_SERIAL_PORT1 | ||
197 | |||
198 | config ETRAX_SER1_DSR_BIT | ||
199 | string "Ser 1 DSR bit (empty = not used)" | ||
200 | depends on ETRAX_SERIAL_PORT1 | ||
201 | |||
202 | config ETRAX_SER1_CD_BIT | ||
203 | string "Ser 1 CD bit (empty = not used)" | ||
204 | depends on ETRAX_SERIAL_PORT1 | ||
205 | |||
206 | config ETRAX_SERIAL_PORT2 | ||
207 | bool "Serial port 2 enabled" | ||
208 | depends on ETRAXFS_SERIAL | ||
209 | help | ||
210 | Enables the ETRAX FS serial driver for ser2 (ttyS2). | ||
211 | |||
212 | choice | ||
213 | prompt "Ser2 DMA in channel " | ||
214 | depends on ETRAX_SERIAL_PORT2 | ||
215 | default ETRAX_SERIAL_PORT2_NO_DMA_IN | ||
216 | help | ||
217 | What DMA channel to use for ser2. | ||
218 | |||
219 | |||
220 | config ETRAX_SERIAL_PORT2_NO_DMA_IN | ||
221 | bool "Ser2 uses no DMA for input" | ||
222 | help | ||
223 | Do not use DMA for ser2 input. | ||
224 | |||
225 | config ETRAX_SERIAL_PORT2_DMA3_IN | ||
226 | bool "Ser2 uses DMA3 for input" | ||
227 | depends on ETRAX_SERIAL_PORT2 | ||
228 | help | ||
229 | Enables the DMA3 input channel for ser2 (ttyS2). | ||
230 | If you do not enable DMA, an interrupt for each character will be | ||
231 | used when receiveing data. | ||
232 | Normally you want to use DMA, unless you use the DMA channel for | ||
233 | something else. | ||
234 | |||
235 | endchoice | ||
236 | |||
237 | choice | ||
238 | prompt "Ser2 DMA out channel" | ||
239 | depends on ETRAX_SERIAL_PORT2 | ||
240 | default ETRAX_SERIAL_PORT2_NO_DMA_OUT | ||
241 | |||
242 | config ETRAX_SERIAL_PORT2_NO_DMA_OUT | ||
243 | bool "Ser2 uses no DMA for output" | ||
244 | help | ||
245 | Do not use DMA for ser2 output. | ||
246 | |||
247 | config ETRAX_SERIAL_PORT2_DMA2_OUT | ||
248 | bool "Ser2 uses DMA2 for output" | ||
249 | depends on ETRAX_SERIAL_PORT2 | ||
250 | help | ||
251 | Enables the DMA2 output channel for ser2 (ttyS2). | ||
252 | If you do not enable DMA, an interrupt for each character will be | ||
253 | used when transmitting data. | ||
254 | Normally you want to use DMA, unless you use the DMA channel for | ||
255 | something else. | ||
256 | |||
257 | endchoice | ||
258 | |||
259 | config ETRAX_SER2_DTR_BIT | ||
260 | string "Ser 2 DTR bit (empty = not used)" | ||
261 | depends on ETRAX_SERIAL_PORT2 | ||
262 | |||
263 | config ETRAX_SER2_RI_BIT | ||
264 | string "Ser 2 RI bit (empty = not used)" | ||
265 | depends on ETRAX_SERIAL_PORT2 | ||
266 | |||
267 | config ETRAX_SER2_DSR_BIT | ||
268 | string "Ser 2 DSR bit (empty = not used)" | ||
269 | depends on ETRAX_SERIAL_PORT2 | ||
270 | |||
271 | config ETRAX_SER2_CD_BIT | ||
272 | string "Ser 2 CD bit (empty = not used)" | ||
273 | depends on ETRAX_SERIAL_PORT2 | ||
274 | |||
275 | config ETRAX_SERIAL_PORT3 | ||
276 | bool "Serial port 3 enabled" | ||
277 | depends on ETRAXFS_SERIAL | ||
278 | help | ||
279 | Enables the ETRAX FS serial driver for ser3 (ttyS3). | ||
280 | |||
281 | choice | ||
282 | prompt "Ser3 DMA in channel " | ||
283 | depends on ETRAX_SERIAL_PORT3 | ||
284 | default ETRAX_SERIAL_PORT3_NO_DMA_IN | ||
285 | help | ||
286 | What DMA channel to use for ser3. | ||
287 | |||
288 | |||
289 | config ETRAX_SERIAL_PORT3_NO_DMA_IN | ||
290 | bool "Ser3 uses no DMA for input" | ||
291 | help | ||
292 | Do not use DMA for ser3 input. | ||
293 | |||
294 | config ETRAX_SERIAL_PORT3_DMA9_IN | ||
295 | bool "Ser3 uses DMA9 for input" | ||
296 | depends on ETRAX_SERIAL_PORT3 | ||
297 | help | ||
298 | Enables the DMA9 input channel for ser3 (ttyS3). | ||
299 | If you do not enable DMA, an interrupt for each character will be | ||
300 | used when receiveing data. | ||
301 | Normally you want to use DMA, unless you use the DMA channel for | ||
302 | something else. | ||
303 | |||
304 | endchoice | ||
305 | |||
306 | choice | ||
307 | prompt "Ser3 DMA out channel" | ||
308 | depends on ETRAX_SERIAL_PORT3 | ||
309 | default ETRAX_SERIAL_PORT3_NO_DMA_OUT | ||
310 | |||
311 | config ETRAX_SERIAL_PORT3_NO_DMA_OUT | ||
312 | bool "Ser3 uses no DMA for output" | ||
313 | help | ||
314 | Do not use DMA for ser3 output. | ||
315 | |||
316 | config ETRAX_SERIAL_PORT3_DMA8_OUT | ||
317 | bool "Ser3 uses DMA8 for output" | ||
318 | depends on ETRAX_SERIAL_PORT3 | ||
319 | help | ||
320 | Enables the DMA8 output channel for ser3 (ttyS3). | ||
321 | If you do not enable DMA, an interrupt for each character will be | ||
322 | used when transmitting data. | ||
323 | Normally you want to use DMA, unless you use the DMA channel for | ||
324 | something else. | ||
325 | |||
326 | endchoice | ||
327 | |||
328 | config ETRAX_SER3_DTR_BIT | ||
329 | string "Ser 3 DTR bit (empty = not used)" | ||
330 | depends on ETRAX_SERIAL_PORT3 | ||
331 | |||
332 | config ETRAX_SER3_RI_BIT | ||
333 | string "Ser 3 RI bit (empty = not used)" | ||
334 | depends on ETRAX_SERIAL_PORT3 | ||
335 | |||
336 | config ETRAX_SER3_DSR_BIT | ||
337 | string "Ser 3 DSR bit (empty = not used)" | ||
338 | depends on ETRAX_SERIAL_PORT3 | ||
339 | |||
340 | config ETRAX_SER3_CD_BIT | ||
341 | string "Ser 3 CD bit (empty = not used)" | ||
342 | depends on ETRAX_SERIAL_PORT3 | ||
343 | |||
344 | config ETRAX_RS485 | ||
345 | bool "RS-485 support" | ||
346 | depends on ETRAX_SERIAL | ||
347 | help | ||
348 | Enables support for RS-485 serial communication. For a primer on | ||
349 | RS-485, see <http://www.hw.cz/english/docs/rs485/rs485.html>. | ||
350 | |||
351 | config ETRAX_RS485_DISABLE_RECEIVER | ||
352 | bool "Disable serial receiver" | ||
353 | depends on ETRAX_RS485 | ||
354 | help | ||
355 | It is necessary to disable the serial receiver to avoid serial | ||
356 | loopback. Not all products are able to do this in software only. | ||
357 | Axis 2400/2401 must disable receiver. | ||
358 | |||
359 | config ETRAX_AXISFLASHMAP | ||
360 | bool "Axis flash-map support" | ||
361 | depends on ETRAX_ARCH_V32 | ||
362 | select MTD | ||
363 | select MTD_CFI | ||
364 | select MTD_CFI_AMDSTD | ||
365 | select MTD_OBSOLETE_CHIPS | ||
366 | select MTD_AMDSTD | ||
367 | select MTD_CHAR | ||
368 | select MTD_BLOCK | ||
369 | select MTD_PARTITIONS | ||
370 | select MTD_CONCAT | ||
371 | select MTD_COMPLEX_MAPPINGS | ||
372 | help | ||
373 | This option enables MTD mapping of flash devices. Needed to use | ||
374 | flash memories. If unsure, say Y. | ||
375 | |||
376 | config ETRAX_SYNCHRONOUS_SERIAL | ||
377 | bool "Synchronous serial-port support" | ||
378 | depends on ETRAX_ARCH_V32 | ||
379 | help | ||
380 | Enables the ETRAX FS synchronous serial driver. | ||
381 | |||
382 | config ETRAX_SYNCHRONOUS_SERIAL_PORT0 | ||
383 | bool "Synchronous serial port 0 enabled" | ||
384 | depends on ETRAX_SYNCHRONOUS_SERIAL | ||
385 | help | ||
386 | Enabled synchronous serial port 0. | ||
387 | |||
388 | config ETRAX_SYNCHRONOUS_SERIAL0_DMA | ||
389 | bool "Enable DMA on synchronous serial port 0." | ||
390 | depends on ETRAX_SYNCHRONOUS_SERIAL_PORT0 | ||
391 | help | ||
392 | A synchronous serial port can run in manual or DMA mode. | ||
393 | Selecting this option will make it run in DMA mode. | ||
394 | |||
395 | config ETRAX_SYNCHRONOUS_SERIAL_PORT1 | ||
396 | bool "Synchronous serial port 1 enabled" | ||
397 | depends on ETRAX_SYNCHRONOUS_SERIAL | ||
398 | help | ||
399 | Enabled synchronous serial port 1. | ||
400 | |||
401 | config ETRAX_SYNCHRONOUS_SERIAL1_DMA | ||
402 | bool "Enable DMA on synchronous serial port 1." | ||
403 | depends on ETRAX_SYNCHRONOUS_SERIAL_PORT1 | ||
404 | help | ||
405 | A synchronous serial port can run in manual or DMA mode. | ||
406 | Selecting this option will make it run in DMA mode. | ||
407 | |||
408 | config ETRAX_PTABLE_SECTOR | ||
409 | int "Byte-offset of partition table sector" | ||
410 | depends on ETRAX_AXISFLASHMAP | ||
411 | default "65536" | ||
412 | help | ||
413 | Byte-offset of the partition table in the first flash chip. | ||
414 | The default value is 64kB and should not be changed unless | ||
415 | you know exactly what you are doing. The only valid reason | ||
416 | for changing this is when the flash block size is bigger | ||
417 | than 64kB (e.g. when using two parallel 16 bit flashes). | ||
418 | |||
419 | config ETRAX_NANDFLASH | ||
420 | bool "NAND flash support" | ||
421 | depends on ETRAX_ARCH_V32 | ||
422 | select MTD_NAND | ||
423 | select MTD_NAND_IDS | ||
424 | help | ||
425 | This option enables MTD mapping of NAND flash devices. Needed to use | ||
426 | NAND flash memories. If unsure, say Y. | ||
427 | |||
428 | config ETRAX_I2C | ||
429 | bool "I2C driver" | ||
430 | depends on ETRAX_ARCH_V32 | ||
431 | help | ||
432 | This option enabled the I2C driver used by e.g. the RTC driver. | ||
433 | |||
434 | config ETRAX_I2C_DATA_PORT | ||
435 | string "I2C data pin" | ||
436 | depends on ETRAX_I2C | ||
437 | help | ||
438 | The pin to use for I2C data. | ||
439 | |||
440 | config ETRAX_I2C_CLK_PORT | ||
441 | string "I2C clock pin" | ||
442 | depends on ETRAX_I2C | ||
443 | help | ||
444 | The pin to use for I2C clock. | ||
445 | |||
446 | config ETRAX_RTC | ||
447 | bool "Real Time Clock support" | ||
448 | depends on ETRAX_ARCH_V32 | ||
449 | help | ||
450 | Enabled RTC support. | ||
451 | |||
452 | choice | ||
453 | prompt "RTC chip" | ||
454 | depends on ETRAX_RTC | ||
455 | default ETRAX_PCF8563 | ||
456 | |||
457 | config ETRAX_PCF8563 | ||
458 | bool "PCF8563" | ||
459 | help | ||
460 | Philips PCF8563 RTC | ||
461 | |||
462 | endchoice | ||
463 | |||
464 | config ETRAX_GPIO | ||
465 | bool "GPIO support" | ||
466 | depends on ETRAX_ARCH_V32 | ||
467 | ---help--- | ||
468 | Enables the ETRAX general port device (major 120, minors 0-4). | ||
469 | You can use this driver to access the general port bits. It supports | ||
470 | these ioctl's: | ||
471 | #include <linux/etraxgpio.h> | ||
472 | fd = open("/dev/gpioa", O_RDWR); // or /dev/gpiob | ||
473 | ioctl(fd, _IO(ETRAXGPIO_IOCTYPE, IO_SETBITS), bits_to_set); | ||
474 | ioctl(fd, _IO(ETRAXGPIO_IOCTYPE, IO_CLRBITS), bits_to_clear); | ||
475 | err = ioctl(fd, _IO(ETRAXGPIO_IOCTYPE, IO_READ_INBITS), &val); | ||
476 | Remember that you need to setup the port directions appropriately in | ||
477 | the General configuration. | ||
478 | |||
479 | config ETRAX_PA_BUTTON_BITMASK | ||
480 | hex "PA-buttons bitmask" | ||
481 | depends on ETRAX_GPIO | ||
482 | default "0x02" | ||
483 | help | ||
484 | This is a bitmask (8 bits) with information about what bits on PA | ||
485 | that are used for buttons. | ||
486 | Most products has a so called TEST button on PA1, if that is true | ||
487 | use 0x02 here. | ||
488 | Use 00 if there are no buttons on PA. | ||
489 | If the bitmask is <> 00 a button driver will be included in the gpio | ||
490 | driver. ETRAX general I/O support must be enabled. | ||
491 | |||
492 | config ETRAX_PA_CHANGEABLE_DIR | ||
493 | hex "PA user changeable dir mask" | ||
494 | depends on ETRAX_GPIO | ||
495 | default "0x00" | ||
496 | help | ||
497 | This is a bitmask (8 bits) with information of what bits in PA that a | ||
498 | user can change direction on using ioctl's. | ||
499 | Bit set = changeable. | ||
500 | You probably want 0x00 here, but it depends on your hardware. | ||
501 | |||
502 | config ETRAX_PA_CHANGEABLE_BITS | ||
503 | hex "PA user changeable bits mask" | ||
504 | depends on ETRAX_GPIO | ||
505 | default "0x00" | ||
506 | help | ||
507 | This is a bitmask (8 bits) with information of what bits in PA | ||
508 | that a user can change the value on using ioctl's. | ||
509 | Bit set = changeable. | ||
510 | |||
511 | config ETRAX_PB_CHANGEABLE_DIR | ||
512 | hex "PB user changeable dir mask" | ||
513 | depends on ETRAX_GPIO | ||
514 | default "0x00000" | ||
515 | help | ||
516 | This is a bitmask (18 bits) with information of what bits in PB | ||
517 | that a user can change direction on using ioctl's. | ||
518 | Bit set = changeable. | ||
519 | You probably want 0x00000 here, but it depends on your hardware. | ||
520 | |||
521 | config ETRAX_PB_CHANGEABLE_BITS | ||
522 | hex "PB user changeable bits mask" | ||
523 | depends on ETRAX_GPIO | ||
524 | default "0x00000" | ||
525 | help | ||
526 | This is a bitmask (18 bits) with information of what bits in PB | ||
527 | that a user can change the value on using ioctl's. | ||
528 | Bit set = changeable. | ||
529 | |||
530 | config ETRAX_PC_CHANGEABLE_DIR | ||
531 | hex "PC user changeable dir mask" | ||
532 | depends on ETRAX_GPIO | ||
533 | default "0x00000" | ||
534 | help | ||
535 | This is a bitmask (18 bits) with information of what bits in PC | ||
536 | that a user can change direction on using ioctl's. | ||
537 | Bit set = changeable. | ||
538 | You probably want 0x00000 here, but it depends on your hardware. | ||
539 | |||
540 | config ETRAX_PC_CHANGEABLE_BITS | ||
541 | hex "PC user changeable bits mask" | ||
542 | depends on ETRAX_GPIO | ||
543 | default "0x00000" | ||
544 | help | ||
545 | This is a bitmask (18 bits) with information of what bits in PC | ||
546 | that a user can change the value on using ioctl's. | ||
547 | Bit set = changeable. | ||
548 | |||
549 | config ETRAX_PD_CHANGEABLE_DIR | ||
550 | hex "PD user changeable dir mask" | ||
551 | depends on ETRAX_GPIO | ||
552 | default "0x00000" | ||
553 | help | ||
554 | This is a bitmask (18 bits) with information of what bits in PD | ||
555 | that a user can change direction on using ioctl's. | ||
556 | Bit set = changeable. | ||
557 | You probably want 0x00000 here, but it depends on your hardware. | ||
558 | |||
559 | config ETRAX_PD_CHANGEABLE_BITS | ||
560 | hex "PD user changeable bits mask" | ||
561 | depends on ETRAX_GPIO | ||
562 | default "0x00000" | ||
563 | help | ||
564 | This is a bitmask (18 bits) with information of what bits in PD | ||
565 | that a user can change the value on using ioctl's. | ||
566 | Bit set = changeable. | ||
567 | |||
568 | config ETRAX_PE_CHANGEABLE_DIR | ||
569 | hex "PE user changeable dir mask" | ||
570 | depends on ETRAX_GPIO | ||
571 | default "0x00000" | ||
572 | help | ||
573 | This is a bitmask (18 bits) with information of what bits in PE | ||
574 | that a user can change direction on using ioctl's. | ||
575 | Bit set = changeable. | ||
576 | You probably want 0x00000 here, but it depends on your hardware. | ||
577 | |||
578 | config ETRAX_PE_CHANGEABLE_BITS | ||
579 | hex "PE user changeable bits mask" | ||
580 | depends on ETRAX_GPIO | ||
581 | default "0x00000" | ||
582 | help | ||
583 | This is a bitmask (18 bits) with information of what bits in PE | ||
584 | that a user can change the value on using ioctl's. | ||
585 | Bit set = changeable. | ||
586 | |||
587 | config ETRAX_IDE | ||
588 | bool "ATA/IDE support" | ||
589 | depends on ETRAX_ARCH_V32 | ||
590 | select IDE | ||
591 | select BLK_DEV_IDE | ||
592 | select BLK_DEV_IDEDISK | ||
593 | select BLK_DEV_IDECD | ||
594 | select BLK_DEV_IDEDMA | ||
595 | help | ||
596 | Enables the ETRAX IDE driver. | ||
597 | |||
598 | config ETRAX_CARDBUS | ||
599 | bool "Cardbus support" | ||
600 | depends on ETRAX_ARCH_V32 | ||
601 | select PCCARD | ||
602 | select CARDBUS | ||
603 | select HOTPLUG | ||
604 | select PCCARD_NONSTATIC | ||
605 | help | ||
606 | Enabled the ETRAX Carbus driver. | ||
607 | |||
608 | config PCI | ||
609 | bool | ||
610 | depends on ETRAX_CARDBUS | ||
611 | default y | ||
612 | |||
613 | config ETRAX_IOP_FW_LOAD | ||
614 | tristate "IO-processor hotplug firmware loading support" | ||
615 | depends on ETRAX_ARCH_V32 | ||
616 | select FW_LOADER | ||
617 | help | ||
618 | Enables IO-processor hotplug firmware loading support. | ||
619 | |||
620 | config ETRAX_STREAMCOPROC | ||
621 | tristate "Stream co-processor driver enabled" | ||
622 | depends on ETRAX_ARCH_V32 | ||
623 | help | ||
624 | This option enables a driver for the stream co-processor | ||
625 | for cryptographic operations. | ||
diff --git a/arch/cris/arch-v32/drivers/Makefile b/arch/cris/arch-v32/drivers/Makefile new file mode 100644 index 000000000000..a359cd20ae75 --- /dev/null +++ b/arch/cris/arch-v32/drivers/Makefile | |||
@@ -0,0 +1,13 @@ | |||
1 | # | ||
2 | # Makefile for Etrax-specific drivers | ||
3 | # | ||
4 | |||
5 | obj-$(CONFIG_ETRAX_STREAMCOPROC) += cryptocop.o | ||
6 | obj-$(CONFIG_ETRAX_AXISFLASHMAP) += axisflashmap.o | ||
7 | obj-$(CONFIG_ETRAX_NANDFLASH) += nandflash.o | ||
8 | obj-$(CONFIG_ETRAX_GPIO) += gpio.o | ||
9 | obj-$(CONFIG_ETRAX_IOP_FW_LOAD) += iop_fw_load.o | ||
10 | obj-$(CONFIG_ETRAX_PCF8563) += pcf8563.o | ||
11 | obj-$(CONFIG_ETRAX_I2C) += i2c.o | ||
12 | obj-$(CONFIG_ETRAX_SYNCHRONOUS_SERIAL) += sync_serial.o | ||
13 | obj-$(CONFIG_PCI) += pci/ | ||
diff --git a/arch/cris/arch-v32/drivers/axisflashmap.c b/arch/cris/arch-v32/drivers/axisflashmap.c new file mode 100644 index 000000000000..78ed52b1cdac --- /dev/null +++ b/arch/cris/arch-v32/drivers/axisflashmap.c | |||
@@ -0,0 +1,455 @@ | |||
1 | /* | ||
2 | * Physical mapping layer for MTD using the Axis partitiontable format | ||
3 | * | ||
4 | * Copyright (c) 2001, 2002, 2003 Axis Communications AB | ||
5 | * | ||
6 | * This file is under the GPL. | ||
7 | * | ||
8 | * First partition is always sector 0 regardless of if we find a partitiontable | ||
9 | * or not. In the start of the next sector, there can be a partitiontable that | ||
10 | * tells us what other partitions to define. If there isn't, we use a default | ||
11 | * partition split defined below. | ||
12 | * | ||
13 | * Copy of os/lx25/arch/cris/arch-v10/drivers/axisflashmap.c 1.5 | ||
14 | * with minor changes. | ||
15 | * | ||
16 | */ | ||
17 | |||
18 | #include <linux/module.h> | ||
19 | #include <linux/types.h> | ||
20 | #include <linux/kernel.h> | ||
21 | #include <linux/config.h> | ||
22 | #include <linux/init.h> | ||
23 | |||
24 | #include <linux/mtd/concat.h> | ||
25 | #include <linux/mtd/map.h> | ||
26 | #include <linux/mtd/mtd.h> | ||
27 | #include <linux/mtd/mtdram.h> | ||
28 | #include <linux/mtd/partitions.h> | ||
29 | |||
30 | #include <asm/arch/hwregs/config_defs.h> | ||
31 | #include <asm/axisflashmap.h> | ||
32 | #include <asm/mmu.h> | ||
33 | |||
34 | #define MEM_CSE0_SIZE (0x04000000) | ||
35 | #define MEM_CSE1_SIZE (0x04000000) | ||
36 | |||
37 | #define FLASH_UNCACHED_ADDR KSEG_E | ||
38 | #define FLASH_CACHED_ADDR KSEG_F | ||
39 | |||
40 | #if CONFIG_ETRAX_FLASH_BUSWIDTH==1 | ||
41 | #define flash_data __u8 | ||
42 | #elif CONFIG_ETRAX_FLASH_BUSWIDTH==2 | ||
43 | #define flash_data __u16 | ||
44 | #elif CONFIG_ETRAX_FLASH_BUSWIDTH==4 | ||
45 | #define flash_data __u16 | ||
46 | #endif | ||
47 | |||
48 | /* From head.S */ | ||
49 | extern unsigned long romfs_start, romfs_length, romfs_in_flash; | ||
50 | |||
51 | /* The master mtd for the entire flash. */ | ||
52 | struct mtd_info* axisflash_mtd = NULL; | ||
53 | |||
54 | /* Map driver functions. */ | ||
55 | |||
56 | static map_word flash_read(struct map_info *map, unsigned long ofs) | ||
57 | { | ||
58 | map_word tmp; | ||
59 | tmp.x[0] = *(flash_data *)(map->map_priv_1 + ofs); | ||
60 | return tmp; | ||
61 | } | ||
62 | |||
63 | static void flash_copy_from(struct map_info *map, void *to, | ||
64 | unsigned long from, ssize_t len) | ||
65 | { | ||
66 | memcpy(to, (void *)(map->map_priv_1 + from), len); | ||
67 | } | ||
68 | |||
69 | static void flash_write(struct map_info *map, map_word d, unsigned long adr) | ||
70 | { | ||
71 | *(flash_data *)(map->map_priv_1 + adr) = (flash_data)d.x[0]; | ||
72 | } | ||
73 | |||
74 | /* | ||
75 | * The map for chip select e0. | ||
76 | * | ||
77 | * We run into tricky coherence situations if we mix cached with uncached | ||
78 | * accesses to we only use the uncached version here. | ||
79 | * | ||
80 | * The size field is the total size where the flash chips may be mapped on the | ||
81 | * chip select. MTD probes should find all devices there and it does not matter | ||
82 | * if there are unmapped gaps or aliases (mirrors of flash devices). The MTD | ||
83 | * probes will ignore them. | ||
84 | * | ||
85 | * The start address in map_priv_1 is in virtual memory so we cannot use | ||
86 | * MEM_CSE0_START but must rely on that FLASH_UNCACHED_ADDR is the start | ||
87 | * address of cse0. | ||
88 | */ | ||
89 | static struct map_info map_cse0 = { | ||
90 | .name = "cse0", | ||
91 | .size = MEM_CSE0_SIZE, | ||
92 | .bankwidth = CONFIG_ETRAX_FLASH_BUSWIDTH, | ||
93 | .read = flash_read, | ||
94 | .copy_from = flash_copy_from, | ||
95 | .write = flash_write, | ||
96 | .map_priv_1 = FLASH_UNCACHED_ADDR | ||
97 | }; | ||
98 | |||
99 | /* | ||
100 | * The map for chip select e1. | ||
101 | * | ||
102 | * If there was a gap between cse0 and cse1, map_priv_1 would get the wrong | ||
103 | * address, but there isn't. | ||
104 | */ | ||
105 | static struct map_info map_cse1 = { | ||
106 | .name = "cse1", | ||
107 | .size = MEM_CSE1_SIZE, | ||
108 | .bankwidth = CONFIG_ETRAX_FLASH_BUSWIDTH, | ||
109 | .read = flash_read, | ||
110 | .copy_from = flash_copy_from, | ||
111 | .write = flash_write, | ||
112 | .map_priv_1 = FLASH_UNCACHED_ADDR + MEM_CSE0_SIZE | ||
113 | }; | ||
114 | |||
115 | /* If no partition-table was found, we use this default-set. */ | ||
116 | #define MAX_PARTITIONS 7 | ||
117 | #define NUM_DEFAULT_PARTITIONS 3 | ||
118 | |||
119 | /* | ||
120 | * Default flash size is 2MB. CONFIG_ETRAX_PTABLE_SECTOR is most likely the | ||
121 | * size of one flash block and "filesystem"-partition needs 5 blocks to be able | ||
122 | * to use JFFS. | ||
123 | */ | ||
124 | static struct mtd_partition axis_default_partitions[NUM_DEFAULT_PARTITIONS] = { | ||
125 | { | ||
126 | .name = "boot firmware", | ||
127 | .size = CONFIG_ETRAX_PTABLE_SECTOR, | ||
128 | .offset = 0 | ||
129 | }, | ||
130 | { | ||
131 | .name = "kernel", | ||
132 | .size = 0x200000 - (6 * CONFIG_ETRAX_PTABLE_SECTOR), | ||
133 | .offset = CONFIG_ETRAX_PTABLE_SECTOR | ||
134 | }, | ||
135 | { | ||
136 | .name = "filesystem", | ||
137 | .size = 5 * CONFIG_ETRAX_PTABLE_SECTOR, | ||
138 | .offset = 0x200000 - (5 * CONFIG_ETRAX_PTABLE_SECTOR) | ||
139 | } | ||
140 | }; | ||
141 | |||
142 | /* Initialize the ones normally used. */ | ||
143 | static struct mtd_partition axis_partitions[MAX_PARTITIONS] = { | ||
144 | { | ||
145 | .name = "part0", | ||
146 | .size = CONFIG_ETRAX_PTABLE_SECTOR, | ||
147 | .offset = 0 | ||
148 | }, | ||
149 | { | ||
150 | .name = "part1", | ||
151 | .size = 0, | ||
152 | .offset = 0 | ||
153 | }, | ||
154 | { | ||
155 | .name = "part2", | ||
156 | .size = 0, | ||
157 | .offset = 0 | ||
158 | }, | ||
159 | { | ||
160 | .name = "part3", | ||
161 | .size = 0, | ||
162 | .offset = 0 | ||
163 | }, | ||
164 | { | ||
165 | .name = "part4", | ||
166 | .size = 0, | ||
167 | .offset = 0 | ||
168 | }, | ||
169 | { | ||
170 | .name = "part5", | ||
171 | .size = 0, | ||
172 | .offset = 0 | ||
173 | }, | ||
174 | { | ||
175 | .name = "part6", | ||
176 | .size = 0, | ||
177 | .offset = 0 | ||
178 | }, | ||
179 | }; | ||
180 | |||
181 | /* | ||
182 | * Probe a chip select for AMD-compatible (JEDEC) or CFI-compatible flash | ||
183 | * chips in that order (because the amd_flash-driver is faster). | ||
184 | */ | ||
185 | static struct mtd_info *probe_cs(struct map_info *map_cs) | ||
186 | { | ||
187 | struct mtd_info *mtd_cs = NULL; | ||
188 | |||
189 | printk(KERN_INFO | ||
190 | "%s: Probing a 0x%08lx bytes large window at 0x%08lx.\n", | ||
191 | map_cs->name, map_cs->size, map_cs->map_priv_1); | ||
192 | |||
193 | #ifdef CONFIG_MTD_AMDSTD | ||
194 | mtd_cs = do_map_probe("amd_flash", map_cs); | ||
195 | #endif | ||
196 | #ifdef CONFIG_MTD_CFI | ||
197 | if (!mtd_cs) { | ||
198 | mtd_cs = do_map_probe("cfi_probe", map_cs); | ||
199 | } | ||
200 | #endif | ||
201 | |||
202 | return mtd_cs; | ||
203 | } | ||
204 | |||
205 | /* | ||
206 | * Probe each chip select individually for flash chips. If there are chips on | ||
207 | * both cse0 and cse1, the mtd_info structs will be concatenated to one struct | ||
208 | * so that MTD partitions can cross chip boundries. | ||
209 | * | ||
210 | * The only known restriction to how you can mount your chips is that each | ||
211 | * chip select must hold similar flash chips. But you need external hardware | ||
212 | * to do that anyway and you can put totally different chips on cse0 and cse1 | ||
213 | * so it isn't really much of a restriction. | ||
214 | */ | ||
215 | extern struct mtd_info* __init crisv32_nand_flash_probe (void); | ||
216 | static struct mtd_info *flash_probe(void) | ||
217 | { | ||
218 | struct mtd_info *mtd_cse0; | ||
219 | struct mtd_info *mtd_cse1; | ||
220 | struct mtd_info *mtd_nand = NULL; | ||
221 | struct mtd_info *mtd_total; | ||
222 | struct mtd_info *mtds[3]; | ||
223 | int count = 0; | ||
224 | |||
225 | if ((mtd_cse0 = probe_cs(&map_cse0)) != NULL) | ||
226 | mtds[count++] = mtd_cse0; | ||
227 | if ((mtd_cse1 = probe_cs(&map_cse1)) != NULL) | ||
228 | mtds[count++] = mtd_cse1; | ||
229 | |||
230 | #ifdef CONFIG_ETRAX_NANDFLASH | ||
231 | if ((mtd_nand = crisv32_nand_flash_probe()) != NULL) | ||
232 | mtds[count++] = mtd_nand; | ||
233 | #endif | ||
234 | |||
235 | if (!mtd_cse0 && !mtd_cse1 && !mtd_nand) { | ||
236 | /* No chip found. */ | ||
237 | return NULL; | ||
238 | } | ||
239 | |||
240 | if (count > 1) { | ||
241 | #ifdef CONFIG_MTD_CONCAT | ||
242 | /* Since the concatenation layer adds a small overhead we | ||
243 | * could try to figure out if the chips in cse0 and cse1 are | ||
244 | * identical and reprobe the whole cse0+cse1 window. But since | ||
245 | * flash chips are slow, the overhead is relatively small. | ||
246 | * So we use the MTD concatenation layer instead of further | ||
247 | * complicating the probing procedure. | ||
248 | */ | ||
249 | mtd_total = mtd_concat_create(mtds, | ||
250 | count, | ||
251 | "cse0+cse1+nand"); | ||
252 | #else | ||
253 | printk(KERN_ERR "%s and %s: Cannot concatenate due to kernel " | ||
254 | "(mis)configuration!\n", map_cse0.name, map_cse1.name); | ||
255 | mtd_toal = NULL; | ||
256 | #endif | ||
257 | if (!mtd_total) { | ||
258 | printk(KERN_ERR "%s and %s: Concatenation failed!\n", | ||
259 | map_cse0.name, map_cse1.name); | ||
260 | |||
261 | /* The best we can do now is to only use what we found | ||
262 | * at cse0. | ||
263 | */ | ||
264 | mtd_total = mtd_cse0; | ||
265 | map_destroy(mtd_cse1); | ||
266 | } | ||
267 | } else { | ||
268 | mtd_total = mtd_cse0? mtd_cse0 : mtd_cse1 ? mtd_cse1 : mtd_nand; | ||
269 | |||
270 | } | ||
271 | |||
272 | return mtd_total; | ||
273 | } | ||
274 | |||
275 | extern unsigned long crisv32_nand_boot; | ||
276 | extern unsigned long crisv32_nand_cramfs_offset; | ||
277 | |||
278 | /* | ||
279 | * Probe the flash chip(s) and, if it succeeds, read the partition-table | ||
280 | * and register the partitions with MTD. | ||
281 | */ | ||
282 | static int __init init_axis_flash(void) | ||
283 | { | ||
284 | struct mtd_info *mymtd; | ||
285 | int err = 0; | ||
286 | int pidx = 0; | ||
287 | struct partitiontable_head *ptable_head = NULL; | ||
288 | struct partitiontable_entry *ptable; | ||
289 | int use_default_ptable = 1; /* Until proven otherwise. */ | ||
290 | const char *pmsg = KERN_INFO " /dev/flash%d at 0x%08x, size 0x%08x\n"; | ||
291 | static char page[512]; | ||
292 | size_t len; | ||
293 | |||
294 | #ifndef CONFIG_ETRAXFS_SIM | ||
295 | mymtd = flash_probe(); | ||
296 | mymtd->read(mymtd, CONFIG_ETRAX_PTABLE_SECTOR, 512, &len, page); | ||
297 | ptable_head = (struct partitiontable_head *)(page + PARTITION_TABLE_OFFSET); | ||
298 | |||
299 | if (!mymtd) { | ||
300 | /* There's no reason to use this module if no flash chip can | ||
301 | * be identified. Make sure that's understood. | ||
302 | */ | ||
303 | printk(KERN_INFO "axisflashmap: Found no flash chip.\n"); | ||
304 | } else { | ||
305 | printk(KERN_INFO "%s: 0x%08x bytes of flash memory.\n", | ||
306 | mymtd->name, mymtd->size); | ||
307 | axisflash_mtd = mymtd; | ||
308 | } | ||
309 | |||
310 | if (mymtd) { | ||
311 | mymtd->owner = THIS_MODULE; | ||
312 | } | ||
313 | pidx++; /* First partition is always set to the default. */ | ||
314 | |||
315 | if (ptable_head && (ptable_head->magic == PARTITION_TABLE_MAGIC) | ||
316 | && (ptable_head->size < | ||
317 | (MAX_PARTITIONS * sizeof(struct partitiontable_entry) + | ||
318 | PARTITIONTABLE_END_MARKER_SIZE)) | ||
319 | && (*(unsigned long*)((void*)ptable_head + sizeof(*ptable_head) + | ||
320 | ptable_head->size - | ||
321 | PARTITIONTABLE_END_MARKER_SIZE) | ||
322 | == PARTITIONTABLE_END_MARKER)) { | ||
323 | /* Looks like a start, sane length and end of a | ||
324 | * partition table, lets check csum etc. | ||
325 | */ | ||
326 | int ptable_ok = 0; | ||
327 | struct partitiontable_entry *max_addr = | ||
328 | (struct partitiontable_entry *) | ||
329 | ((unsigned long)ptable_head + sizeof(*ptable_head) + | ||
330 | ptable_head->size); | ||
331 | unsigned long offset = CONFIG_ETRAX_PTABLE_SECTOR; | ||
332 | unsigned char *p; | ||
333 | unsigned long csum = 0; | ||
334 | |||
335 | ptable = (struct partitiontable_entry *) | ||
336 | ((unsigned long)ptable_head + sizeof(*ptable_head)); | ||
337 | |||
338 | /* Lets be PARANOID, and check the checksum. */ | ||
339 | p = (unsigned char*) ptable; | ||
340 | |||
341 | while (p <= (unsigned char*)max_addr) { | ||
342 | csum += *p++; | ||
343 | csum += *p++; | ||
344 | csum += *p++; | ||
345 | csum += *p++; | ||
346 | } | ||
347 | ptable_ok = (csum == ptable_head->checksum); | ||
348 | |||
349 | /* Read the entries and use/show the info. */ | ||
350 | printk(KERN_INFO " Found a%s partition table at 0x%p-0x%p.\n", | ||
351 | (ptable_ok ? " valid" : "n invalid"), ptable_head, | ||
352 | max_addr); | ||
353 | |||
354 | /* We have found a working bootblock. Now read the | ||
355 | * partition table. Scan the table. It ends when | ||
356 | * there is 0xffffffff, that is, empty flash. | ||
357 | */ | ||
358 | while (ptable_ok | ||
359 | && ptable->offset != 0xffffffff | ||
360 | && ptable < max_addr | ||
361 | && pidx < MAX_PARTITIONS) { | ||
362 | |||
363 | axis_partitions[pidx].offset = offset + ptable->offset + (crisv32_nand_boot ? 16384 : 0); | ||
364 | axis_partitions[pidx].size = ptable->size; | ||
365 | |||
366 | printk(pmsg, pidx, axis_partitions[pidx].offset, | ||
367 | axis_partitions[pidx].size); | ||
368 | pidx++; | ||
369 | ptable++; | ||
370 | } | ||
371 | use_default_ptable = !ptable_ok; | ||
372 | } | ||
373 | |||
374 | if (romfs_in_flash) { | ||
375 | /* Add an overlapping device for the root partition (romfs). */ | ||
376 | |||
377 | axis_partitions[pidx].name = "romfs"; | ||
378 | if (crisv32_nand_boot) { | ||
379 | char* data = kmalloc(1024, GFP_KERNEL); | ||
380 | int len; | ||
381 | int offset = crisv32_nand_cramfs_offset & ~(1024-1); | ||
382 | char* tmp; | ||
383 | |||
384 | mymtd->read(mymtd, offset, 1024, &len, data); | ||
385 | tmp = &data[crisv32_nand_cramfs_offset % 512]; | ||
386 | axis_partitions[pidx].size = *(unsigned*)(tmp + 4); | ||
387 | axis_partitions[pidx].offset = crisv32_nand_cramfs_offset; | ||
388 | kfree(data); | ||
389 | } else { | ||
390 | axis_partitions[pidx].size = romfs_length; | ||
391 | axis_partitions[pidx].offset = romfs_start - FLASH_CACHED_ADDR; | ||
392 | } | ||
393 | |||
394 | axis_partitions[pidx].mask_flags |= MTD_WRITEABLE; | ||
395 | |||
396 | printk(KERN_INFO | ||
397 | " Adding readonly flash partition for romfs image:\n"); | ||
398 | printk(pmsg, pidx, axis_partitions[pidx].offset, | ||
399 | axis_partitions[pidx].size); | ||
400 | pidx++; | ||
401 | } | ||
402 | |||
403 | if (mymtd) { | ||
404 | if (use_default_ptable) { | ||
405 | printk(KERN_INFO " Using default partition table.\n"); | ||
406 | err = add_mtd_partitions(mymtd, axis_default_partitions, | ||
407 | NUM_DEFAULT_PARTITIONS); | ||
408 | } else { | ||
409 | err = add_mtd_partitions(mymtd, axis_partitions, pidx); | ||
410 | } | ||
411 | |||
412 | if (err) { | ||
413 | panic("axisflashmap could not add MTD partitions!\n"); | ||
414 | } | ||
415 | } | ||
416 | /* CONFIG_EXTRAXFS_SIM */ | ||
417 | #endif | ||
418 | |||
419 | if (!romfs_in_flash) { | ||
420 | /* Create an RAM device for the root partition (romfs). */ | ||
421 | |||
422 | #if !defined(CONFIG_MTD_MTDRAM) || (CONFIG_MTDRAM_TOTAL_SIZE != 0) || (CONFIG_MTDRAM_ABS_POS != 0) | ||
423 | /* No use trying to boot this kernel from RAM. Panic! */ | ||
424 | printk(KERN_EMERG "axisflashmap: Cannot create an MTD RAM " | ||
425 | "device due to kernel (mis)configuration!\n"); | ||
426 | panic("This kernel cannot boot from RAM!\n"); | ||
427 | #else | ||
428 | struct mtd_info *mtd_ram; | ||
429 | |||
430 | mtd_ram = (struct mtd_info *)kmalloc(sizeof(struct mtd_info), | ||
431 | GFP_KERNEL); | ||
432 | if (!mtd_ram) { | ||
433 | panic("axisflashmap couldn't allocate memory for " | ||
434 | "mtd_info!\n"); | ||
435 | } | ||
436 | |||
437 | printk(KERN_INFO " Adding RAM partition for romfs image:\n"); | ||
438 | printk(pmsg, pidx, romfs_start, romfs_length); | ||
439 | |||
440 | err = mtdram_init_device(mtd_ram, (void*)romfs_start, | ||
441 | romfs_length, "romfs"); | ||
442 | if (err) { | ||
443 | panic("axisflashmap could not initialize MTD RAM " | ||
444 | "device!\n"); | ||
445 | } | ||
446 | #endif | ||
447 | } | ||
448 | |||
449 | return err; | ||
450 | } | ||
451 | |||
452 | /* This adds the above to the kernels init-call chain. */ | ||
453 | module_init(init_axis_flash); | ||
454 | |||
455 | EXPORT_SYMBOL(axisflash_mtd); | ||
diff --git a/arch/cris/arch-v32/drivers/cryptocop.c b/arch/cris/arch-v32/drivers/cryptocop.c new file mode 100644 index 000000000000..ca72076c630a --- /dev/null +++ b/arch/cris/arch-v32/drivers/cryptocop.c | |||
@@ -0,0 +1,3522 @@ | |||
1 | /* $Id: cryptocop.c,v 1.13 2005/04/21 17:27:55 henriken Exp $ | ||
2 | * | ||
3 | * Stream co-processor driver for the ETRAX FS | ||
4 | * | ||
5 | * Copyright (C) 2003-2005 Axis Communications AB | ||
6 | */ | ||
7 | |||
8 | #include <linux/init.h> | ||
9 | #include <linux/sched.h> | ||
10 | #include <linux/module.h> | ||
11 | #include <linux/slab.h> | ||
12 | #include <linux/string.h> | ||
13 | #include <linux/fs.h> | ||
14 | #include <linux/mm.h> | ||
15 | #include <linux/spinlock.h> | ||
16 | #include <linux/stddef.h> | ||
17 | |||
18 | #include <asm/uaccess.h> | ||
19 | #include <asm/io.h> | ||
20 | #include <asm/atomic.h> | ||
21 | |||
22 | #include <linux/list.h> | ||
23 | #include <linux/interrupt.h> | ||
24 | |||
25 | #include <asm/signal.h> | ||
26 | #include <asm/irq.h> | ||
27 | |||
28 | #include <asm/arch/dma.h> | ||
29 | #include <asm/arch/hwregs/dma.h> | ||
30 | #include <asm/arch/hwregs/reg_map.h> | ||
31 | #include <asm/arch/hwregs/reg_rdwr.h> | ||
32 | #include <asm/arch/hwregs/intr_vect_defs.h> | ||
33 | |||
34 | #include <asm/arch/hwregs/strcop.h> | ||
35 | #include <asm/arch/hwregs/strcop_defs.h> | ||
36 | #include <asm/arch/cryptocop.h> | ||
37 | |||
38 | |||
39 | |||
40 | #define DESCR_ALLOC_PAD (31) | ||
41 | |||
42 | struct cryptocop_dma_desc { | ||
43 | char *free_buf; /* If non-null will be kfreed in free_cdesc() */ | ||
44 | dma_descr_data *dma_descr; | ||
45 | |||
46 | unsigned char dma_descr_buf[sizeof(dma_descr_data) + DESCR_ALLOC_PAD]; | ||
47 | |||
48 | unsigned int from_pool:1; /* If 1 'allocated' from the descriptor pool. */ | ||
49 | struct cryptocop_dma_desc *next; | ||
50 | }; | ||
51 | |||
52 | |||
53 | struct cryptocop_int_operation{ | ||
54 | void *alloc_ptr; | ||
55 | cryptocop_session_id sid; | ||
56 | |||
57 | dma_descr_context ctx_out; | ||
58 | dma_descr_context ctx_in; | ||
59 | |||
60 | /* DMA descriptors allocated by driver. */ | ||
61 | struct cryptocop_dma_desc *cdesc_out; | ||
62 | struct cryptocop_dma_desc *cdesc_in; | ||
63 | |||
64 | /* Strcop config to use. */ | ||
65 | cryptocop_3des_mode tdes_mode; | ||
66 | cryptocop_csum_type csum_mode; | ||
67 | |||
68 | /* DMA descrs provided by consumer. */ | ||
69 | dma_descr_data *ddesc_out; | ||
70 | dma_descr_data *ddesc_in; | ||
71 | }; | ||
72 | |||
73 | |||
74 | struct cryptocop_tfrm_ctx { | ||
75 | cryptocop_tfrm_id tid; | ||
76 | unsigned int blocklength; | ||
77 | |||
78 | unsigned int start_ix; | ||
79 | |||
80 | struct cryptocop_tfrm_cfg *tcfg; | ||
81 | struct cryptocop_transform_ctx *tctx; | ||
82 | |||
83 | unsigned char previous_src; | ||
84 | unsigned char current_src; | ||
85 | |||
86 | /* Values to use in metadata out. */ | ||
87 | unsigned char hash_conf; | ||
88 | unsigned char hash_mode; | ||
89 | unsigned char ciph_conf; | ||
90 | unsigned char cbcmode; | ||
91 | unsigned char decrypt; | ||
92 | |||
93 | unsigned int requires_padding:1; | ||
94 | unsigned int strict_block_length:1; | ||
95 | unsigned int active:1; | ||
96 | unsigned int done:1; | ||
97 | size_t consumed; | ||
98 | size_t produced; | ||
99 | |||
100 | /* Pad (input) descriptors to put in the DMA out list when the transform | ||
101 | * output is put on the DMA in list. */ | ||
102 | struct cryptocop_dma_desc *pad_descs; | ||
103 | |||
104 | struct cryptocop_tfrm_ctx *prev_src; | ||
105 | struct cryptocop_tfrm_ctx *curr_src; | ||
106 | |||
107 | /* Mapping to HW. */ | ||
108 | unsigned char unit_no; | ||
109 | }; | ||
110 | |||
111 | |||
112 | struct cryptocop_private{ | ||
113 | cryptocop_session_id sid; | ||
114 | struct cryptocop_private *next; | ||
115 | }; | ||
116 | |||
117 | /* Session list. */ | ||
118 | |||
119 | struct cryptocop_transform_ctx{ | ||
120 | struct cryptocop_transform_init init; | ||
121 | unsigned char dec_key[CRYPTOCOP_MAX_KEY_LENGTH]; | ||
122 | unsigned int dec_key_set:1; | ||
123 | |||
124 | struct cryptocop_transform_ctx *next; | ||
125 | }; | ||
126 | |||
127 | |||
128 | struct cryptocop_session{ | ||
129 | cryptocop_session_id sid; | ||
130 | |||
131 | struct cryptocop_transform_ctx *tfrm_ctx; | ||
132 | |||
133 | struct cryptocop_session *next; | ||
134 | }; | ||
135 | |||
136 | /* Priority levels for jobs sent to the cryptocop. Checksum operations from | ||
137 | kernel have highest priority since TCPIP stack processing must not | ||
138 | be a bottleneck. */ | ||
139 | typedef enum { | ||
140 | cryptocop_prio_kernel_csum = 0, | ||
141 | cryptocop_prio_kernel = 1, | ||
142 | cryptocop_prio_user = 2, | ||
143 | cryptocop_prio_no_prios = 3 | ||
144 | } cryptocop_queue_priority; | ||
145 | |||
146 | struct cryptocop_prio_queue{ | ||
147 | struct list_head jobs; | ||
148 | cryptocop_queue_priority prio; | ||
149 | }; | ||
150 | |||
151 | struct cryptocop_prio_job{ | ||
152 | struct list_head node; | ||
153 | cryptocop_queue_priority prio; | ||
154 | |||
155 | struct cryptocop_operation *oper; | ||
156 | struct cryptocop_int_operation *iop; | ||
157 | }; | ||
158 | |||
159 | struct ioctl_job_cb_ctx { | ||
160 | unsigned int processed:1; | ||
161 | }; | ||
162 | |||
163 | |||
164 | static struct cryptocop_session *cryptocop_sessions = NULL; | ||
165 | spinlock_t cryptocop_sessions_lock; | ||
166 | |||
167 | /* Next Session ID to assign. */ | ||
168 | static cryptocop_session_id next_sid = 1; | ||
169 | |||
170 | /* Pad for checksum. */ | ||
171 | static const char csum_zero_pad[1] = {0x00}; | ||
172 | |||
173 | /* Trash buffer for mem2mem operations. */ | ||
174 | #define MEM2MEM_DISCARD_BUF_LENGTH (512) | ||
175 | static unsigned char mem2mem_discard_buf[MEM2MEM_DISCARD_BUF_LENGTH]; | ||
176 | |||
177 | /* Descriptor pool. */ | ||
178 | /* FIXME Tweak this value. */ | ||
179 | #define CRYPTOCOP_DESCRIPTOR_POOL_SIZE (100) | ||
180 | static struct cryptocop_dma_desc descr_pool[CRYPTOCOP_DESCRIPTOR_POOL_SIZE]; | ||
181 | static struct cryptocop_dma_desc *descr_pool_free_list; | ||
182 | static int descr_pool_no_free; | ||
183 | static spinlock_t descr_pool_lock; | ||
184 | |||
185 | /* Lock to stop cryptocop to start processing of a new operation. The holder | ||
186 | of this lock MUST call cryptocop_start_job() after it is unlocked. */ | ||
187 | spinlock_t cryptocop_process_lock; | ||
188 | |||
189 | static struct cryptocop_prio_queue cryptocop_job_queues[cryptocop_prio_no_prios]; | ||
190 | static spinlock_t cryptocop_job_queue_lock; | ||
191 | static struct cryptocop_prio_job *cryptocop_running_job = NULL; | ||
192 | static spinlock_t running_job_lock; | ||
193 | |||
194 | /* The interrupt handler appends completed jobs to this list. The scehduled | ||
195 | * tasklet removes them upon sending the response to the crypto consumer. */ | ||
196 | static struct list_head cryptocop_completed_jobs; | ||
197 | static spinlock_t cryptocop_completed_jobs_lock; | ||
198 | |||
199 | DECLARE_WAIT_QUEUE_HEAD(cryptocop_ioc_process_wq); | ||
200 | |||
201 | |||
202 | /** Local functions. **/ | ||
203 | |||
204 | static int cryptocop_open(struct inode *, struct file *); | ||
205 | |||
206 | static int cryptocop_release(struct inode *, struct file *); | ||
207 | |||
208 | static int cryptocop_ioctl(struct inode *inode, struct file *file, | ||
209 | unsigned int cmd, unsigned long arg); | ||
210 | |||
211 | static void cryptocop_start_job(void); | ||
212 | |||
213 | static int cryptocop_job_queue_insert(cryptocop_queue_priority prio, struct cryptocop_operation *operation); | ||
214 | static int cryptocop_job_setup(struct cryptocop_prio_job **pj, struct cryptocop_operation *operation); | ||
215 | |||
216 | static int cryptocop_job_queue_init(void); | ||
217 | static void cryptocop_job_queue_close(void); | ||
218 | |||
219 | static int create_md5_pad(int alloc_flag, unsigned long long hashed_length, char **pad, size_t *pad_length); | ||
220 | |||
221 | static int create_sha1_pad(int alloc_flag, unsigned long long hashed_length, char **pad, size_t *pad_length); | ||
222 | |||
223 | static int transform_ok(struct cryptocop_transform_init *tinit); | ||
224 | |||
225 | static struct cryptocop_session *get_session(cryptocop_session_id sid); | ||
226 | |||
227 | static struct cryptocop_transform_ctx *get_transform_ctx(struct cryptocop_session *sess, cryptocop_tfrm_id tid); | ||
228 | |||
229 | static void delete_internal_operation(struct cryptocop_int_operation *iop); | ||
230 | |||
231 | static void get_aes_decrypt_key(unsigned char *dec_key, const unsigned char *key, unsigned int keylength); | ||
232 | |||
233 | static int init_stream_coprocessor(void); | ||
234 | |||
235 | static void __exit exit_stream_coprocessor(void); | ||
236 | |||
237 | /*#define LDEBUG*/ | ||
238 | #ifdef LDEBUG | ||
239 | #define DEBUG(s) s | ||
240 | #define DEBUG_API(s) s | ||
241 | static void print_cryptocop_operation(struct cryptocop_operation *cop); | ||
242 | static void print_dma_descriptors(struct cryptocop_int_operation *iop); | ||
243 | static void print_strcop_crypto_op(struct strcop_crypto_op *cop); | ||
244 | static void print_lock_status(void); | ||
245 | static void print_user_dma_lists(struct cryptocop_dma_list_operation *dma_op); | ||
246 | #define assert(s) do{if (!(s)) panic(#s);} while(0); | ||
247 | #else | ||
248 | #define DEBUG(s) | ||
249 | #define DEBUG_API(s) | ||
250 | #define assert(s) | ||
251 | #endif | ||
252 | |||
253 | |||
254 | /* Transform constants. */ | ||
255 | #define DES_BLOCK_LENGTH (8) | ||
256 | #define AES_BLOCK_LENGTH (16) | ||
257 | #define MD5_BLOCK_LENGTH (64) | ||
258 | #define SHA1_BLOCK_LENGTH (64) | ||
259 | #define CSUM_BLOCK_LENGTH (2) | ||
260 | #define MD5_STATE_LENGTH (16) | ||
261 | #define SHA1_STATE_LENGTH (20) | ||
262 | |||
263 | /* The device number. */ | ||
264 | #define CRYPTOCOP_MAJOR (254) | ||
265 | #define CRYPTOCOP_MINOR (0) | ||
266 | |||
267 | |||
268 | |||
269 | struct file_operations cryptocop_fops = { | ||
270 | owner: THIS_MODULE, | ||
271 | open: cryptocop_open, | ||
272 | release: cryptocop_release, | ||
273 | ioctl: cryptocop_ioctl | ||
274 | }; | ||
275 | |||
276 | |||
277 | static void free_cdesc(struct cryptocop_dma_desc *cdesc) | ||
278 | { | ||
279 | DEBUG(printk("free_cdesc: cdesc 0x%p, from_pool=%d\n", cdesc, cdesc->from_pool)); | ||
280 | if (cdesc->free_buf) kfree(cdesc->free_buf); | ||
281 | |||
282 | if (cdesc->from_pool) { | ||
283 | unsigned long int flags; | ||
284 | spin_lock_irqsave(&descr_pool_lock, flags); | ||
285 | cdesc->next = descr_pool_free_list; | ||
286 | descr_pool_free_list = cdesc; | ||
287 | ++descr_pool_no_free; | ||
288 | spin_unlock_irqrestore(&descr_pool_lock, flags); | ||
289 | } else { | ||
290 | kfree(cdesc); | ||
291 | } | ||
292 | } | ||
293 | |||
294 | |||
295 | static struct cryptocop_dma_desc *alloc_cdesc(int alloc_flag) | ||
296 | { | ||
297 | int use_pool = (alloc_flag & GFP_ATOMIC) ? 1 : 0; | ||
298 | struct cryptocop_dma_desc *cdesc; | ||
299 | |||
300 | if (use_pool) { | ||
301 | unsigned long int flags; | ||
302 | spin_lock_irqsave(&descr_pool_lock, flags); | ||
303 | if (!descr_pool_free_list) { | ||
304 | spin_unlock_irqrestore(&descr_pool_lock, flags); | ||
305 | DEBUG_API(printk("alloc_cdesc: pool is empty\n")); | ||
306 | return NULL; | ||
307 | } | ||
308 | cdesc = descr_pool_free_list; | ||
309 | descr_pool_free_list = descr_pool_free_list->next; | ||
310 | --descr_pool_no_free; | ||
311 | spin_unlock_irqrestore(&descr_pool_lock, flags); | ||
312 | cdesc->from_pool = 1; | ||
313 | } else { | ||
314 | cdesc = kmalloc(sizeof(struct cryptocop_dma_desc), alloc_flag); | ||
315 | if (!cdesc) { | ||
316 | DEBUG_API(printk("alloc_cdesc: kmalloc\n")); | ||
317 | return NULL; | ||
318 | } | ||
319 | cdesc->from_pool = 0; | ||
320 | } | ||
321 | cdesc->dma_descr = (dma_descr_data*)(((unsigned long int)cdesc + offsetof(struct cryptocop_dma_desc, dma_descr_buf) + DESCR_ALLOC_PAD) & ~0x0000001F); | ||
322 | |||
323 | cdesc->next = NULL; | ||
324 | |||
325 | cdesc->free_buf = NULL; | ||
326 | cdesc->dma_descr->out_eop = 0; | ||
327 | cdesc->dma_descr->in_eop = 0; | ||
328 | cdesc->dma_descr->intr = 0; | ||
329 | cdesc->dma_descr->eol = 0; | ||
330 | cdesc->dma_descr->wait = 0; | ||
331 | cdesc->dma_descr->buf = NULL; | ||
332 | cdesc->dma_descr->after = NULL; | ||
333 | |||
334 | DEBUG_API(printk("alloc_cdesc: return 0x%p, cdesc->dma_descr=0x%p, from_pool=%d\n", cdesc, cdesc->dma_descr, cdesc->from_pool)); | ||
335 | return cdesc; | ||
336 | } | ||
337 | |||
338 | |||
339 | static void setup_descr_chain(struct cryptocop_dma_desc *cd) | ||
340 | { | ||
341 | DEBUG(printk("setup_descr_chain: entering\n")); | ||
342 | while (cd) { | ||
343 | if (cd->next) { | ||
344 | cd->dma_descr->next = (dma_descr_data*)virt_to_phys(cd->next->dma_descr); | ||
345 | } else { | ||
346 | cd->dma_descr->next = NULL; | ||
347 | } | ||
348 | cd = cd->next; | ||
349 | } | ||
350 | DEBUG(printk("setup_descr_chain: exit\n")); | ||
351 | } | ||
352 | |||
353 | |||
354 | /* Create a pad descriptor for the transform. | ||
355 | * Return -1 for error, 0 if pad created. */ | ||
356 | static int create_pad_descriptor(struct cryptocop_tfrm_ctx *tc, struct cryptocop_dma_desc **pad_desc, int alloc_flag) | ||
357 | { | ||
358 | struct cryptocop_dma_desc *cdesc = NULL; | ||
359 | int error = 0; | ||
360 | struct strcop_meta_out mo = { | ||
361 | .ciphsel = src_none, | ||
362 | .hashsel = src_none, | ||
363 | .csumsel = src_none | ||
364 | }; | ||
365 | char *pad; | ||
366 | size_t plen; | ||
367 | |||
368 | DEBUG(printk("create_pad_descriptor: start.\n")); | ||
369 | /* Setup pad descriptor. */ | ||
370 | |||
371 | DEBUG(printk("create_pad_descriptor: setting up padding.\n")); | ||
372 | cdesc = alloc_cdesc(alloc_flag); | ||
373 | if (!cdesc){ | ||
374 | DEBUG_API(printk("create_pad_descriptor: alloc pad desc\n")); | ||
375 | goto error_cleanup; | ||
376 | } | ||
377 | switch (tc->unit_no) { | ||
378 | case src_md5: | ||
379 | error = create_md5_pad(alloc_flag, tc->consumed, &pad, &plen); | ||
380 | if (error){ | ||
381 | DEBUG_API(printk("create_pad_descriptor: create_md5_pad_failed\n")); | ||
382 | goto error_cleanup; | ||
383 | } | ||
384 | cdesc->free_buf = pad; | ||
385 | mo.hashsel = src_dma; | ||
386 | mo.hashconf = tc->hash_conf; | ||
387 | mo.hashmode = tc->hash_mode; | ||
388 | break; | ||
389 | case src_sha1: | ||
390 | error = create_sha1_pad(alloc_flag, tc->consumed, &pad, &plen); | ||
391 | if (error){ | ||
392 | DEBUG_API(printk("create_pad_descriptor: create_sha1_pad_failed\n")); | ||
393 | goto error_cleanup; | ||
394 | } | ||
395 | cdesc->free_buf = pad; | ||
396 | mo.hashsel = src_dma; | ||
397 | mo.hashconf = tc->hash_conf; | ||
398 | mo.hashmode = tc->hash_mode; | ||
399 | break; | ||
400 | case src_csum: | ||
401 | if (tc->consumed % tc->blocklength){ | ||
402 | pad = (char*)csum_zero_pad; | ||
403 | plen = 1; | ||
404 | } else { | ||
405 | pad = (char*)cdesc; /* Use any pointer. */ | ||
406 | plen = 0; | ||
407 | } | ||
408 | mo.csumsel = src_dma; | ||
409 | break; | ||
410 | } | ||
411 | cdesc->dma_descr->wait = 1; | ||
412 | cdesc->dma_descr->out_eop = 1; /* Since this is a pad output is pushed. EOP is ok here since the padded unit is the only one active. */ | ||
413 | cdesc->dma_descr->buf = (char*)virt_to_phys((char*)pad); | ||
414 | cdesc->dma_descr->after = cdesc->dma_descr->buf + plen; | ||
415 | |||
416 | cdesc->dma_descr->md = REG_TYPE_CONV(unsigned short int, struct strcop_meta_out, mo); | ||
417 | *pad_desc = cdesc; | ||
418 | |||
419 | return 0; | ||
420 | |||
421 | error_cleanup: | ||
422 | if (cdesc) free_cdesc(cdesc); | ||
423 | return -1; | ||
424 | } | ||
425 | |||
426 | |||
427 | static int setup_key_dl_desc(struct cryptocop_tfrm_ctx *tc, struct cryptocop_dma_desc **kd, int alloc_flag) | ||
428 | { | ||
429 | struct cryptocop_dma_desc *key_desc = alloc_cdesc(alloc_flag); | ||
430 | struct strcop_meta_out mo = {0}; | ||
431 | |||
432 | DEBUG(printk("setup_key_dl_desc\n")); | ||
433 | |||
434 | if (!key_desc) { | ||
435 | DEBUG_API(printk("setup_key_dl_desc: failed descriptor allocation.\n")); | ||
436 | return -ENOMEM; | ||
437 | } | ||
438 | |||
439 | /* Download key. */ | ||
440 | if ((tc->tctx->init.alg == cryptocop_alg_aes) && (tc->tcfg->flags & CRYPTOCOP_DECRYPT)) { | ||
441 | /* Precook the AES decrypt key. */ | ||
442 | if (!tc->tctx->dec_key_set){ | ||
443 | get_aes_decrypt_key(tc->tctx->dec_key, tc->tctx->init.key, tc->tctx->init.keylen); | ||
444 | tc->tctx->dec_key_set = 1; | ||
445 | } | ||
446 | key_desc->dma_descr->buf = (char*)virt_to_phys(tc->tctx->dec_key); | ||
447 | key_desc->dma_descr->after = key_desc->dma_descr->buf + tc->tctx->init.keylen/8; | ||
448 | } else { | ||
449 | key_desc->dma_descr->buf = (char*)virt_to_phys(tc->tctx->init.key); | ||
450 | key_desc->dma_descr->after = key_desc->dma_descr->buf + tc->tctx->init.keylen/8; | ||
451 | } | ||
452 | /* Setup metadata. */ | ||
453 | mo.dlkey = 1; | ||
454 | switch (tc->tctx->init.keylen) { | ||
455 | case 64: | ||
456 | mo.decrypt = 0; | ||
457 | mo.hashmode = 0; | ||
458 | break; | ||
459 | case 128: | ||
460 | mo.decrypt = 0; | ||
461 | mo.hashmode = 1; | ||
462 | break; | ||
463 | case 192: | ||
464 | mo.decrypt = 1; | ||
465 | mo.hashmode = 0; | ||
466 | break; | ||
467 | case 256: | ||
468 | mo.decrypt = 1; | ||
469 | mo.hashmode = 1; | ||
470 | break; | ||
471 | default: | ||
472 | break; | ||
473 | } | ||
474 | mo.ciphsel = mo.hashsel = mo.csumsel = src_none; | ||
475 | key_desc->dma_descr->md = REG_TYPE_CONV(unsigned short int, struct strcop_meta_out, mo); | ||
476 | |||
477 | key_desc->dma_descr->out_eop = 1; | ||
478 | key_desc->dma_descr->wait = 1; | ||
479 | key_desc->dma_descr->intr = 0; | ||
480 | |||
481 | *kd = key_desc; | ||
482 | return 0; | ||
483 | } | ||
484 | |||
485 | static int setup_cipher_iv_desc(struct cryptocop_tfrm_ctx *tc, struct cryptocop_dma_desc **id, int alloc_flag) | ||
486 | { | ||
487 | struct cryptocop_dma_desc *iv_desc = alloc_cdesc(alloc_flag); | ||
488 | struct strcop_meta_out mo = {0}; | ||
489 | |||
490 | DEBUG(printk("setup_cipher_iv_desc\n")); | ||
491 | |||
492 | if (!iv_desc) { | ||
493 | DEBUG_API(printk("setup_cipher_iv_desc: failed CBC IV descriptor allocation.\n")); | ||
494 | return -ENOMEM; | ||
495 | } | ||
496 | /* Download IV. */ | ||
497 | iv_desc->dma_descr->buf = (char*)virt_to_phys(tc->tcfg->iv); | ||
498 | iv_desc->dma_descr->after = iv_desc->dma_descr->buf + tc->blocklength; | ||
499 | |||
500 | /* Setup metadata. */ | ||
501 | mo.hashsel = mo.csumsel = src_none; | ||
502 | mo.ciphsel = src_dma; | ||
503 | mo.ciphconf = tc->ciph_conf; | ||
504 | mo.cbcmode = tc->cbcmode; | ||
505 | |||
506 | iv_desc->dma_descr->md = REG_TYPE_CONV(unsigned short int, struct strcop_meta_out, mo); | ||
507 | |||
508 | iv_desc->dma_descr->out_eop = 0; | ||
509 | iv_desc->dma_descr->wait = 1; | ||
510 | iv_desc->dma_descr->intr = 0; | ||
511 | |||
512 | *id = iv_desc; | ||
513 | return 0; | ||
514 | } | ||
515 | |||
516 | /* Map the ouput length of the transform to operation output starting on the inject index. */ | ||
517 | static int create_input_descriptors(struct cryptocop_operation *operation, struct cryptocop_tfrm_ctx *tc, struct cryptocop_dma_desc **id, int alloc_flag) | ||
518 | { | ||
519 | int err = 0; | ||
520 | struct cryptocop_dma_desc head = {0}; | ||
521 | struct cryptocop_dma_desc *outdesc = &head; | ||
522 | size_t iov_offset = 0; | ||
523 | size_t out_ix = 0; | ||
524 | int outiov_ix = 0; | ||
525 | struct strcop_meta_in mi = {0}; | ||
526 | |||
527 | size_t out_length = tc->produced; | ||
528 | int rem_length; | ||
529 | int dlength; | ||
530 | |||
531 | assert(out_length != 0); | ||
532 | if (((tc->produced + tc->tcfg->inject_ix) > operation->tfrm_op.outlen) || (tc->produced && (operation->tfrm_op.outlen == 0))) { | ||
533 | DEBUG_API(printk("create_input_descriptors: operation outdata too small\n")); | ||
534 | return -EINVAL; | ||
535 | } | ||
536 | /* Traverse the out iovec until the result inject index is reached. */ | ||
537 | while ((outiov_ix < operation->tfrm_op.outcount) && ((out_ix + operation->tfrm_op.outdata[outiov_ix].iov_len) <= tc->tcfg->inject_ix)){ | ||
538 | out_ix += operation->tfrm_op.outdata[outiov_ix].iov_len; | ||
539 | outiov_ix++; | ||
540 | } | ||
541 | if (outiov_ix >= operation->tfrm_op.outcount){ | ||
542 | DEBUG_API(printk("create_input_descriptors: operation outdata too small\n")); | ||
543 | return -EINVAL; | ||
544 | } | ||
545 | iov_offset = tc->tcfg->inject_ix - out_ix; | ||
546 | mi.dmasel = tc->unit_no; | ||
547 | |||
548 | /* Setup the output descriptors. */ | ||
549 | while ((out_length > 0) && (outiov_ix < operation->tfrm_op.outcount)) { | ||
550 | outdesc->next = alloc_cdesc(alloc_flag); | ||
551 | if (!outdesc->next) { | ||
552 | DEBUG_API(printk("create_input_descriptors: alloc_cdesc\n")); | ||
553 | err = -ENOMEM; | ||
554 | goto error_cleanup; | ||
555 | } | ||
556 | outdesc = outdesc->next; | ||
557 | rem_length = operation->tfrm_op.outdata[outiov_ix].iov_len - iov_offset; | ||
558 | dlength = (out_length < rem_length) ? out_length : rem_length; | ||
559 | |||
560 | DEBUG(printk("create_input_descriptors:\n" | ||
561 | "outiov_ix=%d, rem_length=%d, dlength=%d\n" | ||
562 | "iov_offset=%d, outdata[outiov_ix].iov_len=%d\n" | ||
563 | "outcount=%d, outiov_ix=%d\n", | ||
564 | outiov_ix, rem_length, dlength, iov_offset, operation->tfrm_op.outdata[outiov_ix].iov_len, operation->tfrm_op.outcount, outiov_ix)); | ||
565 | |||
566 | outdesc->dma_descr->buf = (char*)virt_to_phys(operation->tfrm_op.outdata[outiov_ix].iov_base + iov_offset); | ||
567 | outdesc->dma_descr->after = outdesc->dma_descr->buf + dlength; | ||
568 | outdesc->dma_descr->md = REG_TYPE_CONV(unsigned short int, struct strcop_meta_in, mi); | ||
569 | |||
570 | out_length -= dlength; | ||
571 | iov_offset += dlength; | ||
572 | if (iov_offset >= operation->tfrm_op.outdata[outiov_ix].iov_len) { | ||
573 | iov_offset = 0; | ||
574 | ++outiov_ix; | ||
575 | } | ||
576 | } | ||
577 | if (out_length > 0){ | ||
578 | DEBUG_API(printk("create_input_descriptors: not enough room for output, %d remained\n", out_length)); | ||
579 | err = -EINVAL; | ||
580 | goto error_cleanup; | ||
581 | } | ||
582 | /* Set sync in last descriptor. */ | ||
583 | mi.sync = 1; | ||
584 | outdesc->dma_descr->md = REG_TYPE_CONV(unsigned short int, struct strcop_meta_in, mi); | ||
585 | |||
586 | *id = head.next; | ||
587 | return 0; | ||
588 | |||
589 | error_cleanup: | ||
590 | while (head.next) { | ||
591 | outdesc = head.next->next; | ||
592 | free_cdesc(head.next); | ||
593 | head.next = outdesc; | ||
594 | } | ||
595 | return err; | ||
596 | } | ||
597 | |||
598 | |||
599 | static int create_output_descriptors(struct cryptocop_operation *operation, int *iniov_ix, int *iniov_offset, size_t desc_len, struct cryptocop_dma_desc **current_out_cdesc, struct strcop_meta_out *meta_out, int alloc_flag) | ||
600 | { | ||
601 | while (desc_len != 0) { | ||
602 | struct cryptocop_dma_desc *cdesc; | ||
603 | int rem_length = operation->tfrm_op.indata[*iniov_ix].iov_len - *iniov_offset; | ||
604 | int dlength = (desc_len < rem_length) ? desc_len : rem_length; | ||
605 | |||
606 | cdesc = alloc_cdesc(alloc_flag); | ||
607 | if (!cdesc) { | ||
608 | DEBUG_API(printk("create_output_descriptors: alloc_cdesc\n")); | ||
609 | return -ENOMEM; | ||
610 | } | ||
611 | (*current_out_cdesc)->next = cdesc; | ||
612 | (*current_out_cdesc) = cdesc; | ||
613 | |||
614 | cdesc->free_buf = NULL; | ||
615 | |||
616 | cdesc->dma_descr->buf = (char*)virt_to_phys(operation->tfrm_op.indata[*iniov_ix].iov_base + *iniov_offset); | ||
617 | cdesc->dma_descr->after = cdesc->dma_descr->buf + dlength; | ||
618 | |||
619 | desc_len -= dlength; | ||
620 | *iniov_offset += dlength; | ||
621 | assert(desc_len >= 0); | ||
622 | if (*iniov_offset >= operation->tfrm_op.indata[*iniov_ix].iov_len) { | ||
623 | *iniov_offset = 0; | ||
624 | ++(*iniov_ix); | ||
625 | if (*iniov_ix > operation->tfrm_op.incount) { | ||
626 | DEBUG_API(printk("create_output_descriptors: not enough indata in operation.")); | ||
627 | return -EINVAL; | ||
628 | } | ||
629 | } | ||
630 | cdesc->dma_descr->md = REG_TYPE_CONV(unsigned short int, struct strcop_meta_out, (*meta_out)); | ||
631 | } /* while (desc_len != 0) */ | ||
632 | /* Last DMA descriptor gets a 'wait' bit to signal expected change in metadata. */ | ||
633 | (*current_out_cdesc)->dma_descr->wait = 1; /* This will set extraneous WAIT in some situations, e.g. when padding hashes and checksums. */ | ||
634 | |||
635 | return 0; | ||
636 | } | ||
637 | |||
638 | |||
639 | static int append_input_descriptors(struct cryptocop_operation *operation, struct cryptocop_dma_desc **current_in_cdesc, struct cryptocop_dma_desc **current_out_cdesc, struct cryptocop_tfrm_ctx *tc, int alloc_flag) | ||
640 | { | ||
641 | DEBUG(printk("append_input_descriptors, tc=0x%p, unit_no=%d\n", tc, tc->unit_no)); | ||
642 | if (tc->tcfg) { | ||
643 | int failed = 0; | ||
644 | struct cryptocop_dma_desc *idescs = NULL; | ||
645 | DEBUG(printk("append_input_descriptors: pushing output, consumed %d produced %d bytes.\n", tc->consumed, tc->produced)); | ||
646 | if (tc->pad_descs) { | ||
647 | DEBUG(printk("append_input_descriptors: append pad descriptors to DMA out list.\n")); | ||
648 | while (tc->pad_descs) { | ||
649 | DEBUG(printk("append descriptor 0x%p\n", tc->pad_descs)); | ||
650 | (*current_out_cdesc)->next = tc->pad_descs; | ||
651 | tc->pad_descs = tc->pad_descs->next; | ||
652 | (*current_out_cdesc) = (*current_out_cdesc)->next; | ||
653 | } | ||
654 | } | ||
655 | |||
656 | /* Setup and append output descriptors to DMA in list. */ | ||
657 | if (tc->unit_no == src_dma){ | ||
658 | /* mem2mem. Setup DMA in descriptors to discard all input prior to the requested mem2mem data. */ | ||
659 | struct strcop_meta_in mi = {.sync = 0, .dmasel = src_dma}; | ||
660 | unsigned int start_ix = tc->start_ix; | ||
661 | while (start_ix){ | ||
662 | unsigned int desclen = start_ix < MEM2MEM_DISCARD_BUF_LENGTH ? start_ix : MEM2MEM_DISCARD_BUF_LENGTH; | ||
663 | (*current_in_cdesc)->next = alloc_cdesc(alloc_flag); | ||
664 | if (!(*current_in_cdesc)->next){ | ||
665 | DEBUG_API(printk("append_input_descriptors: alloc_cdesc mem2mem discard failed\n")); | ||
666 | return -ENOMEM; | ||
667 | } | ||
668 | (*current_in_cdesc) = (*current_in_cdesc)->next; | ||
669 | (*current_in_cdesc)->dma_descr->buf = (char*)virt_to_phys(mem2mem_discard_buf); | ||
670 | (*current_in_cdesc)->dma_descr->after = (*current_in_cdesc)->dma_descr->buf + desclen; | ||
671 | (*current_in_cdesc)->dma_descr->md = REG_TYPE_CONV(unsigned short int, struct strcop_meta_in, mi); | ||
672 | start_ix -= desclen; | ||
673 | } | ||
674 | mi.sync = 1; | ||
675 | (*current_in_cdesc)->dma_descr->md = REG_TYPE_CONV(unsigned short int, struct strcop_meta_in, mi); | ||
676 | } | ||
677 | |||
678 | failed = create_input_descriptors(operation, tc, &idescs, alloc_flag); | ||
679 | if (failed){ | ||
680 | DEBUG_API(printk("append_input_descriptors: output descriptor setup failed\n")); | ||
681 | return failed; | ||
682 | } | ||
683 | DEBUG(printk("append_input_descriptors: append output descriptors to DMA in list.\n")); | ||
684 | while (idescs) { | ||
685 | DEBUG(printk("append descriptor 0x%p\n", idescs)); | ||
686 | (*current_in_cdesc)->next = idescs; | ||
687 | idescs = idescs->next; | ||
688 | (*current_in_cdesc) = (*current_in_cdesc)->next; | ||
689 | } | ||
690 | } | ||
691 | return 0; | ||
692 | } | ||
693 | |||
694 | |||
695 | |||
696 | static int cryptocop_setup_dma_list(struct cryptocop_operation *operation, struct cryptocop_int_operation **int_op, int alloc_flag) | ||
697 | { | ||
698 | struct cryptocop_session *sess; | ||
699 | struct cryptocop_transform_ctx *tctx; | ||
700 | |||
701 | struct cryptocop_tfrm_ctx digest_ctx = { | ||
702 | .previous_src = src_none, | ||
703 | .current_src = src_none, | ||
704 | .start_ix = 0, | ||
705 | .requires_padding = 1, | ||
706 | .strict_block_length = 0, | ||
707 | .hash_conf = 0, | ||
708 | .hash_mode = 0, | ||
709 | .ciph_conf = 0, | ||
710 | .cbcmode = 0, | ||
711 | .decrypt = 0, | ||
712 | .consumed = 0, | ||
713 | .produced = 0, | ||
714 | .pad_descs = NULL, | ||
715 | .active = 0, | ||
716 | .done = 0, | ||
717 | .prev_src = NULL, | ||
718 | .curr_src = NULL, | ||
719 | .tcfg = NULL}; | ||
720 | struct cryptocop_tfrm_ctx cipher_ctx = { | ||
721 | .previous_src = src_none, | ||
722 | .current_src = src_none, | ||
723 | .start_ix = 0, | ||
724 | .requires_padding = 0, | ||
725 | .strict_block_length = 1, | ||
726 | .hash_conf = 0, | ||
727 | .hash_mode = 0, | ||
728 | .ciph_conf = 0, | ||
729 | .cbcmode = 0, | ||
730 | .decrypt = 0, | ||
731 | .consumed = 0, | ||
732 | .produced = 0, | ||
733 | .pad_descs = NULL, | ||
734 | .active = 0, | ||
735 | .done = 0, | ||
736 | .prev_src = NULL, | ||
737 | .curr_src = NULL, | ||
738 | .tcfg = NULL}; | ||
739 | struct cryptocop_tfrm_ctx csum_ctx = { | ||
740 | .previous_src = src_none, | ||
741 | .current_src = src_none, | ||
742 | .start_ix = 0, | ||
743 | .blocklength = 2, | ||
744 | .requires_padding = 1, | ||
745 | .strict_block_length = 0, | ||
746 | .hash_conf = 0, | ||
747 | .hash_mode = 0, | ||
748 | .ciph_conf = 0, | ||
749 | .cbcmode = 0, | ||
750 | .decrypt = 0, | ||
751 | .consumed = 0, | ||
752 | .produced = 0, | ||
753 | .pad_descs = NULL, | ||
754 | .active = 0, | ||
755 | .done = 0, | ||
756 | .tcfg = NULL, | ||
757 | .prev_src = NULL, | ||
758 | .curr_src = NULL, | ||
759 | .unit_no = src_csum}; | ||
760 | struct cryptocop_tfrm_cfg *tcfg = operation->tfrm_op.tfrm_cfg; | ||
761 | |||
762 | unsigned int indata_ix = 0; | ||
763 | |||
764 | /* iovec accounting. */ | ||
765 | int iniov_ix = 0; | ||
766 | int iniov_offset = 0; | ||
767 | |||
768 | /* Operation descriptor cfg traversal pointer. */ | ||
769 | struct cryptocop_desc *odsc; | ||
770 | |||
771 | int failed = 0; | ||
772 | /* List heads for allocated descriptors. */ | ||
773 | struct cryptocop_dma_desc out_cdesc_head = {0}; | ||
774 | struct cryptocop_dma_desc in_cdesc_head = {0}; | ||
775 | |||
776 | struct cryptocop_dma_desc *current_out_cdesc = &out_cdesc_head; | ||
777 | struct cryptocop_dma_desc *current_in_cdesc = &in_cdesc_head; | ||
778 | |||
779 | struct cryptocop_tfrm_ctx *output_tc = NULL; | ||
780 | void *iop_alloc_ptr; | ||
781 | |||
782 | assert(operation != NULL); | ||
783 | assert(int_op != NULL); | ||
784 | |||
785 | DEBUG(printk("cryptocop_setup_dma_list: start\n")); | ||
786 | DEBUG(print_cryptocop_operation(operation)); | ||
787 | |||
788 | sess = get_session(operation->sid); | ||
789 | if (!sess) { | ||
790 | DEBUG_API(printk("cryptocop_setup_dma_list: no session found for operation.\n")); | ||
791 | failed = -EINVAL; | ||
792 | goto error_cleanup; | ||
793 | } | ||
794 | iop_alloc_ptr = kmalloc(DESCR_ALLOC_PAD + sizeof(struct cryptocop_int_operation), alloc_flag); | ||
795 | if (!iop_alloc_ptr) { | ||
796 | DEBUG_API(printk("cryptocop_setup_dma_list: kmalloc cryptocop_int_operation\n")); | ||
797 | failed = -ENOMEM; | ||
798 | goto error_cleanup; | ||
799 | } | ||
800 | (*int_op) = (struct cryptocop_int_operation*)(((unsigned long int)(iop_alloc_ptr + DESCR_ALLOC_PAD + offsetof(struct cryptocop_int_operation, ctx_out)) & ~0x0000001F) - offsetof(struct cryptocop_int_operation, ctx_out)); | ||
801 | DEBUG(memset((*int_op), 0xff, sizeof(struct cryptocop_int_operation))); | ||
802 | (*int_op)->alloc_ptr = iop_alloc_ptr; | ||
803 | DEBUG(printk("cryptocop_setup_dma_list: *int_op=0x%p, alloc_ptr=0x%p\n", *int_op, (*int_op)->alloc_ptr)); | ||
804 | |||
805 | (*int_op)->sid = operation->sid; | ||
806 | (*int_op)->cdesc_out = NULL; | ||
807 | (*int_op)->cdesc_in = NULL; | ||
808 | (*int_op)->tdes_mode = cryptocop_3des_ede; | ||
809 | (*int_op)->csum_mode = cryptocop_csum_le; | ||
810 | (*int_op)->ddesc_out = NULL; | ||
811 | (*int_op)->ddesc_in = NULL; | ||
812 | |||
813 | /* Scan operation->tfrm_op.tfrm_cfg for bad configuration and set up the local contexts. */ | ||
814 | if (!tcfg) { | ||
815 | DEBUG_API(printk("cryptocop_setup_dma_list: no configured transforms in operation.\n")); | ||
816 | failed = -EINVAL; | ||
817 | goto error_cleanup; | ||
818 | } | ||
819 | while (tcfg) { | ||
820 | tctx = get_transform_ctx(sess, tcfg->tid); | ||
821 | if (!tctx) { | ||
822 | DEBUG_API(printk("cryptocop_setup_dma_list: no transform id %d in session.\n", tcfg->tid)); | ||
823 | failed = -EINVAL; | ||
824 | goto error_cleanup; | ||
825 | } | ||
826 | if (tcfg->inject_ix > operation->tfrm_op.outlen){ | ||
827 | DEBUG_API(printk("cryptocop_setup_dma_list: transform id %d inject_ix (%d) > operation->tfrm_op.outlen(%d)", tcfg->tid, tcfg->inject_ix, operation->tfrm_op.outlen)); | ||
828 | failed = -EINVAL; | ||
829 | goto error_cleanup; | ||
830 | } | ||
831 | switch (tctx->init.alg){ | ||
832 | case cryptocop_alg_mem2mem: | ||
833 | if (cipher_ctx.tcfg != NULL){ | ||
834 | DEBUG_API(printk("cryptocop_setup_dma_list: multiple ciphers in operation.\n")); | ||
835 | failed = -EINVAL; | ||
836 | goto error_cleanup; | ||
837 | } | ||
838 | /* mem2mem is handled as a NULL cipher. */ | ||
839 | cipher_ctx.cbcmode = 0; | ||
840 | cipher_ctx.decrypt = 0; | ||
841 | cipher_ctx.blocklength = 1; | ||
842 | cipher_ctx.ciph_conf = 0; | ||
843 | cipher_ctx.unit_no = src_dma; | ||
844 | cipher_ctx.tcfg = tcfg; | ||
845 | cipher_ctx.tctx = tctx; | ||
846 | break; | ||
847 | case cryptocop_alg_des: | ||
848 | case cryptocop_alg_3des: | ||
849 | case cryptocop_alg_aes: | ||
850 | /* cipher */ | ||
851 | if (cipher_ctx.tcfg != NULL){ | ||
852 | DEBUG_API(printk("cryptocop_setup_dma_list: multiple ciphers in operation.\n")); | ||
853 | failed = -EINVAL; | ||
854 | goto error_cleanup; | ||
855 | } | ||
856 | cipher_ctx.tcfg = tcfg; | ||
857 | cipher_ctx.tctx = tctx; | ||
858 | if (cipher_ctx.tcfg->flags & CRYPTOCOP_DECRYPT){ | ||
859 | cipher_ctx.decrypt = 1; | ||
860 | } | ||
861 | switch (tctx->init.cipher_mode) { | ||
862 | case cryptocop_cipher_mode_ecb: | ||
863 | cipher_ctx.cbcmode = 0; | ||
864 | break; | ||
865 | case cryptocop_cipher_mode_cbc: | ||
866 | cipher_ctx.cbcmode = 1; | ||
867 | break; | ||
868 | default: | ||
869 | DEBUG_API(printk("cryptocop_setup_dma_list: cipher_ctx, bad cipher mode==%d\n", tctx->init.cipher_mode)); | ||
870 | failed = -EINVAL; | ||
871 | goto error_cleanup; | ||
872 | } | ||
873 | DEBUG(printk("cryptocop_setup_dma_list: cipher_ctx, set CBC mode==%d\n", cipher_ctx.cbcmode)); | ||
874 | switch (tctx->init.alg){ | ||
875 | case cryptocop_alg_des: | ||
876 | cipher_ctx.ciph_conf = 0; | ||
877 | cipher_ctx.unit_no = src_des; | ||
878 | cipher_ctx.blocklength = DES_BLOCK_LENGTH; | ||
879 | break; | ||
880 | case cryptocop_alg_3des: | ||
881 | cipher_ctx.ciph_conf = 1; | ||
882 | cipher_ctx.unit_no = src_des; | ||
883 | cipher_ctx.blocklength = DES_BLOCK_LENGTH; | ||
884 | break; | ||
885 | case cryptocop_alg_aes: | ||
886 | cipher_ctx.ciph_conf = 2; | ||
887 | cipher_ctx.unit_no = src_aes; | ||
888 | cipher_ctx.blocklength = AES_BLOCK_LENGTH; | ||
889 | break; | ||
890 | default: | ||
891 | panic("cryptocop_setup_dma_list: impossible algorithm %d\n", tctx->init.alg); | ||
892 | } | ||
893 | (*int_op)->tdes_mode = tctx->init.tdes_mode; | ||
894 | break; | ||
895 | case cryptocop_alg_md5: | ||
896 | case cryptocop_alg_sha1: | ||
897 | /* digest */ | ||
898 | if (digest_ctx.tcfg != NULL){ | ||
899 | DEBUG_API(printk("cryptocop_setup_dma_list: multiple digests in operation.\n")); | ||
900 | failed = -EINVAL; | ||
901 | goto error_cleanup; | ||
902 | } | ||
903 | digest_ctx.tcfg = tcfg; | ||
904 | digest_ctx.tctx = tctx; | ||
905 | digest_ctx.hash_mode = 0; /* Don't use explicit IV in this API. */ | ||
906 | switch (tctx->init.alg){ | ||
907 | case cryptocop_alg_md5: | ||
908 | digest_ctx.blocklength = MD5_BLOCK_LENGTH; | ||
909 | digest_ctx.unit_no = src_md5; | ||
910 | digest_ctx.hash_conf = 1; /* 1 => MD-5 */ | ||
911 | break; | ||
912 | case cryptocop_alg_sha1: | ||
913 | digest_ctx.blocklength = SHA1_BLOCK_LENGTH; | ||
914 | digest_ctx.unit_no = src_sha1; | ||
915 | digest_ctx.hash_conf = 0; /* 0 => SHA-1 */ | ||
916 | break; | ||
917 | default: | ||
918 | panic("cryptocop_setup_dma_list: impossible digest algorithm\n"); | ||
919 | } | ||
920 | break; | ||
921 | case cryptocop_alg_csum: | ||
922 | /* digest */ | ||
923 | if (csum_ctx.tcfg != NULL){ | ||
924 | DEBUG_API(printk("cryptocop_setup_dma_list: multiple checksums in operation.\n")); | ||
925 | failed = -EINVAL; | ||
926 | goto error_cleanup; | ||
927 | } | ||
928 | (*int_op)->csum_mode = tctx->init.csum_mode; | ||
929 | csum_ctx.tcfg = tcfg; | ||
930 | csum_ctx.tctx = tctx; | ||
931 | break; | ||
932 | default: | ||
933 | /* no algorithm. */ | ||
934 | DEBUG_API(printk("cryptocop_setup_dma_list: invalid algorithm %d specified in tfrm %d.\n", tctx->init.alg, tcfg->tid)); | ||
935 | failed = -EINVAL; | ||
936 | goto error_cleanup; | ||
937 | } | ||
938 | tcfg = tcfg->next; | ||
939 | } | ||
940 | /* Download key if a cipher is used. */ | ||
941 | if (cipher_ctx.tcfg && (cipher_ctx.tctx->init.alg != cryptocop_alg_mem2mem)){ | ||
942 | struct cryptocop_dma_desc *key_desc = NULL; | ||
943 | |||
944 | failed = setup_key_dl_desc(&cipher_ctx, &key_desc, alloc_flag); | ||
945 | if (failed) { | ||
946 | DEBUG_API(printk("cryptocop_setup_dma_list: setup key dl\n")); | ||
947 | goto error_cleanup; | ||
948 | } | ||
949 | current_out_cdesc->next = key_desc; | ||
950 | current_out_cdesc = key_desc; | ||
951 | indata_ix += (unsigned int)(key_desc->dma_descr->after - key_desc->dma_descr->buf); | ||
952 | |||
953 | /* Download explicit IV if a cipher is used and CBC mode and explicit IV selected. */ | ||
954 | if ((cipher_ctx.tctx->init.cipher_mode == cryptocop_cipher_mode_cbc) && (cipher_ctx.tcfg->flags & CRYPTOCOP_EXPLICIT_IV)) { | ||
955 | struct cryptocop_dma_desc *iv_desc = NULL; | ||
956 | |||
957 | DEBUG(printk("cryptocop_setup_dma_list: setup cipher CBC IV descriptor.\n")); | ||
958 | |||
959 | failed = setup_cipher_iv_desc(&cipher_ctx, &iv_desc, alloc_flag); | ||
960 | if (failed) { | ||
961 | DEBUG_API(printk("cryptocop_setup_dma_list: CBC IV descriptor.\n")); | ||
962 | goto error_cleanup; | ||
963 | } | ||
964 | current_out_cdesc->next = iv_desc; | ||
965 | current_out_cdesc = iv_desc; | ||
966 | indata_ix += (unsigned int)(iv_desc->dma_descr->after - iv_desc->dma_descr->buf); | ||
967 | } | ||
968 | } | ||
969 | |||
970 | /* Process descriptors. */ | ||
971 | odsc = operation->tfrm_op.desc; | ||
972 | while (odsc) { | ||
973 | struct cryptocop_desc_cfg *dcfg = odsc->cfg; | ||
974 | struct strcop_meta_out meta_out = {0}; | ||
975 | size_t desc_len = odsc->length; | ||
976 | int active_count, eop_needed_count; | ||
977 | |||
978 | output_tc = NULL; | ||
979 | |||
980 | DEBUG(printk("cryptocop_setup_dma_list: parsing an operation descriptor\n")); | ||
981 | |||
982 | while (dcfg) { | ||
983 | struct cryptocop_tfrm_ctx *tc = NULL; | ||
984 | |||
985 | DEBUG(printk("cryptocop_setup_dma_list: parsing an operation descriptor configuration.\n")); | ||
986 | /* Get the local context for the transform and mark it as the output unit if it produces output. */ | ||
987 | if (digest_ctx.tcfg && (digest_ctx.tcfg->tid == dcfg->tid)){ | ||
988 | tc = &digest_ctx; | ||
989 | } else if (cipher_ctx.tcfg && (cipher_ctx.tcfg->tid == dcfg->tid)){ | ||
990 | tc = &cipher_ctx; | ||
991 | } else if (csum_ctx.tcfg && (csum_ctx.tcfg->tid == dcfg->tid)){ | ||
992 | tc = &csum_ctx; | ||
993 | } | ||
994 | if (!tc) { | ||
995 | DEBUG_API(printk("cryptocop_setup_dma_list: invalid transform %d specified in descriptor.\n", dcfg->tid)); | ||
996 | failed = -EINVAL; | ||
997 | goto error_cleanup; | ||
998 | } | ||
999 | if (tc->done) { | ||
1000 | DEBUG_API(printk("cryptocop_setup_dma_list: completed transform %d reused.\n", dcfg->tid)); | ||
1001 | failed = -EINVAL; | ||
1002 | goto error_cleanup; | ||
1003 | } | ||
1004 | if (!tc->active) { | ||
1005 | tc->start_ix = indata_ix; | ||
1006 | tc->active = 1; | ||
1007 | } | ||
1008 | |||
1009 | tc->previous_src = tc->current_src; | ||
1010 | tc->prev_src = tc->curr_src; | ||
1011 | /* Map source unit id to DMA source config. */ | ||
1012 | switch (dcfg->src){ | ||
1013 | case cryptocop_source_dma: | ||
1014 | tc->current_src = src_dma; | ||
1015 | break; | ||
1016 | case cryptocop_source_des: | ||
1017 | tc->current_src = src_des; | ||
1018 | break; | ||
1019 | case cryptocop_source_3des: | ||
1020 | tc->current_src = src_des; | ||
1021 | break; | ||
1022 | case cryptocop_source_aes: | ||
1023 | tc->current_src = src_aes; | ||
1024 | break; | ||
1025 | case cryptocop_source_md5: | ||
1026 | case cryptocop_source_sha1: | ||
1027 | case cryptocop_source_csum: | ||
1028 | case cryptocop_source_none: | ||
1029 | default: | ||
1030 | /* We do not allow using accumulating style units (SHA-1, MD5, checksum) as sources to other units. | ||
1031 | */ | ||
1032 | DEBUG_API(printk("cryptocop_setup_dma_list: bad unit source configured %d.\n", dcfg->src)); | ||
1033 | failed = -EINVAL; | ||
1034 | goto error_cleanup; | ||
1035 | } | ||
1036 | if (tc->current_src != src_dma) { | ||
1037 | /* Find the unit we are sourcing from. */ | ||
1038 | if (digest_ctx.unit_no == tc->current_src){ | ||
1039 | tc->curr_src = &digest_ctx; | ||
1040 | } else if (cipher_ctx.unit_no == tc->current_src){ | ||
1041 | tc->curr_src = &cipher_ctx; | ||
1042 | } else if (csum_ctx.unit_no == tc->current_src){ | ||
1043 | tc->curr_src = &csum_ctx; | ||
1044 | } | ||
1045 | if ((tc->curr_src == tc) && (tc->unit_no != src_dma)){ | ||
1046 | DEBUG_API(printk("cryptocop_setup_dma_list: unit %d configured to source from itself.\n", tc->unit_no)); | ||
1047 | failed = -EINVAL; | ||
1048 | goto error_cleanup; | ||
1049 | } | ||
1050 | } else { | ||
1051 | tc->curr_src = NULL; | ||
1052 | } | ||
1053 | |||
1054 | /* Detect source switch. */ | ||
1055 | DEBUG(printk("cryptocop_setup_dma_list: tc->active=%d tc->unit_no=%d tc->current_src=%d tc->previous_src=%d, tc->curr_src=0x%p, tc->prev_srv=0x%p\n", tc->active, tc->unit_no, tc->current_src, tc->previous_src, tc->curr_src, tc->prev_src)); | ||
1056 | if (tc->active && (tc->current_src != tc->previous_src)) { | ||
1057 | /* Only allow source switch when both the old source unit and the new one have | ||
1058 | * no pending data to process (i.e. the consumed length must be a multiple of the | ||
1059 | * transform blocklength). */ | ||
1060 | /* Note: if the src == NULL we are actually sourcing from DMA out. */ | ||
1061 | if (((tc->prev_src != NULL) && (tc->prev_src->consumed % tc->prev_src->blocklength)) || | ||
1062 | ((tc->curr_src != NULL) && (tc->curr_src->consumed % tc->curr_src->blocklength))) | ||
1063 | { | ||
1064 | DEBUG_API(printk("cryptocop_setup_dma_list: can only disconnect from or connect to a unit on a multiple of the blocklength, old: cons=%d, prod=%d, block=%d, new: cons=%d prod=%d, block=%d.\n", tc->prev_src ? tc->prev_src->consumed : INT_MIN, tc->prev_src ? tc->prev_src->produced : INT_MIN, tc->prev_src ? tc->prev_src->blocklength : INT_MIN, tc->curr_src ? tc->curr_src->consumed : INT_MIN, tc->curr_src ? tc->curr_src->produced : INT_MIN, tc->curr_src ? tc->curr_src->blocklength : INT_MIN)); | ||
1065 | failed = -EINVAL; | ||
1066 | goto error_cleanup; | ||
1067 | } | ||
1068 | } | ||
1069 | /* Detect unit deactivation. */ | ||
1070 | if (dcfg->last) { | ||
1071 | /* Length check of this is handled below. */ | ||
1072 | tc->done = 1; | ||
1073 | } | ||
1074 | dcfg = dcfg->next; | ||
1075 | } /* while (dcfg) */ | ||
1076 | DEBUG(printk("cryptocop_setup_dma_list: parsing operation descriptor configuration complete.\n")); | ||
1077 | |||
1078 | if (cipher_ctx.active && (cipher_ctx.curr_src != NULL) && !cipher_ctx.curr_src->active){ | ||
1079 | DEBUG_API(printk("cryptocop_setup_dma_list: cipher source from inactive unit %d\n", cipher_ctx.curr_src->unit_no)); | ||
1080 | failed = -EINVAL; | ||
1081 | goto error_cleanup; | ||
1082 | } | ||
1083 | if (digest_ctx.active && (digest_ctx.curr_src != NULL) && !digest_ctx.curr_src->active){ | ||
1084 | DEBUG_API(printk("cryptocop_setup_dma_list: digest source from inactive unit %d\n", digest_ctx.curr_src->unit_no)); | ||
1085 | failed = -EINVAL; | ||
1086 | goto error_cleanup; | ||
1087 | } | ||
1088 | if (csum_ctx.active && (csum_ctx.curr_src != NULL) && !csum_ctx.curr_src->active){ | ||
1089 | DEBUG_API(printk("cryptocop_setup_dma_list: cipher source from inactive unit %d\n", csum_ctx.curr_src->unit_no)); | ||
1090 | failed = -EINVAL; | ||
1091 | goto error_cleanup; | ||
1092 | } | ||
1093 | |||
1094 | /* Update consumed and produced lengths. | ||
1095 | |||
1096 | The consumed length accounting here is actually cheating. If a unit source from DMA (or any | ||
1097 | other unit that process data in blocks of one octet) it is correct, but if it source from a | ||
1098 | block processing unit, i.e. a cipher, it will be temporarily incorrect at some times. However | ||
1099 | since it is only allowed--by the HW--to change source to or from a block processing unit at times where that | ||
1100 | unit has processed an exact multiple of its block length the end result will be correct. | ||
1101 | Beware that if the source change restriction change this code will need to be (much) reworked. | ||
1102 | */ | ||
1103 | DEBUG(printk("cryptocop_setup_dma_list: desc->length=%d, desc_len=%d.\n", odsc->length, desc_len)); | ||
1104 | |||
1105 | if (csum_ctx.active) { | ||
1106 | csum_ctx.consumed += desc_len; | ||
1107 | if (csum_ctx.done) { | ||
1108 | csum_ctx.produced = 2; | ||
1109 | } | ||
1110 | DEBUG(printk("cryptocop_setup_dma_list: csum_ctx producing: consumed=%d, produced=%d, blocklength=%d.\n", csum_ctx.consumed, csum_ctx.produced, csum_ctx.blocklength)); | ||
1111 | } | ||
1112 | if (digest_ctx.active) { | ||
1113 | digest_ctx.consumed += desc_len; | ||
1114 | if (digest_ctx.done) { | ||
1115 | if (digest_ctx.unit_no == src_md5) { | ||
1116 | digest_ctx.produced = MD5_STATE_LENGTH; | ||
1117 | } else { | ||
1118 | digest_ctx.produced = SHA1_STATE_LENGTH; | ||
1119 | } | ||
1120 | } | ||
1121 | DEBUG(printk("cryptocop_setup_dma_list: digest_ctx producing: consumed=%d, produced=%d, blocklength=%d.\n", digest_ctx.consumed, digest_ctx.produced, digest_ctx.blocklength)); | ||
1122 | } | ||
1123 | if (cipher_ctx.active) { | ||
1124 | /* Ciphers are allowed only to source from DMA out. That is filtered above. */ | ||
1125 | assert(cipher_ctx.current_src == src_dma); | ||
1126 | cipher_ctx.consumed += desc_len; | ||
1127 | cipher_ctx.produced = cipher_ctx.blocklength * (cipher_ctx.consumed / cipher_ctx.blocklength); | ||
1128 | if (cipher_ctx.cbcmode && !(cipher_ctx.tcfg->flags & CRYPTOCOP_EXPLICIT_IV) && cipher_ctx.produced){ | ||
1129 | cipher_ctx.produced -= cipher_ctx.blocklength; /* Compensate for CBC iv. */ | ||
1130 | } | ||
1131 | DEBUG(printk("cryptocop_setup_dma_list: cipher_ctx producing: consumed=%d, produced=%d, blocklength=%d.\n", cipher_ctx.consumed, cipher_ctx.produced, cipher_ctx.blocklength)); | ||
1132 | } | ||
1133 | |||
1134 | /* Setup the DMA out descriptors. */ | ||
1135 | /* Configure the metadata. */ | ||
1136 | active_count = 0; | ||
1137 | eop_needed_count = 0; | ||
1138 | if (cipher_ctx.active) { | ||
1139 | ++active_count; | ||
1140 | if (cipher_ctx.unit_no == src_dma){ | ||
1141 | /* mem2mem */ | ||
1142 | meta_out.ciphsel = src_none; | ||
1143 | } else { | ||
1144 | meta_out.ciphsel = cipher_ctx.current_src; | ||
1145 | } | ||
1146 | meta_out.ciphconf = cipher_ctx.ciph_conf; | ||
1147 | meta_out.cbcmode = cipher_ctx.cbcmode; | ||
1148 | meta_out.decrypt = cipher_ctx.decrypt; | ||
1149 | DEBUG(printk("set ciphsel=%d ciphconf=%d cbcmode=%d decrypt=%d\n", meta_out.ciphsel, meta_out.ciphconf, meta_out.cbcmode, meta_out.decrypt)); | ||
1150 | if (cipher_ctx.done) ++eop_needed_count; | ||
1151 | } else { | ||
1152 | meta_out.ciphsel = src_none; | ||
1153 | } | ||
1154 | |||
1155 | if (digest_ctx.active) { | ||
1156 | ++active_count; | ||
1157 | meta_out.hashsel = digest_ctx.current_src; | ||
1158 | meta_out.hashconf = digest_ctx.hash_conf; | ||
1159 | meta_out.hashmode = 0; /* Explicit mode is not used here. */ | ||
1160 | DEBUG(printk("set hashsel=%d hashconf=%d hashmode=%d\n", meta_out.hashsel, meta_out.hashconf, meta_out.hashmode)); | ||
1161 | if (digest_ctx.done) { | ||
1162 | assert(digest_ctx.pad_descs == NULL); | ||
1163 | failed = create_pad_descriptor(&digest_ctx, &digest_ctx.pad_descs, alloc_flag); | ||
1164 | if (failed) { | ||
1165 | DEBUG_API(printk("cryptocop_setup_dma_list: failed digest pad creation.\n")); | ||
1166 | goto error_cleanup; | ||
1167 | } | ||
1168 | } | ||
1169 | } else { | ||
1170 | meta_out.hashsel = src_none; | ||
1171 | } | ||
1172 | |||
1173 | if (csum_ctx.active) { | ||
1174 | ++active_count; | ||
1175 | meta_out.csumsel = csum_ctx.current_src; | ||
1176 | if (csum_ctx.done) { | ||
1177 | assert(csum_ctx.pad_descs == NULL); | ||
1178 | failed = create_pad_descriptor(&csum_ctx, &csum_ctx.pad_descs, alloc_flag); | ||
1179 | if (failed) { | ||
1180 | DEBUG_API(printk("cryptocop_setup_dma_list: failed csum pad creation.\n")); | ||
1181 | goto error_cleanup; | ||
1182 | } | ||
1183 | } | ||
1184 | } else { | ||
1185 | meta_out.csumsel = src_none; | ||
1186 | } | ||
1187 | DEBUG(printk("cryptocop_setup_dma_list: %d eop needed, %d active units\n", eop_needed_count, active_count)); | ||
1188 | /* Setup DMA out descriptors for the indata. */ | ||
1189 | failed = create_output_descriptors(operation, &iniov_ix, &iniov_offset, desc_len, ¤t_out_cdesc, &meta_out, alloc_flag); | ||
1190 | if (failed) { | ||
1191 | DEBUG_API(printk("cryptocop_setup_dma_list: create_output_descriptors %d\n", failed)); | ||
1192 | goto error_cleanup; | ||
1193 | } | ||
1194 | /* Setup out EOP. If there are active units that are not done here they cannot get an EOP | ||
1195 | * so we ust setup a zero length descriptor to DMA to signal EOP only to done units. | ||
1196 | * If there is a pad descriptor EOP for the padded unit will be EOPed by it. | ||
1197 | */ | ||
1198 | assert(active_count >= eop_needed_count); | ||
1199 | assert((eop_needed_count == 0) || (eop_needed_count == 1)); | ||
1200 | if (eop_needed_count) { | ||
1201 | /* This means that the bulk operation (cipeher/m2m) is terminated. */ | ||
1202 | if (active_count > 1) { | ||
1203 | /* Use zero length EOP descriptor. */ | ||
1204 | struct cryptocop_dma_desc *ed = alloc_cdesc(alloc_flag); | ||
1205 | struct strcop_meta_out ed_mo = {0}; | ||
1206 | if (!ed) { | ||
1207 | DEBUG_API(printk("cryptocop_setup_dma_list: alloc EOP descriptor for cipher\n")); | ||
1208 | failed = -ENOMEM; | ||
1209 | goto error_cleanup; | ||
1210 | } | ||
1211 | |||
1212 | assert(cipher_ctx.active && cipher_ctx.done); | ||
1213 | |||
1214 | if (cipher_ctx.unit_no == src_dma){ | ||
1215 | /* mem2mem */ | ||
1216 | ed_mo.ciphsel = src_none; | ||
1217 | } else { | ||
1218 | ed_mo.ciphsel = cipher_ctx.current_src; | ||
1219 | } | ||
1220 | ed_mo.ciphconf = cipher_ctx.ciph_conf; | ||
1221 | ed_mo.cbcmode = cipher_ctx.cbcmode; | ||
1222 | ed_mo.decrypt = cipher_ctx.decrypt; | ||
1223 | |||
1224 | ed->free_buf = NULL; | ||
1225 | ed->dma_descr->wait = 1; | ||
1226 | ed->dma_descr->out_eop = 1; | ||
1227 | |||
1228 | ed->dma_descr->buf = (char*)virt_to_phys(&ed); /* Use any valid physical address for zero length descriptor. */ | ||
1229 | ed->dma_descr->after = ed->dma_descr->buf; | ||
1230 | ed->dma_descr->md = REG_TYPE_CONV(unsigned short int, struct strcop_meta_out, ed_mo); | ||
1231 | current_out_cdesc->next = ed; | ||
1232 | current_out_cdesc = ed; | ||
1233 | } else { | ||
1234 | /* Set EOP in the current out descriptor since the only active module is | ||
1235 | * the one needing the EOP. */ | ||
1236 | |||
1237 | current_out_cdesc->dma_descr->out_eop = 1; | ||
1238 | } | ||
1239 | } | ||
1240 | |||
1241 | if (cipher_ctx.done && cipher_ctx.active) cipher_ctx.active = 0; | ||
1242 | if (digest_ctx.done && digest_ctx.active) digest_ctx.active = 0; | ||
1243 | if (csum_ctx.done && csum_ctx.active) csum_ctx.active = 0; | ||
1244 | indata_ix += odsc->length; | ||
1245 | odsc = odsc->next; | ||
1246 | } /* while (odsc) */ /* Process descriptors. */ | ||
1247 | DEBUG(printk("cryptocop_setup_dma_list: done parsing operation descriptors\n")); | ||
1248 | if (cipher_ctx.tcfg && (cipher_ctx.active || !cipher_ctx.done)){ | ||
1249 | DEBUG_API(printk("cryptocop_setup_dma_list: cipher operation not terminated.\n")); | ||
1250 | failed = -EINVAL; | ||
1251 | goto error_cleanup; | ||
1252 | } | ||
1253 | if (digest_ctx.tcfg && (digest_ctx.active || !digest_ctx.done)){ | ||
1254 | DEBUG_API(printk("cryptocop_setup_dma_list: digest operation not terminated.\n")); | ||
1255 | failed = -EINVAL; | ||
1256 | goto error_cleanup; | ||
1257 | } | ||
1258 | if (csum_ctx.tcfg && (csum_ctx.active || !csum_ctx.done)){ | ||
1259 | DEBUG_API(printk("cryptocop_setup_dma_list: csum operation not terminated.\n")); | ||
1260 | failed = -EINVAL; | ||
1261 | goto error_cleanup; | ||
1262 | } | ||
1263 | |||
1264 | failed = append_input_descriptors(operation, ¤t_in_cdesc, ¤t_out_cdesc, &cipher_ctx, alloc_flag); | ||
1265 | if (failed){ | ||
1266 | DEBUG_API(printk("cryptocop_setup_dma_list: append_input_descriptors cipher_ctx %d\n", failed)); | ||
1267 | goto error_cleanup; | ||
1268 | } | ||
1269 | failed = append_input_descriptors(operation, ¤t_in_cdesc, ¤t_out_cdesc, &digest_ctx, alloc_flag); | ||
1270 | if (failed){ | ||
1271 | DEBUG_API(printk("cryptocop_setup_dma_list: append_input_descriptors cipher_ctx %d\n", failed)); | ||
1272 | goto error_cleanup; | ||
1273 | } | ||
1274 | failed = append_input_descriptors(operation, ¤t_in_cdesc, ¤t_out_cdesc, &csum_ctx, alloc_flag); | ||
1275 | if (failed){ | ||
1276 | DEBUG_API(printk("cryptocop_setup_dma_list: append_input_descriptors cipher_ctx %d\n", failed)); | ||
1277 | goto error_cleanup; | ||
1278 | } | ||
1279 | |||
1280 | DEBUG(printk("cryptocop_setup_dma_list: int_op=0x%p, *int_op=0x%p\n", int_op, *int_op)); | ||
1281 | (*int_op)->cdesc_out = out_cdesc_head.next; | ||
1282 | (*int_op)->cdesc_in = in_cdesc_head.next; | ||
1283 | DEBUG(printk("cryptocop_setup_dma_list: out_cdesc_head=0x%p in_cdesc_head=0x%p\n", (*int_op)->cdesc_out, (*int_op)->cdesc_in)); | ||
1284 | |||
1285 | setup_descr_chain(out_cdesc_head.next); | ||
1286 | setup_descr_chain(in_cdesc_head.next); | ||
1287 | |||
1288 | /* Last but not least: mark the last DMA in descriptor for a INTR and EOL and the the | ||
1289 | * last DMA out descriptor for EOL. | ||
1290 | */ | ||
1291 | current_in_cdesc->dma_descr->intr = 1; | ||
1292 | current_in_cdesc->dma_descr->eol = 1; | ||
1293 | current_out_cdesc->dma_descr->eol = 1; | ||
1294 | |||
1295 | /* Setup DMA contexts. */ | ||
1296 | (*int_op)->ctx_out.next = NULL; | ||
1297 | (*int_op)->ctx_out.eol = 1; | ||
1298 | (*int_op)->ctx_out.intr = 0; | ||
1299 | (*int_op)->ctx_out.store_mode = 0; | ||
1300 | (*int_op)->ctx_out.en = 0; | ||
1301 | (*int_op)->ctx_out.dis = 0; | ||
1302 | (*int_op)->ctx_out.md0 = 0; | ||
1303 | (*int_op)->ctx_out.md1 = 0; | ||
1304 | (*int_op)->ctx_out.md2 = 0; | ||
1305 | (*int_op)->ctx_out.md3 = 0; | ||
1306 | (*int_op)->ctx_out.md4 = 0; | ||
1307 | (*int_op)->ctx_out.saved_data = (dma_descr_data*)virt_to_phys((*int_op)->cdesc_out->dma_descr); | ||
1308 | (*int_op)->ctx_out.saved_data_buf = (*int_op)->cdesc_out->dma_descr->buf; /* Already physical address. */ | ||
1309 | |||
1310 | (*int_op)->ctx_in.next = NULL; | ||
1311 | (*int_op)->ctx_in.eol = 1; | ||
1312 | (*int_op)->ctx_in.intr = 0; | ||
1313 | (*int_op)->ctx_in.store_mode = 0; | ||
1314 | (*int_op)->ctx_in.en = 0; | ||
1315 | (*int_op)->ctx_in.dis = 0; | ||
1316 | (*int_op)->ctx_in.md0 = 0; | ||
1317 | (*int_op)->ctx_in.md1 = 0; | ||
1318 | (*int_op)->ctx_in.md2 = 0; | ||
1319 | (*int_op)->ctx_in.md3 = 0; | ||
1320 | (*int_op)->ctx_in.md4 = 0; | ||
1321 | |||
1322 | (*int_op)->ctx_in.saved_data = (dma_descr_data*)virt_to_phys((*int_op)->cdesc_in->dma_descr); | ||
1323 | (*int_op)->ctx_in.saved_data_buf = (*int_op)->cdesc_in->dma_descr->buf; /* Already physical address. */ | ||
1324 | |||
1325 | DEBUG(printk("cryptocop_setup_dma_list: done\n")); | ||
1326 | return 0; | ||
1327 | |||
1328 | error_cleanup: | ||
1329 | { | ||
1330 | /* Free all allocated resources. */ | ||
1331 | struct cryptocop_dma_desc *tmp_cdesc; | ||
1332 | while (digest_ctx.pad_descs){ | ||
1333 | tmp_cdesc = digest_ctx.pad_descs->next; | ||
1334 | free_cdesc(digest_ctx.pad_descs); | ||
1335 | digest_ctx.pad_descs = tmp_cdesc; | ||
1336 | } | ||
1337 | while (csum_ctx.pad_descs){ | ||
1338 | tmp_cdesc = csum_ctx.pad_descs->next; | ||
1339 | free_cdesc(csum_ctx.pad_descs); | ||
1340 | csum_ctx.pad_descs = tmp_cdesc; | ||
1341 | } | ||
1342 | assert(cipher_ctx.pad_descs == NULL); /* The ciphers are never padded. */ | ||
1343 | |||
1344 | if (*int_op != NULL) delete_internal_operation(*int_op); | ||
1345 | } | ||
1346 | DEBUG_API(printk("cryptocop_setup_dma_list: done with error %d\n", failed)); | ||
1347 | return failed; | ||
1348 | } | ||
1349 | |||
1350 | |||
1351 | static void delete_internal_operation(struct cryptocop_int_operation *iop) | ||
1352 | { | ||
1353 | void *ptr = iop->alloc_ptr; | ||
1354 | struct cryptocop_dma_desc *cd = iop->cdesc_out; | ||
1355 | struct cryptocop_dma_desc *next; | ||
1356 | |||
1357 | DEBUG(printk("delete_internal_operation: iop=0x%p, alloc_ptr=0x%p\n", iop, ptr)); | ||
1358 | |||
1359 | while (cd) { | ||
1360 | next = cd->next; | ||
1361 | free_cdesc(cd); | ||
1362 | cd = next; | ||
1363 | } | ||
1364 | cd = iop->cdesc_in; | ||
1365 | while (cd) { | ||
1366 | next = cd->next; | ||
1367 | free_cdesc(cd); | ||
1368 | cd = next; | ||
1369 | } | ||
1370 | kfree(ptr); | ||
1371 | } | ||
1372 | |||
1373 | #define MD5_MIN_PAD_LENGTH (9) | ||
1374 | #define MD5_PAD_LENGTH_FIELD_LENGTH (8) | ||
1375 | |||
1376 | static int create_md5_pad(int alloc_flag, unsigned long long hashed_length, char **pad, size_t *pad_length) | ||
1377 | { | ||
1378 | size_t padlen = MD5_BLOCK_LENGTH - (hashed_length % MD5_BLOCK_LENGTH); | ||
1379 | unsigned char *p; | ||
1380 | int i; | ||
1381 | unsigned long long int bit_length = hashed_length << 3; | ||
1382 | |||
1383 | if (padlen < MD5_MIN_PAD_LENGTH) padlen += MD5_BLOCK_LENGTH; | ||
1384 | |||
1385 | p = kmalloc(padlen, alloc_flag); | ||
1386 | if (!pad) return -ENOMEM; | ||
1387 | |||
1388 | *p = 0x80; | ||
1389 | memset(p+1, 0, padlen - 1); | ||
1390 | |||
1391 | DEBUG(printk("create_md5_pad: hashed_length=%lld bits == %lld bytes\n", bit_length, hashed_length)); | ||
1392 | |||
1393 | i = padlen - MD5_PAD_LENGTH_FIELD_LENGTH; | ||
1394 | while (bit_length != 0){ | ||
1395 | p[i++] = bit_length % 0x100; | ||
1396 | bit_length >>= 8; | ||
1397 | } | ||
1398 | |||
1399 | *pad = (char*)p; | ||
1400 | *pad_length = padlen; | ||
1401 | |||
1402 | return 0; | ||
1403 | } | ||
1404 | |||
1405 | #define SHA1_MIN_PAD_LENGTH (9) | ||
1406 | #define SHA1_PAD_LENGTH_FIELD_LENGTH (8) | ||
1407 | |||
1408 | static int create_sha1_pad(int alloc_flag, unsigned long long hashed_length, char **pad, size_t *pad_length) | ||
1409 | { | ||
1410 | size_t padlen = SHA1_BLOCK_LENGTH - (hashed_length % SHA1_BLOCK_LENGTH); | ||
1411 | unsigned char *p; | ||
1412 | int i; | ||
1413 | unsigned long long int bit_length = hashed_length << 3; | ||
1414 | |||
1415 | if (padlen < SHA1_MIN_PAD_LENGTH) padlen += SHA1_BLOCK_LENGTH; | ||
1416 | |||
1417 | p = kmalloc(padlen, alloc_flag); | ||
1418 | if (!pad) return -ENOMEM; | ||
1419 | |||
1420 | *p = 0x80; | ||
1421 | memset(p+1, 0, padlen - 1); | ||
1422 | |||
1423 | DEBUG(printk("create_sha1_pad: hashed_length=%lld bits == %lld bytes\n", bit_length, hashed_length)); | ||
1424 | |||
1425 | i = padlen - 1; | ||
1426 | while (bit_length != 0){ | ||
1427 | p[i--] = bit_length % 0x100; | ||
1428 | bit_length >>= 8; | ||
1429 | } | ||
1430 | |||
1431 | *pad = (char*)p; | ||
1432 | *pad_length = padlen; | ||
1433 | |||
1434 | return 0; | ||
1435 | } | ||
1436 | |||
1437 | |||
1438 | static int transform_ok(struct cryptocop_transform_init *tinit) | ||
1439 | { | ||
1440 | switch (tinit->alg){ | ||
1441 | case cryptocop_alg_csum: | ||
1442 | switch (tinit->csum_mode){ | ||
1443 | case cryptocop_csum_le: | ||
1444 | case cryptocop_csum_be: | ||
1445 | break; | ||
1446 | default: | ||
1447 | DEBUG_API(printk("transform_ok: Bad mode set for csum transform\n")); | ||
1448 | return -EINVAL; | ||
1449 | } | ||
1450 | case cryptocop_alg_mem2mem: | ||
1451 | case cryptocop_alg_md5: | ||
1452 | case cryptocop_alg_sha1: | ||
1453 | if (tinit->keylen != 0) { | ||
1454 | DEBUG_API(printk("transform_ok: non-zero keylength, %d, for a digest/csum algorithm\n", tinit->keylen)); | ||
1455 | return -EINVAL; /* This check is a bit strict. */ | ||
1456 | } | ||
1457 | break; | ||
1458 | case cryptocop_alg_des: | ||
1459 | if (tinit->keylen != 64) { | ||
1460 | DEBUG_API(printk("transform_ok: keylen %d invalid for DES\n", tinit->keylen)); | ||
1461 | return -EINVAL; | ||
1462 | } | ||
1463 | break; | ||
1464 | case cryptocop_alg_3des: | ||
1465 | if (tinit->keylen != 192) { | ||
1466 | DEBUG_API(printk("transform_ok: keylen %d invalid for 3DES\n", tinit->keylen)); | ||
1467 | return -EINVAL; | ||
1468 | } | ||
1469 | break; | ||
1470 | case cryptocop_alg_aes: | ||
1471 | if (tinit->keylen != 128 && tinit->keylen != 192 && tinit->keylen != 256) { | ||
1472 | DEBUG_API(printk("transform_ok: keylen %d invalid for AES\n", tinit->keylen)); | ||
1473 | return -EINVAL; | ||
1474 | } | ||
1475 | break; | ||
1476 | case cryptocop_no_alg: | ||
1477 | default: | ||
1478 | DEBUG_API(printk("transform_ok: no such algorithm %d\n", tinit->alg)); | ||
1479 | return -EINVAL; | ||
1480 | } | ||
1481 | |||
1482 | switch (tinit->alg){ | ||
1483 | case cryptocop_alg_des: | ||
1484 | case cryptocop_alg_3des: | ||
1485 | case cryptocop_alg_aes: | ||
1486 | if (tinit->cipher_mode != cryptocop_cipher_mode_ecb && tinit->cipher_mode != cryptocop_cipher_mode_cbc) return -EINVAL; | ||
1487 | default: | ||
1488 | break; | ||
1489 | } | ||
1490 | return 0; | ||
1491 | } | ||
1492 | |||
1493 | |||
1494 | int cryptocop_new_session(cryptocop_session_id *sid, struct cryptocop_transform_init *tinit, int alloc_flag) | ||
1495 | { | ||
1496 | struct cryptocop_session *sess; | ||
1497 | struct cryptocop_transform_init *tfrm_in = tinit; | ||
1498 | struct cryptocop_transform_init *tmp_in; | ||
1499 | int no_tfrms = 0; | ||
1500 | int i; | ||
1501 | unsigned long int flags; | ||
1502 | |||
1503 | init_stream_coprocessor(); /* For safety if we are called early */ | ||
1504 | |||
1505 | while (tfrm_in){ | ||
1506 | int err; | ||
1507 | ++no_tfrms; | ||
1508 | if ((err = transform_ok(tfrm_in))) { | ||
1509 | DEBUG_API(printk("cryptocop_new_session, bad transform\n")); | ||
1510 | return err; | ||
1511 | } | ||
1512 | tfrm_in = tfrm_in->next; | ||
1513 | } | ||
1514 | if (0 == no_tfrms) { | ||
1515 | DEBUG_API(printk("cryptocop_new_session, no transforms specified\n")); | ||
1516 | return -EINVAL; | ||
1517 | } | ||
1518 | |||
1519 | sess = kmalloc(sizeof(struct cryptocop_session), alloc_flag); | ||
1520 | if (!sess){ | ||
1521 | DEBUG_API(printk("cryptocop_new_session, kmalloc cryptocop_session\n")); | ||
1522 | return -ENOMEM; | ||
1523 | } | ||
1524 | |||
1525 | sess->tfrm_ctx = kmalloc(no_tfrms * sizeof(struct cryptocop_transform_ctx), alloc_flag); | ||
1526 | if (!sess->tfrm_ctx) { | ||
1527 | DEBUG_API(printk("cryptocop_new_session, kmalloc cryptocop_transform_ctx\n")); | ||
1528 | kfree(sess); | ||
1529 | return -ENOMEM; | ||
1530 | } | ||
1531 | |||
1532 | tfrm_in = tinit; | ||
1533 | for (i = 0; i < no_tfrms; i++){ | ||
1534 | tmp_in = tfrm_in->next; | ||
1535 | while (tmp_in){ | ||
1536 | if (tmp_in->tid == tfrm_in->tid) { | ||
1537 | DEBUG_API(printk("cryptocop_new_session, duplicate transform ids\n")); | ||
1538 | kfree(sess->tfrm_ctx); | ||
1539 | kfree(sess); | ||
1540 | return -EINVAL; | ||
1541 | } | ||
1542 | tmp_in = tmp_in->next; | ||
1543 | } | ||
1544 | memcpy(&sess->tfrm_ctx[i].init, tfrm_in, sizeof(struct cryptocop_transform_init)); | ||
1545 | sess->tfrm_ctx[i].dec_key_set = 0; | ||
1546 | sess->tfrm_ctx[i].next = &sess->tfrm_ctx[i] + 1; | ||
1547 | |||
1548 | tfrm_in = tfrm_in->next; | ||
1549 | } | ||
1550 | sess->tfrm_ctx[i-1].next = NULL; | ||
1551 | |||
1552 | spin_lock_irqsave(&cryptocop_sessions_lock, flags); | ||
1553 | sess->sid = next_sid; | ||
1554 | next_sid++; | ||
1555 | /* TODO If we are really paranoid we should do duplicate check to handle sid wraparound. | ||
1556 | * OTOH 2^64 is a really large number of session. */ | ||
1557 | if (next_sid == 0) next_sid = 1; | ||
1558 | |||
1559 | /* Prepend to session list. */ | ||
1560 | sess->next = cryptocop_sessions; | ||
1561 | cryptocop_sessions = sess; | ||
1562 | spin_unlock_irqrestore(&cryptocop_sessions_lock, flags); | ||
1563 | *sid = sess->sid; | ||
1564 | return 0; | ||
1565 | } | ||
1566 | |||
1567 | |||
1568 | int cryptocop_free_session(cryptocop_session_id sid) | ||
1569 | { | ||
1570 | struct cryptocop_transform_ctx *tc; | ||
1571 | struct cryptocop_session *sess = NULL; | ||
1572 | struct cryptocop_session *psess = NULL; | ||
1573 | unsigned long int flags; | ||
1574 | int i; | ||
1575 | LIST_HEAD(remove_list); | ||
1576 | struct list_head *node, *tmp; | ||
1577 | struct cryptocop_prio_job *pj; | ||
1578 | |||
1579 | DEBUG(printk("cryptocop_free_session: sid=%lld\n", sid)); | ||
1580 | |||
1581 | spin_lock_irqsave(&cryptocop_sessions_lock, flags); | ||
1582 | sess = cryptocop_sessions; | ||
1583 | while (sess && sess->sid != sid){ | ||
1584 | psess = sess; | ||
1585 | sess = sess->next; | ||
1586 | } | ||
1587 | if (sess){ | ||
1588 | if (psess){ | ||
1589 | psess->next = sess->next; | ||
1590 | } else { | ||
1591 | cryptocop_sessions = sess->next; | ||
1592 | } | ||
1593 | } | ||
1594 | spin_unlock_irqrestore(&cryptocop_sessions_lock, flags); | ||
1595 | |||
1596 | if (!sess) return -EINVAL; | ||
1597 | |||
1598 | /* Remove queued jobs. */ | ||
1599 | spin_lock_irqsave(&cryptocop_job_queue_lock, flags); | ||
1600 | |||
1601 | for (i = 0; i < cryptocop_prio_no_prios; i++){ | ||
1602 | if (!list_empty(&(cryptocop_job_queues[i].jobs))){ | ||
1603 | list_for_each_safe(node, tmp, &(cryptocop_job_queues[i].jobs)) { | ||
1604 | pj = list_entry(node, struct cryptocop_prio_job, node); | ||
1605 | if (pj->oper->sid == sid) { | ||
1606 | list_move_tail(node, &remove_list); | ||
1607 | } | ||
1608 | } | ||
1609 | } | ||
1610 | } | ||
1611 | spin_unlock_irqrestore(&cryptocop_job_queue_lock, flags); | ||
1612 | |||
1613 | list_for_each_safe(node, tmp, &remove_list) { | ||
1614 | list_del(node); | ||
1615 | pj = list_entry(node, struct cryptocop_prio_job, node); | ||
1616 | pj->oper->operation_status = -EAGAIN; /* EAGAIN is not ideal for job/session terminated but it's the best choice I know of. */ | ||
1617 | DEBUG(printk("cryptocop_free_session: pj=0x%p, pj->oper=0x%p, pj->iop=0x%p\n", pj, pj->oper, pj->iop)); | ||
1618 | pj->oper->cb(pj->oper, pj->oper->cb_data); | ||
1619 | delete_internal_operation(pj->iop); | ||
1620 | kfree(pj); | ||
1621 | } | ||
1622 | |||
1623 | tc = sess->tfrm_ctx; | ||
1624 | /* Erase keying data. */ | ||
1625 | while (tc){ | ||
1626 | DEBUG(printk("cryptocop_free_session: memset keys, tfrm id=%d\n", tc->init.tid)); | ||
1627 | memset(tc->init.key, 0xff, CRYPTOCOP_MAX_KEY_LENGTH); | ||
1628 | memset(tc->dec_key, 0xff, CRYPTOCOP_MAX_KEY_LENGTH); | ||
1629 | tc = tc->next; | ||
1630 | } | ||
1631 | kfree(sess->tfrm_ctx); | ||
1632 | kfree(sess); | ||
1633 | |||
1634 | return 0; | ||
1635 | } | ||
1636 | |||
1637 | static struct cryptocop_session *get_session(cryptocop_session_id sid) | ||
1638 | { | ||
1639 | struct cryptocop_session *sess; | ||
1640 | unsigned long int flags; | ||
1641 | |||
1642 | spin_lock_irqsave(&cryptocop_sessions_lock, flags); | ||
1643 | sess = cryptocop_sessions; | ||
1644 | while (sess && (sess->sid != sid)){ | ||
1645 | sess = sess->next; | ||
1646 | } | ||
1647 | spin_unlock_irqrestore(&cryptocop_sessions_lock, flags); | ||
1648 | |||
1649 | return sess; | ||
1650 | } | ||
1651 | |||
1652 | static struct cryptocop_transform_ctx *get_transform_ctx(struct cryptocop_session *sess, cryptocop_tfrm_id tid) | ||
1653 | { | ||
1654 | struct cryptocop_transform_ctx *tc = sess->tfrm_ctx; | ||
1655 | |||
1656 | DEBUG(printk("get_transform_ctx, sess=0x%p, tid=%d\n", sess, tid)); | ||
1657 | assert(sess != NULL); | ||
1658 | while (tc && tc->init.tid != tid){ | ||
1659 | DEBUG(printk("tc=0x%p, tc->next=0x%p\n", tc, tc->next)); | ||
1660 | tc = tc->next; | ||
1661 | } | ||
1662 | DEBUG(printk("get_transform_ctx, returning tc=0x%p\n", tc)); | ||
1663 | return tc; | ||
1664 | } | ||
1665 | |||
1666 | |||
1667 | |||
1668 | /* The AES s-transform matrix (s-box). */ | ||
1669 | static const u8 aes_sbox[256] = { | ||
1670 | 99, 124, 119, 123, 242, 107, 111, 197, 48, 1, 103, 43, 254, 215, 171, 118, | ||
1671 | 202, 130, 201, 125, 250, 89, 71, 240, 173, 212, 162, 175, 156, 164, 114, 192, | ||
1672 | 183, 253, 147, 38, 54, 63, 247, 204, 52, 165, 229, 241, 113, 216, 49, 21, | ||
1673 | 4, 199, 35, 195, 24, 150, 5, 154, 7, 18, 128, 226, 235, 39, 178, 117, | ||
1674 | 9, 131, 44, 26, 27, 110, 90, 160, 82, 59, 214, 179, 41, 227, 47, 132, | ||
1675 | 83, 209, 0, 237, 32, 252, 177, 91, 106, 203, 190, 57, 74, 76, 88, 207, | ||
1676 | 208, 239, 170, 251, 67, 77, 51, 133, 69, 249, 2, 127, 80, 60, 159, 168, | ||
1677 | 81, 163, 64, 143, 146, 157, 56, 245, 188, 182, 218, 33, 16, 255, 243, 210, | ||
1678 | 205, 12, 19, 236, 95, 151, 68, 23, 196, 167, 126, 61, 100, 93, 25, 115, | ||
1679 | 96, 129, 79, 220, 34, 42, 144, 136, 70, 238, 184, 20, 222, 94, 11, 219, | ||
1680 | 224, 50, 58, 10, 73, 6, 36, 92, 194, 211, 172, 98, 145, 149, 228, 121, | ||
1681 | 231, 200, 55, 109, 141, 213, 78, 169, 108, 86, 244, 234, 101, 122, 174, 8, | ||
1682 | 186, 120, 37, 46, 28, 166, 180, 198, 232, 221, 116, 31, 75, 189, 139, 138, | ||
1683 | 112, 62, 181, 102, 72, 3, 246, 14, 97, 53, 87, 185, 134, 193, 29, 158, | ||
1684 | 225, 248, 152, 17, 105, 217, 142, 148, 155, 30, 135, 233, 206, 85, 40, 223, | ||
1685 | 140, 161, 137, 13, 191, 230, 66, 104, 65, 153, 45, 15, 176, 84, 187, 22 | ||
1686 | }; | ||
1687 | |||
1688 | /* AES has a 32 bit word round constants for each round in the | ||
1689 | * key schedule. round_constant[i] is really Rcon[i+1] in FIPS187. | ||
1690 | */ | ||
1691 | static u32 round_constant[11] = { | ||
1692 | 0x01000000, 0x02000000, 0x04000000, 0x08000000, | ||
1693 | 0x10000000, 0x20000000, 0x40000000, 0x80000000, | ||
1694 | 0x1B000000, 0x36000000, 0x6C000000 | ||
1695 | }; | ||
1696 | |||
1697 | /* Apply the s-box to each of the four occtets in w. */ | ||
1698 | static u32 aes_ks_subword(const u32 w) | ||
1699 | { | ||
1700 | u8 bytes[4]; | ||
1701 | |||
1702 | *(u32*)(&bytes[0]) = w; | ||
1703 | bytes[0] = aes_sbox[bytes[0]]; | ||
1704 | bytes[1] = aes_sbox[bytes[1]]; | ||
1705 | bytes[2] = aes_sbox[bytes[2]]; | ||
1706 | bytes[3] = aes_sbox[bytes[3]]; | ||
1707 | return *(u32*)(&bytes[0]); | ||
1708 | } | ||
1709 | |||
1710 | /* The encrypt (forward) Rijndael key schedule algorithm pseudo code: | ||
1711 | * (Note that AES words are 32 bit long) | ||
1712 | * | ||
1713 | * KeyExpansion(byte key[4*Nk], word w[Nb*(Nr+1)], Nk){ | ||
1714 | * word temp | ||
1715 | * i = 0 | ||
1716 | * while (i < Nk) { | ||
1717 | * w[i] = word(key[4*i, 4*i + 1, 4*i + 2, 4*i + 3]) | ||
1718 | * i = i + 1 | ||
1719 | * } | ||
1720 | * i = Nk | ||
1721 | * | ||
1722 | * while (i < (Nb * (Nr + 1))) { | ||
1723 | * temp = w[i - 1] | ||
1724 | * if ((i mod Nk) == 0) { | ||
1725 | * temp = SubWord(RotWord(temp)) xor Rcon[i/Nk] | ||
1726 | * } | ||
1727 | * else if ((Nk > 6) && ((i mod Nk) == 4)) { | ||
1728 | * temp = SubWord(temp) | ||
1729 | * } | ||
1730 | * w[i] = w[i - Nk] xor temp | ||
1731 | * } | ||
1732 | * RotWord(t) does a 8 bit cyclic shift left on a 32 bit word. | ||
1733 | * SubWord(t) applies the AES s-box individually to each octet | ||
1734 | * in a 32 bit word. | ||
1735 | * | ||
1736 | * For AES Nk can have the values 4, 6, and 8 (corresponding to | ||
1737 | * values for Nr of 10, 12, and 14). Nb is always 4. | ||
1738 | * | ||
1739 | * To construct w[i], w[i - 1] and w[i - Nk] must be | ||
1740 | * available. Consequently we must keep a state of the last Nk words | ||
1741 | * to be able to create the last round keys. | ||
1742 | */ | ||
1743 | static void get_aes_decrypt_key(unsigned char *dec_key, const unsigned char *key, unsigned int keylength) | ||
1744 | { | ||
1745 | u32 temp; | ||
1746 | u32 w_ring[8]; /* nk is max 8, use elements 0..(nk - 1) as a ringbuffer */ | ||
1747 | u8 w_last_ix; | ||
1748 | int i; | ||
1749 | u8 nr, nk; | ||
1750 | |||
1751 | switch (keylength){ | ||
1752 | case 128: | ||
1753 | nk = 4; | ||
1754 | nr = 10; | ||
1755 | break; | ||
1756 | case 192: | ||
1757 | nk = 6; | ||
1758 | nr = 12; | ||
1759 | break; | ||
1760 | case 256: | ||
1761 | nk = 8; | ||
1762 | nr = 14; | ||
1763 | break; | ||
1764 | default: | ||
1765 | panic("stream co-processor: bad aes key length in get_aes_decrypt_key\n"); | ||
1766 | }; | ||
1767 | |||
1768 | /* Need to do host byte order correction here since key is byte oriented and the | ||
1769 | * kx algorithm is word (u32) oriented. */ | ||
1770 | for (i = 0; i < nk; i+=1) { | ||
1771 | w_ring[i] = be32_to_cpu(*(u32*)&key[4*i]); | ||
1772 | } | ||
1773 | |||
1774 | i = (int)nk; | ||
1775 | w_last_ix = i - 1; | ||
1776 | while (i < (4 * (nr + 2))) { | ||
1777 | temp = w_ring[w_last_ix]; | ||
1778 | if (!(i % nk)) { | ||
1779 | /* RotWord(temp) */ | ||
1780 | temp = (temp << 8) | (temp >> 24); | ||
1781 | temp = aes_ks_subword(temp); | ||
1782 | temp ^= round_constant[i/nk - 1]; | ||
1783 | } else if ((nk > 6) && ((i % nk) == 4)) { | ||
1784 | temp = aes_ks_subword(temp); | ||
1785 | } | ||
1786 | w_last_ix = (w_last_ix + 1) % nk; /* This is the same as (i-Nk) mod Nk */ | ||
1787 | temp ^= w_ring[w_last_ix]; | ||
1788 | w_ring[w_last_ix] = temp; | ||
1789 | |||
1790 | /* We need the round keys for round Nr+1 and Nr+2 (round key | ||
1791 | * Nr+2 is the round key beyond the last one used when | ||
1792 | * encrypting). Rounds are numbered starting from 0, Nr=10 | ||
1793 | * implies 11 rounds are used in encryption/decryption. | ||
1794 | */ | ||
1795 | if (i >= (4 * nr)) { | ||
1796 | /* Need to do host byte order correction here, the key | ||
1797 | * is byte oriented. */ | ||
1798 | *(u32*)dec_key = cpu_to_be32(temp); | ||
1799 | dec_key += 4; | ||
1800 | } | ||
1801 | ++i; | ||
1802 | } | ||
1803 | } | ||
1804 | |||
1805 | |||
1806 | /**** Job/operation management. ****/ | ||
1807 | |||
1808 | int cryptocop_job_queue_insert_csum(struct cryptocop_operation *operation) | ||
1809 | { | ||
1810 | return cryptocop_job_queue_insert(cryptocop_prio_kernel_csum, operation); | ||
1811 | } | ||
1812 | |||
1813 | int cryptocop_job_queue_insert_crypto(struct cryptocop_operation *operation) | ||
1814 | { | ||
1815 | return cryptocop_job_queue_insert(cryptocop_prio_kernel, operation); | ||
1816 | } | ||
1817 | |||
1818 | int cryptocop_job_queue_insert_user_job(struct cryptocop_operation *operation) | ||
1819 | { | ||
1820 | return cryptocop_job_queue_insert(cryptocop_prio_user, operation); | ||
1821 | } | ||
1822 | |||
1823 | static int cryptocop_job_queue_insert(cryptocop_queue_priority prio, struct cryptocop_operation *operation) | ||
1824 | { | ||
1825 | int ret; | ||
1826 | struct cryptocop_prio_job *pj = NULL; | ||
1827 | unsigned long int flags; | ||
1828 | |||
1829 | DEBUG(printk("cryptocop_job_queue_insert(%d, 0x%p)\n", prio, operation)); | ||
1830 | |||
1831 | if (!operation || !operation->cb){ | ||
1832 | DEBUG_API(printk("cryptocop_job_queue_insert oper=0x%p, NULL operation or callback\n", operation)); | ||
1833 | return -EINVAL; | ||
1834 | } | ||
1835 | |||
1836 | if ((ret = cryptocop_job_setup(&pj, operation)) != 0){ | ||
1837 | DEBUG_API(printk("cryptocop_job_queue_insert: job setup failed\n")); | ||
1838 | return ret; | ||
1839 | } | ||
1840 | assert(pj != NULL); | ||
1841 | |||
1842 | spin_lock_irqsave(&cryptocop_job_queue_lock, flags); | ||
1843 | list_add_tail(&pj->node, &cryptocop_job_queues[prio].jobs); | ||
1844 | spin_unlock_irqrestore(&cryptocop_job_queue_lock, flags); | ||
1845 | |||
1846 | /* Make sure a job is running */ | ||
1847 | cryptocop_start_job(); | ||
1848 | return 0; | ||
1849 | } | ||
1850 | |||
1851 | static void cryptocop_do_tasklet(unsigned long unused); | ||
1852 | DECLARE_TASKLET (cryptocop_tasklet, cryptocop_do_tasklet, 0); | ||
1853 | |||
1854 | static void cryptocop_do_tasklet(unsigned long unused) | ||
1855 | { | ||
1856 | struct list_head *node; | ||
1857 | struct cryptocop_prio_job *pj = NULL; | ||
1858 | unsigned long flags; | ||
1859 | |||
1860 | DEBUG(printk("cryptocop_do_tasklet: entering\n")); | ||
1861 | |||
1862 | do { | ||
1863 | spin_lock_irqsave(&cryptocop_completed_jobs_lock, flags); | ||
1864 | if (!list_empty(&cryptocop_completed_jobs)){ | ||
1865 | node = cryptocop_completed_jobs.next; | ||
1866 | list_del(node); | ||
1867 | pj = list_entry(node, struct cryptocop_prio_job, node); | ||
1868 | } else { | ||
1869 | pj = NULL; | ||
1870 | } | ||
1871 | spin_unlock_irqrestore(&cryptocop_completed_jobs_lock, flags); | ||
1872 | if (pj) { | ||
1873 | assert(pj->oper != NULL); | ||
1874 | |||
1875 | /* Notify consumer of operation completeness. */ | ||
1876 | DEBUG(printk("cryptocop_do_tasklet: callback 0x%p, data 0x%p\n", pj->oper->cb, pj->oper->cb_data)); | ||
1877 | |||
1878 | pj->oper->operation_status = 0; /* Job is completed. */ | ||
1879 | pj->oper->cb(pj->oper, pj->oper->cb_data); | ||
1880 | delete_internal_operation(pj->iop); | ||
1881 | kfree(pj); | ||
1882 | } | ||
1883 | } while (pj != NULL); | ||
1884 | |||
1885 | DEBUG(printk("cryptocop_do_tasklet: exiting\n")); | ||
1886 | } | ||
1887 | |||
1888 | static irqreturn_t | ||
1889 | dma_done_interrupt(int irq, void *dev_id, struct pt_regs * regs) | ||
1890 | { | ||
1891 | struct cryptocop_prio_job *done_job; | ||
1892 | reg_dma_rw_ack_intr ack_intr = { | ||
1893 | .data = 1, | ||
1894 | }; | ||
1895 | |||
1896 | REG_WR (dma, regi_dma9, rw_ack_intr, ack_intr); | ||
1897 | |||
1898 | DEBUG(printk("cryptocop DMA done\n")); | ||
1899 | |||
1900 | spin_lock(&running_job_lock); | ||
1901 | if (cryptocop_running_job == NULL){ | ||
1902 | printk("stream co-processor got interrupt when not busy\n"); | ||
1903 | spin_unlock(&running_job_lock); | ||
1904 | return IRQ_HANDLED; | ||
1905 | } | ||
1906 | done_job = cryptocop_running_job; | ||
1907 | cryptocop_running_job = NULL; | ||
1908 | spin_unlock(&running_job_lock); | ||
1909 | |||
1910 | /* Start processing a job. */ | ||
1911 | if (!spin_trylock(&cryptocop_process_lock)){ | ||
1912 | DEBUG(printk("cryptocop irq handler, not starting a job\n")); | ||
1913 | } else { | ||
1914 | cryptocop_start_job(); | ||
1915 | spin_unlock(&cryptocop_process_lock); | ||
1916 | } | ||
1917 | |||
1918 | done_job->oper->operation_status = 0; /* Job is completed. */ | ||
1919 | if (done_job->oper->fast_callback){ | ||
1920 | /* This operation wants callback from interrupt. */ | ||
1921 | done_job->oper->cb(done_job->oper, done_job->oper->cb_data); | ||
1922 | delete_internal_operation(done_job->iop); | ||
1923 | kfree(done_job); | ||
1924 | } else { | ||
1925 | spin_lock(&cryptocop_completed_jobs_lock); | ||
1926 | list_add_tail(&(done_job->node), &cryptocop_completed_jobs); | ||
1927 | spin_unlock(&cryptocop_completed_jobs_lock); | ||
1928 | tasklet_schedule(&cryptocop_tasklet); | ||
1929 | } | ||
1930 | |||
1931 | DEBUG(printk("cryptocop leave irq handler\n")); | ||
1932 | return IRQ_HANDLED; | ||
1933 | } | ||
1934 | |||
1935 | |||
1936 | /* Setup interrupts and DMA channels. */ | ||
1937 | static int init_cryptocop(void) | ||
1938 | { | ||
1939 | unsigned long flags; | ||
1940 | reg_intr_vect_rw_mask intr_mask; | ||
1941 | reg_dma_rw_cfg dma_cfg = {.en = 1}; | ||
1942 | reg_dma_rw_intr_mask intr_mask_in = {.data = regk_dma_yes}; /* Only want descriptor interrupts from the DMA in channel. */ | ||
1943 | reg_dma_rw_ack_intr ack_intr = {.data = 1,.in_eop = 1 }; | ||
1944 | reg_strcop_rw_cfg strcop_cfg = { | ||
1945 | .ipend = regk_strcop_little, | ||
1946 | .td1 = regk_strcop_e, | ||
1947 | .td2 = regk_strcop_d, | ||
1948 | .td3 = regk_strcop_e, | ||
1949 | .ignore_sync = 0, | ||
1950 | .en = 1 | ||
1951 | }; | ||
1952 | |||
1953 | if (request_irq(DMA9_INTR_VECT, dma_done_interrupt, 0, "stream co-processor DMA", NULL)) panic("request_irq stream co-processor irq dma9"); | ||
1954 | |||
1955 | (void)crisv32_request_dma(8, "strcop", DMA_PANIC_ON_ERROR, 0, dma_strp); | ||
1956 | (void)crisv32_request_dma(9, "strcop", DMA_PANIC_ON_ERROR, 0, dma_strp); | ||
1957 | |||
1958 | local_irq_save(flags); | ||
1959 | |||
1960 | /* Reset and enable the cryptocop. */ | ||
1961 | strcop_cfg.en = 0; | ||
1962 | REG_WR(strcop, regi_strcop, rw_cfg, strcop_cfg); | ||
1963 | strcop_cfg.en = 1; | ||
1964 | REG_WR(strcop, regi_strcop, rw_cfg, strcop_cfg); | ||
1965 | |||
1966 | /* Enable DMA9 interrupt */ | ||
1967 | intr_mask = REG_RD(intr_vect, regi_irq, rw_mask); | ||
1968 | intr_mask.dma9 = 1; | ||
1969 | REG_WR(intr_vect, regi_irq, rw_mask, intr_mask); | ||
1970 | |||
1971 | /* Enable DMAs. */ | ||
1972 | REG_WR(dma, regi_dma9, rw_cfg, dma_cfg); /* input DMA */ | ||
1973 | REG_WR(dma, regi_dma8, rw_cfg, dma_cfg); /* output DMA */ | ||
1974 | |||
1975 | /* Set up wordsize = 4 for DMAs. */ | ||
1976 | DMA_WR_CMD (regi_dma8, regk_dma_set_w_size4); | ||
1977 | DMA_WR_CMD (regi_dma9, regk_dma_set_w_size4); | ||
1978 | |||
1979 | /* Enable interrupts. */ | ||
1980 | REG_WR(dma, regi_dma9, rw_intr_mask, intr_mask_in); | ||
1981 | |||
1982 | /* Clear intr ack. */ | ||
1983 | REG_WR(dma, regi_dma9, rw_ack_intr, ack_intr); | ||
1984 | |||
1985 | local_irq_restore(flags); | ||
1986 | |||
1987 | return 0; | ||
1988 | } | ||
1989 | |||
1990 | /* Free used cryptocop hw resources (interrupt and DMA channels). */ | ||
1991 | static void release_cryptocop(void) | ||
1992 | { | ||
1993 | unsigned long flags; | ||
1994 | reg_intr_vect_rw_mask intr_mask; | ||
1995 | reg_dma_rw_cfg dma_cfg = {.en = 0}; | ||
1996 | reg_dma_rw_intr_mask intr_mask_in = {0}; | ||
1997 | reg_dma_rw_ack_intr ack_intr = {.data = 1,.in_eop = 1 }; | ||
1998 | |||
1999 | local_irq_save(flags); | ||
2000 | |||
2001 | /* Clear intr ack. */ | ||
2002 | REG_WR(dma, regi_dma9, rw_ack_intr, ack_intr); | ||
2003 | |||
2004 | /* Disable DMA9 interrupt */ | ||
2005 | intr_mask = REG_RD(intr_vect, regi_irq, rw_mask); | ||
2006 | intr_mask.dma9 = 0; | ||
2007 | REG_WR(intr_vect, regi_irq, rw_mask, intr_mask); | ||
2008 | |||
2009 | /* Disable DMAs. */ | ||
2010 | REG_WR(dma, regi_dma9, rw_cfg, dma_cfg); /* input DMA */ | ||
2011 | REG_WR(dma, regi_dma8, rw_cfg, dma_cfg); /* output DMA */ | ||
2012 | |||
2013 | /* Disable interrupts. */ | ||
2014 | REG_WR(dma, regi_dma9, rw_intr_mask, intr_mask_in); | ||
2015 | |||
2016 | local_irq_restore(flags); | ||
2017 | |||
2018 | free_irq(DMA9_INTR_VECT, NULL); | ||
2019 | |||
2020 | (void)crisv32_free_dma(8); | ||
2021 | (void)crisv32_free_dma(9); | ||
2022 | } | ||
2023 | |||
2024 | |||
2025 | /* Init job queue. */ | ||
2026 | static int cryptocop_job_queue_init(void) | ||
2027 | { | ||
2028 | int i; | ||
2029 | |||
2030 | INIT_LIST_HEAD(&cryptocop_completed_jobs); | ||
2031 | |||
2032 | for (i = 0; i < cryptocop_prio_no_prios; i++){ | ||
2033 | cryptocop_job_queues[i].prio = (cryptocop_queue_priority)i; | ||
2034 | INIT_LIST_HEAD(&cryptocop_job_queues[i].jobs); | ||
2035 | } | ||
2036 | return 0; | ||
2037 | } | ||
2038 | |||
2039 | |||
2040 | static void cryptocop_job_queue_close(void) | ||
2041 | { | ||
2042 | struct list_head *node, *tmp; | ||
2043 | struct cryptocop_prio_job *pj = NULL; | ||
2044 | unsigned long int process_flags, flags; | ||
2045 | int i; | ||
2046 | |||
2047 | /* FIXME: This is as yet untested code. */ | ||
2048 | |||
2049 | /* Stop strcop from getting an operation to process while we are closing the | ||
2050 | module. */ | ||
2051 | spin_lock_irqsave(&cryptocop_process_lock, process_flags); | ||
2052 | |||
2053 | /* Empty the job queue. */ | ||
2054 | spin_lock_irqsave(&cryptocop_process_lock, process_flags); | ||
2055 | for (i = 0; i < cryptocop_prio_no_prios; i++){ | ||
2056 | if (!list_empty(&(cryptocop_job_queues[i].jobs))){ | ||
2057 | list_for_each_safe(node, tmp, &(cryptocop_job_queues[i].jobs)) { | ||
2058 | pj = list_entry(node, struct cryptocop_prio_job, node); | ||
2059 | list_del(node); | ||
2060 | |||
2061 | /* Call callback to notify consumer of job removal. */ | ||
2062 | DEBUG(printk("cryptocop_job_queue_close: callback 0x%p, data 0x%p\n", pj->oper->cb, pj->oper->cb_data)); | ||
2063 | pj->oper->operation_status = -EINTR; /* Job is terminated without completion. */ | ||
2064 | pj->oper->cb(pj->oper, pj->oper->cb_data); | ||
2065 | |||
2066 | delete_internal_operation(pj->iop); | ||
2067 | kfree(pj); | ||
2068 | } | ||
2069 | } | ||
2070 | } | ||
2071 | spin_unlock_irqrestore(&cryptocop_process_lock, process_flags); | ||
2072 | |||
2073 | /* Remove the running job, if any. */ | ||
2074 | spin_lock_irqsave(&running_job_lock, flags); | ||
2075 | if (cryptocop_running_job){ | ||
2076 | reg_strcop_rw_cfg rw_cfg; | ||
2077 | reg_dma_rw_cfg dma_out_cfg, dma_in_cfg; | ||
2078 | |||
2079 | /* Stop DMA. */ | ||
2080 | dma_out_cfg = REG_RD(dma, regi_dma8, rw_cfg); | ||
2081 | dma_out_cfg.en = regk_dma_no; | ||
2082 | REG_WR(dma, regi_dma8, rw_cfg, dma_out_cfg); | ||
2083 | |||
2084 | dma_in_cfg = REG_RD(dma, regi_dma9, rw_cfg); | ||
2085 | dma_in_cfg.en = regk_dma_no; | ||
2086 | REG_WR(dma, regi_dma9, rw_cfg, dma_in_cfg); | ||
2087 | |||
2088 | /* Disble the cryptocop. */ | ||
2089 | rw_cfg = REG_RD(strcop, regi_strcop, rw_cfg); | ||
2090 | rw_cfg.en = 0; | ||
2091 | REG_WR(strcop, regi_strcop, rw_cfg, rw_cfg); | ||
2092 | |||
2093 | pj = cryptocop_running_job; | ||
2094 | cryptocop_running_job = NULL; | ||
2095 | |||
2096 | /* Call callback to notify consumer of job removal. */ | ||
2097 | DEBUG(printk("cryptocop_job_queue_close: callback 0x%p, data 0x%p\n", pj->oper->cb, pj->oper->cb_data)); | ||
2098 | pj->oper->operation_status = -EINTR; /* Job is terminated without completion. */ | ||
2099 | pj->oper->cb(pj->oper, pj->oper->cb_data); | ||
2100 | |||
2101 | delete_internal_operation(pj->iop); | ||
2102 | kfree(pj); | ||
2103 | } | ||
2104 | spin_unlock_irqrestore(&running_job_lock, flags); | ||
2105 | |||
2106 | /* Remove completed jobs, if any. */ | ||
2107 | spin_lock_irqsave(&cryptocop_completed_jobs_lock, flags); | ||
2108 | |||
2109 | list_for_each_safe(node, tmp, &cryptocop_completed_jobs) { | ||
2110 | pj = list_entry(node, struct cryptocop_prio_job, node); | ||
2111 | list_del(node); | ||
2112 | /* Call callback to notify consumer of job removal. */ | ||
2113 | DEBUG(printk("cryptocop_job_queue_close: callback 0x%p, data 0x%p\n", pj->oper->cb, pj->oper->cb_data)); | ||
2114 | pj->oper->operation_status = -EINTR; /* Job is terminated without completion. */ | ||
2115 | pj->oper->cb(pj->oper, pj->oper->cb_data); | ||
2116 | |||
2117 | delete_internal_operation(pj->iop); | ||
2118 | kfree(pj); | ||
2119 | } | ||
2120 | spin_unlock_irqrestore(&cryptocop_completed_jobs_lock, flags); | ||
2121 | } | ||
2122 | |||
2123 | |||
2124 | static void cryptocop_start_job(void) | ||
2125 | { | ||
2126 | int i; | ||
2127 | struct cryptocop_prio_job *pj; | ||
2128 | unsigned long int flags; | ||
2129 | unsigned long int running_job_flags; | ||
2130 | reg_strcop_rw_cfg rw_cfg = {.en = 1, .ignore_sync = 0}; | ||
2131 | |||
2132 | DEBUG(printk("cryptocop_start_job: entering\n")); | ||
2133 | |||
2134 | spin_lock_irqsave(&running_job_lock, running_job_flags); | ||
2135 | if (cryptocop_running_job != NULL){ | ||
2136 | /* Already running. */ | ||
2137 | DEBUG(printk("cryptocop_start_job: already running, exit\n")); | ||
2138 | spin_unlock_irqrestore(&running_job_lock, running_job_flags); | ||
2139 | return; | ||
2140 | } | ||
2141 | spin_lock_irqsave(&cryptocop_job_queue_lock, flags); | ||
2142 | |||
2143 | /* Check the queues in priority order. */ | ||
2144 | for (i = cryptocop_prio_kernel_csum; (i < cryptocop_prio_no_prios) && list_empty(&cryptocop_job_queues[i].jobs); i++); | ||
2145 | if (i == cryptocop_prio_no_prios) { | ||
2146 | spin_unlock_irqrestore(&cryptocop_job_queue_lock, flags); | ||
2147 | spin_unlock_irqrestore(&running_job_lock, running_job_flags); | ||
2148 | DEBUG(printk("cryptocop_start_job: no jobs to run\n")); | ||
2149 | return; /* No jobs to run */ | ||
2150 | } | ||
2151 | DEBUG(printk("starting job for prio %d\n", i)); | ||
2152 | |||
2153 | /* TODO: Do not starve lower priority jobs. Let in a lower | ||
2154 | * prio job for every N-th processed higher prio job or some | ||
2155 | * other scheduling policy. This could reasonably be | ||
2156 | * tweakable since the optimal balance would depend on the | ||
2157 | * type of load on the system. */ | ||
2158 | |||
2159 | /* Pull the DMA lists from the job and start the DMA client. */ | ||
2160 | pj = list_entry(cryptocop_job_queues[i].jobs.next, struct cryptocop_prio_job, node); | ||
2161 | list_del(&pj->node); | ||
2162 | spin_unlock_irqrestore(&cryptocop_job_queue_lock, flags); | ||
2163 | cryptocop_running_job = pj; | ||
2164 | |||
2165 | /* Set config register (3DES and CSUM modes). */ | ||
2166 | switch (pj->iop->tdes_mode){ | ||
2167 | case cryptocop_3des_eee: | ||
2168 | rw_cfg.td1 = regk_strcop_e; | ||
2169 | rw_cfg.td2 = regk_strcop_e; | ||
2170 | rw_cfg.td3 = regk_strcop_e; | ||
2171 | break; | ||
2172 | case cryptocop_3des_eed: | ||
2173 | rw_cfg.td1 = regk_strcop_e; | ||
2174 | rw_cfg.td2 = regk_strcop_e; | ||
2175 | rw_cfg.td3 = regk_strcop_d; | ||
2176 | break; | ||
2177 | case cryptocop_3des_ede: | ||
2178 | rw_cfg.td1 = regk_strcop_e; | ||
2179 | rw_cfg.td2 = regk_strcop_d; | ||
2180 | rw_cfg.td3 = regk_strcop_e; | ||
2181 | break; | ||
2182 | case cryptocop_3des_edd: | ||
2183 | rw_cfg.td1 = regk_strcop_e; | ||
2184 | rw_cfg.td2 = regk_strcop_d; | ||
2185 | rw_cfg.td3 = regk_strcop_d; | ||
2186 | break; | ||
2187 | case cryptocop_3des_dee: | ||
2188 | rw_cfg.td1 = regk_strcop_d; | ||
2189 | rw_cfg.td2 = regk_strcop_e; | ||
2190 | rw_cfg.td3 = regk_strcop_e; | ||
2191 | break; | ||
2192 | case cryptocop_3des_ded: | ||
2193 | rw_cfg.td1 = regk_strcop_d; | ||
2194 | rw_cfg.td2 = regk_strcop_e; | ||
2195 | rw_cfg.td3 = regk_strcop_d; | ||
2196 | break; | ||
2197 | case cryptocop_3des_dde: | ||
2198 | rw_cfg.td1 = regk_strcop_d; | ||
2199 | rw_cfg.td2 = regk_strcop_d; | ||
2200 | rw_cfg.td3 = regk_strcop_e; | ||
2201 | break; | ||
2202 | case cryptocop_3des_ddd: | ||
2203 | rw_cfg.td1 = regk_strcop_d; | ||
2204 | rw_cfg.td2 = regk_strcop_d; | ||
2205 | rw_cfg.td3 = regk_strcop_d; | ||
2206 | break; | ||
2207 | default: | ||
2208 | DEBUG(printk("cryptocop_setup_dma_list: bad 3DES mode\n")); | ||
2209 | } | ||
2210 | switch (pj->iop->csum_mode){ | ||
2211 | case cryptocop_csum_le: | ||
2212 | rw_cfg.ipend = regk_strcop_little; | ||
2213 | break; | ||
2214 | case cryptocop_csum_be: | ||
2215 | rw_cfg.ipend = regk_strcop_big; | ||
2216 | break; | ||
2217 | default: | ||
2218 | DEBUG(printk("cryptocop_setup_dma_list: bad checksum mode\n")); | ||
2219 | } | ||
2220 | REG_WR(strcop, regi_strcop, rw_cfg, rw_cfg); | ||
2221 | |||
2222 | DEBUG(printk("cryptocop_start_job: starting DMA, new cryptocop_running_job=0x%p\n" | ||
2223 | "ctx_in: 0x%p, phys: 0x%p\n" | ||
2224 | "ctx_out: 0x%p, phys: 0x%p\n", | ||
2225 | pj, | ||
2226 | &pj->iop->ctx_in, (char*)virt_to_phys(&pj->iop->ctx_in), | ||
2227 | &pj->iop->ctx_out, (char*)virt_to_phys(&pj->iop->ctx_out))); | ||
2228 | |||
2229 | /* Start input DMA. */ | ||
2230 | DMA_START_CONTEXT(regi_dma9, virt_to_phys(&pj->iop->ctx_in)); | ||
2231 | |||
2232 | /* Start output DMA. */ | ||
2233 | DMA_START_CONTEXT(regi_dma8, virt_to_phys(&pj->iop->ctx_out)); | ||
2234 | |||
2235 | spin_unlock_irqrestore(&running_job_lock, running_job_flags); | ||
2236 | DEBUG(printk("cryptocop_start_job: exiting\n")); | ||
2237 | } | ||
2238 | |||
2239 | |||
2240 | static int cryptocop_job_setup(struct cryptocop_prio_job **pj, struct cryptocop_operation *operation) | ||
2241 | { | ||
2242 | int err; | ||
2243 | int alloc_flag = operation->in_interrupt ? GFP_ATOMIC : GFP_KERNEL; | ||
2244 | void *iop_alloc_ptr = NULL; | ||
2245 | |||
2246 | *pj = kmalloc(sizeof (struct cryptocop_prio_job), alloc_flag); | ||
2247 | if (!*pj) return -ENOMEM; | ||
2248 | |||
2249 | DEBUG(printk("cryptocop_job_setup: operation=0x%p\n", operation)); | ||
2250 | |||
2251 | (*pj)->oper = operation; | ||
2252 | DEBUG(printk("cryptocop_job_setup, cb=0x%p cb_data=0x%p\n", (*pj)->oper->cb, (*pj)->oper->cb_data)); | ||
2253 | |||
2254 | if (operation->use_dmalists) { | ||
2255 | DEBUG(print_user_dma_lists(&operation->list_op)); | ||
2256 | if (!operation->list_op.inlist || !operation->list_op.outlist || !operation->list_op.out_data_buf || !operation->list_op.in_data_buf){ | ||
2257 | DEBUG_API(printk("cryptocop_job_setup: bad indata (use_dmalists)\n")); | ||
2258 | kfree(*pj); | ||
2259 | return -EINVAL; | ||
2260 | } | ||
2261 | iop_alloc_ptr = kmalloc(DESCR_ALLOC_PAD + sizeof(struct cryptocop_int_operation), alloc_flag); | ||
2262 | if (!iop_alloc_ptr) { | ||
2263 | DEBUG_API(printk("cryptocop_job_setup: kmalloc cryptocop_int_operation\n")); | ||
2264 | kfree(*pj); | ||
2265 | return -ENOMEM; | ||
2266 | } | ||
2267 | (*pj)->iop = (struct cryptocop_int_operation*)(((unsigned long int)(iop_alloc_ptr + DESCR_ALLOC_PAD + offsetof(struct cryptocop_int_operation, ctx_out)) & ~0x0000001F) - offsetof(struct cryptocop_int_operation, ctx_out)); | ||
2268 | DEBUG(memset((*pj)->iop, 0xff, sizeof(struct cryptocop_int_operation))); | ||
2269 | (*pj)->iop->alloc_ptr = iop_alloc_ptr; | ||
2270 | (*pj)->iop->sid = operation->sid; | ||
2271 | (*pj)->iop->cdesc_out = NULL; | ||
2272 | (*pj)->iop->cdesc_in = NULL; | ||
2273 | (*pj)->iop->tdes_mode = operation->list_op.tdes_mode; | ||
2274 | (*pj)->iop->csum_mode = operation->list_op.csum_mode; | ||
2275 | (*pj)->iop->ddesc_out = operation->list_op.outlist; | ||
2276 | (*pj)->iop->ddesc_in = operation->list_op.inlist; | ||
2277 | |||
2278 | /* Setup DMA contexts. */ | ||
2279 | (*pj)->iop->ctx_out.next = NULL; | ||
2280 | (*pj)->iop->ctx_out.eol = 1; | ||
2281 | (*pj)->iop->ctx_out.saved_data = operation->list_op.outlist; | ||
2282 | (*pj)->iop->ctx_out.saved_data_buf = operation->list_op.out_data_buf; | ||
2283 | |||
2284 | (*pj)->iop->ctx_in.next = NULL; | ||
2285 | (*pj)->iop->ctx_in.eol = 1; | ||
2286 | (*pj)->iop->ctx_in.saved_data = operation->list_op.inlist; | ||
2287 | (*pj)->iop->ctx_in.saved_data_buf = operation->list_op.in_data_buf; | ||
2288 | } else { | ||
2289 | if ((err = cryptocop_setup_dma_list(operation, &(*pj)->iop, alloc_flag))) { | ||
2290 | DEBUG_API(printk("cryptocop_job_setup: cryptocop_setup_dma_list failed %d\n", err)); | ||
2291 | kfree(*pj); | ||
2292 | return err; | ||
2293 | } | ||
2294 | } | ||
2295 | DEBUG(print_dma_descriptors((*pj)->iop)); | ||
2296 | |||
2297 | DEBUG(printk("cryptocop_job_setup, DMA list setup successful\n")); | ||
2298 | |||
2299 | return 0; | ||
2300 | } | ||
2301 | |||
2302 | |||
2303 | static int cryptocop_open(struct inode *inode, struct file *filp) | ||
2304 | { | ||
2305 | int p = MINOR(inode->i_rdev); | ||
2306 | |||
2307 | if (p != CRYPTOCOP_MINOR) return -EINVAL; | ||
2308 | |||
2309 | filp->private_data = NULL; | ||
2310 | return 0; | ||
2311 | } | ||
2312 | |||
2313 | |||
2314 | static int cryptocop_release(struct inode *inode, struct file *filp) | ||
2315 | { | ||
2316 | struct cryptocop_private *dev = filp->private_data; | ||
2317 | struct cryptocop_private *dev_next; | ||
2318 | |||
2319 | while (dev){ | ||
2320 | dev_next = dev->next; | ||
2321 | if (dev->sid != CRYPTOCOP_SESSION_ID_NONE) { | ||
2322 | (void)cryptocop_free_session(dev->sid); | ||
2323 | } | ||
2324 | kfree(dev); | ||
2325 | dev = dev_next; | ||
2326 | } | ||
2327 | |||
2328 | return 0; | ||
2329 | } | ||
2330 | |||
2331 | |||
2332 | static int cryptocop_ioctl_close_session(struct inode *inode, struct file *filp, | ||
2333 | unsigned int cmd, unsigned long arg) | ||
2334 | { | ||
2335 | struct cryptocop_private *dev = filp->private_data; | ||
2336 | struct cryptocop_private *prev_dev = NULL; | ||
2337 | struct strcop_session_op *sess_op = (struct strcop_session_op *)arg; | ||
2338 | struct strcop_session_op sop; | ||
2339 | int err; | ||
2340 | |||
2341 | DEBUG(printk("cryptocop_ioctl_close_session\n")); | ||
2342 | |||
2343 | if (!access_ok(VERIFY_READ, sess_op, sizeof(struct strcop_session_op))) | ||
2344 | return -EFAULT; | ||
2345 | err = copy_from_user(&sop, sess_op, sizeof(struct strcop_session_op)); | ||
2346 | if (err) return -EFAULT; | ||
2347 | |||
2348 | while (dev && (dev->sid != sop.ses_id)) { | ||
2349 | prev_dev = dev; | ||
2350 | dev = dev->next; | ||
2351 | } | ||
2352 | if (dev){ | ||
2353 | if (prev_dev){ | ||
2354 | prev_dev->next = dev->next; | ||
2355 | } else { | ||
2356 | filp->private_data = dev->next; | ||
2357 | } | ||
2358 | err = cryptocop_free_session(dev->sid); | ||
2359 | if (err) return -EFAULT; | ||
2360 | } else { | ||
2361 | DEBUG_API(printk("cryptocop_ioctl_close_session: session %lld not found\n", sop.ses_id)); | ||
2362 | return -EINVAL; | ||
2363 | } | ||
2364 | return 0; | ||
2365 | } | ||
2366 | |||
2367 | |||
2368 | static void ioctl_process_job_callback(struct cryptocop_operation *op, void*cb_data) | ||
2369 | { | ||
2370 | struct ioctl_job_cb_ctx *jc = (struct ioctl_job_cb_ctx *)cb_data; | ||
2371 | |||
2372 | DEBUG(printk("ioctl_process_job_callback: op=0x%p, cb_data=0x%p\n", op, cb_data)); | ||
2373 | |||
2374 | jc->processed = 1; | ||
2375 | wake_up(&cryptocop_ioc_process_wq); | ||
2376 | } | ||
2377 | |||
2378 | |||
2379 | #define CRYPTOCOP_IOCTL_CIPHER_TID (1) | ||
2380 | #define CRYPTOCOP_IOCTL_DIGEST_TID (2) | ||
2381 | #define CRYPTOCOP_IOCTL_CSUM_TID (3) | ||
2382 | |||
2383 | static size_t first_cfg_change_ix(struct strcop_crypto_op *crp_op) | ||
2384 | { | ||
2385 | size_t ch_ix = 0; | ||
2386 | |||
2387 | if (crp_op->do_cipher) ch_ix = crp_op->cipher_start; | ||
2388 | if (crp_op->do_digest && (crp_op->digest_start < ch_ix)) ch_ix = crp_op->digest_start; | ||
2389 | if (crp_op->do_csum && (crp_op->csum_start < ch_ix)) ch_ix = crp_op->csum_start; | ||
2390 | |||
2391 | DEBUG(printk("first_cfg_change_ix: ix=%d\n", ch_ix)); | ||
2392 | return ch_ix; | ||
2393 | } | ||
2394 | |||
2395 | |||
2396 | static size_t next_cfg_change_ix(struct strcop_crypto_op *crp_op, size_t ix) | ||
2397 | { | ||
2398 | size_t ch_ix = INT_MAX; | ||
2399 | size_t tmp_ix = 0; | ||
2400 | |||
2401 | if (crp_op->do_cipher && ((crp_op->cipher_start + crp_op->cipher_len) > ix)){ | ||
2402 | if (crp_op->cipher_start > ix) { | ||
2403 | ch_ix = crp_op->cipher_start; | ||
2404 | } else { | ||
2405 | ch_ix = crp_op->cipher_start + crp_op->cipher_len; | ||
2406 | } | ||
2407 | } | ||
2408 | if (crp_op->do_digest && ((crp_op->digest_start + crp_op->digest_len) > ix)){ | ||
2409 | if (crp_op->digest_start > ix) { | ||
2410 | tmp_ix = crp_op->digest_start; | ||
2411 | } else { | ||
2412 | tmp_ix = crp_op->digest_start + crp_op->digest_len; | ||
2413 | } | ||
2414 | if (tmp_ix < ch_ix) ch_ix = tmp_ix; | ||
2415 | } | ||
2416 | if (crp_op->do_csum && ((crp_op->csum_start + crp_op->csum_len) > ix)){ | ||
2417 | if (crp_op->csum_start > ix) { | ||
2418 | tmp_ix = crp_op->csum_start; | ||
2419 | } else { | ||
2420 | tmp_ix = crp_op->csum_start + crp_op->csum_len; | ||
2421 | } | ||
2422 | if (tmp_ix < ch_ix) ch_ix = tmp_ix; | ||
2423 | } | ||
2424 | if (ch_ix == INT_MAX) ch_ix = ix; | ||
2425 | DEBUG(printk("next_cfg_change_ix prev ix=%d, next ix=%d\n", ix, ch_ix)); | ||
2426 | return ch_ix; | ||
2427 | } | ||
2428 | |||
2429 | |||
2430 | /* Map map_length bytes from the pages starting on *pageix and *pageoffset to iovecs starting on *iovix. | ||
2431 | * Return -1 for ok, 0 for fail. */ | ||
2432 | static int map_pages_to_iovec(struct iovec *iov, int iovlen, int *iovix, struct page **pages, int nopages, int *pageix, int *pageoffset, int map_length ) | ||
2433 | { | ||
2434 | int tmplen; | ||
2435 | |||
2436 | assert(iov != NULL); | ||
2437 | assert(iovix != NULL); | ||
2438 | assert(pages != NULL); | ||
2439 | assert(pageix != NULL); | ||
2440 | assert(pageoffset != NULL); | ||
2441 | |||
2442 | DEBUG(printk("map_pages_to_iovec, map_length=%d, iovlen=%d, *iovix=%d, nopages=%d, *pageix=%d, *pageoffset=%d\n", map_length, iovlen, *iovix, nopages, *pageix, *pageoffset)); | ||
2443 | |||
2444 | while (map_length > 0){ | ||
2445 | DEBUG(printk("map_pages_to_iovec, map_length=%d, iovlen=%d, *iovix=%d, nopages=%d, *pageix=%d, *pageoffset=%d\n", map_length, iovlen, *iovix, nopages, *pageix, *pageoffset)); | ||
2446 | if (*iovix >= iovlen){ | ||
2447 | DEBUG_API(printk("map_page_to_iovec: *iovix=%d >= iovlen=%d\n", *iovix, iovlen)); | ||
2448 | return 0; | ||
2449 | } | ||
2450 | if (*pageix >= nopages){ | ||
2451 | DEBUG_API(printk("map_page_to_iovec: *pageix=%d >= nopages=%d\n", *pageix, nopages)); | ||
2452 | return 0; | ||
2453 | } | ||
2454 | iov[*iovix].iov_base = (unsigned char*)page_address(pages[*pageix]) + *pageoffset; | ||
2455 | tmplen = PAGE_SIZE - *pageoffset; | ||
2456 | if (tmplen < map_length){ | ||
2457 | (*pageoffset) = 0; | ||
2458 | (*pageix)++; | ||
2459 | } else { | ||
2460 | tmplen = map_length; | ||
2461 | (*pageoffset) += map_length; | ||
2462 | } | ||
2463 | DEBUG(printk("mapping %d bytes from page %d (or %d) to iovec %d\n", tmplen, *pageix, *pageix-1, *iovix)); | ||
2464 | iov[*iovix].iov_len = tmplen; | ||
2465 | map_length -= tmplen; | ||
2466 | (*iovix)++; | ||
2467 | } | ||
2468 | DEBUG(printk("map_page_to_iovec, exit, *iovix=%d\n", *iovix)); | ||
2469 | return -1; | ||
2470 | } | ||
2471 | |||
2472 | |||
2473 | |||
2474 | static int cryptocop_ioctl_process(struct inode *inode, struct file *filp, unsigned int cmd, unsigned long arg) | ||
2475 | { | ||
2476 | int i; | ||
2477 | struct cryptocop_private *dev = filp->private_data; | ||
2478 | struct strcop_crypto_op *crp_oper = (struct strcop_crypto_op *)arg; | ||
2479 | struct strcop_crypto_op oper = {0}; | ||
2480 | int err = 0; | ||
2481 | struct cryptocop_operation *cop = NULL; | ||
2482 | |||
2483 | struct ioctl_job_cb_ctx *jc = NULL; | ||
2484 | |||
2485 | struct page **inpages = NULL; | ||
2486 | struct page **outpages = NULL; | ||
2487 | int noinpages = 0; | ||
2488 | int nooutpages = 0; | ||
2489 | |||
2490 | struct cryptocop_desc descs[5]; /* Max 5 descriptors are needed, there are three transforms that | ||
2491 | * can get connected/disconnected on different places in the indata. */ | ||
2492 | struct cryptocop_desc_cfg dcfgs[5*3]; | ||
2493 | int desc_ix = 0; | ||
2494 | int dcfg_ix = 0; | ||
2495 | struct cryptocop_tfrm_cfg ciph_tcfg = {0}; | ||
2496 | struct cryptocop_tfrm_cfg digest_tcfg = {0}; | ||
2497 | struct cryptocop_tfrm_cfg csum_tcfg = {0}; | ||
2498 | |||
2499 | unsigned char *digest_result = NULL; | ||
2500 | int digest_length = 0; | ||
2501 | int cblocklen = 0; | ||
2502 | unsigned char csum_result[CSUM_BLOCK_LENGTH]; | ||
2503 | struct cryptocop_session *sess; | ||
2504 | |||
2505 | int iovlen = 0; | ||
2506 | int iovix = 0; | ||
2507 | int pageix = 0; | ||
2508 | int pageoffset = 0; | ||
2509 | |||
2510 | size_t prev_ix = 0; | ||
2511 | size_t next_ix; | ||
2512 | |||
2513 | int cipher_active, digest_active, csum_active; | ||
2514 | int end_digest, end_csum; | ||
2515 | int digest_done = 0; | ||
2516 | int cipher_done = 0; | ||
2517 | int csum_done = 0; | ||
2518 | |||
2519 | DEBUG(printk("cryptocop_ioctl_process\n")); | ||
2520 | |||
2521 | if (!access_ok(VERIFY_WRITE, crp_oper, sizeof(struct strcop_crypto_op))){ | ||
2522 | DEBUG_API(printk("cryptocop_ioctl_process: !access_ok crp_oper!\n")); | ||
2523 | return -EFAULT; | ||
2524 | } | ||
2525 | if (copy_from_user(&oper, crp_oper, sizeof(struct strcop_crypto_op))) { | ||
2526 | DEBUG_API(printk("cryptocop_ioctl_process: copy_from_user\n")); | ||
2527 | return -EFAULT; | ||
2528 | } | ||
2529 | DEBUG(print_strcop_crypto_op(&oper)); | ||
2530 | |||
2531 | while (dev && dev->sid != oper.ses_id) dev = dev->next; | ||
2532 | if (!dev){ | ||
2533 | DEBUG_API(printk("cryptocop_ioctl_process: session %lld not found\n", oper.ses_id)); | ||
2534 | return -EINVAL; | ||
2535 | } | ||
2536 | |||
2537 | /* Check buffers. */ | ||
2538 | if (((oper.indata + oper.inlen) < oper.indata) || ((oper.cipher_outdata + oper.cipher_outlen) < oper.cipher_outdata)){ | ||
2539 | DEBUG_API(printk("cryptocop_ioctl_process: user buffers wrapped around, bad user!\n")); | ||
2540 | return -EINVAL; | ||
2541 | } | ||
2542 | |||
2543 | if (!access_ok(VERIFY_WRITE, oper.cipher_outdata, oper.cipher_outlen)){ | ||
2544 | DEBUG_API(printk("cryptocop_ioctl_process: !access_ok out data!\n")); | ||
2545 | return -EFAULT; | ||
2546 | } | ||
2547 | if (!access_ok(VERIFY_READ, oper.indata, oper.inlen)){ | ||
2548 | DEBUG_API(printk("cryptocop_ioctl_process: !access_ok in data!\n")); | ||
2549 | return -EFAULT; | ||
2550 | } | ||
2551 | |||
2552 | cop = kmalloc(sizeof(struct cryptocop_operation), GFP_KERNEL); | ||
2553 | if (!cop) { | ||
2554 | DEBUG_API(printk("cryptocop_ioctl_process: kmalloc\n")); | ||
2555 | return -ENOMEM; | ||
2556 | } | ||
2557 | jc = kmalloc(sizeof(struct ioctl_job_cb_ctx), GFP_KERNEL); | ||
2558 | if (!jc) { | ||
2559 | DEBUG_API(printk("cryptocop_ioctl_process: kmalloc\n")); | ||
2560 | err = -ENOMEM; | ||
2561 | goto error_cleanup; | ||
2562 | } | ||
2563 | jc->processed = 0; | ||
2564 | |||
2565 | cop->cb_data = jc; | ||
2566 | cop->cb = ioctl_process_job_callback; | ||
2567 | cop->operation_status = 0; | ||
2568 | cop->use_dmalists = 0; | ||
2569 | cop->in_interrupt = 0; | ||
2570 | cop->fast_callback = 0; | ||
2571 | cop->tfrm_op.tfrm_cfg = NULL; | ||
2572 | cop->tfrm_op.desc = NULL; | ||
2573 | cop->tfrm_op.indata = NULL; | ||
2574 | cop->tfrm_op.incount = 0; | ||
2575 | cop->tfrm_op.inlen = 0; | ||
2576 | cop->tfrm_op.outdata = NULL; | ||
2577 | cop->tfrm_op.outcount = 0; | ||
2578 | cop->tfrm_op.outlen = 0; | ||
2579 | |||
2580 | sess = get_session(oper.ses_id); | ||
2581 | if (!sess){ | ||
2582 | DEBUG_API(printk("cryptocop_ioctl_process: bad session id.\n")); | ||
2583 | kfree(cop); | ||
2584 | kfree(jc); | ||
2585 | return -EINVAL; | ||
2586 | } | ||
2587 | |||
2588 | if (oper.do_cipher) { | ||
2589 | unsigned int cipher_outlen = 0; | ||
2590 | struct cryptocop_transform_ctx *tc = get_transform_ctx(sess, CRYPTOCOP_IOCTL_CIPHER_TID); | ||
2591 | if (!tc) { | ||
2592 | DEBUG_API(printk("cryptocop_ioctl_process: no cipher transform in session.\n")); | ||
2593 | err = -EINVAL; | ||
2594 | goto error_cleanup; | ||
2595 | } | ||
2596 | ciph_tcfg.tid = CRYPTOCOP_IOCTL_CIPHER_TID; | ||
2597 | ciph_tcfg.inject_ix = 0; | ||
2598 | ciph_tcfg.flags = 0; | ||
2599 | if ((oper.cipher_start < 0) || (oper.cipher_len <= 0) || (oper.cipher_start > oper.inlen) || ((oper.cipher_start + oper.cipher_len) > oper.inlen)){ | ||
2600 | DEBUG_API(printk("cryptocop_ioctl_process: bad cipher length\n")); | ||
2601 | kfree(cop); | ||
2602 | kfree(jc); | ||
2603 | return -EINVAL; | ||
2604 | } | ||
2605 | cblocklen = tc->init.alg == cryptocop_alg_aes ? AES_BLOCK_LENGTH : DES_BLOCK_LENGTH; | ||
2606 | if (oper.cipher_len % cblocklen) { | ||
2607 | kfree(cop); | ||
2608 | kfree(jc); | ||
2609 | DEBUG_API(printk("cryptocop_ioctl_process: cipher inlength not multiple of block length.\n")); | ||
2610 | return -EINVAL; | ||
2611 | } | ||
2612 | cipher_outlen = oper.cipher_len; | ||
2613 | if (tc->init.cipher_mode == cryptocop_cipher_mode_cbc){ | ||
2614 | if (oper.cipher_explicit) { | ||
2615 | ciph_tcfg.flags |= CRYPTOCOP_EXPLICIT_IV; | ||
2616 | memcpy(ciph_tcfg.iv, oper.cipher_iv, cblocklen); | ||
2617 | } else { | ||
2618 | cipher_outlen = oper.cipher_len - cblocklen; | ||
2619 | } | ||
2620 | } else { | ||
2621 | if (oper.cipher_explicit){ | ||
2622 | kfree(cop); | ||
2623 | kfree(jc); | ||
2624 | DEBUG_API(printk("cryptocop_ioctl_process: explicit_iv when not CBC mode\n")); | ||
2625 | return -EINVAL; | ||
2626 | } | ||
2627 | } | ||
2628 | if (oper.cipher_outlen != cipher_outlen) { | ||
2629 | kfree(cop); | ||
2630 | kfree(jc); | ||
2631 | DEBUG_API(printk("cryptocop_ioctl_process: cipher_outlen incorrect, should be %d not %d.\n", cipher_outlen, oper.cipher_outlen)); | ||
2632 | return -EINVAL; | ||
2633 | } | ||
2634 | |||
2635 | if (oper.decrypt){ | ||
2636 | ciph_tcfg.flags |= CRYPTOCOP_DECRYPT; | ||
2637 | } else { | ||
2638 | ciph_tcfg.flags |= CRYPTOCOP_ENCRYPT; | ||
2639 | } | ||
2640 | ciph_tcfg.next = cop->tfrm_op.tfrm_cfg; | ||
2641 | cop->tfrm_op.tfrm_cfg = &ciph_tcfg; | ||
2642 | } | ||
2643 | if (oper.do_digest){ | ||
2644 | struct cryptocop_transform_ctx *tc = get_transform_ctx(sess, CRYPTOCOP_IOCTL_DIGEST_TID); | ||
2645 | if (!tc) { | ||
2646 | DEBUG_API(printk("cryptocop_ioctl_process: no digest transform in session.\n")); | ||
2647 | err = -EINVAL; | ||
2648 | goto error_cleanup; | ||
2649 | } | ||
2650 | digest_length = tc->init.alg == cryptocop_alg_md5 ? 16 : 20; | ||
2651 | digest_result = kmalloc(digest_length, GFP_KERNEL); | ||
2652 | if (!digest_result) { | ||
2653 | DEBUG_API(printk("cryptocop_ioctl_process: kmalloc digest_result\n")); | ||
2654 | err = -EINVAL; | ||
2655 | goto error_cleanup; | ||
2656 | } | ||
2657 | DEBUG(memset(digest_result, 0xff, digest_length)); | ||
2658 | |||
2659 | digest_tcfg.tid = CRYPTOCOP_IOCTL_DIGEST_TID; | ||
2660 | digest_tcfg.inject_ix = 0; | ||
2661 | ciph_tcfg.inject_ix += digest_length; | ||
2662 | if ((oper.digest_start < 0) || (oper.digest_len <= 0) || (oper.digest_start > oper.inlen) || ((oper.digest_start + oper.digest_len) > oper.inlen)){ | ||
2663 | DEBUG_API(printk("cryptocop_ioctl_process: bad digest length\n")); | ||
2664 | err = -EINVAL; | ||
2665 | goto error_cleanup; | ||
2666 | } | ||
2667 | |||
2668 | digest_tcfg.next = cop->tfrm_op.tfrm_cfg; | ||
2669 | cop->tfrm_op.tfrm_cfg = &digest_tcfg; | ||
2670 | } | ||
2671 | if (oper.do_csum){ | ||
2672 | csum_tcfg.tid = CRYPTOCOP_IOCTL_CSUM_TID; | ||
2673 | csum_tcfg.inject_ix = digest_length; | ||
2674 | ciph_tcfg.inject_ix += 2; | ||
2675 | |||
2676 | if ((oper.csum_start < 0) || (oper.csum_len <= 0) || (oper.csum_start > oper.inlen) || ((oper.csum_start + oper.csum_len) > oper.inlen)){ | ||
2677 | DEBUG_API(printk("cryptocop_ioctl_process: bad csum length\n")); | ||
2678 | kfree(cop); | ||
2679 | kfree(jc); | ||
2680 | return -EINVAL; | ||
2681 | } | ||
2682 | |||
2683 | csum_tcfg.next = cop->tfrm_op.tfrm_cfg; | ||
2684 | cop->tfrm_op.tfrm_cfg = &csum_tcfg; | ||
2685 | } | ||
2686 | |||
2687 | prev_ix = first_cfg_change_ix(&oper); | ||
2688 | if (prev_ix > oper.inlen) { | ||
2689 | DEBUG_API(printk("cryptocop_ioctl_process: length mismatch\n")); | ||
2690 | nooutpages = noinpages = 0; | ||
2691 | err = -EINVAL; | ||
2692 | goto error_cleanup; | ||
2693 | } | ||
2694 | DEBUG(printk("cryptocop_ioctl_process: inlen=%d, cipher_outlen=%d\n", oper.inlen, oper.cipher_outlen)); | ||
2695 | |||
2696 | /* Map user pages for in and out data of the operation. */ | ||
2697 | noinpages = (((unsigned long int)(oper.indata + prev_ix) & ~PAGE_MASK) + oper.inlen - 1 - prev_ix + ~PAGE_MASK) >> PAGE_SHIFT; | ||
2698 | DEBUG(printk("cryptocop_ioctl_process: noinpages=%d\n", noinpages)); | ||
2699 | inpages = kmalloc(noinpages * sizeof(struct page*), GFP_KERNEL); | ||
2700 | if (!inpages){ | ||
2701 | DEBUG_API(printk("cryptocop_ioctl_process: kmalloc inpages\n")); | ||
2702 | nooutpages = noinpages = 0; | ||
2703 | err = -ENOMEM; | ||
2704 | goto error_cleanup; | ||
2705 | } | ||
2706 | if (oper.do_cipher){ | ||
2707 | nooutpages = (((unsigned long int)oper.cipher_outdata & ~PAGE_MASK) + oper.cipher_outlen - 1 + ~PAGE_MASK) >> PAGE_SHIFT; | ||
2708 | DEBUG(printk("cryptocop_ioctl_process: nooutpages=%d\n", nooutpages)); | ||
2709 | outpages = kmalloc(nooutpages * sizeof(struct page*), GFP_KERNEL); | ||
2710 | if (!outpages){ | ||
2711 | DEBUG_API(printk("cryptocop_ioctl_process: kmalloc outpages\n")); | ||
2712 | nooutpages = noinpages = 0; | ||
2713 | err = -ENOMEM; | ||
2714 | goto error_cleanup; | ||
2715 | } | ||
2716 | } | ||
2717 | |||
2718 | /* Acquire the mm page semaphore. */ | ||
2719 | down_read(¤t->mm->mmap_sem); | ||
2720 | |||
2721 | err = get_user_pages(current, | ||
2722 | current->mm, | ||
2723 | (unsigned long int)(oper.indata + prev_ix), | ||
2724 | noinpages, | ||
2725 | 0, /* read access only for in data */ | ||
2726 | 0, /* no force */ | ||
2727 | inpages, | ||
2728 | NULL); | ||
2729 | |||
2730 | if (err < 0) { | ||
2731 | up_read(¤t->mm->mmap_sem); | ||
2732 | nooutpages = noinpages = 0; | ||
2733 | DEBUG_API(printk("cryptocop_ioctl_process: get_user_pages indata\n")); | ||
2734 | goto error_cleanup; | ||
2735 | } | ||
2736 | noinpages = err; | ||
2737 | if (oper.do_cipher){ | ||
2738 | err = get_user_pages(current, | ||
2739 | current->mm, | ||
2740 | (unsigned long int)oper.cipher_outdata, | ||
2741 | nooutpages, | ||
2742 | 1, /* write access for out data */ | ||
2743 | 0, /* no force */ | ||
2744 | outpages, | ||
2745 | NULL); | ||
2746 | up_read(¤t->mm->mmap_sem); | ||
2747 | if (err < 0) { | ||
2748 | nooutpages = 0; | ||
2749 | DEBUG_API(printk("cryptocop_ioctl_process: get_user_pages outdata\n")); | ||
2750 | goto error_cleanup; | ||
2751 | } | ||
2752 | nooutpages = err; | ||
2753 | } else { | ||
2754 | up_read(¤t->mm->mmap_sem); | ||
2755 | } | ||
2756 | |||
2757 | /* Add 6 to nooutpages to make room for possibly inserted buffers for storing digest and | ||
2758 | * csum output and splits when units are (dis-)connected. */ | ||
2759 | cop->tfrm_op.indata = kmalloc((noinpages) * sizeof(struct iovec), GFP_KERNEL); | ||
2760 | cop->tfrm_op.outdata = kmalloc((6 + nooutpages) * sizeof(struct iovec), GFP_KERNEL); | ||
2761 | if (!cop->tfrm_op.indata || !cop->tfrm_op.outdata) { | ||
2762 | DEBUG_API(printk("cryptocop_ioctl_process: kmalloc iovecs\n")); | ||
2763 | err = -ENOMEM; | ||
2764 | goto error_cleanup; | ||
2765 | } | ||
2766 | |||
2767 | cop->tfrm_op.inlen = oper.inlen - prev_ix; | ||
2768 | cop->tfrm_op.outlen = 0; | ||
2769 | if (oper.do_cipher) cop->tfrm_op.outlen += oper.cipher_outlen; | ||
2770 | if (oper.do_digest) cop->tfrm_op.outlen += digest_length; | ||
2771 | if (oper.do_csum) cop->tfrm_op.outlen += 2; | ||
2772 | |||
2773 | /* Setup the in iovecs. */ | ||
2774 | cop->tfrm_op.incount = noinpages; | ||
2775 | if (noinpages > 1){ | ||
2776 | size_t tmplen = cop->tfrm_op.inlen; | ||
2777 | |||
2778 | cop->tfrm_op.indata[0].iov_len = PAGE_SIZE - ((unsigned long int)(oper.indata + prev_ix) & ~PAGE_MASK); | ||
2779 | cop->tfrm_op.indata[0].iov_base = (unsigned char*)page_address(inpages[0]) + ((unsigned long int)(oper.indata + prev_ix) & ~PAGE_MASK); | ||
2780 | tmplen -= cop->tfrm_op.indata[0].iov_len; | ||
2781 | for (i = 1; i<noinpages; i++){ | ||
2782 | cop->tfrm_op.indata[i].iov_len = tmplen < PAGE_SIZE ? tmplen : PAGE_SIZE; | ||
2783 | cop->tfrm_op.indata[i].iov_base = (unsigned char*)page_address(inpages[i]); | ||
2784 | tmplen -= PAGE_SIZE; | ||
2785 | } | ||
2786 | } else { | ||
2787 | cop->tfrm_op.indata[0].iov_len = oper.inlen - prev_ix; | ||
2788 | cop->tfrm_op.indata[0].iov_base = (unsigned char*)page_address(inpages[0]) + ((unsigned long int)(oper.indata + prev_ix) & ~PAGE_MASK); | ||
2789 | } | ||
2790 | |||
2791 | iovlen = nooutpages + 6; | ||
2792 | pageoffset = oper.do_cipher ? ((unsigned long int)oper.cipher_outdata & ~PAGE_MASK) : 0; | ||
2793 | |||
2794 | next_ix = next_cfg_change_ix(&oper, prev_ix); | ||
2795 | if (prev_ix == next_ix){ | ||
2796 | DEBUG_API(printk("cryptocop_ioctl_process: length configuration broken.\n")); | ||
2797 | err = -EINVAL; /* This should be impossible barring bugs. */ | ||
2798 | goto error_cleanup; | ||
2799 | } | ||
2800 | while (prev_ix != next_ix){ | ||
2801 | end_digest = end_csum = cipher_active = digest_active = csum_active = 0; | ||
2802 | descs[desc_ix].cfg = NULL; | ||
2803 | descs[desc_ix].length = next_ix - prev_ix; | ||
2804 | |||
2805 | if (oper.do_cipher && (oper.cipher_start < next_ix) && (prev_ix < (oper.cipher_start + oper.cipher_len))) { | ||
2806 | dcfgs[dcfg_ix].tid = CRYPTOCOP_IOCTL_CIPHER_TID; | ||
2807 | dcfgs[dcfg_ix].src = cryptocop_source_dma; | ||
2808 | cipher_active = 1; | ||
2809 | |||
2810 | if (next_ix == (oper.cipher_start + oper.cipher_len)){ | ||
2811 | cipher_done = 1; | ||
2812 | dcfgs[dcfg_ix].last = 1; | ||
2813 | } else { | ||
2814 | dcfgs[dcfg_ix].last = 0; | ||
2815 | } | ||
2816 | dcfgs[dcfg_ix].next = descs[desc_ix].cfg; | ||
2817 | descs[desc_ix].cfg = &dcfgs[dcfg_ix]; | ||
2818 | ++dcfg_ix; | ||
2819 | } | ||
2820 | if (oper.do_digest && (oper.digest_start < next_ix) && (prev_ix < (oper.digest_start + oper.digest_len))) { | ||
2821 | digest_active = 1; | ||
2822 | dcfgs[dcfg_ix].tid = CRYPTOCOP_IOCTL_DIGEST_TID; | ||
2823 | dcfgs[dcfg_ix].src = cryptocop_source_dma; | ||
2824 | if (next_ix == (oper.digest_start + oper.digest_len)){ | ||
2825 | assert(!digest_done); | ||
2826 | digest_done = 1; | ||
2827 | dcfgs[dcfg_ix].last = 1; | ||
2828 | } else { | ||
2829 | dcfgs[dcfg_ix].last = 0; | ||
2830 | } | ||
2831 | dcfgs[dcfg_ix].next = descs[desc_ix].cfg; | ||
2832 | descs[desc_ix].cfg = &dcfgs[dcfg_ix]; | ||
2833 | ++dcfg_ix; | ||
2834 | } | ||
2835 | if (oper.do_csum && (oper.csum_start < next_ix) && (prev_ix < (oper.csum_start + oper.csum_len))){ | ||
2836 | csum_active = 1; | ||
2837 | dcfgs[dcfg_ix].tid = CRYPTOCOP_IOCTL_CSUM_TID; | ||
2838 | dcfgs[dcfg_ix].src = cryptocop_source_dma; | ||
2839 | if (next_ix == (oper.csum_start + oper.csum_len)){ | ||
2840 | csum_done = 1; | ||
2841 | dcfgs[dcfg_ix].last = 1; | ||
2842 | } else { | ||
2843 | dcfgs[dcfg_ix].last = 0; | ||
2844 | } | ||
2845 | dcfgs[dcfg_ix].next = descs[desc_ix].cfg; | ||
2846 | descs[desc_ix].cfg = &dcfgs[dcfg_ix]; | ||
2847 | ++dcfg_ix; | ||
2848 | } | ||
2849 | if (!descs[desc_ix].cfg){ | ||
2850 | DEBUG_API(printk("cryptocop_ioctl_process: data segment %d (%d to %d) had no active transforms\n", desc_ix, prev_ix, next_ix)); | ||
2851 | err = -EINVAL; | ||
2852 | goto error_cleanup; | ||
2853 | } | ||
2854 | descs[desc_ix].next = &(descs[desc_ix]) + 1; | ||
2855 | ++desc_ix; | ||
2856 | prev_ix = next_ix; | ||
2857 | next_ix = next_cfg_change_ix(&oper, prev_ix); | ||
2858 | } | ||
2859 | if (desc_ix > 0){ | ||
2860 | descs[desc_ix-1].next = NULL; | ||
2861 | } else { | ||
2862 | descs[0].next = NULL; | ||
2863 | } | ||
2864 | if (oper.do_digest) { | ||
2865 | DEBUG(printk("cryptocop_ioctl_process: mapping %d byte digest output to iovec %d\n", digest_length, iovix)); | ||
2866 | /* Add outdata iovec, length == <length of type of digest> */ | ||
2867 | cop->tfrm_op.outdata[iovix].iov_base = digest_result; | ||
2868 | cop->tfrm_op.outdata[iovix].iov_len = digest_length; | ||
2869 | ++iovix; | ||
2870 | } | ||
2871 | if (oper.do_csum) { | ||
2872 | /* Add outdata iovec, length == 2, the length of csum. */ | ||
2873 | DEBUG(printk("cryptocop_ioctl_process: mapping 2 byte csum output to iovec %d\n", iovix)); | ||
2874 | /* Add outdata iovec, length == <length of type of digest> */ | ||
2875 | cop->tfrm_op.outdata[iovix].iov_base = csum_result; | ||
2876 | cop->tfrm_op.outdata[iovix].iov_len = 2; | ||
2877 | ++iovix; | ||
2878 | } | ||
2879 | if (oper.do_cipher) { | ||
2880 | if (!map_pages_to_iovec(cop->tfrm_op.outdata, iovlen, &iovix, outpages, nooutpages, &pageix, &pageoffset, oper.cipher_outlen)){ | ||
2881 | DEBUG_API(printk("cryptocop_ioctl_process: failed to map pages to iovec.\n")); | ||
2882 | err = -ENOSYS; /* This should be impossible barring bugs. */ | ||
2883 | goto error_cleanup; | ||
2884 | } | ||
2885 | } | ||
2886 | DEBUG(printk("cryptocop_ioctl_process: setting cop->tfrm_op.outcount %d\n", iovix)); | ||
2887 | cop->tfrm_op.outcount = iovix; | ||
2888 | assert(iovix <= (nooutpages + 6)); | ||
2889 | |||
2890 | cop->sid = oper.ses_id; | ||
2891 | cop->tfrm_op.desc = &descs[0]; | ||
2892 | |||
2893 | DEBUG(printk("cryptocop_ioctl_process: inserting job, cb_data=0x%p\n", cop->cb_data)); | ||
2894 | |||
2895 | if ((err = cryptocop_job_queue_insert_user_job(cop)) != 0) { | ||
2896 | DEBUG_API(printk("cryptocop_ioctl_process: insert job %d\n", err)); | ||
2897 | err = -EINVAL; | ||
2898 | goto error_cleanup; | ||
2899 | } | ||
2900 | |||
2901 | DEBUG(printk("cryptocop_ioctl_process: begin wait for result\n")); | ||
2902 | |||
2903 | wait_event(cryptocop_ioc_process_wq, (jc->processed != 0)); | ||
2904 | DEBUG(printk("cryptocop_ioctl_process: end wait for result\n")); | ||
2905 | if (!jc->processed){ | ||
2906 | printk(KERN_WARNING "cryptocop_ioctl_process: job not processed at completion\n"); | ||
2907 | err = -EIO; | ||
2908 | goto error_cleanup; | ||
2909 | } | ||
2910 | |||
2911 | /* Job process done. Cipher output should already be correct in job so no post processing of outdata. */ | ||
2912 | DEBUG(printk("cryptocop_ioctl_process: operation_status = %d\n", cop->operation_status)); | ||
2913 | if (cop->operation_status == 0){ | ||
2914 | if (oper.do_digest){ | ||
2915 | DEBUG(printk("cryptocop_ioctl_process: copy %d bytes digest to user\n", digest_length)); | ||
2916 | err = copy_to_user((unsigned char*)crp_oper + offsetof(struct strcop_crypto_op, digest), digest_result, digest_length); | ||
2917 | if (0 != err){ | ||
2918 | DEBUG_API(printk("cryptocop_ioctl_process: copy_to_user, digest length %d, err %d\n", digest_length, err)); | ||
2919 | err = -EFAULT; | ||
2920 | goto error_cleanup; | ||
2921 | } | ||
2922 | } | ||
2923 | if (oper.do_csum){ | ||
2924 | DEBUG(printk("cryptocop_ioctl_process: copy 2 bytes checksum to user\n")); | ||
2925 | err = copy_to_user((unsigned char*)crp_oper + offsetof(struct strcop_crypto_op, csum), csum_result, 2); | ||
2926 | if (0 != err){ | ||
2927 | DEBUG_API(printk("cryptocop_ioctl_process: copy_to_user, csum, err %d\n", err)); | ||
2928 | err = -EFAULT; | ||
2929 | goto error_cleanup; | ||
2930 | } | ||
2931 | } | ||
2932 | err = 0; | ||
2933 | } else { | ||
2934 | DEBUG(printk("cryptocop_ioctl_process: returning err = operation_status = %d\n", cop->operation_status)); | ||
2935 | err = cop->operation_status; | ||
2936 | } | ||
2937 | |||
2938 | error_cleanup: | ||
2939 | /* Release page caches. */ | ||
2940 | for (i = 0; i < noinpages; i++){ | ||
2941 | put_page(inpages[i]); | ||
2942 | } | ||
2943 | for (i = 0; i < nooutpages; i++){ | ||
2944 | int spdl_err; | ||
2945 | /* Mark output pages dirty. */ | ||
2946 | spdl_err = set_page_dirty_lock(outpages[i]); | ||
2947 | DEBUG(if (spdl_err)printk("cryptocop_ioctl_process: set_page_dirty_lock returned %d\n", spdl_err)); | ||
2948 | } | ||
2949 | for (i = 0; i < nooutpages; i++){ | ||
2950 | put_page(outpages[i]); | ||
2951 | } | ||
2952 | |||
2953 | if (digest_result) kfree(digest_result); | ||
2954 | if (inpages) kfree(inpages); | ||
2955 | if (outpages) kfree(outpages); | ||
2956 | if (cop){ | ||
2957 | if (cop->tfrm_op.indata) kfree(cop->tfrm_op.indata); | ||
2958 | if (cop->tfrm_op.outdata) kfree(cop->tfrm_op.outdata); | ||
2959 | kfree(cop); | ||
2960 | } | ||
2961 | if (jc) kfree(jc); | ||
2962 | |||
2963 | DEBUG(print_lock_status()); | ||
2964 | |||
2965 | return err; | ||
2966 | } | ||
2967 | |||
2968 | |||
2969 | static int cryptocop_ioctl_create_session(struct inode *inode, struct file *filp, unsigned int cmd, unsigned long arg) | ||
2970 | { | ||
2971 | cryptocop_session_id sid; | ||
2972 | int err; | ||
2973 | struct cryptocop_private *dev; | ||
2974 | struct strcop_session_op *sess_op = (struct strcop_session_op *)arg; | ||
2975 | struct strcop_session_op sop; | ||
2976 | struct cryptocop_transform_init *tis = NULL; | ||
2977 | struct cryptocop_transform_init ti_cipher = {0}; | ||
2978 | struct cryptocop_transform_init ti_digest = {0}; | ||
2979 | struct cryptocop_transform_init ti_csum = {0}; | ||
2980 | |||
2981 | if (!access_ok(VERIFY_WRITE, sess_op, sizeof(struct strcop_session_op))) | ||
2982 | return -EFAULT; | ||
2983 | err = copy_from_user(&sop, sess_op, sizeof(struct strcop_session_op)); | ||
2984 | if (err) return -EFAULT; | ||
2985 | if (sop.cipher != cryptocop_cipher_none) { | ||
2986 | if (!access_ok(VERIFY_READ, sop.key, sop.keylen)) return -EFAULT; | ||
2987 | } | ||
2988 | DEBUG(printk("cryptocop_ioctl_create_session, sess_op:\n")); | ||
2989 | |||
2990 | DEBUG(printk("\tcipher:%d\n" | ||
2991 | "\tcipher_mode:%d\n" | ||
2992 | "\tdigest:%d\n" | ||
2993 | "\tcsum:%d\n", | ||
2994 | (int)sop.cipher, | ||
2995 | (int)sop.cmode, | ||
2996 | (int)sop.digest, | ||
2997 | (int)sop.csum)); | ||
2998 | |||
2999 | if (sop.cipher != cryptocop_cipher_none){ | ||
3000 | /* Init the cipher. */ | ||
3001 | switch (sop.cipher){ | ||
3002 | case cryptocop_cipher_des: | ||
3003 | ti_cipher.alg = cryptocop_alg_des; | ||
3004 | break; | ||
3005 | case cryptocop_cipher_3des: | ||
3006 | ti_cipher.alg = cryptocop_alg_3des; | ||
3007 | break; | ||
3008 | case cryptocop_cipher_aes: | ||
3009 | ti_cipher.alg = cryptocop_alg_aes; | ||
3010 | break; | ||
3011 | default: | ||
3012 | DEBUG_API(printk("create session, bad cipher algorithm %d\n", sop.cipher)); | ||
3013 | return -EINVAL; | ||
3014 | }; | ||
3015 | DEBUG(printk("setting cipher transform %d\n", ti_cipher.alg)); | ||
3016 | copy_from_user(ti_cipher.key, sop.key, sop.keylen/8); | ||
3017 | ti_cipher.keylen = sop.keylen; | ||
3018 | switch (sop.cmode){ | ||
3019 | case cryptocop_cipher_mode_cbc: | ||
3020 | case cryptocop_cipher_mode_ecb: | ||
3021 | ti_cipher.cipher_mode = sop.cmode; | ||
3022 | break; | ||
3023 | default: | ||
3024 | DEBUG_API(printk("create session, bad cipher mode %d\n", sop.cmode)); | ||
3025 | return -EINVAL; | ||
3026 | } | ||
3027 | DEBUG(printk("cryptocop_ioctl_create_session: setting CBC mode %d\n", ti_cipher.cipher_mode)); | ||
3028 | switch (sop.des3_mode){ | ||
3029 | case cryptocop_3des_eee: | ||
3030 | case cryptocop_3des_eed: | ||
3031 | case cryptocop_3des_ede: | ||
3032 | case cryptocop_3des_edd: | ||
3033 | case cryptocop_3des_dee: | ||
3034 | case cryptocop_3des_ded: | ||
3035 | case cryptocop_3des_dde: | ||
3036 | case cryptocop_3des_ddd: | ||
3037 | ti_cipher.tdes_mode = sop.des3_mode; | ||
3038 | break; | ||
3039 | default: | ||
3040 | DEBUG_API(printk("create session, bad 3DES mode %d\n", sop.des3_mode)); | ||
3041 | return -EINVAL; | ||
3042 | } | ||
3043 | ti_cipher.tid = CRYPTOCOP_IOCTL_CIPHER_TID; | ||
3044 | ti_cipher.next = tis; | ||
3045 | tis = &ti_cipher; | ||
3046 | } /* if (sop.cipher != cryptocop_cipher_none) */ | ||
3047 | if (sop.digest != cryptocop_digest_none){ | ||
3048 | DEBUG(printk("setting digest transform\n")); | ||
3049 | switch (sop.digest){ | ||
3050 | case cryptocop_digest_md5: | ||
3051 | ti_digest.alg = cryptocop_alg_md5; | ||
3052 | break; | ||
3053 | case cryptocop_digest_sha1: | ||
3054 | ti_digest.alg = cryptocop_alg_sha1; | ||
3055 | break; | ||
3056 | default: | ||
3057 | DEBUG_API(printk("create session, bad digest algorithm %d\n", sop.digest)); | ||
3058 | return -EINVAL; | ||
3059 | } | ||
3060 | ti_digest.tid = CRYPTOCOP_IOCTL_DIGEST_TID; | ||
3061 | ti_digest.next = tis; | ||
3062 | tis = &ti_digest; | ||
3063 | } /* if (sop.digest != cryptocop_digest_none) */ | ||
3064 | if (sop.csum != cryptocop_csum_none){ | ||
3065 | DEBUG(printk("setting csum transform\n")); | ||
3066 | switch (sop.csum){ | ||
3067 | case cryptocop_csum_le: | ||
3068 | case cryptocop_csum_be: | ||
3069 | ti_csum.csum_mode = sop.csum; | ||
3070 | break; | ||
3071 | default: | ||
3072 | DEBUG_API(printk("create session, bad checksum algorithm %d\n", sop.csum)); | ||
3073 | return -EINVAL; | ||
3074 | } | ||
3075 | ti_csum.alg = cryptocop_alg_csum; | ||
3076 | ti_csum.tid = CRYPTOCOP_IOCTL_CSUM_TID; | ||
3077 | ti_csum.next = tis; | ||
3078 | tis = &ti_csum; | ||
3079 | } /* (sop.csum != cryptocop_csum_none) */ | ||
3080 | dev = kmalloc(sizeof(struct cryptocop_private), GFP_KERNEL); | ||
3081 | if (!dev){ | ||
3082 | DEBUG_API(printk("create session, alloc dev\n")); | ||
3083 | return -ENOMEM; | ||
3084 | } | ||
3085 | |||
3086 | err = cryptocop_new_session(&sid, tis, GFP_KERNEL); | ||
3087 | DEBUG({ if (err) printk("create session, cryptocop_new_session %d\n", err);}); | ||
3088 | |||
3089 | if (err) { | ||
3090 | kfree(dev); | ||
3091 | return err; | ||
3092 | } | ||
3093 | sess_op->ses_id = sid; | ||
3094 | dev->sid = sid; | ||
3095 | dev->next = filp->private_data; | ||
3096 | filp->private_data = dev; | ||
3097 | |||
3098 | return 0; | ||
3099 | } | ||
3100 | |||
3101 | static int cryptocop_ioctl(struct inode *inode, struct file *filp, unsigned int cmd, unsigned long arg) | ||
3102 | { | ||
3103 | int err = 0; | ||
3104 | if (_IOC_TYPE(cmd) != ETRAXCRYPTOCOP_IOCTYPE) { | ||
3105 | DEBUG_API(printk("cryptocop_ioctl: wrong type\n")); | ||
3106 | return -ENOTTY; | ||
3107 | } | ||
3108 | if (_IOC_NR(cmd) > CRYPTOCOP_IO_MAXNR){ | ||
3109 | return -ENOTTY; | ||
3110 | } | ||
3111 | /* Access check of the argument. Some commands, e.g. create session and process op, | ||
3112 | needs additional checks. Those are handled in the command handling functions. */ | ||
3113 | if (_IOC_DIR(cmd) & _IOC_READ) | ||
3114 | err = !access_ok(VERIFY_WRITE, (void *)arg, _IOC_SIZE(cmd)); | ||
3115 | else if (_IOC_DIR(cmd) & _IOC_WRITE) | ||
3116 | err = !access_ok(VERIFY_READ, (void *)arg, _IOC_SIZE(cmd)); | ||
3117 | if (err) return -EFAULT; | ||
3118 | |||
3119 | switch (cmd) { | ||
3120 | case CRYPTOCOP_IO_CREATE_SESSION: | ||
3121 | return cryptocop_ioctl_create_session(inode, filp, cmd, arg); | ||
3122 | case CRYPTOCOP_IO_CLOSE_SESSION: | ||
3123 | return cryptocop_ioctl_close_session(inode, filp, cmd, arg); | ||
3124 | case CRYPTOCOP_IO_PROCESS_OP: | ||
3125 | return cryptocop_ioctl_process(inode, filp, cmd, arg); | ||
3126 | default: | ||
3127 | DEBUG_API(printk("cryptocop_ioctl: unknown command\n")); | ||
3128 | return -ENOTTY; | ||
3129 | } | ||
3130 | return 0; | ||
3131 | } | ||
3132 | |||
3133 | |||
3134 | #ifdef LDEBUG | ||
3135 | static void print_dma_descriptors(struct cryptocop_int_operation *iop) | ||
3136 | { | ||
3137 | struct cryptocop_dma_desc *cdesc_out = iop->cdesc_out; | ||
3138 | struct cryptocop_dma_desc *cdesc_in = iop->cdesc_in; | ||
3139 | int i; | ||
3140 | |||
3141 | printk("print_dma_descriptors start\n"); | ||
3142 | |||
3143 | printk("iop:\n"); | ||
3144 | printk("\tsid: 0x%lld\n", iop->sid); | ||
3145 | |||
3146 | printk("\tcdesc_out: 0x%p\n", iop->cdesc_out); | ||
3147 | printk("\tcdesc_in: 0x%p\n", iop->cdesc_in); | ||
3148 | printk("\tddesc_out: 0x%p\n", iop->ddesc_out); | ||
3149 | printk("\tddesc_in: 0x%p\n", iop->ddesc_in); | ||
3150 | |||
3151 | printk("\niop->ctx_out: 0x%p phys: 0x%p\n", &iop->ctx_out, (char*)virt_to_phys(&iop->ctx_out)); | ||
3152 | printk("\tnext: 0x%p\n" | ||
3153 | "\tsaved_data: 0x%p\n" | ||
3154 | "\tsaved_data_buf: 0x%p\n", | ||
3155 | iop->ctx_out.next, | ||
3156 | iop->ctx_out.saved_data, | ||
3157 | iop->ctx_out.saved_data_buf); | ||
3158 | |||
3159 | printk("\niop->ctx_in: 0x%p phys: 0x%p\n", &iop->ctx_in, (char*)virt_to_phys(&iop->ctx_in)); | ||
3160 | printk("\tnext: 0x%p\n" | ||
3161 | "\tsaved_data: 0x%p\n" | ||
3162 | "\tsaved_data_buf: 0x%p\n", | ||
3163 | iop->ctx_in.next, | ||
3164 | iop->ctx_in.saved_data, | ||
3165 | iop->ctx_in.saved_data_buf); | ||
3166 | |||
3167 | i = 0; | ||
3168 | while (cdesc_out) { | ||
3169 | dma_descr_data *td; | ||
3170 | printk("cdesc_out %d, desc=0x%p\n", i, cdesc_out->dma_descr); | ||
3171 | printk("\n\tvirt_to_phys(desc): 0x%p\n", (char*)virt_to_phys(cdesc_out->dma_descr)); | ||
3172 | td = cdesc_out->dma_descr; | ||
3173 | printk("\n\tbuf: 0x%p\n" | ||
3174 | "\tafter: 0x%p\n" | ||
3175 | "\tmd: 0x%04x\n" | ||
3176 | "\tnext: 0x%p\n", | ||
3177 | td->buf, | ||
3178 | td->after, | ||
3179 | td->md, | ||
3180 | td->next); | ||
3181 | printk("flags:\n" | ||
3182 | "\twait:\t%d\n" | ||
3183 | "\teol:\t%d\n" | ||
3184 | "\touteop:\t%d\n" | ||
3185 | "\tineop:\t%d\n" | ||
3186 | "\tintr:\t%d\n", | ||
3187 | td->wait, | ||
3188 | td->eol, | ||
3189 | td->out_eop, | ||
3190 | td->in_eop, | ||
3191 | td->intr); | ||
3192 | cdesc_out = cdesc_out->next; | ||
3193 | i++; | ||
3194 | } | ||
3195 | i = 0; | ||
3196 | while (cdesc_in) { | ||
3197 | dma_descr_data *td; | ||
3198 | printk("cdesc_in %d, desc=0x%p\n", i, cdesc_in->dma_descr); | ||
3199 | printk("\n\tvirt_to_phys(desc): 0x%p\n", (char*)virt_to_phys(cdesc_in->dma_descr)); | ||
3200 | td = cdesc_in->dma_descr; | ||
3201 | printk("\n\tbuf: 0x%p\n" | ||
3202 | "\tafter: 0x%p\n" | ||
3203 | "\tmd: 0x%04x\n" | ||
3204 | "\tnext: 0x%p\n", | ||
3205 | td->buf, | ||
3206 | td->after, | ||
3207 | td->md, | ||
3208 | td->next); | ||
3209 | printk("flags:\n" | ||
3210 | "\twait:\t%d\n" | ||
3211 | "\teol:\t%d\n" | ||
3212 | "\touteop:\t%d\n" | ||
3213 | "\tineop:\t%d\n" | ||
3214 | "\tintr:\t%d\n", | ||
3215 | td->wait, | ||
3216 | td->eol, | ||
3217 | td->out_eop, | ||
3218 | td->in_eop, | ||
3219 | td->intr); | ||
3220 | cdesc_in = cdesc_in->next; | ||
3221 | i++; | ||
3222 | } | ||
3223 | |||
3224 | printk("print_dma_descriptors end\n"); | ||
3225 | } | ||
3226 | |||
3227 | |||
3228 | static void print_strcop_crypto_op(struct strcop_crypto_op *cop) | ||
3229 | { | ||
3230 | printk("print_strcop_crypto_op, 0x%p\n", cop); | ||
3231 | |||
3232 | /* Indata. */ | ||
3233 | printk("indata=0x%p\n" | ||
3234 | "inlen=%d\n" | ||
3235 | "do_cipher=%d\n" | ||
3236 | "decrypt=%d\n" | ||
3237 | "cipher_explicit=%d\n" | ||
3238 | "cipher_start=%d\n" | ||
3239 | "cipher_len=%d\n" | ||
3240 | "outdata=0x%p\n" | ||
3241 | "outlen=%d\n", | ||
3242 | cop->indata, | ||
3243 | cop->inlen, | ||
3244 | cop->do_cipher, | ||
3245 | cop->decrypt, | ||
3246 | cop->cipher_explicit, | ||
3247 | cop->cipher_start, | ||
3248 | cop->cipher_len, | ||
3249 | cop->cipher_outdata, | ||
3250 | cop->cipher_outlen); | ||
3251 | |||
3252 | printk("do_digest=%d\n" | ||
3253 | "digest_start=%d\n" | ||
3254 | "digest_len=%d\n", | ||
3255 | cop->do_digest, | ||
3256 | cop->digest_start, | ||
3257 | cop->digest_len); | ||
3258 | |||
3259 | printk("do_csum=%d\n" | ||
3260 | "csum_start=%d\n" | ||
3261 | "csum_len=%d\n", | ||
3262 | cop->do_csum, | ||
3263 | cop->csum_start, | ||
3264 | cop->csum_len); | ||
3265 | } | ||
3266 | |||
3267 | static void print_cryptocop_operation(struct cryptocop_operation *cop) | ||
3268 | { | ||
3269 | struct cryptocop_desc *d; | ||
3270 | struct cryptocop_tfrm_cfg *tc; | ||
3271 | struct cryptocop_desc_cfg *dc; | ||
3272 | int i; | ||
3273 | |||
3274 | printk("print_cryptocop_operation, cop=0x%p\n\n", cop); | ||
3275 | printk("sid: %lld\n", cop->sid); | ||
3276 | printk("operation_status=%d\n" | ||
3277 | "use_dmalists=%d\n" | ||
3278 | "in_interrupt=%d\n" | ||
3279 | "fast_callback=%d\n", | ||
3280 | cop->operation_status, | ||
3281 | cop->use_dmalists, | ||
3282 | cop->in_interrupt, | ||
3283 | cop->fast_callback); | ||
3284 | |||
3285 | if (cop->use_dmalists){ | ||
3286 | print_user_dma_lists(&cop->list_op); | ||
3287 | } else { | ||
3288 | printk("cop->tfrm_op\n" | ||
3289 | "tfrm_cfg=0x%p\n" | ||
3290 | "desc=0x%p\n" | ||
3291 | "indata=0x%p\n" | ||
3292 | "incount=%d\n" | ||
3293 | "inlen=%d\n" | ||
3294 | "outdata=0x%p\n" | ||
3295 | "outcount=%d\n" | ||
3296 | "outlen=%d\n\n", | ||
3297 | cop->tfrm_op.tfrm_cfg, | ||
3298 | cop->tfrm_op.desc, | ||
3299 | cop->tfrm_op.indata, | ||
3300 | cop->tfrm_op.incount, | ||
3301 | cop->tfrm_op.inlen, | ||
3302 | cop->tfrm_op.outdata, | ||
3303 | cop->tfrm_op.outcount, | ||
3304 | cop->tfrm_op.outlen); | ||
3305 | |||
3306 | tc = cop->tfrm_op.tfrm_cfg; | ||
3307 | while (tc){ | ||
3308 | printk("tfrm_cfg, 0x%p\n" | ||
3309 | "tid=%d\n" | ||
3310 | "flags=%d\n" | ||
3311 | "inject_ix=%d\n" | ||
3312 | "next=0x%p\n", | ||
3313 | tc, | ||
3314 | tc->tid, | ||
3315 | tc->flags, | ||
3316 | tc->inject_ix, | ||
3317 | tc->next); | ||
3318 | tc = tc->next; | ||
3319 | } | ||
3320 | d = cop->tfrm_op.desc; | ||
3321 | while (d){ | ||
3322 | printk("\n======================desc, 0x%p\n" | ||
3323 | "length=%d\n" | ||
3324 | "cfg=0x%p\n" | ||
3325 | "next=0x%p\n", | ||
3326 | d, | ||
3327 | d->length, | ||
3328 | d->cfg, | ||
3329 | d->next); | ||
3330 | dc = d->cfg; | ||
3331 | while (dc){ | ||
3332 | printk("=========desc_cfg, 0x%p\n" | ||
3333 | "tid=%d\n" | ||
3334 | "src=%d\n" | ||
3335 | "last=%d\n" | ||
3336 | "next=0x%p\n", | ||
3337 | dc, | ||
3338 | dc->tid, | ||
3339 | dc->src, | ||
3340 | dc->last, | ||
3341 | dc->next); | ||
3342 | dc = dc->next; | ||
3343 | } | ||
3344 | d = d->next; | ||
3345 | } | ||
3346 | printk("\n====iniov\n"); | ||
3347 | for (i = 0; i < cop->tfrm_op.incount; i++){ | ||
3348 | printk("indata[%d]\n" | ||
3349 | "base=0x%p\n" | ||
3350 | "len=%d\n", | ||
3351 | i, | ||
3352 | cop->tfrm_op.indata[i].iov_base, | ||
3353 | cop->tfrm_op.indata[i].iov_len); | ||
3354 | } | ||
3355 | printk("\n====outiov\n"); | ||
3356 | for (i = 0; i < cop->tfrm_op.outcount; i++){ | ||
3357 | printk("outdata[%d]\n" | ||
3358 | "base=0x%p\n" | ||
3359 | "len=%d\n", | ||
3360 | i, | ||
3361 | cop->tfrm_op.outdata[i].iov_base, | ||
3362 | cop->tfrm_op.outdata[i].iov_len); | ||
3363 | } | ||
3364 | } | ||
3365 | printk("------------end print_cryptocop_operation\n"); | ||
3366 | } | ||
3367 | |||
3368 | |||
3369 | static void print_user_dma_lists(struct cryptocop_dma_list_operation *dma_op) | ||
3370 | { | ||
3371 | dma_descr_data *dd; | ||
3372 | int i; | ||
3373 | |||
3374 | printk("print_user_dma_lists, dma_op=0x%p\n", dma_op); | ||
3375 | |||
3376 | printk("out_data_buf = 0x%p, phys_to_virt(out_data_buf) = 0x%p\n", dma_op->out_data_buf, phys_to_virt((unsigned long int)dma_op->out_data_buf)); | ||
3377 | printk("in_data_buf = 0x%p, phys_to_virt(in_data_buf) = 0x%p\n", dma_op->in_data_buf, phys_to_virt((unsigned long int)dma_op->in_data_buf)); | ||
3378 | |||
3379 | printk("##############outlist\n"); | ||
3380 | dd = phys_to_virt((unsigned long int)dma_op->outlist); | ||
3381 | i = 0; | ||
3382 | while (dd != NULL) { | ||
3383 | printk("#%d phys_to_virt(desc) 0x%p\n", i, dd); | ||
3384 | printk("\n\tbuf: 0x%p\n" | ||
3385 | "\tafter: 0x%p\n" | ||
3386 | "\tmd: 0x%04x\n" | ||
3387 | "\tnext: 0x%p\n", | ||
3388 | dd->buf, | ||
3389 | dd->after, | ||
3390 | dd->md, | ||
3391 | dd->next); | ||
3392 | printk("flags:\n" | ||
3393 | "\twait:\t%d\n" | ||
3394 | "\teol:\t%d\n" | ||
3395 | "\touteop:\t%d\n" | ||
3396 | "\tineop:\t%d\n" | ||
3397 | "\tintr:\t%d\n", | ||
3398 | dd->wait, | ||
3399 | dd->eol, | ||
3400 | dd->out_eop, | ||
3401 | dd->in_eop, | ||
3402 | dd->intr); | ||
3403 | if (dd->eol) | ||
3404 | dd = NULL; | ||
3405 | else | ||
3406 | dd = phys_to_virt((unsigned long int)dd->next); | ||
3407 | ++i; | ||
3408 | } | ||
3409 | |||
3410 | printk("##############inlist\n"); | ||
3411 | dd = phys_to_virt((unsigned long int)dma_op->inlist); | ||
3412 | i = 0; | ||
3413 | while (dd != NULL) { | ||
3414 | printk("#%d phys_to_virt(desc) 0x%p\n", i, dd); | ||
3415 | printk("\n\tbuf: 0x%p\n" | ||
3416 | "\tafter: 0x%p\n" | ||
3417 | "\tmd: 0x%04x\n" | ||
3418 | "\tnext: 0x%p\n", | ||
3419 | dd->buf, | ||
3420 | dd->after, | ||
3421 | dd->md, | ||
3422 | dd->next); | ||
3423 | printk("flags:\n" | ||
3424 | "\twait:\t%d\n" | ||
3425 | "\teol:\t%d\n" | ||
3426 | "\touteop:\t%d\n" | ||
3427 | "\tineop:\t%d\n" | ||
3428 | "\tintr:\t%d\n", | ||
3429 | dd->wait, | ||
3430 | dd->eol, | ||
3431 | dd->out_eop, | ||
3432 | dd->in_eop, | ||
3433 | dd->intr); | ||
3434 | if (dd->eol) | ||
3435 | dd = NULL; | ||
3436 | else | ||
3437 | dd = phys_to_virt((unsigned long int)dd->next); | ||
3438 | ++i; | ||
3439 | } | ||
3440 | } | ||
3441 | |||
3442 | |||
3443 | static void print_lock_status(void) | ||
3444 | { | ||
3445 | printk("**********************print_lock_status\n"); | ||
3446 | printk("cryptocop_completed_jobs_lock %d\n", spin_is_locked(&cryptocop_completed_jobs_lock)); | ||
3447 | printk("cryptocop_job_queue_lock %d\n", spin_is_locked(&cryptocop_job_queue_lock)); | ||
3448 | printk("descr_pool_lock %d\n", spin_is_locked(&descr_pool_lock)); | ||
3449 | printk("cryptocop_sessions_lock %d\n", spin_is_locked(cryptocop_sessions_lock)); | ||
3450 | printk("running_job_lock %d\n", spin_is_locked(running_job_lock)); | ||
3451 | printk("cryptocop_process_lock %d\n", spin_is_locked(cryptocop_process_lock)); | ||
3452 | } | ||
3453 | #endif /* LDEBUG */ | ||
3454 | |||
3455 | |||
3456 | static const char cryptocop_name[] = "ETRAX FS stream co-processor"; | ||
3457 | |||
3458 | static int init_stream_coprocessor(void) | ||
3459 | { | ||
3460 | int err; | ||
3461 | int i; | ||
3462 | static int initialized = 0; | ||
3463 | |||
3464 | if (initialized) | ||
3465 | return 0; | ||
3466 | |||
3467 | initialized = 1; | ||
3468 | |||
3469 | printk("ETRAX FS stream co-processor driver v0.01, (c) 2003 Axis Communications AB\n"); | ||
3470 | |||
3471 | err = register_chrdev(CRYPTOCOP_MAJOR, cryptocop_name, &cryptocop_fops); | ||
3472 | if (err < 0) { | ||
3473 | printk(KERN_ERR "stream co-processor: could not get major number.\n"); | ||
3474 | return err; | ||
3475 | } | ||
3476 | |||
3477 | err = init_cryptocop(); | ||
3478 | if (err) { | ||
3479 | (void)unregister_chrdev(CRYPTOCOP_MAJOR, cryptocop_name); | ||
3480 | return err; | ||
3481 | } | ||
3482 | err = cryptocop_job_queue_init(); | ||
3483 | if (err) { | ||
3484 | release_cryptocop(); | ||
3485 | (void)unregister_chrdev(CRYPTOCOP_MAJOR, cryptocop_name); | ||
3486 | return err; | ||
3487 | } | ||
3488 | /* Init the descriptor pool. */ | ||
3489 | for (i = 0; i < CRYPTOCOP_DESCRIPTOR_POOL_SIZE - 1; i++) { | ||
3490 | descr_pool[i].from_pool = 1; | ||
3491 | descr_pool[i].next = &descr_pool[i + 1]; | ||
3492 | } | ||
3493 | descr_pool[i].from_pool = 1; | ||
3494 | descr_pool[i].next = NULL; | ||
3495 | descr_pool_free_list = &descr_pool[0]; | ||
3496 | descr_pool_no_free = CRYPTOCOP_DESCRIPTOR_POOL_SIZE; | ||
3497 | |||
3498 | spin_lock_init(&cryptocop_completed_jobs_lock); | ||
3499 | spin_lock_init(&cryptocop_job_queue_lock); | ||
3500 | spin_lock_init(&descr_pool_lock); | ||
3501 | spin_lock_init(&cryptocop_sessions_lock); | ||
3502 | spin_lock_init(&running_job_lock); | ||
3503 | spin_lock_init(&cryptocop_process_lock); | ||
3504 | |||
3505 | cryptocop_sessions = NULL; | ||
3506 | next_sid = 1; | ||
3507 | |||
3508 | cryptocop_running_job = NULL; | ||
3509 | |||
3510 | printk("stream co-processor: init done.\n"); | ||
3511 | return 0; | ||
3512 | } | ||
3513 | |||
3514 | static void __exit exit_stream_coprocessor(void) | ||
3515 | { | ||
3516 | release_cryptocop(); | ||
3517 | cryptocop_job_queue_close(); | ||
3518 | } | ||
3519 | |||
3520 | module_init(init_stream_coprocessor); | ||
3521 | module_exit(exit_stream_coprocessor); | ||
3522 | |||
diff --git a/arch/cris/arch-v32/drivers/gpio.c b/arch/cris/arch-v32/drivers/gpio.c new file mode 100644 index 000000000000..a551237dcb5e --- /dev/null +++ b/arch/cris/arch-v32/drivers/gpio.c | |||
@@ -0,0 +1,766 @@ | |||
1 | /* $Id: gpio.c,v 1.16 2005/06/19 17:06:49 starvik Exp $ | ||
2 | * | ||
3 | * ETRAX CRISv32 general port I/O device | ||
4 | * | ||
5 | * Copyright (c) 1999, 2000, 2001, 2002, 2003 Axis Communications AB | ||
6 | * | ||
7 | * Authors: Bjorn Wesen (initial version) | ||
8 | * Ola Knutsson (LED handling) | ||
9 | * Johan Adolfsson (read/set directions, write, port G, | ||
10 | * port to ETRAX FS. | ||
11 | * | ||
12 | * $Log: gpio.c,v $ | ||
13 | * Revision 1.16 2005/06/19 17:06:49 starvik | ||
14 | * Merge of Linux 2.6.12. | ||
15 | * | ||
16 | * Revision 1.15 2005/05/25 08:22:20 starvik | ||
17 | * Changed GPIO port order to fit packages/devices/axis-2.4. | ||
18 | * | ||
19 | * Revision 1.14 2005/04/24 18:35:08 starvik | ||
20 | * Updated with final register headers. | ||
21 | * | ||
22 | * Revision 1.13 2005/03/15 15:43:00 starvik | ||
23 | * dev_id needs to be supplied for shared IRQs. | ||
24 | * | ||
25 | * Revision 1.12 2005/03/10 17:12:00 starvik | ||
26 | * Protect alarm list with spinlock. | ||
27 | * | ||
28 | * Revision 1.11 2005/01/05 06:08:59 starvik | ||
29 | * No need to do local_irq_disable after local_irq_save. | ||
30 | * | ||
31 | * Revision 1.10 2004/11/19 08:38:31 starvik | ||
32 | * Removed old crap. | ||
33 | * | ||
34 | * Revision 1.9 2004/05/14 07:58:02 starvik | ||
35 | * Merge of changes from 2.4 | ||
36 | * | ||
37 | * Revision 1.8 2003/09/11 07:29:50 starvik | ||
38 | * Merge of Linux 2.6.0-test5 | ||
39 | * | ||
40 | * Revision 1.7 2003/07/10 13:25:46 starvik | ||
41 | * Compiles for 2.5.74 | ||
42 | * Lindented ethernet.c | ||
43 | * | ||
44 | * Revision 1.6 2003/07/04 08:27:46 starvik | ||
45 | * Merge of Linux 2.5.74 | ||
46 | * | ||
47 | * Revision 1.5 2003/06/10 08:26:37 johana | ||
48 | * Etrax -> ETRAX CRISv32 | ||
49 | * | ||
50 | * Revision 1.4 2003/06/05 14:22:48 johana | ||
51 | * Initialise some_alarms. | ||
52 | * | ||
53 | * Revision 1.3 2003/06/05 10:15:46 johana | ||
54 | * New INTR_VECT macros. | ||
55 | * Enable interrupts in global config. | ||
56 | * | ||
57 | * Revision 1.2 2003/06/03 15:52:50 johana | ||
58 | * Initial CRIS v32 version. | ||
59 | * | ||
60 | * Revision 1.1 2003/06/03 08:53:15 johana | ||
61 | * Copy of os/lx25/arch/cris/arch-v10/drivers/gpio.c version 1.7. | ||
62 | * | ||
63 | */ | ||
64 | |||
65 | #include <linux/config.h> | ||
66 | |||
67 | #include <linux/module.h> | ||
68 | #include <linux/sched.h> | ||
69 | #include <linux/slab.h> | ||
70 | #include <linux/ioport.h> | ||
71 | #include <linux/errno.h> | ||
72 | #include <linux/kernel.h> | ||
73 | #include <linux/fs.h> | ||
74 | #include <linux/string.h> | ||
75 | #include <linux/poll.h> | ||
76 | #include <linux/init.h> | ||
77 | #include <linux/interrupt.h> | ||
78 | #include <linux/spinlock.h> | ||
79 | |||
80 | #include <asm/etraxgpio.h> | ||
81 | #include <asm/arch/hwregs/reg_map.h> | ||
82 | #include <asm/arch/hwregs/reg_rdwr.h> | ||
83 | #include <asm/arch/hwregs/gio_defs.h> | ||
84 | #include <asm/arch/hwregs/intr_vect_defs.h> | ||
85 | #include <asm/io.h> | ||
86 | #include <asm/system.h> | ||
87 | #include <asm/irq.h> | ||
88 | |||
89 | /* The following gio ports on ETRAX FS is available: | ||
90 | * pa 8 bits, supports interrupts off, hi, low, set, posedge, negedge anyedge | ||
91 | * pb 18 bits | ||
92 | * pc 18 bits | ||
93 | * pd 18 bits | ||
94 | * pe 18 bits | ||
95 | * each port has a rw_px_dout, r_px_din and rw_px_oe register. | ||
96 | */ | ||
97 | |||
98 | #define GPIO_MAJOR 120 /* experimental MAJOR number */ | ||
99 | |||
100 | #define D(x) | ||
101 | |||
102 | #if 0 | ||
103 | static int dp_cnt; | ||
104 | #define DP(x) do { dp_cnt++; if (dp_cnt % 1000 == 0) x; }while(0) | ||
105 | #else | ||
106 | #define DP(x) | ||
107 | #endif | ||
108 | |||
109 | static char gpio_name[] = "etrax gpio"; | ||
110 | |||
111 | #if 0 | ||
112 | static wait_queue_head_t *gpio_wq; | ||
113 | #endif | ||
114 | |||
115 | static int gpio_ioctl(struct inode *inode, struct file *file, | ||
116 | unsigned int cmd, unsigned long arg); | ||
117 | static ssize_t gpio_write(struct file * file, const char * buf, size_t count, | ||
118 | loff_t *off); | ||
119 | static int gpio_open(struct inode *inode, struct file *filp); | ||
120 | static int gpio_release(struct inode *inode, struct file *filp); | ||
121 | static unsigned int gpio_poll(struct file *filp, struct poll_table_struct *wait); | ||
122 | |||
123 | /* private data per open() of this driver */ | ||
124 | |||
125 | struct gpio_private { | ||
126 | struct gpio_private *next; | ||
127 | /* The IO_CFG_WRITE_MODE_VALUE only support 8 bits: */ | ||
128 | unsigned char clk_mask; | ||
129 | unsigned char data_mask; | ||
130 | unsigned char write_msb; | ||
131 | unsigned char pad1; | ||
132 | /* These fields are generic */ | ||
133 | unsigned long highalarm, lowalarm; | ||
134 | wait_queue_head_t alarm_wq; | ||
135 | int minor; | ||
136 | }; | ||
137 | |||
138 | /* linked list of alarms to check for */ | ||
139 | |||
140 | static struct gpio_private *alarmlist = 0; | ||
141 | |||
142 | static int gpio_some_alarms = 0; /* Set if someone uses alarm */ | ||
143 | static unsigned long gpio_pa_high_alarms = 0; | ||
144 | static unsigned long gpio_pa_low_alarms = 0; | ||
145 | |||
146 | static DEFINE_SPINLOCK(alarm_lock); | ||
147 | |||
148 | #define NUM_PORTS (GPIO_MINOR_LAST+1) | ||
149 | #define GIO_REG_RD_ADDR(reg) (volatile unsigned long*) (regi_gio + REG_RD_ADDR_gio_##reg ) | ||
150 | #define GIO_REG_WR_ADDR(reg) (volatile unsigned long*) (regi_gio + REG_RD_ADDR_gio_##reg ) | ||
151 | unsigned long led_dummy; | ||
152 | |||
153 | static volatile unsigned long *data_out[NUM_PORTS] = { | ||
154 | GIO_REG_WR_ADDR(rw_pa_dout), | ||
155 | GIO_REG_WR_ADDR(rw_pb_dout), | ||
156 | &led_dummy, | ||
157 | GIO_REG_WR_ADDR(rw_pc_dout), | ||
158 | GIO_REG_WR_ADDR(rw_pd_dout), | ||
159 | GIO_REG_WR_ADDR(rw_pe_dout), | ||
160 | }; | ||
161 | |||
162 | static volatile unsigned long *data_in[NUM_PORTS] = { | ||
163 | GIO_REG_RD_ADDR(r_pa_din), | ||
164 | GIO_REG_RD_ADDR(r_pb_din), | ||
165 | &led_dummy, | ||
166 | GIO_REG_RD_ADDR(r_pc_din), | ||
167 | GIO_REG_RD_ADDR(r_pd_din), | ||
168 | GIO_REG_RD_ADDR(r_pe_din), | ||
169 | }; | ||
170 | |||
171 | static unsigned long changeable_dir[NUM_PORTS] = { | ||
172 | CONFIG_ETRAX_PA_CHANGEABLE_DIR, | ||
173 | CONFIG_ETRAX_PB_CHANGEABLE_DIR, | ||
174 | 0, | ||
175 | CONFIG_ETRAX_PC_CHANGEABLE_DIR, | ||
176 | CONFIG_ETRAX_PD_CHANGEABLE_DIR, | ||
177 | CONFIG_ETRAX_PE_CHANGEABLE_DIR, | ||
178 | }; | ||
179 | |||
180 | static unsigned long changeable_bits[NUM_PORTS] = { | ||
181 | CONFIG_ETRAX_PA_CHANGEABLE_BITS, | ||
182 | CONFIG_ETRAX_PB_CHANGEABLE_BITS, | ||
183 | 0, | ||
184 | CONFIG_ETRAX_PC_CHANGEABLE_BITS, | ||
185 | CONFIG_ETRAX_PD_CHANGEABLE_BITS, | ||
186 | CONFIG_ETRAX_PE_CHANGEABLE_BITS, | ||
187 | }; | ||
188 | |||
189 | static volatile unsigned long *dir_oe[NUM_PORTS] = { | ||
190 | GIO_REG_WR_ADDR(rw_pa_oe), | ||
191 | GIO_REG_WR_ADDR(rw_pb_oe), | ||
192 | &led_dummy, | ||
193 | GIO_REG_WR_ADDR(rw_pc_oe), | ||
194 | GIO_REG_WR_ADDR(rw_pd_oe), | ||
195 | GIO_REG_WR_ADDR(rw_pe_oe), | ||
196 | }; | ||
197 | |||
198 | |||
199 | |||
200 | static unsigned int | ||
201 | gpio_poll(struct file *file, | ||
202 | poll_table *wait) | ||
203 | { | ||
204 | unsigned int mask = 0; | ||
205 | struct gpio_private *priv = (struct gpio_private *)file->private_data; | ||
206 | unsigned long data; | ||
207 | poll_wait(file, &priv->alarm_wq, wait); | ||
208 | if (priv->minor == GPIO_MINOR_A) { | ||
209 | reg_gio_rw_intr_cfg intr_cfg; | ||
210 | unsigned long tmp; | ||
211 | unsigned long flags; | ||
212 | |||
213 | local_irq_save(flags); | ||
214 | data = REG_TYPE_CONV(unsigned long, reg_gio_r_pa_din, REG_RD(gio, regi_gio, r_pa_din)); | ||
215 | /* PA has support for interrupt | ||
216 | * lets activate high for those low and with highalarm set | ||
217 | */ | ||
218 | intr_cfg = REG_RD(gio, regi_gio, rw_intr_cfg); | ||
219 | |||
220 | tmp = ~data & priv->highalarm & 0xFF; | ||
221 | if (tmp & (1 << 0)) { | ||
222 | intr_cfg.pa0 = regk_gio_hi; | ||
223 | } | ||
224 | if (tmp & (1 << 1)) { | ||
225 | intr_cfg.pa1 = regk_gio_hi; | ||
226 | } | ||
227 | if (tmp & (1 << 2)) { | ||
228 | intr_cfg.pa2 = regk_gio_hi; | ||
229 | } | ||
230 | if (tmp & (1 << 3)) { | ||
231 | intr_cfg.pa3 = regk_gio_hi; | ||
232 | } | ||
233 | if (tmp & (1 << 4)) { | ||
234 | intr_cfg.pa4 = regk_gio_hi; | ||
235 | } | ||
236 | if (tmp & (1 << 5)) { | ||
237 | intr_cfg.pa5 = regk_gio_hi; | ||
238 | } | ||
239 | if (tmp & (1 << 6)) { | ||
240 | intr_cfg.pa6 = regk_gio_hi; | ||
241 | } | ||
242 | if (tmp & (1 << 7)) { | ||
243 | intr_cfg.pa7 = regk_gio_hi; | ||
244 | } | ||
245 | /* | ||
246 | * lets activate low for those high and with lowalarm set | ||
247 | */ | ||
248 | tmp = data & priv->lowalarm & 0xFF; | ||
249 | if (tmp & (1 << 0)) { | ||
250 | intr_cfg.pa0 = regk_gio_lo; | ||
251 | } | ||
252 | if (tmp & (1 << 1)) { | ||
253 | intr_cfg.pa1 = regk_gio_lo; | ||
254 | } | ||
255 | if (tmp & (1 << 2)) { | ||
256 | intr_cfg.pa2 = regk_gio_lo; | ||
257 | } | ||
258 | if (tmp & (1 << 3)) { | ||
259 | intr_cfg.pa3 = regk_gio_lo; | ||
260 | } | ||
261 | if (tmp & (1 << 4)) { | ||
262 | intr_cfg.pa4 = regk_gio_lo; | ||
263 | } | ||
264 | if (tmp & (1 << 5)) { | ||
265 | intr_cfg.pa5 = regk_gio_lo; | ||
266 | } | ||
267 | if (tmp & (1 << 6)) { | ||
268 | intr_cfg.pa6 = regk_gio_lo; | ||
269 | } | ||
270 | if (tmp & (1 << 7)) { | ||
271 | intr_cfg.pa7 = regk_gio_lo; | ||
272 | } | ||
273 | |||
274 | REG_WR(gio, regi_gio, rw_intr_cfg, intr_cfg); | ||
275 | local_irq_restore(flags); | ||
276 | } else if (priv->minor <= GPIO_MINOR_E) | ||
277 | data = *data_in[priv->minor]; | ||
278 | else | ||
279 | return 0; | ||
280 | |||
281 | if ((data & priv->highalarm) || | ||
282 | (~data & priv->lowalarm)) { | ||
283 | mask = POLLIN|POLLRDNORM; | ||
284 | } | ||
285 | |||
286 | DP(printk("gpio_poll ready: mask 0x%08X\n", mask)); | ||
287 | return mask; | ||
288 | } | ||
289 | |||
290 | int etrax_gpio_wake_up_check(void) | ||
291 | { | ||
292 | struct gpio_private *priv = alarmlist; | ||
293 | unsigned long data = 0; | ||
294 | int ret = 0; | ||
295 | while (priv) { | ||
296 | data = *data_in[priv->minor]; | ||
297 | if ((data & priv->highalarm) || | ||
298 | (~data & priv->lowalarm)) { | ||
299 | DP(printk("etrax_gpio_wake_up_check %i\n",priv->minor)); | ||
300 | wake_up_interruptible(&priv->alarm_wq); | ||
301 | ret = 1; | ||
302 | } | ||
303 | priv = priv->next; | ||
304 | } | ||
305 | return ret; | ||
306 | } | ||
307 | |||
308 | static irqreturn_t | ||
309 | gpio_poll_timer_interrupt(int irq, void *dev_id, struct pt_regs *regs) | ||
310 | { | ||
311 | if (gpio_some_alarms) { | ||
312 | return IRQ_RETVAL(etrax_gpio_wake_up_check()); | ||
313 | } | ||
314 | return IRQ_NONE; | ||
315 | } | ||
316 | |||
317 | static irqreturn_t | ||
318 | gpio_pa_interrupt(int irq, void *dev_id, struct pt_regs *regs) | ||
319 | { | ||
320 | reg_gio_rw_intr_mask intr_mask; | ||
321 | reg_gio_r_masked_intr masked_intr; | ||
322 | reg_gio_rw_ack_intr ack_intr; | ||
323 | unsigned long tmp; | ||
324 | unsigned long tmp2; | ||
325 | |||
326 | /* Find what PA interrupts are active */ | ||
327 | masked_intr = REG_RD(gio, regi_gio, r_masked_intr); | ||
328 | tmp = REG_TYPE_CONV(unsigned long, reg_gio_r_masked_intr, masked_intr); | ||
329 | |||
330 | /* Find those that we have enabled */ | ||
331 | spin_lock(&alarm_lock); | ||
332 | tmp &= (gpio_pa_high_alarms | gpio_pa_low_alarms); | ||
333 | spin_unlock(&alarm_lock); | ||
334 | |||
335 | /* Ack them */ | ||
336 | ack_intr = REG_TYPE_CONV(reg_gio_rw_ack_intr, unsigned long, tmp); | ||
337 | REG_WR(gio, regi_gio, rw_ack_intr, ack_intr); | ||
338 | |||
339 | /* Disable those interrupts.. */ | ||
340 | intr_mask = REG_RD(gio, regi_gio, rw_intr_mask); | ||
341 | tmp2 = REG_TYPE_CONV(unsigned long, reg_gio_rw_intr_mask, intr_mask); | ||
342 | tmp2 &= ~tmp; | ||
343 | intr_mask = REG_TYPE_CONV(reg_gio_rw_intr_mask, unsigned long, tmp2); | ||
344 | REG_WR(gio, regi_gio, rw_intr_mask, intr_mask); | ||
345 | |||
346 | if (gpio_some_alarms) { | ||
347 | return IRQ_RETVAL(etrax_gpio_wake_up_check()); | ||
348 | } | ||
349 | return IRQ_NONE; | ||
350 | } | ||
351 | |||
352 | |||
353 | static ssize_t gpio_write(struct file * file, const char * buf, size_t count, | ||
354 | loff_t *off) | ||
355 | { | ||
356 | struct gpio_private *priv = (struct gpio_private *)file->private_data; | ||
357 | unsigned char data, clk_mask, data_mask, write_msb; | ||
358 | unsigned long flags; | ||
359 | unsigned long shadow; | ||
360 | volatile unsigned long *port; | ||
361 | ssize_t retval = count; | ||
362 | /* Only bits 0-7 may be used for write operations but allow all | ||
363 | devices except leds... */ | ||
364 | if (priv->minor == GPIO_MINOR_LEDS) { | ||
365 | return -EFAULT; | ||
366 | } | ||
367 | |||
368 | if (!access_ok(VERIFY_READ, buf, count)) { | ||
369 | return -EFAULT; | ||
370 | } | ||
371 | clk_mask = priv->clk_mask; | ||
372 | data_mask = priv->data_mask; | ||
373 | /* It must have been configured using the IO_CFG_WRITE_MODE */ | ||
374 | /* Perhaps a better error code? */ | ||
375 | if (clk_mask == 0 || data_mask == 0) { | ||
376 | return -EPERM; | ||
377 | } | ||
378 | write_msb = priv->write_msb; | ||
379 | D(printk("gpio_write: %lu to data 0x%02X clk 0x%02X msb: %i\n",count, data_mask, clk_mask, write_msb)); | ||
380 | port = data_out[priv->minor]; | ||
381 | |||
382 | while (count--) { | ||
383 | int i; | ||
384 | data = *buf++; | ||
385 | if (priv->write_msb) { | ||
386 | for (i = 7; i >= 0;i--) { | ||
387 | local_irq_save(flags); | ||
388 | shadow = *port; | ||
389 | *port = shadow &= ~clk_mask; | ||
390 | if (data & 1<<i) | ||
391 | *port = shadow |= data_mask; | ||
392 | else | ||
393 | *port = shadow &= ~data_mask; | ||
394 | /* For FPGA: min 5.0ns (DCC) before CCLK high */ | ||
395 | *port = shadow |= clk_mask; | ||
396 | local_irq_restore(flags); | ||
397 | } | ||
398 | } else { | ||
399 | for (i = 0; i <= 7;i++) { | ||
400 | local_irq_save(flags); | ||
401 | shadow = *port; | ||
402 | *port = shadow &= ~clk_mask; | ||
403 | if (data & 1<<i) | ||
404 | *port = shadow |= data_mask; | ||
405 | else | ||
406 | *port = shadow &= ~data_mask; | ||
407 | /* For FPGA: min 5.0ns (DCC) before CCLK high */ | ||
408 | *port = shadow |= clk_mask; | ||
409 | local_irq_restore(flags); | ||
410 | } | ||
411 | } | ||
412 | } | ||
413 | return retval; | ||
414 | } | ||
415 | |||
416 | |||
417 | |||
418 | static int | ||
419 | gpio_open(struct inode *inode, struct file *filp) | ||
420 | { | ||
421 | struct gpio_private *priv; | ||
422 | int p = MINOR(inode->i_rdev); | ||
423 | |||
424 | if (p > GPIO_MINOR_LAST) | ||
425 | return -EINVAL; | ||
426 | |||
427 | priv = (struct gpio_private *)kmalloc(sizeof(struct gpio_private), | ||
428 | GFP_KERNEL); | ||
429 | |||
430 | if (!priv) | ||
431 | return -ENOMEM; | ||
432 | |||
433 | priv->minor = p; | ||
434 | |||
435 | /* initialize the io/alarm struct and link it into our alarmlist */ | ||
436 | |||
437 | priv->next = alarmlist; | ||
438 | alarmlist = priv; | ||
439 | priv->clk_mask = 0; | ||
440 | priv->data_mask = 0; | ||
441 | priv->highalarm = 0; | ||
442 | priv->lowalarm = 0; | ||
443 | init_waitqueue_head(&priv->alarm_wq); | ||
444 | |||
445 | filp->private_data = (void *)priv; | ||
446 | |||
447 | return 0; | ||
448 | } | ||
449 | |||
450 | static int | ||
451 | gpio_release(struct inode *inode, struct file *filp) | ||
452 | { | ||
453 | struct gpio_private *p = alarmlist; | ||
454 | struct gpio_private *todel = (struct gpio_private *)filp->private_data; | ||
455 | /* local copies while updating them: */ | ||
456 | unsigned long a_high, a_low; | ||
457 | unsigned long some_alarms; | ||
458 | |||
459 | /* unlink from alarmlist and free the private structure */ | ||
460 | |||
461 | if (p == todel) { | ||
462 | alarmlist = todel->next; | ||
463 | } else { | ||
464 | while (p->next != todel) | ||
465 | p = p->next; | ||
466 | p->next = todel->next; | ||
467 | } | ||
468 | |||
469 | kfree(todel); | ||
470 | /* Check if there are still any alarms set */ | ||
471 | p = alarmlist; | ||
472 | some_alarms = 0; | ||
473 | a_high = 0; | ||
474 | a_low = 0; | ||
475 | while (p) { | ||
476 | if (p->minor == GPIO_MINOR_A) { | ||
477 | a_high |= p->highalarm; | ||
478 | a_low |= p->lowalarm; | ||
479 | } | ||
480 | |||
481 | if (p->highalarm | p->lowalarm) { | ||
482 | some_alarms = 1; | ||
483 | } | ||
484 | p = p->next; | ||
485 | } | ||
486 | |||
487 | spin_lock(&alarm_lock); | ||
488 | gpio_some_alarms = some_alarms; | ||
489 | gpio_pa_high_alarms = a_high; | ||
490 | gpio_pa_low_alarms = a_low; | ||
491 | spin_unlock(&alarm_lock); | ||
492 | |||
493 | return 0; | ||
494 | } | ||
495 | |||
496 | /* Main device API. ioctl's to read/set/clear bits, as well as to | ||
497 | * set alarms to wait for using a subsequent select(). | ||
498 | */ | ||
499 | |||
500 | unsigned long inline setget_input(struct gpio_private *priv, unsigned long arg) | ||
501 | { | ||
502 | /* Set direction 0=unchanged 1=input, | ||
503 | * return mask with 1=input | ||
504 | */ | ||
505 | unsigned long flags; | ||
506 | unsigned long dir_shadow; | ||
507 | |||
508 | local_irq_save(flags); | ||
509 | dir_shadow = *dir_oe[priv->minor]; | ||
510 | dir_shadow &= ~(arg & changeable_dir[priv->minor]); | ||
511 | *dir_oe[priv->minor] = dir_shadow; | ||
512 | local_irq_restore(flags); | ||
513 | |||
514 | if (priv->minor == GPIO_MINOR_A) | ||
515 | dir_shadow ^= 0xFF; /* Only 8 bits */ | ||
516 | else | ||
517 | dir_shadow ^= 0x3FFFF; /* Only 18 bits */ | ||
518 | return dir_shadow; | ||
519 | |||
520 | } /* setget_input */ | ||
521 | |||
522 | unsigned long inline setget_output(struct gpio_private *priv, unsigned long arg) | ||
523 | { | ||
524 | unsigned long flags; | ||
525 | unsigned long dir_shadow; | ||
526 | |||
527 | local_irq_save(flags); | ||
528 | dir_shadow = *dir_oe[priv->minor]; | ||
529 | dir_shadow |= (arg & changeable_dir[priv->minor]); | ||
530 | *dir_oe[priv->minor] = dir_shadow; | ||
531 | local_irq_restore(flags); | ||
532 | return dir_shadow; | ||
533 | } /* setget_output */ | ||
534 | |||
535 | static int | ||
536 | gpio_leds_ioctl(unsigned int cmd, unsigned long arg); | ||
537 | |||
538 | static int | ||
539 | gpio_ioctl(struct inode *inode, struct file *file, | ||
540 | unsigned int cmd, unsigned long arg) | ||
541 | { | ||
542 | unsigned long flags; | ||
543 | unsigned long val; | ||
544 | unsigned long shadow; | ||
545 | struct gpio_private *priv = (struct gpio_private *)file->private_data; | ||
546 | if (_IOC_TYPE(cmd) != ETRAXGPIO_IOCTYPE) { | ||
547 | return -EINVAL; | ||
548 | } | ||
549 | |||
550 | switch (_IOC_NR(cmd)) { | ||
551 | case IO_READBITS: /* Use IO_READ_INBITS and IO_READ_OUTBITS instead */ | ||
552 | // read the port | ||
553 | return *data_in[priv->minor]; | ||
554 | break; | ||
555 | case IO_SETBITS: | ||
556 | local_irq_save(flags); | ||
557 | if (arg & 0x04) | ||
558 | printk("GPIO SET 2\n"); | ||
559 | // set changeable bits with a 1 in arg | ||
560 | shadow = *data_out[priv->minor]; | ||
561 | shadow |= (arg & changeable_bits[priv->minor]); | ||
562 | *data_out[priv->minor] = shadow; | ||
563 | local_irq_restore(flags); | ||
564 | break; | ||
565 | case IO_CLRBITS: | ||
566 | local_irq_save(flags); | ||
567 | if (arg & 0x04) | ||
568 | printk("GPIO CLR 2\n"); | ||
569 | // clear changeable bits with a 1 in arg | ||
570 | shadow = *data_out[priv->minor]; | ||
571 | shadow &= ~(arg & changeable_bits[priv->minor]); | ||
572 | *data_out[priv->minor] = shadow; | ||
573 | local_irq_restore(flags); | ||
574 | break; | ||
575 | case IO_HIGHALARM: | ||
576 | // set alarm when bits with 1 in arg go high | ||
577 | priv->highalarm |= arg; | ||
578 | spin_lock(&alarm_lock); | ||
579 | gpio_some_alarms = 1; | ||
580 | if (priv->minor == GPIO_MINOR_A) { | ||
581 | gpio_pa_high_alarms |= arg; | ||
582 | } | ||
583 | spin_unlock(&alarm_lock); | ||
584 | break; | ||
585 | case IO_LOWALARM: | ||
586 | // set alarm when bits with 1 in arg go low | ||
587 | priv->lowalarm |= arg; | ||
588 | spin_lock(&alarm_lock); | ||
589 | gpio_some_alarms = 1; | ||
590 | if (priv->minor == GPIO_MINOR_A) { | ||
591 | gpio_pa_low_alarms |= arg; | ||
592 | } | ||
593 | spin_unlock(&alarm_lock); | ||
594 | break; | ||
595 | case IO_CLRALARM: | ||
596 | // clear alarm for bits with 1 in arg | ||
597 | priv->highalarm &= ~arg; | ||
598 | priv->lowalarm &= ~arg; | ||
599 | spin_lock(&alarm_lock); | ||
600 | if (priv->minor == GPIO_MINOR_A) { | ||
601 | if (gpio_pa_high_alarms & arg || | ||
602 | gpio_pa_low_alarms & arg) { | ||
603 | /* Must update the gpio_pa_*alarms masks */ | ||
604 | } | ||
605 | } | ||
606 | spin_unlock(&alarm_lock); | ||
607 | break; | ||
608 | case IO_READDIR: /* Use IO_SETGET_INPUT/OUTPUT instead! */ | ||
609 | /* Read direction 0=input 1=output */ | ||
610 | return *dir_oe[priv->minor]; | ||
611 | case IO_SETINPUT: /* Use IO_SETGET_INPUT instead! */ | ||
612 | /* Set direction 0=unchanged 1=input, | ||
613 | * return mask with 1=input | ||
614 | */ | ||
615 | return setget_input(priv, arg); | ||
616 | break; | ||
617 | case IO_SETOUTPUT: /* Use IO_SETGET_OUTPUT instead! */ | ||
618 | /* Set direction 0=unchanged 1=output, | ||
619 | * return mask with 1=output | ||
620 | */ | ||
621 | return setget_output(priv, arg); | ||
622 | |||
623 | case IO_CFG_WRITE_MODE: | ||
624 | { | ||
625 | unsigned long dir_shadow; | ||
626 | dir_shadow = *dir_oe[priv->minor]; | ||
627 | |||
628 | priv->clk_mask = arg & 0xFF; | ||
629 | priv->data_mask = (arg >> 8) & 0xFF; | ||
630 | priv->write_msb = (arg >> 16) & 0x01; | ||
631 | /* Check if we're allowed to change the bits and | ||
632 | * the direction is correct | ||
633 | */ | ||
634 | if (!((priv->clk_mask & changeable_bits[priv->minor]) && | ||
635 | (priv->data_mask & changeable_bits[priv->minor]) && | ||
636 | (priv->clk_mask & dir_shadow) && | ||
637 | (priv->data_mask & dir_shadow))) | ||
638 | { | ||
639 | priv->clk_mask = 0; | ||
640 | priv->data_mask = 0; | ||
641 | return -EPERM; | ||
642 | } | ||
643 | break; | ||
644 | } | ||
645 | case IO_READ_INBITS: | ||
646 | /* *arg is result of reading the input pins */ | ||
647 | val = *data_in[priv->minor]; | ||
648 | if (copy_to_user((unsigned long*)arg, &val, sizeof(val))) | ||
649 | return -EFAULT; | ||
650 | return 0; | ||
651 | break; | ||
652 | case IO_READ_OUTBITS: | ||
653 | /* *arg is result of reading the output shadow */ | ||
654 | val = *data_out[priv->minor]; | ||
655 | if (copy_to_user((unsigned long*)arg, &val, sizeof(val))) | ||
656 | return -EFAULT; | ||
657 | break; | ||
658 | case IO_SETGET_INPUT: | ||
659 | /* bits set in *arg is set to input, | ||
660 | * *arg updated with current input pins. | ||
661 | */ | ||
662 | if (copy_from_user(&val, (unsigned long*)arg, sizeof(val))) | ||
663 | return -EFAULT; | ||
664 | val = setget_input(priv, val); | ||
665 | if (copy_to_user((unsigned long*)arg, &val, sizeof(val))) | ||
666 | return -EFAULT; | ||
667 | break; | ||
668 | case IO_SETGET_OUTPUT: | ||
669 | /* bits set in *arg is set to output, | ||
670 | * *arg updated with current output pins. | ||
671 | */ | ||
672 | if (copy_from_user(&val, (unsigned long*)arg, sizeof(val))) | ||
673 | return -EFAULT; | ||
674 | val = setget_output(priv, val); | ||
675 | if (copy_to_user((unsigned long*)arg, &val, sizeof(val))) | ||
676 | return -EFAULT; | ||
677 | break; | ||
678 | default: | ||
679 | if (priv->minor == GPIO_MINOR_LEDS) | ||
680 | return gpio_leds_ioctl(cmd, arg); | ||
681 | else | ||
682 | return -EINVAL; | ||
683 | } /* switch */ | ||
684 | |||
685 | return 0; | ||
686 | } | ||
687 | |||
688 | static int | ||
689 | gpio_leds_ioctl(unsigned int cmd, unsigned long arg) | ||
690 | { | ||
691 | unsigned char green; | ||
692 | unsigned char red; | ||
693 | |||
694 | switch (_IOC_NR(cmd)) { | ||
695 | case IO_LEDACTIVE_SET: | ||
696 | green = ((unsigned char) arg) & 1; | ||
697 | red = (((unsigned char) arg) >> 1) & 1; | ||
698 | LED_ACTIVE_SET_G(green); | ||
699 | LED_ACTIVE_SET_R(red); | ||
700 | break; | ||
701 | |||
702 | default: | ||
703 | return -EINVAL; | ||
704 | } /* switch */ | ||
705 | |||
706 | return 0; | ||
707 | } | ||
708 | |||
709 | struct file_operations gpio_fops = { | ||
710 | .owner = THIS_MODULE, | ||
711 | .poll = gpio_poll, | ||
712 | .ioctl = gpio_ioctl, | ||
713 | .write = gpio_write, | ||
714 | .open = gpio_open, | ||
715 | .release = gpio_release, | ||
716 | }; | ||
717 | |||
718 | |||
719 | /* main driver initialization routine, called from mem.c */ | ||
720 | |||
721 | static __init int | ||
722 | gpio_init(void) | ||
723 | { | ||
724 | int res; | ||
725 | reg_intr_vect_rw_mask intr_mask; | ||
726 | |||
727 | /* do the formalities */ | ||
728 | |||
729 | res = register_chrdev(GPIO_MAJOR, gpio_name, &gpio_fops); | ||
730 | if (res < 0) { | ||
731 | printk(KERN_ERR "gpio: couldn't get a major number.\n"); | ||
732 | return res; | ||
733 | } | ||
734 | |||
735 | /* Clear all leds */ | ||
736 | LED_NETWORK_SET(0); | ||
737 | LED_ACTIVE_SET(0); | ||
738 | LED_DISK_READ(0); | ||
739 | LED_DISK_WRITE(0); | ||
740 | |||
741 | printk("ETRAX FS GPIO driver v2.5, (c) 2003-2005 Axis Communications AB\n"); | ||
742 | /* We call etrax_gpio_wake_up_check() from timer interrupt and | ||
743 | * from cpu_idle() in kernel/process.c | ||
744 | * The check in cpu_idle() reduces latency from ~15 ms to ~6 ms | ||
745 | * in some tests. | ||
746 | */ | ||
747 | if (request_irq(TIMER_INTR_VECT, gpio_poll_timer_interrupt, | ||
748 | SA_SHIRQ | SA_INTERRUPT,"gpio poll", &alarmlist)) { | ||
749 | printk("err: timer0 irq for gpio\n"); | ||
750 | } | ||
751 | if (request_irq(GEN_IO_INTR_VECT, gpio_pa_interrupt, | ||
752 | SA_SHIRQ | SA_INTERRUPT,"gpio PA", &alarmlist)) { | ||
753 | printk("err: PA irq for gpio\n"); | ||
754 | } | ||
755 | /* enable the gio and timer irq in global config */ | ||
756 | intr_mask = REG_RD(intr_vect, regi_irq, rw_mask); | ||
757 | intr_mask.timer = 1; | ||
758 | intr_mask.gen_io = 1; | ||
759 | REG_WR(intr_vect, regi_irq, rw_mask, intr_mask); | ||
760 | |||
761 | return res; | ||
762 | } | ||
763 | |||
764 | /* this makes sure that gpio_init is called during kernel boot */ | ||
765 | |||
766 | module_init(gpio_init); | ||
diff --git a/arch/cris/arch-v32/drivers/i2c.c b/arch/cris/arch-v32/drivers/i2c.c new file mode 100644 index 000000000000..440c20a94963 --- /dev/null +++ b/arch/cris/arch-v32/drivers/i2c.c | |||
@@ -0,0 +1,611 @@ | |||
1 | /*!*************************************************************************** | ||
2 | *! | ||
3 | *! FILE NAME : i2c.c | ||
4 | *! | ||
5 | *! DESCRIPTION: implements an interface for IIC/I2C, both directly from other | ||
6 | *! kernel modules (i2c_writereg/readreg) and from userspace using | ||
7 | *! ioctl()'s | ||
8 | *! | ||
9 | *! Nov 30 1998 Torbjorn Eliasson Initial version. | ||
10 | *! Bjorn Wesen Elinux kernel version. | ||
11 | *! Jan 14 2000 Johan Adolfsson Fixed PB shadow register stuff - | ||
12 | *! don't use PB_I2C if DS1302 uses same bits, | ||
13 | *! use PB. | ||
14 | *| June 23 2003 Pieter Grimmerink Added 'i2c_sendnack'. i2c_readreg now | ||
15 | *| generates nack on last received byte, | ||
16 | *| instead of ack. | ||
17 | *| i2c_getack changed data level while clock | ||
18 | *| was high, causing DS75 to see a stop condition | ||
19 | *! | ||
20 | *! --------------------------------------------------------------------------- | ||
21 | *! | ||
22 | *! (C) Copyright 1999-2002 Axis Communications AB, LUND, SWEDEN | ||
23 | *! | ||
24 | *!***************************************************************************/ | ||
25 | /* $Id: i2c.c,v 1.2 2005/05/09 15:29:49 starvik Exp $ */ | ||
26 | /****************** INCLUDE FILES SECTION ***********************************/ | ||
27 | |||
28 | #include <linux/module.h> | ||
29 | #include <linux/sched.h> | ||
30 | #include <linux/slab.h> | ||
31 | #include <linux/errno.h> | ||
32 | #include <linux/kernel.h> | ||
33 | #include <linux/fs.h> | ||
34 | #include <linux/string.h> | ||
35 | #include <linux/init.h> | ||
36 | #include <linux/config.h> | ||
37 | |||
38 | #include <asm/etraxi2c.h> | ||
39 | |||
40 | #include <asm/system.h> | ||
41 | #include <asm/io.h> | ||
42 | #include <asm/delay.h> | ||
43 | |||
44 | #include "i2c.h" | ||
45 | |||
46 | /****************** I2C DEFINITION SECTION *************************/ | ||
47 | |||
48 | #define D(x) | ||
49 | |||
50 | #define I2C_MAJOR 123 /* LOCAL/EXPERIMENTAL */ | ||
51 | static const char i2c_name[] = "i2c"; | ||
52 | |||
53 | #define CLOCK_LOW_TIME 8 | ||
54 | #define CLOCK_HIGH_TIME 8 | ||
55 | #define START_CONDITION_HOLD_TIME 8 | ||
56 | #define STOP_CONDITION_HOLD_TIME 8 | ||
57 | #define ENABLE_OUTPUT 0x01 | ||
58 | #define ENABLE_INPUT 0x00 | ||
59 | #define I2C_CLOCK_HIGH 1 | ||
60 | #define I2C_CLOCK_LOW 0 | ||
61 | #define I2C_DATA_HIGH 1 | ||
62 | #define I2C_DATA_LOW 0 | ||
63 | |||
64 | #define i2c_enable() | ||
65 | #define i2c_disable() | ||
66 | |||
67 | /* enable or disable output-enable, to select output or input on the i2c bus */ | ||
68 | |||
69 | #define i2c_dir_out() crisv32_io_set_dir(&cris_i2c_data, crisv32_io_dir_out) | ||
70 | #define i2c_dir_in() crisv32_io_set_dir(&cris_i2c_data, crisv32_io_dir_in) | ||
71 | |||
72 | /* control the i2c clock and data signals */ | ||
73 | |||
74 | #define i2c_clk(x) crisv32_io_set(&cris_i2c_clk, x) | ||
75 | #define i2c_data(x) crisv32_io_set(&cris_i2c_data, x) | ||
76 | |||
77 | /* read a bit from the i2c interface */ | ||
78 | |||
79 | #define i2c_getbit() crisv32_io_rd(&cris_i2c_data) | ||
80 | |||
81 | #define i2c_delay(usecs) udelay(usecs) | ||
82 | |||
83 | /****************** VARIABLE SECTION ************************************/ | ||
84 | |||
85 | static struct crisv32_iopin cris_i2c_clk; | ||
86 | static struct crisv32_iopin cris_i2c_data; | ||
87 | |||
88 | /****************** FUNCTION DEFINITION SECTION *************************/ | ||
89 | |||
90 | |||
91 | /* generate i2c start condition */ | ||
92 | |||
93 | void | ||
94 | i2c_start(void) | ||
95 | { | ||
96 | /* | ||
97 | * SCL=1 SDA=1 | ||
98 | */ | ||
99 | i2c_dir_out(); | ||
100 | i2c_delay(CLOCK_HIGH_TIME/6); | ||
101 | i2c_data(I2C_DATA_HIGH); | ||
102 | i2c_clk(I2C_CLOCK_HIGH); | ||
103 | i2c_delay(CLOCK_HIGH_TIME); | ||
104 | /* | ||
105 | * SCL=1 SDA=0 | ||
106 | */ | ||
107 | i2c_data(I2C_DATA_LOW); | ||
108 | i2c_delay(START_CONDITION_HOLD_TIME); | ||
109 | /* | ||
110 | * SCL=0 SDA=0 | ||
111 | */ | ||
112 | i2c_clk(I2C_CLOCK_LOW); | ||
113 | i2c_delay(CLOCK_LOW_TIME); | ||
114 | } | ||
115 | |||
116 | /* generate i2c stop condition */ | ||
117 | |||
118 | void | ||
119 | i2c_stop(void) | ||
120 | { | ||
121 | i2c_dir_out(); | ||
122 | |||
123 | /* | ||
124 | * SCL=0 SDA=0 | ||
125 | */ | ||
126 | i2c_clk(I2C_CLOCK_LOW); | ||
127 | i2c_data(I2C_DATA_LOW); | ||
128 | i2c_delay(CLOCK_LOW_TIME*2); | ||
129 | /* | ||
130 | * SCL=1 SDA=0 | ||
131 | */ | ||
132 | i2c_clk(I2C_CLOCK_HIGH); | ||
133 | i2c_delay(CLOCK_HIGH_TIME*2); | ||
134 | /* | ||
135 | * SCL=1 SDA=1 | ||
136 | */ | ||
137 | i2c_data(I2C_DATA_HIGH); | ||
138 | i2c_delay(STOP_CONDITION_HOLD_TIME); | ||
139 | |||
140 | i2c_dir_in(); | ||
141 | } | ||
142 | |||
143 | /* write a byte to the i2c interface */ | ||
144 | |||
145 | void | ||
146 | i2c_outbyte(unsigned char x) | ||
147 | { | ||
148 | int i; | ||
149 | |||
150 | i2c_dir_out(); | ||
151 | |||
152 | for (i = 0; i < 8; i++) { | ||
153 | if (x & 0x80) { | ||
154 | i2c_data(I2C_DATA_HIGH); | ||
155 | } else { | ||
156 | i2c_data(I2C_DATA_LOW); | ||
157 | } | ||
158 | |||
159 | i2c_delay(CLOCK_LOW_TIME/2); | ||
160 | i2c_clk(I2C_CLOCK_HIGH); | ||
161 | i2c_delay(CLOCK_HIGH_TIME); | ||
162 | i2c_clk(I2C_CLOCK_LOW); | ||
163 | i2c_delay(CLOCK_LOW_TIME/2); | ||
164 | x <<= 1; | ||
165 | } | ||
166 | i2c_data(I2C_DATA_LOW); | ||
167 | i2c_delay(CLOCK_LOW_TIME/2); | ||
168 | |||
169 | /* | ||
170 | * enable input | ||
171 | */ | ||
172 | i2c_dir_in(); | ||
173 | } | ||
174 | |||
175 | /* read a byte from the i2c interface */ | ||
176 | |||
177 | unsigned char | ||
178 | i2c_inbyte(void) | ||
179 | { | ||
180 | unsigned char aBitByte = 0; | ||
181 | int i; | ||
182 | |||
183 | /* Switch off I2C to get bit */ | ||
184 | i2c_disable(); | ||
185 | i2c_dir_in(); | ||
186 | i2c_delay(CLOCK_HIGH_TIME/2); | ||
187 | |||
188 | /* Get bit */ | ||
189 | aBitByte |= i2c_getbit(); | ||
190 | |||
191 | /* Enable I2C */ | ||
192 | i2c_enable(); | ||
193 | i2c_delay(CLOCK_LOW_TIME/2); | ||
194 | |||
195 | for (i = 1; i < 8; i++) { | ||
196 | aBitByte <<= 1; | ||
197 | /* Clock pulse */ | ||
198 | i2c_clk(I2C_CLOCK_HIGH); | ||
199 | i2c_delay(CLOCK_HIGH_TIME); | ||
200 | i2c_clk(I2C_CLOCK_LOW); | ||
201 | i2c_delay(CLOCK_LOW_TIME); | ||
202 | |||
203 | /* Switch off I2C to get bit */ | ||
204 | i2c_disable(); | ||
205 | i2c_dir_in(); | ||
206 | i2c_delay(CLOCK_HIGH_TIME/2); | ||
207 | |||
208 | /* Get bit */ | ||
209 | aBitByte |= i2c_getbit(); | ||
210 | |||
211 | /* Enable I2C */ | ||
212 | i2c_enable(); | ||
213 | i2c_delay(CLOCK_LOW_TIME/2); | ||
214 | } | ||
215 | i2c_clk(I2C_CLOCK_HIGH); | ||
216 | i2c_delay(CLOCK_HIGH_TIME); | ||
217 | |||
218 | /* | ||
219 | * we leave the clock low, getbyte is usually followed | ||
220 | * by sendack/nack, they assume the clock to be low | ||
221 | */ | ||
222 | i2c_clk(I2C_CLOCK_LOW); | ||
223 | return aBitByte; | ||
224 | } | ||
225 | |||
226 | /*#--------------------------------------------------------------------------- | ||
227 | *# | ||
228 | *# FUNCTION NAME: i2c_getack | ||
229 | *# | ||
230 | *# DESCRIPTION : checks if ack was received from ic2 | ||
231 | *# | ||
232 | *#--------------------------------------------------------------------------*/ | ||
233 | |||
234 | int | ||
235 | i2c_getack(void) | ||
236 | { | ||
237 | int ack = 1; | ||
238 | /* | ||
239 | * enable output | ||
240 | */ | ||
241 | i2c_dir_out(); | ||
242 | /* | ||
243 | * Release data bus by setting | ||
244 | * data high | ||
245 | */ | ||
246 | i2c_data(I2C_DATA_HIGH); | ||
247 | /* | ||
248 | * enable input | ||
249 | */ | ||
250 | i2c_dir_in(); | ||
251 | i2c_delay(CLOCK_HIGH_TIME/4); | ||
252 | /* | ||
253 | * generate ACK clock pulse | ||
254 | */ | ||
255 | i2c_clk(I2C_CLOCK_HIGH); | ||
256 | /* | ||
257 | * Use PORT PB instead of I2C | ||
258 | * for input. (I2C not working) | ||
259 | */ | ||
260 | i2c_clk(1); | ||
261 | i2c_data(1); | ||
262 | /* | ||
263 | * switch off I2C | ||
264 | */ | ||
265 | i2c_data(1); | ||
266 | i2c_disable(); | ||
267 | i2c_dir_in(); | ||
268 | /* | ||
269 | * now wait for ack | ||
270 | */ | ||
271 | i2c_delay(CLOCK_HIGH_TIME/2); | ||
272 | /* | ||
273 | * check for ack | ||
274 | */ | ||
275 | if(i2c_getbit()) | ||
276 | ack = 0; | ||
277 | i2c_delay(CLOCK_HIGH_TIME/2); | ||
278 | if(!ack){ | ||
279 | if(!i2c_getbit()) /* receiver pulld SDA low */ | ||
280 | ack = 1; | ||
281 | i2c_delay(CLOCK_HIGH_TIME/2); | ||
282 | } | ||
283 | |||
284 | /* | ||
285 | * our clock is high now, make sure data is low | ||
286 | * before we enable our output. If we keep data high | ||
287 | * and enable output, we would generate a stop condition. | ||
288 | */ | ||
289 | i2c_data(I2C_DATA_LOW); | ||
290 | |||
291 | /* | ||
292 | * end clock pulse | ||
293 | */ | ||
294 | i2c_enable(); | ||
295 | i2c_dir_out(); | ||
296 | i2c_clk(I2C_CLOCK_LOW); | ||
297 | i2c_delay(CLOCK_HIGH_TIME/4); | ||
298 | /* | ||
299 | * enable output | ||
300 | */ | ||
301 | i2c_dir_out(); | ||
302 | /* | ||
303 | * remove ACK clock pulse | ||
304 | */ | ||
305 | i2c_data(I2C_DATA_HIGH); | ||
306 | i2c_delay(CLOCK_LOW_TIME/2); | ||
307 | return ack; | ||
308 | } | ||
309 | |||
310 | /*#--------------------------------------------------------------------------- | ||
311 | *# | ||
312 | *# FUNCTION NAME: I2C::sendAck | ||
313 | *# | ||
314 | *# DESCRIPTION : Send ACK on received data | ||
315 | *# | ||
316 | *#--------------------------------------------------------------------------*/ | ||
317 | void | ||
318 | i2c_sendack(void) | ||
319 | { | ||
320 | /* | ||
321 | * enable output | ||
322 | */ | ||
323 | i2c_delay(CLOCK_LOW_TIME); | ||
324 | i2c_dir_out(); | ||
325 | /* | ||
326 | * set ack pulse high | ||
327 | */ | ||
328 | i2c_data(I2C_DATA_LOW); | ||
329 | /* | ||
330 | * generate clock pulse | ||
331 | */ | ||
332 | i2c_delay(CLOCK_HIGH_TIME/6); | ||
333 | i2c_clk(I2C_CLOCK_HIGH); | ||
334 | i2c_delay(CLOCK_HIGH_TIME); | ||
335 | i2c_clk(I2C_CLOCK_LOW); | ||
336 | i2c_delay(CLOCK_LOW_TIME/6); | ||
337 | /* | ||
338 | * reset data out | ||
339 | */ | ||
340 | i2c_data(I2C_DATA_HIGH); | ||
341 | i2c_delay(CLOCK_LOW_TIME); | ||
342 | |||
343 | i2c_dir_in(); | ||
344 | } | ||
345 | |||
346 | /*#--------------------------------------------------------------------------- | ||
347 | *# | ||
348 | *# FUNCTION NAME: i2c_sendnack | ||
349 | *# | ||
350 | *# DESCRIPTION : Sends NACK on received data | ||
351 | *# | ||
352 | *#--------------------------------------------------------------------------*/ | ||
353 | void | ||
354 | i2c_sendnack(void) | ||
355 | { | ||
356 | /* | ||
357 | * enable output | ||
358 | */ | ||
359 | i2c_delay(CLOCK_LOW_TIME); | ||
360 | i2c_dir_out(); | ||
361 | /* | ||
362 | * set data high | ||
363 | */ | ||
364 | i2c_data(I2C_DATA_HIGH); | ||
365 | /* | ||
366 | * generate clock pulse | ||
367 | */ | ||
368 | i2c_delay(CLOCK_HIGH_TIME/6); | ||
369 | i2c_clk(I2C_CLOCK_HIGH); | ||
370 | i2c_delay(CLOCK_HIGH_TIME); | ||
371 | i2c_clk(I2C_CLOCK_LOW); | ||
372 | i2c_delay(CLOCK_LOW_TIME); | ||
373 | |||
374 | i2c_dir_in(); | ||
375 | } | ||
376 | |||
377 | /*#--------------------------------------------------------------------------- | ||
378 | *# | ||
379 | *# FUNCTION NAME: i2c_writereg | ||
380 | *# | ||
381 | *# DESCRIPTION : Writes a value to an I2C device | ||
382 | *# | ||
383 | *#--------------------------------------------------------------------------*/ | ||
384 | int | ||
385 | i2c_writereg(unsigned char theSlave, unsigned char theReg, | ||
386 | unsigned char theValue) | ||
387 | { | ||
388 | int error, cntr = 3; | ||
389 | unsigned long flags; | ||
390 | |||
391 | do { | ||
392 | error = 0; | ||
393 | /* | ||
394 | * we don't like to be interrupted | ||
395 | */ | ||
396 | local_irq_save(flags); | ||
397 | |||
398 | i2c_start(); | ||
399 | /* | ||
400 | * send slave address | ||
401 | */ | ||
402 | i2c_outbyte((theSlave & 0xfe)); | ||
403 | /* | ||
404 | * wait for ack | ||
405 | */ | ||
406 | if(!i2c_getack()) | ||
407 | error = 1; | ||
408 | /* | ||
409 | * now select register | ||
410 | */ | ||
411 | i2c_dir_out(); | ||
412 | i2c_outbyte(theReg); | ||
413 | /* | ||
414 | * now it's time to wait for ack | ||
415 | */ | ||
416 | if(!i2c_getack()) | ||
417 | error |= 2; | ||
418 | /* | ||
419 | * send register register data | ||
420 | */ | ||
421 | i2c_outbyte(theValue); | ||
422 | /* | ||
423 | * now it's time to wait for ack | ||
424 | */ | ||
425 | if(!i2c_getack()) | ||
426 | error |= 4; | ||
427 | /* | ||
428 | * end byte stream | ||
429 | */ | ||
430 | i2c_stop(); | ||
431 | /* | ||
432 | * enable interrupt again | ||
433 | */ | ||
434 | local_irq_restore(flags); | ||
435 | |||
436 | } while(error && cntr--); | ||
437 | |||
438 | i2c_delay(CLOCK_LOW_TIME); | ||
439 | |||
440 | return -error; | ||
441 | } | ||
442 | |||
443 | /*#--------------------------------------------------------------------------- | ||
444 | *# | ||
445 | *# FUNCTION NAME: i2c_readreg | ||
446 | *# | ||
447 | *# DESCRIPTION : Reads a value from the decoder registers. | ||
448 | *# | ||
449 | *#--------------------------------------------------------------------------*/ | ||
450 | unsigned char | ||
451 | i2c_readreg(unsigned char theSlave, unsigned char theReg) | ||
452 | { | ||
453 | unsigned char b = 0; | ||
454 | int error, cntr = 3; | ||
455 | unsigned long flags; | ||
456 | |||
457 | do { | ||
458 | error = 0; | ||
459 | /* | ||
460 | * we don't like to be interrupted | ||
461 | */ | ||
462 | local_irq_save(flags); | ||
463 | /* | ||
464 | * generate start condition | ||
465 | */ | ||
466 | i2c_start(); | ||
467 | |||
468 | /* | ||
469 | * send slave address | ||
470 | */ | ||
471 | i2c_outbyte((theSlave & 0xfe)); | ||
472 | /* | ||
473 | * wait for ack | ||
474 | */ | ||
475 | if(!i2c_getack()) | ||
476 | error = 1; | ||
477 | /* | ||
478 | * now select register | ||
479 | */ | ||
480 | i2c_dir_out(); | ||
481 | i2c_outbyte(theReg); | ||
482 | /* | ||
483 | * now it's time to wait for ack | ||
484 | */ | ||
485 | if(!i2c_getack()) | ||
486 | error = 1; | ||
487 | /* | ||
488 | * repeat start condition | ||
489 | */ | ||
490 | i2c_delay(CLOCK_LOW_TIME); | ||
491 | i2c_start(); | ||
492 | /* | ||
493 | * send slave address | ||
494 | */ | ||
495 | i2c_outbyte(theSlave | 0x01); | ||
496 | /* | ||
497 | * wait for ack | ||
498 | */ | ||
499 | if(!i2c_getack()) | ||
500 | error = 1; | ||
501 | /* | ||
502 | * fetch register | ||
503 | */ | ||
504 | b = i2c_inbyte(); | ||
505 | /* | ||
506 | * last received byte needs to be nacked | ||
507 | * instead of acked | ||
508 | */ | ||
509 | i2c_sendnack(); | ||
510 | /* | ||
511 | * end sequence | ||
512 | */ | ||
513 | i2c_stop(); | ||
514 | /* | ||
515 | * enable interrupt again | ||
516 | */ | ||
517 | local_irq_restore(flags); | ||
518 | |||
519 | } while(error && cntr--); | ||
520 | |||
521 | return b; | ||
522 | } | ||
523 | |||
524 | static int | ||
525 | i2c_open(struct inode *inode, struct file *filp) | ||
526 | { | ||
527 | return 0; | ||
528 | } | ||
529 | |||
530 | static int | ||
531 | i2c_release(struct inode *inode, struct file *filp) | ||
532 | { | ||
533 | return 0; | ||
534 | } | ||
535 | |||
536 | /* Main device API. ioctl's to write or read to/from i2c registers. | ||
537 | */ | ||
538 | |||
539 | static int | ||
540 | i2c_ioctl(struct inode *inode, struct file *file, | ||
541 | unsigned int cmd, unsigned long arg) | ||
542 | { | ||
543 | if(_IOC_TYPE(cmd) != ETRAXI2C_IOCTYPE) { | ||
544 | return -EINVAL; | ||
545 | } | ||
546 | |||
547 | switch (_IOC_NR(cmd)) { | ||
548 | case I2C_WRITEREG: | ||
549 | /* write to an i2c slave */ | ||
550 | D(printk("i2cw %d %d %d\n", | ||
551 | I2C_ARGSLAVE(arg), | ||
552 | I2C_ARGREG(arg), | ||
553 | I2C_ARGVALUE(arg))); | ||
554 | |||
555 | return i2c_writereg(I2C_ARGSLAVE(arg), | ||
556 | I2C_ARGREG(arg), | ||
557 | I2C_ARGVALUE(arg)); | ||
558 | case I2C_READREG: | ||
559 | { | ||
560 | unsigned char val; | ||
561 | /* read from an i2c slave */ | ||
562 | D(printk("i2cr %d %d ", | ||
563 | I2C_ARGSLAVE(arg), | ||
564 | I2C_ARGREG(arg))); | ||
565 | val = i2c_readreg(I2C_ARGSLAVE(arg), I2C_ARGREG(arg)); | ||
566 | D(printk("= %d\n", val)); | ||
567 | return val; | ||
568 | } | ||
569 | default: | ||
570 | return -EINVAL; | ||
571 | |||
572 | } | ||
573 | |||
574 | return 0; | ||
575 | } | ||
576 | |||
577 | static struct file_operations i2c_fops = { | ||
578 | owner: THIS_MODULE, | ||
579 | ioctl: i2c_ioctl, | ||
580 | open: i2c_open, | ||
581 | release: i2c_release, | ||
582 | }; | ||
583 | |||
584 | int __init | ||
585 | i2c_init(void) | ||
586 | { | ||
587 | int res; | ||
588 | |||
589 | /* Setup and enable the Port B I2C interface */ | ||
590 | |||
591 | crisv32_io_get_name(&cris_i2c_data, CONFIG_ETRAX_I2C_DATA_PORT); | ||
592 | crisv32_io_get_name(&cris_i2c_clk, CONFIG_ETRAX_I2C_CLK_PORT); | ||
593 | |||
594 | /* register char device */ | ||
595 | |||
596 | res = register_chrdev(I2C_MAJOR, i2c_name, &i2c_fops); | ||
597 | if(res < 0) { | ||
598 | printk(KERN_ERR "i2c: couldn't get a major number.\n"); | ||
599 | return res; | ||
600 | } | ||
601 | |||
602 | printk(KERN_INFO "I2C driver v2.2, (c) 1999-2001 Axis Communications AB\n"); | ||
603 | |||
604 | return 0; | ||
605 | } | ||
606 | |||
607 | /* this makes sure that i2c_init is called during boot */ | ||
608 | |||
609 | module_init(i2c_init); | ||
610 | |||
611 | /****************** END OF FILE i2c.c ********************************/ | ||
diff --git a/arch/cris/arch-v32/drivers/i2c.h b/arch/cris/arch-v32/drivers/i2c.h new file mode 100644 index 000000000000..bfe1a13f9f35 --- /dev/null +++ b/arch/cris/arch-v32/drivers/i2c.h | |||
@@ -0,0 +1,15 @@ | |||
1 | |||
2 | #include <linux/init.h> | ||
3 | |||
4 | /* High level I2C actions */ | ||
5 | int __init i2c_init(void); | ||
6 | int i2c_writereg(unsigned char theSlave, unsigned char theReg, unsigned char theValue); | ||
7 | unsigned char i2c_readreg(unsigned char theSlave, unsigned char theReg); | ||
8 | |||
9 | /* Low level I2C */ | ||
10 | void i2c_start(void); | ||
11 | void i2c_stop(void); | ||
12 | void i2c_outbyte(unsigned char x); | ||
13 | unsigned char i2c_inbyte(void); | ||
14 | int i2c_getack(void); | ||
15 | void i2c_sendack(void); | ||
diff --git a/arch/cris/arch-v32/drivers/iop_fw_load.c b/arch/cris/arch-v32/drivers/iop_fw_load.c new file mode 100644 index 000000000000..11f9895ded50 --- /dev/null +++ b/arch/cris/arch-v32/drivers/iop_fw_load.c | |||
@@ -0,0 +1,219 @@ | |||
1 | /* $Id: iop_fw_load.c,v 1.4 2005/04/07 09:27:46 larsv Exp $ | ||
2 | * | ||
3 | * Firmware loader for ETRAX FS IO-Processor | ||
4 | * | ||
5 | * Copyright (C) 2004 Axis Communications AB | ||
6 | */ | ||
7 | |||
8 | #include <linux/module.h> | ||
9 | #include <linux/kernel.h> | ||
10 | #include <linux/init.h> | ||
11 | #include <linux/device.h> | ||
12 | #include <linux/firmware.h> | ||
13 | |||
14 | #include <asm/arch/hwregs/reg_map.h> | ||
15 | #include <asm/arch/hwregs/iop/iop_reg_space.h> | ||
16 | #include <asm/arch/hwregs/iop/iop_mpu_macros.h> | ||
17 | #include <asm/arch/hwregs/iop/iop_mpu_defs.h> | ||
18 | #include <asm/arch/hwregs/iop/iop_spu_defs.h> | ||
19 | #include <asm/arch/hwregs/iop/iop_sw_cpu_defs.h> | ||
20 | |||
21 | #define IOP_TIMEOUT 100 | ||
22 | |||
23 | static struct device iop_spu_device[2] = { | ||
24 | { .bus_id = "iop-spu0", }, | ||
25 | { .bus_id = "iop-spu1", }, | ||
26 | }; | ||
27 | |||
28 | static struct device iop_mpu_device = { | ||
29 | .bus_id = "iop-mpu", | ||
30 | }; | ||
31 | |||
32 | static int wait_mpu_idle(void) | ||
33 | { | ||
34 | reg_iop_mpu_r_stat mpu_stat; | ||
35 | unsigned int timeout = IOP_TIMEOUT; | ||
36 | |||
37 | do { | ||
38 | mpu_stat = REG_RD(iop_mpu, regi_iop_mpu, r_stat); | ||
39 | } while (mpu_stat.instr_reg_busy == regk_iop_mpu_yes && --timeout > 0); | ||
40 | if (timeout == 0) { | ||
41 | printk(KERN_ERR "Timeout waiting for MPU to be idle\n"); | ||
42 | return -EBUSY; | ||
43 | } | ||
44 | return 0; | ||
45 | } | ||
46 | |||
47 | int iop_fw_load_spu(const unsigned char *fw_name, unsigned int spu_inst) | ||
48 | { | ||
49 | reg_iop_sw_cpu_rw_mc_ctrl mc_ctrl = { | ||
50 | .wr_spu0_mem = regk_iop_sw_cpu_no, | ||
51 | .wr_spu1_mem = regk_iop_sw_cpu_no, | ||
52 | .size = 4, | ||
53 | .cmd = regk_iop_sw_cpu_reg_copy, | ||
54 | .keep_owner = regk_iop_sw_cpu_yes | ||
55 | }; | ||
56 | reg_iop_spu_rw_ctrl spu_ctrl = { | ||
57 | .en = regk_iop_spu_no, | ||
58 | .fsm = regk_iop_spu_no, | ||
59 | }; | ||
60 | reg_iop_sw_cpu_r_mc_stat mc_stat; | ||
61 | const struct firmware *fw_entry; | ||
62 | u32 *data; | ||
63 | unsigned int timeout; | ||
64 | int retval, i; | ||
65 | |||
66 | if (spu_inst > 1) | ||
67 | return -ENODEV; | ||
68 | |||
69 | /* get firmware */ | ||
70 | retval = request_firmware(&fw_entry, | ||
71 | fw_name, | ||
72 | &iop_spu_device[spu_inst]); | ||
73 | if (retval != 0) | ||
74 | { | ||
75 | printk(KERN_ERR | ||
76 | "iop_load_spu: Failed to load firmware \"%s\"\n", | ||
77 | fw_name); | ||
78 | return retval; | ||
79 | } | ||
80 | data = (u32 *) fw_entry->data; | ||
81 | |||
82 | /* acquire ownership of memory controller */ | ||
83 | switch (spu_inst) { | ||
84 | case 0: | ||
85 | mc_ctrl.wr_spu0_mem = regk_iop_sw_cpu_yes; | ||
86 | REG_WR(iop_spu, regi_iop_spu0, rw_ctrl, spu_ctrl); | ||
87 | break; | ||
88 | case 1: | ||
89 | mc_ctrl.wr_spu1_mem = regk_iop_sw_cpu_yes; | ||
90 | REG_WR(iop_spu, regi_iop_spu1, rw_ctrl, spu_ctrl); | ||
91 | break; | ||
92 | } | ||
93 | timeout = IOP_TIMEOUT; | ||
94 | do { | ||
95 | REG_WR(iop_sw_cpu, regi_iop_sw_cpu, rw_mc_ctrl, mc_ctrl); | ||
96 | mc_stat = REG_RD(iop_sw_cpu, regi_iop_sw_cpu, r_mc_stat); | ||
97 | } while (mc_stat.owned_by_cpu == regk_iop_sw_cpu_no && --timeout > 0); | ||
98 | if (timeout == 0) { | ||
99 | printk(KERN_ERR "Timeout waiting to acquire MC\n"); | ||
100 | retval = -EBUSY; | ||
101 | goto out; | ||
102 | } | ||
103 | |||
104 | /* write to SPU memory */ | ||
105 | for (i = 0; i < (fw_entry->size/4); i++) { | ||
106 | switch (spu_inst) { | ||
107 | case 0: | ||
108 | REG_WR_INT(iop_spu, regi_iop_spu0, rw_seq_pc, (i*4)); | ||
109 | break; | ||
110 | case 1: | ||
111 | REG_WR_INT(iop_spu, regi_iop_spu1, rw_seq_pc, (i*4)); | ||
112 | break; | ||
113 | } | ||
114 | REG_WR_INT(iop_sw_cpu, regi_iop_sw_cpu, rw_mc_data, *data); | ||
115 | data++; | ||
116 | } | ||
117 | |||
118 | /* release ownership of memory controller */ | ||
119 | (void) REG_RD(iop_sw_cpu, regi_iop_sw_cpu, rs_mc_data); | ||
120 | |||
121 | out: | ||
122 | release_firmware(fw_entry); | ||
123 | return retval; | ||
124 | } | ||
125 | |||
126 | int iop_fw_load_mpu(unsigned char *fw_name) | ||
127 | { | ||
128 | const unsigned int start_addr = 0; | ||
129 | reg_iop_mpu_rw_ctrl mpu_ctrl; | ||
130 | const struct firmware *fw_entry; | ||
131 | u32 *data; | ||
132 | int retval, i; | ||
133 | |||
134 | /* get firmware */ | ||
135 | retval = request_firmware(&fw_entry, fw_name, &iop_mpu_device); | ||
136 | if (retval != 0) | ||
137 | { | ||
138 | printk(KERN_ERR | ||
139 | "iop_load_spu: Failed to load firmware \"%s\"\n", | ||
140 | fw_name); | ||
141 | return retval; | ||
142 | } | ||
143 | data = (u32 *) fw_entry->data; | ||
144 | |||
145 | /* disable MPU */ | ||
146 | mpu_ctrl.en = regk_iop_mpu_no; | ||
147 | REG_WR(iop_mpu, regi_iop_mpu, rw_ctrl, mpu_ctrl); | ||
148 | /* put start address in R0 */ | ||
149 | REG_WR_VECT(iop_mpu, regi_iop_mpu, rw_r, 0, start_addr); | ||
150 | /* write to memory by executing 'SWX i, 4, R0' for each word */ | ||
151 | if ((retval = wait_mpu_idle()) != 0) | ||
152 | goto out; | ||
153 | REG_WR(iop_mpu, regi_iop_mpu, rw_instr, MPU_SWX_IIR_INSTR(0, 4, 0)); | ||
154 | for (i = 0; i < (fw_entry->size / 4); i++) { | ||
155 | REG_WR_INT(iop_mpu, regi_iop_mpu, rw_immediate, *data); | ||
156 | if ((retval = wait_mpu_idle()) != 0) | ||
157 | goto out; | ||
158 | data++; | ||
159 | } | ||
160 | |||
161 | out: | ||
162 | release_firmware(fw_entry); | ||
163 | return retval; | ||
164 | } | ||
165 | |||
166 | int iop_start_mpu(unsigned int start_addr) | ||
167 | { | ||
168 | reg_iop_mpu_rw_ctrl mpu_ctrl = { .en = regk_iop_mpu_yes }; | ||
169 | int retval; | ||
170 | |||
171 | /* disable MPU */ | ||
172 | if ((retval = wait_mpu_idle()) != 0) | ||
173 | goto out; | ||
174 | REG_WR(iop_mpu, regi_iop_mpu, rw_instr, MPU_HALT()); | ||
175 | if ((retval = wait_mpu_idle()) != 0) | ||
176 | goto out; | ||
177 | /* set PC and wait for it to bite */ | ||
178 | if ((retval = wait_mpu_idle()) != 0) | ||
179 | goto out; | ||
180 | REG_WR_INT(iop_mpu, regi_iop_mpu, rw_instr, MPU_BA_I(start_addr)); | ||
181 | if ((retval = wait_mpu_idle()) != 0) | ||
182 | goto out; | ||
183 | /* make sure the MPU starts executing with interrupts disabled */ | ||
184 | REG_WR(iop_mpu, regi_iop_mpu, rw_instr, MPU_DI()); | ||
185 | if ((retval = wait_mpu_idle()) != 0) | ||
186 | goto out; | ||
187 | /* enable MPU */ | ||
188 | REG_WR(iop_mpu, regi_iop_mpu, rw_ctrl, mpu_ctrl); | ||
189 | out: | ||
190 | return retval; | ||
191 | } | ||
192 | |||
193 | static int __init iop_fw_load_init(void) | ||
194 | { | ||
195 | device_initialize(&iop_spu_device[0]); | ||
196 | kobject_set_name(&iop_spu_device[0].kobj, "iop-spu0"); | ||
197 | kobject_add(&iop_spu_device[0].kobj); | ||
198 | device_initialize(&iop_spu_device[1]); | ||
199 | kobject_set_name(&iop_spu_device[1].kobj, "iop-spu1"); | ||
200 | kobject_add(&iop_spu_device[1].kobj); | ||
201 | device_initialize(&iop_mpu_device); | ||
202 | kobject_set_name(&iop_mpu_device.kobj, "iop-mpu"); | ||
203 | kobject_add(&iop_mpu_device.kobj); | ||
204 | return 0; | ||
205 | } | ||
206 | |||
207 | static void __exit iop_fw_load_exit(void) | ||
208 | { | ||
209 | } | ||
210 | |||
211 | module_init(iop_fw_load_init); | ||
212 | module_exit(iop_fw_load_exit); | ||
213 | |||
214 | MODULE_DESCRIPTION("ETRAX FS IO-Processor Firmware Loader"); | ||
215 | MODULE_LICENSE("GPL"); | ||
216 | |||
217 | EXPORT_SYMBOL(iop_fw_load_spu); | ||
218 | EXPORT_SYMBOL(iop_fw_load_mpu); | ||
219 | EXPORT_SYMBOL(iop_start_mpu); | ||
diff --git a/arch/cris/arch-v32/drivers/nandflash.c b/arch/cris/arch-v32/drivers/nandflash.c new file mode 100644 index 000000000000..fc2a619b035d --- /dev/null +++ b/arch/cris/arch-v32/drivers/nandflash.c | |||
@@ -0,0 +1,157 @@ | |||
1 | /* | ||
2 | * arch/cris/arch-v32/drivers/nandflash.c | ||
3 | * | ||
4 | * Copyright (c) 2004 | ||
5 | * | ||
6 | * Derived from drivers/mtd/nand/spia.c | ||
7 | * Copyright (C) 2000 Steven J. Hill (sjhill@realitydiluted.com) | ||
8 | * | ||
9 | * $Id: nandflash.c,v 1.3 2005/06/01 10:57:12 starvik Exp $ | ||
10 | * | ||
11 | * This program is free software; you can redistribute it and/or modify | ||
12 | * it under the terms of the GNU General Public License version 2 as | ||
13 | * published by the Free Software Foundation. | ||
14 | * | ||
15 | */ | ||
16 | |||
17 | #include <linux/version.h> | ||
18 | #include <linux/slab.h> | ||
19 | #include <linux/init.h> | ||
20 | #include <linux/module.h> | ||
21 | #include <linux/mtd/mtd.h> | ||
22 | #include <linux/mtd/nand.h> | ||
23 | #include <linux/mtd/partitions.h> | ||
24 | #include <asm/arch/memmap.h> | ||
25 | #include <asm/arch/hwregs/reg_map.h> | ||
26 | #include <asm/arch/hwregs/reg_rdwr.h> | ||
27 | #include <asm/arch/hwregs/gio_defs.h> | ||
28 | #include <asm/arch/hwregs/bif_core_defs.h> | ||
29 | #include <asm/io.h> | ||
30 | |||
31 | #define CE_BIT 4 | ||
32 | #define CLE_BIT 5 | ||
33 | #define ALE_BIT 6 | ||
34 | #define BY_BIT 7 | ||
35 | |||
36 | static struct mtd_info *crisv32_mtd = NULL; | ||
37 | /* | ||
38 | * hardware specific access to control-lines | ||
39 | */ | ||
40 | static void crisv32_hwcontrol(struct mtd_info *mtd, int cmd) | ||
41 | { | ||
42 | unsigned long flags; | ||
43 | reg_gio_rw_pa_dout dout = REG_RD(gio, regi_gio, rw_pa_dout); | ||
44 | |||
45 | local_irq_save(flags); | ||
46 | switch(cmd){ | ||
47 | case NAND_CTL_SETCLE: | ||
48 | dout.data |= (1<<CLE_BIT); | ||
49 | break; | ||
50 | case NAND_CTL_CLRCLE: | ||
51 | dout.data &= ~(1<<CLE_BIT); | ||
52 | break; | ||
53 | case NAND_CTL_SETALE: | ||
54 | dout.data |= (1<<ALE_BIT); | ||
55 | break; | ||
56 | case NAND_CTL_CLRALE: | ||
57 | dout.data &= ~(1<<ALE_BIT); | ||
58 | break; | ||
59 | case NAND_CTL_SETNCE: | ||
60 | dout.data |= (1<<CE_BIT); | ||
61 | break; | ||
62 | case NAND_CTL_CLRNCE: | ||
63 | dout.data &= ~(1<<CE_BIT); | ||
64 | break; | ||
65 | } | ||
66 | REG_WR(gio, regi_gio, rw_pa_dout, dout); | ||
67 | local_irq_restore(flags); | ||
68 | } | ||
69 | |||
70 | /* | ||
71 | * read device ready pin | ||
72 | */ | ||
73 | int crisv32_device_ready(struct mtd_info *mtd) | ||
74 | { | ||
75 | reg_gio_r_pa_din din = REG_RD(gio, regi_gio, r_pa_din); | ||
76 | return ((din.data & (1 << BY_BIT)) >> BY_BIT); | ||
77 | } | ||
78 | |||
79 | /* | ||
80 | * Main initialization routine | ||
81 | */ | ||
82 | struct mtd_info* __init crisv32_nand_flash_probe (void) | ||
83 | { | ||
84 | void __iomem *read_cs; | ||
85 | void __iomem *write_cs; | ||
86 | |||
87 | reg_bif_core_rw_grp3_cfg bif_cfg = REG_RD(bif_core, regi_bif_core, rw_grp3_cfg); | ||
88 | reg_gio_rw_pa_oe pa_oe = REG_RD(gio, regi_gio, rw_pa_oe); | ||
89 | struct nand_chip *this; | ||
90 | int err = 0; | ||
91 | |||
92 | /* Allocate memory for MTD device structure and private data */ | ||
93 | crisv32_mtd = kmalloc (sizeof(struct mtd_info) + sizeof (struct nand_chip), | ||
94 | GFP_KERNEL); | ||
95 | if (!crisv32_mtd) { | ||
96 | printk ("Unable to allocate CRISv32 NAND MTD device structure.\n"); | ||
97 | err = -ENOMEM; | ||
98 | return NULL; | ||
99 | } | ||
100 | |||
101 | read_cs = ioremap(MEM_CSP0_START | MEM_NON_CACHEABLE, 8192); | ||
102 | write_cs = ioremap(MEM_CSP1_START | MEM_NON_CACHEABLE, 8192); | ||
103 | |||
104 | if (!read_cs || !write_cs) { | ||
105 | printk("CRISv32 NAND ioremap failed\n"); | ||
106 | err = -EIO; | ||
107 | goto out_mtd; | ||
108 | } | ||
109 | |||
110 | /* Get pointer to private data */ | ||
111 | this = (struct nand_chip *) (&crisv32_mtd[1]); | ||
112 | |||
113 | pa_oe.oe |= 1 << CE_BIT; | ||
114 | pa_oe.oe |= 1 << ALE_BIT; | ||
115 | pa_oe.oe |= 1 << CLE_BIT; | ||
116 | pa_oe.oe &= ~ (1 << BY_BIT); | ||
117 | REG_WR(gio, regi_gio, rw_pa_oe, pa_oe); | ||
118 | |||
119 | bif_cfg.gated_csp0 = regk_bif_core_rd; | ||
120 | bif_cfg.gated_csp1 = regk_bif_core_wr; | ||
121 | REG_WR(bif_core, regi_bif_core, rw_grp3_cfg, bif_cfg); | ||
122 | |||
123 | /* Initialize structures */ | ||
124 | memset((char *) crisv32_mtd, 0, sizeof(struct mtd_info)); | ||
125 | memset((char *) this, 0, sizeof(struct nand_chip)); | ||
126 | |||
127 | /* Link the private data with the MTD structure */ | ||
128 | crisv32_mtd->priv = this; | ||
129 | |||
130 | /* Set address of NAND IO lines */ | ||
131 | this->IO_ADDR_R = read_cs; | ||
132 | this->IO_ADDR_W = write_cs; | ||
133 | this->hwcontrol = crisv32_hwcontrol; | ||
134 | this->dev_ready = crisv32_device_ready; | ||
135 | /* 20 us command delay time */ | ||
136 | this->chip_delay = 20; | ||
137 | this->eccmode = NAND_ECC_SOFT; | ||
138 | |||
139 | /* Enable the following for a flash based bad block table */ | ||
140 | this->options = NAND_USE_FLASH_BBT; | ||
141 | |||
142 | /* Scan to find existance of the device */ | ||
143 | if (nand_scan (crisv32_mtd, 1)) { | ||
144 | err = -ENXIO; | ||
145 | goto out_ior; | ||
146 | } | ||
147 | |||
148 | return crisv32_mtd; | ||
149 | |||
150 | out_ior: | ||
151 | iounmap((void *)read_cs); | ||
152 | iounmap((void *)write_cs); | ||
153 | out_mtd: | ||
154 | kfree (crisv32_mtd); | ||
155 | return NULL; | ||
156 | } | ||
157 | |||
diff --git a/arch/cris/arch-v32/drivers/pcf8563.c b/arch/cris/arch-v32/drivers/pcf8563.c new file mode 100644 index 000000000000..f894580b648b --- /dev/null +++ b/arch/cris/arch-v32/drivers/pcf8563.c | |||
@@ -0,0 +1,341 @@ | |||
1 | /* | ||
2 | * PCF8563 RTC | ||
3 | * | ||
4 | * From Phillips' datasheet: | ||
5 | * | ||
6 | * The PCF8563 is a CMOS real-time clock/calendar optimized for low power | ||
7 | * consumption. A programmable clock output, interupt output and voltage | ||
8 | * low detector are also provided. All address and data are transferred | ||
9 | * serially via two-line bidirectional I2C-bus. Maximum bus speed is | ||
10 | * 400 kbits/s. The built-in word address register is incremented | ||
11 | * automatically after each written or read byte. | ||
12 | * | ||
13 | * Copyright (c) 2002-2003, Axis Communications AB | ||
14 | * All rights reserved. | ||
15 | * | ||
16 | * Author: Tobias Anderberg <tobiasa@axis.com>. | ||
17 | * | ||
18 | */ | ||
19 | |||
20 | #include <linux/config.h> | ||
21 | #include <linux/version.h> | ||
22 | #include <linux/module.h> | ||
23 | #include <linux/kernel.h> | ||
24 | #include <linux/types.h> | ||
25 | #include <linux/sched.h> | ||
26 | #include <linux/init.h> | ||
27 | #include <linux/fs.h> | ||
28 | #include <linux/ioctl.h> | ||
29 | #include <linux/delay.h> | ||
30 | #include <linux/bcd.h> | ||
31 | |||
32 | #include <asm/uaccess.h> | ||
33 | #include <asm/system.h> | ||
34 | #include <asm/io.h> | ||
35 | #include <asm/rtc.h> | ||
36 | |||
37 | #include "i2c.h" | ||
38 | |||
39 | #define PCF8563_MAJOR 121 /* Local major number. */ | ||
40 | #define DEVICE_NAME "rtc" /* Name which is registered in /proc/devices. */ | ||
41 | #define PCF8563_NAME "PCF8563" | ||
42 | #define DRIVER_VERSION "$Revision: 1.1 $" | ||
43 | |||
44 | /* Two simple wrapper macros, saves a few keystrokes. */ | ||
45 | #define rtc_read(x) i2c_readreg(RTC_I2C_READ, x) | ||
46 | #define rtc_write(x,y) i2c_writereg(RTC_I2C_WRITE, x, y) | ||
47 | |||
48 | static const unsigned char days_in_month[] = | ||
49 | { 0, 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 }; | ||
50 | |||
51 | int pcf8563_ioctl(struct inode *, struct file *, unsigned int, unsigned long); | ||
52 | int pcf8563_open(struct inode *, struct file *); | ||
53 | int pcf8563_release(struct inode *, struct file *); | ||
54 | |||
55 | static struct file_operations pcf8563_fops = { | ||
56 | owner: THIS_MODULE, | ||
57 | ioctl: pcf8563_ioctl, | ||
58 | open: pcf8563_open, | ||
59 | release: pcf8563_release, | ||
60 | }; | ||
61 | |||
62 | unsigned char | ||
63 | pcf8563_readreg(int reg) | ||
64 | { | ||
65 | unsigned char res = rtc_read(reg); | ||
66 | |||
67 | /* The PCF8563 does not return 0 for unimplemented bits */ | ||
68 | switch (reg) { | ||
69 | case RTC_SECONDS: | ||
70 | case RTC_MINUTES: | ||
71 | res &= 0x7F; | ||
72 | break; | ||
73 | case RTC_HOURS: | ||
74 | case RTC_DAY_OF_MONTH: | ||
75 | res &= 0x3F; | ||
76 | break; | ||
77 | case RTC_WEEKDAY: | ||
78 | res &= 0x07; | ||
79 | break; | ||
80 | case RTC_MONTH: | ||
81 | res &= 0x1F; | ||
82 | break; | ||
83 | case RTC_CONTROL1: | ||
84 | res &= 0xA8; | ||
85 | break; | ||
86 | case RTC_CONTROL2: | ||
87 | res &= 0x1F; | ||
88 | break; | ||
89 | case RTC_CLOCKOUT_FREQ: | ||
90 | case RTC_TIMER_CONTROL: | ||
91 | res &= 0x83; | ||
92 | break; | ||
93 | } | ||
94 | return res; | ||
95 | } | ||
96 | |||
97 | void | ||
98 | pcf8563_writereg(int reg, unsigned char val) | ||
99 | { | ||
100 | #ifdef CONFIG_ETRAX_RTC_READONLY | ||
101 | if (reg == RTC_CONTROL1 || (reg >= RTC_SECONDS && reg <= RTC_YEAR)) | ||
102 | return; | ||
103 | #endif | ||
104 | |||
105 | rtc_write(reg, val); | ||
106 | } | ||
107 | |||
108 | void | ||
109 | get_rtc_time(struct rtc_time *tm) | ||
110 | { | ||
111 | tm->tm_sec = rtc_read(RTC_SECONDS); | ||
112 | tm->tm_min = rtc_read(RTC_MINUTES); | ||
113 | tm->tm_hour = rtc_read(RTC_HOURS); | ||
114 | tm->tm_mday = rtc_read(RTC_DAY_OF_MONTH); | ||
115 | tm->tm_wday = rtc_read(RTC_WEEKDAY); | ||
116 | tm->tm_mon = rtc_read(RTC_MONTH); | ||
117 | tm->tm_year = rtc_read(RTC_YEAR); | ||
118 | |||
119 | if (tm->tm_sec & 0x80) | ||
120 | printk(KERN_WARNING "%s: RTC Voltage Low - reliable date/time " | ||
121 | "information is no longer guaranteed!\n", PCF8563_NAME); | ||
122 | |||
123 | tm->tm_year = BCD_TO_BIN(tm->tm_year) + ((tm->tm_mon & 0x80) ? 100 : 0); | ||
124 | tm->tm_sec &= 0x7F; | ||
125 | tm->tm_min &= 0x7F; | ||
126 | tm->tm_hour &= 0x3F; | ||
127 | tm->tm_mday &= 0x3F; | ||
128 | tm->tm_wday &= 0x07; /* Not coded in BCD. */ | ||
129 | tm->tm_mon &= 0x1F; | ||
130 | |||
131 | BCD_TO_BIN(tm->tm_sec); | ||
132 | BCD_TO_BIN(tm->tm_min); | ||
133 | BCD_TO_BIN(tm->tm_hour); | ||
134 | BCD_TO_BIN(tm->tm_mday); | ||
135 | BCD_TO_BIN(tm->tm_mon); | ||
136 | tm->tm_mon--; /* Month is 1..12 in RTC but 0..11 in linux */ | ||
137 | } | ||
138 | |||
139 | int __init | ||
140 | pcf8563_init(void) | ||
141 | { | ||
142 | /* Initiate the i2c protocol. */ | ||
143 | i2c_init(); | ||
144 | |||
145 | /* | ||
146 | * First of all we need to reset the chip. This is done by | ||
147 | * clearing control1, control2 and clk freq and resetting | ||
148 | * all alarms. | ||
149 | */ | ||
150 | if (rtc_write(RTC_CONTROL1, 0x00) < 0) | ||
151 | goto err; | ||
152 | |||
153 | if (rtc_write(RTC_CONTROL2, 0x00) < 0) | ||
154 | goto err; | ||
155 | |||
156 | if (rtc_write(RTC_CLOCKOUT_FREQ, 0x00) < 0) | ||
157 | goto err; | ||
158 | |||
159 | if (rtc_write(RTC_TIMER_CONTROL, 0x03) < 0) | ||
160 | goto err; | ||
161 | |||
162 | /* Reset the alarms. */ | ||
163 | if (rtc_write(RTC_MINUTE_ALARM, 0x80) < 0) | ||
164 | goto err; | ||
165 | |||
166 | if (rtc_write(RTC_HOUR_ALARM, 0x80) < 0) | ||
167 | goto err; | ||
168 | |||
169 | if (rtc_write(RTC_DAY_ALARM, 0x80) < 0) | ||
170 | goto err; | ||
171 | |||
172 | if (rtc_write(RTC_WEEKDAY_ALARM, 0x80) < 0) | ||
173 | goto err; | ||
174 | |||
175 | if (register_chrdev(PCF8563_MAJOR, DEVICE_NAME, &pcf8563_fops) < 0) { | ||
176 | printk(KERN_INFO "%s: Unable to get major numer %d for RTC device.\n", | ||
177 | PCF8563_NAME, PCF8563_MAJOR); | ||
178 | return -1; | ||
179 | } | ||
180 | |||
181 | printk(KERN_INFO "%s Real-Time Clock Driver, %s\n", PCF8563_NAME, DRIVER_VERSION); | ||
182 | |||
183 | /* Check for low voltage, and warn about it.. */ | ||
184 | if (rtc_read(RTC_SECONDS) & 0x80) | ||
185 | printk(KERN_WARNING "%s: RTC Voltage Low - reliable date/time " | ||
186 | "information is no longer guaranteed!\n", PCF8563_NAME); | ||
187 | |||
188 | return 0; | ||
189 | |||
190 | err: | ||
191 | printk(KERN_INFO "%s: Error initializing chip.\n", PCF8563_NAME); | ||
192 | return -1; | ||
193 | } | ||
194 | |||
195 | void __exit | ||
196 | pcf8563_exit(void) | ||
197 | { | ||
198 | if (unregister_chrdev(PCF8563_MAJOR, DEVICE_NAME) < 0) { | ||
199 | printk(KERN_INFO "%s: Unable to unregister device.\n", PCF8563_NAME); | ||
200 | } | ||
201 | } | ||
202 | |||
203 | /* | ||
204 | * ioctl calls for this driver. Why return -ENOTTY upon error? Because | ||
205 | * POSIX says so! | ||
206 | */ | ||
207 | int | ||
208 | pcf8563_ioctl(struct inode *inode, struct file *filp, unsigned int cmd, unsigned long arg) | ||
209 | { | ||
210 | /* Some sanity checks. */ | ||
211 | if (_IOC_TYPE(cmd) != RTC_MAGIC) | ||
212 | return -ENOTTY; | ||
213 | |||
214 | if (_IOC_NR(cmd) > RTC_MAX_IOCTL) | ||
215 | return -ENOTTY; | ||
216 | |||
217 | switch (cmd) { | ||
218 | case RTC_RD_TIME: | ||
219 | { | ||
220 | struct rtc_time tm; | ||
221 | |||
222 | memset(&tm, 0, sizeof (struct rtc_time)); | ||
223 | get_rtc_time(&tm); | ||
224 | |||
225 | if (copy_to_user((struct rtc_time *) arg, &tm, sizeof tm)) { | ||
226 | return -EFAULT; | ||
227 | } | ||
228 | |||
229 | return 0; | ||
230 | } | ||
231 | |||
232 | case RTC_SET_TIME: | ||
233 | { | ||
234 | #ifdef CONFIG_ETRAX_RTC_READONLY | ||
235 | return -EPERM; | ||
236 | #else | ||
237 | int leap; | ||
238 | int year; | ||
239 | int century; | ||
240 | struct rtc_time tm; | ||
241 | |||
242 | if (!capable(CAP_SYS_TIME)) | ||
243 | return -EPERM; | ||
244 | |||
245 | if (copy_from_user(&tm, (struct rtc_time *) arg, sizeof tm)) | ||
246 | return -EFAULT; | ||
247 | |||
248 | /* Convert from struct tm to struct rtc_time. */ | ||
249 | tm.tm_year += 1900; | ||
250 | tm.tm_mon += 1; | ||
251 | |||
252 | /* | ||
253 | * Check if tm.tm_year is a leap year. A year is a leap | ||
254 | * year if it is divisible by 4 but not 100, except | ||
255 | * that years divisible by 400 _are_ leap years. | ||
256 | */ | ||
257 | year = tm.tm_year; | ||
258 | leap = (tm.tm_mon == 2) && ((year % 4 == 0 && year % 100 != 0) || year % 400 == 0); | ||
259 | |||
260 | /* Perform some sanity checks. */ | ||
261 | if ((tm.tm_year < 1970) || | ||
262 | (tm.tm_mon > 12) || | ||
263 | (tm.tm_mday == 0) || | ||
264 | (tm.tm_mday > days_in_month[tm.tm_mon] + leap) || | ||
265 | (tm.tm_wday >= 7) || | ||
266 | (tm.tm_hour >= 24) || | ||
267 | (tm.tm_min >= 60) || | ||
268 | (tm.tm_sec >= 60)) | ||
269 | return -EINVAL; | ||
270 | |||
271 | century = (tm.tm_year >= 2000) ? 0x80 : 0; | ||
272 | tm.tm_year = tm.tm_year % 100; | ||
273 | |||
274 | BIN_TO_BCD(tm.tm_year); | ||
275 | BIN_TO_BCD(tm.tm_mday); | ||
276 | BIN_TO_BCD(tm.tm_hour); | ||
277 | BIN_TO_BCD(tm.tm_min); | ||
278 | BIN_TO_BCD(tm.tm_sec); | ||
279 | tm.tm_mon |= century; | ||
280 | |||
281 | rtc_write(RTC_YEAR, tm.tm_year); | ||
282 | rtc_write(RTC_MONTH, tm.tm_mon); | ||
283 | rtc_write(RTC_WEEKDAY, tm.tm_wday); /* Not coded in BCD. */ | ||
284 | rtc_write(RTC_DAY_OF_MONTH, tm.tm_mday); | ||
285 | rtc_write(RTC_HOURS, tm.tm_hour); | ||
286 | rtc_write(RTC_MINUTES, tm.tm_min); | ||
287 | rtc_write(RTC_SECONDS, tm.tm_sec); | ||
288 | |||
289 | return 0; | ||
290 | #endif /* !CONFIG_ETRAX_RTC_READONLY */ | ||
291 | } | ||
292 | |||
293 | case RTC_VLOW_RD: | ||
294 | { | ||
295 | int vl_bit = 0; | ||
296 | |||
297 | if (rtc_read(RTC_SECONDS) & 0x80) { | ||
298 | vl_bit = 1; | ||
299 | printk(KERN_WARNING "%s: RTC Voltage Low - reliable " | ||
300 | "date/time information is no longer guaranteed!\n", | ||
301 | PCF8563_NAME); | ||
302 | } | ||
303 | if (copy_to_user((int *) arg, &vl_bit, sizeof(int))) | ||
304 | return -EFAULT; | ||
305 | |||
306 | return 0; | ||
307 | } | ||
308 | |||
309 | case RTC_VLOW_SET: | ||
310 | { | ||
311 | /* Clear the VL bit in the seconds register */ | ||
312 | int ret = rtc_read(RTC_SECONDS); | ||
313 | |||
314 | rtc_write(RTC_SECONDS, (ret & 0x7F)); | ||
315 | |||
316 | return 0; | ||
317 | } | ||
318 | |||
319 | default: | ||
320 | return -ENOTTY; | ||
321 | } | ||
322 | |||
323 | return 0; | ||
324 | } | ||
325 | |||
326 | int | ||
327 | pcf8563_open(struct inode *inode, struct file *filp) | ||
328 | { | ||
329 | MOD_INC_USE_COUNT; | ||
330 | return 0; | ||
331 | } | ||
332 | |||
333 | int | ||
334 | pcf8563_release(struct inode *inode, struct file *filp) | ||
335 | { | ||
336 | MOD_DEC_USE_COUNT; | ||
337 | return 0; | ||
338 | } | ||
339 | |||
340 | module_init(pcf8563_init); | ||
341 | module_exit(pcf8563_exit); | ||
diff --git a/arch/cris/arch-v32/drivers/pci/Makefile b/arch/cris/arch-v32/drivers/pci/Makefile new file mode 100644 index 000000000000..bff7482f2444 --- /dev/null +++ b/arch/cris/arch-v32/drivers/pci/Makefile | |||
@@ -0,0 +1,5 @@ | |||
1 | # | ||
2 | # Makefile for Etrax cardbus driver | ||
3 | # | ||
4 | |||
5 | obj-$(CONFIG_ETRAX_CARDBUS) += bios.o dma.o | ||
diff --git a/arch/cris/arch-v32/drivers/pci/bios.c b/arch/cris/arch-v32/drivers/pci/bios.c new file mode 100644 index 000000000000..24bc149889b6 --- /dev/null +++ b/arch/cris/arch-v32/drivers/pci/bios.c | |||
@@ -0,0 +1,131 @@ | |||
1 | #include <linux/pci.h> | ||
2 | #include <linux/kernel.h> | ||
3 | #include <asm/arch/hwregs/intr_vect.h> | ||
4 | |||
5 | void __devinit pcibios_fixup_bus(struct pci_bus *b) | ||
6 | { | ||
7 | } | ||
8 | |||
9 | char * __devinit pcibios_setup(char *str) | ||
10 | { | ||
11 | return NULL; | ||
12 | } | ||
13 | |||
14 | void pcibios_set_master(struct pci_dev *dev) | ||
15 | { | ||
16 | u8 lat; | ||
17 | pci_read_config_byte(dev, PCI_LATENCY_TIMER, &lat); | ||
18 | printk(KERN_DEBUG "PCI: Setting latency timer of device %s to %d\n", pci_name(dev), lat); | ||
19 | pci_write_config_byte(dev, PCI_LATENCY_TIMER, lat); | ||
20 | } | ||
21 | |||
22 | int pci_mmap_page_range(struct pci_dev *dev, struct vm_area_struct *vma, | ||
23 | enum pci_mmap_state mmap_state, int write_combine) | ||
24 | { | ||
25 | unsigned long prot; | ||
26 | |||
27 | /* Leave vm_pgoff as-is, the PCI space address is the physical | ||
28 | * address on this platform. | ||
29 | */ | ||
30 | vma->vm_flags |= (VM_SHM | VM_LOCKED | VM_IO); | ||
31 | |||
32 | prot = pgprot_val(vma->vm_page_prot); | ||
33 | vma->vm_page_prot = __pgprot(prot); | ||
34 | |||
35 | /* Write-combine setting is ignored, it is changed via the mtrr | ||
36 | * interfaces on this platform. | ||
37 | */ | ||
38 | if (remap_pfn_range(vma, vma->vm_start, vma->vm_pgoff, | ||
39 | vma->vm_end - vma->vm_start, | ||
40 | vma->vm_page_prot)) | ||
41 | return -EAGAIN; | ||
42 | |||
43 | return 0; | ||
44 | } | ||
45 | |||
46 | void | ||
47 | pcibios_align_resource(void *data, struct resource *res, | ||
48 | unsigned long size, unsigned long align) | ||
49 | { | ||
50 | if (res->flags & IORESOURCE_IO) { | ||
51 | unsigned long start = res->start; | ||
52 | |||
53 | if (start & 0x300) { | ||
54 | start = (start + 0x3ff) & ~0x3ff; | ||
55 | res->start = start; | ||
56 | } | ||
57 | } | ||
58 | } | ||
59 | |||
60 | int pcibios_enable_resources(struct pci_dev *dev, int mask) | ||
61 | { | ||
62 | u16 cmd, old_cmd; | ||
63 | int idx; | ||
64 | struct resource *r; | ||
65 | |||
66 | pci_read_config_word(dev, PCI_COMMAND, &cmd); | ||
67 | old_cmd = cmd; | ||
68 | for(idx=0; idx<6; idx++) { | ||
69 | /* Only set up the requested stuff */ | ||
70 | if (!(mask & (1<<idx))) | ||
71 | continue; | ||
72 | |||
73 | r = &dev->resource[idx]; | ||
74 | if (!r->start && r->end) { | ||
75 | printk(KERN_ERR "PCI: Device %s not available because of resource collisions\n", pci_name(dev)); | ||
76 | return -EINVAL; | ||
77 | } | ||
78 | if (r->flags & IORESOURCE_IO) | ||
79 | cmd |= PCI_COMMAND_IO; | ||
80 | if (r->flags & IORESOURCE_MEM) | ||
81 | cmd |= PCI_COMMAND_MEMORY; | ||
82 | } | ||
83 | if (dev->resource[PCI_ROM_RESOURCE].start) | ||
84 | cmd |= PCI_COMMAND_MEMORY; | ||
85 | if (cmd != old_cmd) { | ||
86 | printk("PCI: Enabling device %s (%04x -> %04x)\n", pci_name(dev), old_cmd, cmd); | ||
87 | pci_write_config_word(dev, PCI_COMMAND, cmd); | ||
88 | } | ||
89 | return 0; | ||
90 | } | ||
91 | |||
92 | int pcibios_enable_irq(struct pci_dev *dev) | ||
93 | { | ||
94 | dev->irq = EXT_INTR_VECT; | ||
95 | return 0; | ||
96 | } | ||
97 | |||
98 | int pcibios_enable_device(struct pci_dev *dev, int mask) | ||
99 | { | ||
100 | int err; | ||
101 | |||
102 | if ((err = pcibios_enable_resources(dev, mask)) < 0) | ||
103 | return err; | ||
104 | |||
105 | return pcibios_enable_irq(dev); | ||
106 | } | ||
107 | |||
108 | int pcibios_assign_resources(void) | ||
109 | { | ||
110 | struct pci_dev *dev = NULL; | ||
111 | int idx; | ||
112 | struct resource *r; | ||
113 | |||
114 | while ((dev = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, dev)) != NULL) { | ||
115 | int class = dev->class >> 8; | ||
116 | |||
117 | /* Don't touch classless devices and host bridges */ | ||
118 | if (!class || class == PCI_CLASS_BRIDGE_HOST) | ||
119 | continue; | ||
120 | |||
121 | for(idx=0; idx<6; idx++) { | ||
122 | r = &dev->resource[idx]; | ||
123 | |||
124 | if (!r->start && r->end) | ||
125 | pci_assign_resource(dev, idx); | ||
126 | } | ||
127 | } | ||
128 | return 0; | ||
129 | } | ||
130 | |||
131 | EXPORT_SYMBOL(pcibios_assign_resources); | ||
diff --git a/arch/cris/arch-v32/drivers/pci/dma.c b/arch/cris/arch-v32/drivers/pci/dma.c new file mode 100644 index 000000000000..10329306d23c --- /dev/null +++ b/arch/cris/arch-v32/drivers/pci/dma.c | |||
@@ -0,0 +1,149 @@ | |||
1 | /* | ||
2 | * Dynamic DMA mapping support. | ||
3 | * | ||
4 | * On cris there is no hardware dynamic DMA address translation, | ||
5 | * so consistent alloc/free are merely page allocation/freeing. | ||
6 | * The rest of the dynamic DMA mapping interface is implemented | ||
7 | * in asm/pci.h. | ||
8 | * | ||
9 | * Borrowed from i386. | ||
10 | */ | ||
11 | |||
12 | #include <linux/types.h> | ||
13 | #include <linux/mm.h> | ||
14 | #include <linux/string.h> | ||
15 | #include <linux/pci.h> | ||
16 | #include <asm/io.h> | ||
17 | |||
18 | struct dma_coherent_mem { | ||
19 | void *virt_base; | ||
20 | u32 device_base; | ||
21 | int size; | ||
22 | int flags; | ||
23 | unsigned long *bitmap; | ||
24 | }; | ||
25 | |||
26 | void *dma_alloc_coherent(struct device *dev, size_t size, | ||
27 | dma_addr_t *dma_handle, unsigned int __nocast gfp) | ||
28 | { | ||
29 | void *ret; | ||
30 | struct dma_coherent_mem *mem = dev ? dev->dma_mem : NULL; | ||
31 | int order = get_order(size); | ||
32 | /* ignore region specifiers */ | ||
33 | gfp &= ~(__GFP_DMA | __GFP_HIGHMEM); | ||
34 | |||
35 | if (mem) { | ||
36 | int page = bitmap_find_free_region(mem->bitmap, mem->size, | ||
37 | order); | ||
38 | if (page >= 0) { | ||
39 | *dma_handle = mem->device_base + (page << PAGE_SHIFT); | ||
40 | ret = mem->virt_base + (page << PAGE_SHIFT); | ||
41 | memset(ret, 0, size); | ||
42 | return ret; | ||
43 | } | ||
44 | if (mem->flags & DMA_MEMORY_EXCLUSIVE) | ||
45 | return NULL; | ||
46 | } | ||
47 | |||
48 | if (dev == NULL || (dev->coherent_dma_mask < 0xffffffff)) | ||
49 | gfp |= GFP_DMA; | ||
50 | |||
51 | ret = (void *)__get_free_pages(gfp, order); | ||
52 | |||
53 | if (ret != NULL) { | ||
54 | memset(ret, 0, size); | ||
55 | *dma_handle = virt_to_phys(ret); | ||
56 | } | ||
57 | return ret; | ||
58 | } | ||
59 | |||
60 | void dma_free_coherent(struct device *dev, size_t size, | ||
61 | void *vaddr, dma_addr_t dma_handle) | ||
62 | { | ||
63 | struct dma_coherent_mem *mem = dev ? dev->dma_mem : NULL; | ||
64 | int order = get_order(size); | ||
65 | |||
66 | if (mem && vaddr >= mem->virt_base && vaddr < (mem->virt_base + (mem->size << PAGE_SHIFT))) { | ||
67 | int page = (vaddr - mem->virt_base) >> PAGE_SHIFT; | ||
68 | |||
69 | bitmap_release_region(mem->bitmap, page, order); | ||
70 | } else | ||
71 | free_pages((unsigned long)vaddr, order); | ||
72 | } | ||
73 | |||
74 | int dma_declare_coherent_memory(struct device *dev, dma_addr_t bus_addr, | ||
75 | dma_addr_t device_addr, size_t size, int flags) | ||
76 | { | ||
77 | void __iomem *mem_base; | ||
78 | int pages = size >> PAGE_SHIFT; | ||
79 | int bitmap_size = (pages + 31)/32; | ||
80 | |||
81 | if ((flags & (DMA_MEMORY_MAP | DMA_MEMORY_IO)) == 0) | ||
82 | goto out; | ||
83 | if (!size) | ||
84 | goto out; | ||
85 | if (dev->dma_mem) | ||
86 | goto out; | ||
87 | |||
88 | /* FIXME: this routine just ignores DMA_MEMORY_INCLUDES_CHILDREN */ | ||
89 | |||
90 | mem_base = ioremap(bus_addr, size); | ||
91 | if (!mem_base) | ||
92 | goto out; | ||
93 | |||
94 | dev->dma_mem = kmalloc(sizeof(struct dma_coherent_mem), GFP_KERNEL); | ||
95 | if (!dev->dma_mem) | ||
96 | goto out; | ||
97 | memset(dev->dma_mem, 0, sizeof(struct dma_coherent_mem)); | ||
98 | dev->dma_mem->bitmap = kmalloc(bitmap_size, GFP_KERNEL); | ||
99 | if (!dev->dma_mem->bitmap) | ||
100 | goto free1_out; | ||
101 | memset(dev->dma_mem->bitmap, 0, bitmap_size); | ||
102 | |||
103 | dev->dma_mem->virt_base = mem_base; | ||
104 | dev->dma_mem->device_base = device_addr; | ||
105 | dev->dma_mem->size = pages; | ||
106 | dev->dma_mem->flags = flags; | ||
107 | |||
108 | if (flags & DMA_MEMORY_MAP) | ||
109 | return DMA_MEMORY_MAP; | ||
110 | |||
111 | return DMA_MEMORY_IO; | ||
112 | |||
113 | free1_out: | ||
114 | kfree(dev->dma_mem->bitmap); | ||
115 | out: | ||
116 | return 0; | ||
117 | } | ||
118 | EXPORT_SYMBOL(dma_declare_coherent_memory); | ||
119 | |||
120 | void dma_release_declared_memory(struct device *dev) | ||
121 | { | ||
122 | struct dma_coherent_mem *mem = dev->dma_mem; | ||
123 | |||
124 | if(!mem) | ||
125 | return; | ||
126 | dev->dma_mem = NULL; | ||
127 | iounmap(mem->virt_base); | ||
128 | kfree(mem->bitmap); | ||
129 | kfree(mem); | ||
130 | } | ||
131 | EXPORT_SYMBOL(dma_release_declared_memory); | ||
132 | |||
133 | void *dma_mark_declared_memory_occupied(struct device *dev, | ||
134 | dma_addr_t device_addr, size_t size) | ||
135 | { | ||
136 | struct dma_coherent_mem *mem = dev->dma_mem; | ||
137 | int pages = (size + (device_addr & ~PAGE_MASK) + PAGE_SIZE - 1) >> PAGE_SHIFT; | ||
138 | int pos, err; | ||
139 | |||
140 | if (!mem) | ||
141 | return ERR_PTR(-EINVAL); | ||
142 | |||
143 | pos = (device_addr - mem->device_base) >> PAGE_SHIFT; | ||
144 | err = bitmap_allocate_region(mem->bitmap, pos, get_order(pages)); | ||
145 | if (err != 0) | ||
146 | return ERR_PTR(err); | ||
147 | return mem->virt_base + (pos << PAGE_SHIFT); | ||
148 | } | ||
149 | EXPORT_SYMBOL(dma_mark_declared_memory_occupied); | ||
diff --git a/arch/cris/arch-v32/drivers/sync_serial.c b/arch/cris/arch-v32/drivers/sync_serial.c new file mode 100644 index 000000000000..c85a6df8558f --- /dev/null +++ b/arch/cris/arch-v32/drivers/sync_serial.c | |||
@@ -0,0 +1,1283 @@ | |||
1 | /* | ||
2 | * Simple synchronous serial port driver for ETRAX FS. | ||
3 | * | ||
4 | * Copyright (c) 2005 Axis Communications AB | ||
5 | * | ||
6 | * Author: Mikael Starvik | ||
7 | * | ||
8 | */ | ||
9 | |||
10 | #include <linux/module.h> | ||
11 | #include <linux/kernel.h> | ||
12 | #include <linux/config.h> | ||
13 | #include <linux/types.h> | ||
14 | #include <linux/errno.h> | ||
15 | #include <linux/major.h> | ||
16 | #include <linux/sched.h> | ||
17 | #include <linux/slab.h> | ||
18 | #include <linux/interrupt.h> | ||
19 | #include <linux/poll.h> | ||
20 | #include <linux/init.h> | ||
21 | #include <linux/timer.h> | ||
22 | #include <linux/spinlock.h> | ||
23 | |||
24 | #include <asm/io.h> | ||
25 | #include <asm/arch/dma.h> | ||
26 | #include <asm/arch/pinmux.h> | ||
27 | #include <asm/arch/hwregs/reg_rdwr.h> | ||
28 | #include <asm/arch/hwregs/sser_defs.h> | ||
29 | #include <asm/arch/hwregs/dma_defs.h> | ||
30 | #include <asm/arch/hwregs/dma.h> | ||
31 | #include <asm/arch/hwregs/intr_vect_defs.h> | ||
32 | #include <asm/arch/hwregs/intr_vect.h> | ||
33 | #include <asm/arch/hwregs/reg_map.h> | ||
34 | #include <asm/sync_serial.h> | ||
35 | |||
36 | /* The receiver is a bit tricky beacuse of the continuous stream of data.*/ | ||
37 | /* */ | ||
38 | /* Three DMA descriptors are linked together. Each DMA descriptor is */ | ||
39 | /* responsible for port->bufchunk of a common buffer. */ | ||
40 | /* */ | ||
41 | /* +---------------------------------------------+ */ | ||
42 | /* | +----------+ +----------+ +----------+ | */ | ||
43 | /* +-> | Descr[0] |-->| Descr[1] |-->| Descr[2] |-+ */ | ||
44 | /* +----------+ +----------+ +----------+ */ | ||
45 | /* | | | */ | ||
46 | /* v v v */ | ||
47 | /* +-------------------------------------+ */ | ||
48 | /* | BUFFER | */ | ||
49 | /* +-------------------------------------+ */ | ||
50 | /* |<- data_avail ->| */ | ||
51 | /* readp writep */ | ||
52 | /* */ | ||
53 | /* If the application keeps up the pace readp will be right after writep.*/ | ||
54 | /* If the application can't keep the pace we have to throw away data. */ | ||
55 | /* The idea is that readp should be ready with the data pointed out by */ | ||
56 | /* Descr[i] when the DMA has filled in Descr[i+1]. */ | ||
57 | /* Otherwise we will discard */ | ||
58 | /* the rest of the data pointed out by Descr1 and set readp to the start */ | ||
59 | /* of Descr2 */ | ||
60 | |||
61 | #define SYNC_SERIAL_MAJOR 125 | ||
62 | |||
63 | /* IN_BUFFER_SIZE should be a multiple of 6 to make sure that 24 bit */ | ||
64 | /* words can be handled */ | ||
65 | #define IN_BUFFER_SIZE 12288 | ||
66 | #define IN_DESCR_SIZE 256 | ||
67 | #define NUM_IN_DESCR (IN_BUFFER_SIZE/IN_DESCR_SIZE) | ||
68 | #define OUT_BUFFER_SIZE 4096 | ||
69 | |||
70 | #define DEFAULT_FRAME_RATE 0 | ||
71 | #define DEFAULT_WORD_RATE 7 | ||
72 | |||
73 | /* NOTE: Enabling some debug will likely cause overrun or underrun, | ||
74 | * especially if manual mode is use. | ||
75 | */ | ||
76 | #define DEBUG(x) | ||
77 | #define DEBUGREAD(x) | ||
78 | #define DEBUGWRITE(x) | ||
79 | #define DEBUGPOLL(x) | ||
80 | #define DEBUGRXINT(x) | ||
81 | #define DEBUGTXINT(x) | ||
82 | |||
83 | typedef struct sync_port | ||
84 | { | ||
85 | reg_scope_instances regi_sser; | ||
86 | reg_scope_instances regi_dmain; | ||
87 | reg_scope_instances regi_dmaout; | ||
88 | |||
89 | char started; /* 1 if port has been started */ | ||
90 | char port_nbr; /* Port 0 or 1 */ | ||
91 | char busy; /* 1 if port is busy */ | ||
92 | |||
93 | char enabled; /* 1 if port is enabled */ | ||
94 | char use_dma; /* 1 if port uses dma */ | ||
95 | char tr_running; | ||
96 | |||
97 | char init_irqs; | ||
98 | int output; | ||
99 | int input; | ||
100 | |||
101 | volatile unsigned int out_count; /* Remaining bytes for current transfer */ | ||
102 | unsigned char* outp; /* Current position in out_buffer */ | ||
103 | volatile unsigned char* volatile readp; /* Next byte to be read by application */ | ||
104 | volatile unsigned char* volatile writep; /* Next byte to be written by etrax */ | ||
105 | unsigned int in_buffer_size; | ||
106 | unsigned int inbufchunk; | ||
107 | unsigned char out_buffer[OUT_BUFFER_SIZE] __attribute__ ((aligned(32))); | ||
108 | unsigned char in_buffer[IN_BUFFER_SIZE]__attribute__ ((aligned(32))); | ||
109 | unsigned char flip[IN_BUFFER_SIZE] __attribute__ ((aligned(32))); | ||
110 | struct dma_descr_data* next_rx_desc; | ||
111 | struct dma_descr_data* prev_rx_desc; | ||
112 | int full; | ||
113 | |||
114 | dma_descr_data in_descr[NUM_IN_DESCR] __attribute__ ((__aligned__(16))); | ||
115 | dma_descr_context in_context __attribute__ ((__aligned__(32))); | ||
116 | dma_descr_data out_descr __attribute__ ((__aligned__(16))); | ||
117 | dma_descr_context out_context __attribute__ ((__aligned__(32))); | ||
118 | wait_queue_head_t out_wait_q; | ||
119 | wait_queue_head_t in_wait_q; | ||
120 | |||
121 | spinlock_t lock; | ||
122 | } sync_port; | ||
123 | |||
124 | static int etrax_sync_serial_init(void); | ||
125 | static void initialize_port(int portnbr); | ||
126 | static inline int sync_data_avail(struct sync_port *port); | ||
127 | |||
128 | static int sync_serial_open(struct inode *, struct file*); | ||
129 | static int sync_serial_release(struct inode*, struct file*); | ||
130 | static unsigned int sync_serial_poll(struct file *filp, poll_table *wait); | ||
131 | |||
132 | static int sync_serial_ioctl(struct inode*, struct file*, | ||
133 | unsigned int cmd, unsigned long arg); | ||
134 | static ssize_t sync_serial_write(struct file * file, const char * buf, | ||
135 | size_t count, loff_t *ppos); | ||
136 | static ssize_t sync_serial_read(struct file *file, char *buf, | ||
137 | size_t count, loff_t *ppos); | ||
138 | |||
139 | #if (defined(CONFIG_ETRAX_SYNCHRONOUS_SERIAL_PORT0) && \ | ||
140 | defined(CONFIG_ETRAX_SYNCHRONOUS_SERIAL0_DMA)) || \ | ||
141 | (defined(CONFIG_ETRAX_SYNCHRONOUS_SERIAL_PORT1) && \ | ||
142 | defined(CONFIG_ETRAX_SYNCHRONOUS_SERIAL1_DMA)) | ||
143 | #define SYNC_SER_DMA | ||
144 | #endif | ||
145 | |||
146 | static void send_word(sync_port* port); | ||
147 | static void start_dma(struct sync_port *port, const char* data, int count); | ||
148 | static void start_dma_in(sync_port* port); | ||
149 | #ifdef SYNC_SER_DMA | ||
150 | static irqreturn_t tr_interrupt(int irq, void *dev_id, struct pt_regs * regs); | ||
151 | static irqreturn_t rx_interrupt(int irq, void *dev_id, struct pt_regs * regs); | ||
152 | #endif | ||
153 | |||
154 | #if (defined(CONFIG_ETRAX_SYNCHRONOUS_SERIAL_PORT0) && \ | ||
155 | !defined(CONFIG_ETRAX_SYNCHRONOUS_SERIAL0_DMA)) || \ | ||
156 | (defined(CONFIG_ETRAX_SYNCHRONOUS_SERIAL_PORT1) && \ | ||
157 | !defined(CONFIG_ETRAX_SYNCHRONOUS_SERIAL1_DMA)) | ||
158 | #define SYNC_SER_MANUAL | ||
159 | #endif | ||
160 | #ifdef SYNC_SER_MANUAL | ||
161 | static irqreturn_t manual_interrupt(int irq, void *dev_id, struct pt_regs * regs); | ||
162 | #endif | ||
163 | |||
164 | /* The ports */ | ||
165 | static struct sync_port ports[]= | ||
166 | { | ||
167 | { | ||
168 | .regi_sser = regi_sser0, | ||
169 | .regi_dmaout = regi_dma4, | ||
170 | .regi_dmain = regi_dma5, | ||
171 | #if defined(CONFIG_ETRAX_SYNCHRONOUS_SERIAL0_DMA) | ||
172 | .use_dma = 1, | ||
173 | #else | ||
174 | .use_dma = 0, | ||
175 | #endif | ||
176 | }, | ||
177 | { | ||
178 | .regi_sser = regi_sser1, | ||
179 | .regi_dmaout = regi_dma6, | ||
180 | .regi_dmain = regi_dma7, | ||
181 | #if defined(CONFIG_ETRAX_SYNCHRONOUS_SERIAL1_DMA) | ||
182 | .use_dma = 1, | ||
183 | #else | ||
184 | .use_dma = 0, | ||
185 | #endif | ||
186 | } | ||
187 | }; | ||
188 | |||
189 | #define NUMBER_OF_PORTS (sizeof(ports)/sizeof(sync_port)) | ||
190 | |||
191 | static struct file_operations sync_serial_fops = { | ||
192 | .owner = THIS_MODULE, | ||
193 | .write = sync_serial_write, | ||
194 | .read = sync_serial_read, | ||
195 | .poll = sync_serial_poll, | ||
196 | .ioctl = sync_serial_ioctl, | ||
197 | .open = sync_serial_open, | ||
198 | .release = sync_serial_release | ||
199 | }; | ||
200 | |||
201 | static int __init etrax_sync_serial_init(void) | ||
202 | { | ||
203 | ports[0].enabled = 0; | ||
204 | ports[1].enabled = 0; | ||
205 | |||
206 | if (register_chrdev(SYNC_SERIAL_MAJOR,"sync serial", &sync_serial_fops) <0 ) | ||
207 | { | ||
208 | printk("unable to get major for synchronous serial port\n"); | ||
209 | return -EBUSY; | ||
210 | } | ||
211 | |||
212 | /* Initialize Ports */ | ||
213 | #if defined(CONFIG_ETRAX_SYNCHRONOUS_SERIAL_PORT0) | ||
214 | if (crisv32_pinmux_alloc_fixed(pinmux_sser0)) | ||
215 | { | ||
216 | printk("Unable to allocate pins for syncrhronous serial port 0\n"); | ||
217 | return -EIO; | ||
218 | } | ||
219 | ports[0].enabled = 1; | ||
220 | initialize_port(0); | ||
221 | #endif | ||
222 | |||
223 | #if defined(CONFIG_ETRAX_SYNCHRONOUS_SERIAL_PORT1) | ||
224 | if (crisv32_pinmux_alloc_fixed(pinmux_sser1)) | ||
225 | { | ||
226 | printk("Unable to allocate pins for syncrhronous serial port 0\n"); | ||
227 | return -EIO; | ||
228 | } | ||
229 | ports[1].enabled = 1; | ||
230 | initialize_port(1); | ||
231 | #endif | ||
232 | |||
233 | printk("ETRAX FS synchronous serial port driver\n"); | ||
234 | return 0; | ||
235 | } | ||
236 | |||
237 | static void __init initialize_port(int portnbr) | ||
238 | { | ||
239 | struct sync_port* port = &ports[portnbr]; | ||
240 | reg_sser_rw_cfg cfg = {0}; | ||
241 | reg_sser_rw_frm_cfg frm_cfg = {0}; | ||
242 | reg_sser_rw_tr_cfg tr_cfg = {0}; | ||
243 | reg_sser_rw_rec_cfg rec_cfg = {0}; | ||
244 | |||
245 | DEBUG(printk("Init sync serial port %d\n", portnbr)); | ||
246 | |||
247 | port->port_nbr = portnbr; | ||
248 | port->init_irqs = 1; | ||
249 | |||
250 | port->outp = port->out_buffer; | ||
251 | port->output = 1; | ||
252 | port->input = 0; | ||
253 | |||
254 | port->readp = port->flip; | ||
255 | port->writep = port->flip; | ||
256 | port->in_buffer_size = IN_BUFFER_SIZE; | ||
257 | port->inbufchunk = IN_DESCR_SIZE; | ||
258 | port->next_rx_desc = &port->in_descr[0]; | ||
259 | port->prev_rx_desc = &port->in_descr[NUM_IN_DESCR-1]; | ||
260 | port->prev_rx_desc->eol = 1; | ||
261 | |||
262 | init_waitqueue_head(&port->out_wait_q); | ||
263 | init_waitqueue_head(&port->in_wait_q); | ||
264 | |||
265 | spin_lock_init(&port->lock); | ||
266 | |||
267 | cfg.out_clk_src = regk_sser_intern_clk; | ||
268 | cfg.out_clk_pol = regk_sser_pos; | ||
269 | cfg.clk_od_mode = regk_sser_no; | ||
270 | cfg.clk_dir = regk_sser_out; | ||
271 | cfg.gate_clk = regk_sser_no; | ||
272 | cfg.base_freq = regk_sser_f29_493; | ||
273 | cfg.clk_div = 256; | ||
274 | REG_WR(sser, port->regi_sser, rw_cfg, cfg); | ||
275 | |||
276 | frm_cfg.wordrate = DEFAULT_WORD_RATE; | ||
277 | frm_cfg.type = regk_sser_edge; | ||
278 | frm_cfg.frame_pin_dir = regk_sser_out; | ||
279 | frm_cfg.frame_pin_use = regk_sser_frm; | ||
280 | frm_cfg.status_pin_dir = regk_sser_in; | ||
281 | frm_cfg.status_pin_use = regk_sser_hold; | ||
282 | frm_cfg.out_on = regk_sser_tr; | ||
283 | frm_cfg.tr_delay = 1; | ||
284 | REG_WR(sser, port->regi_sser, rw_frm_cfg, frm_cfg); | ||
285 | |||
286 | tr_cfg.urun_stop = regk_sser_no; | ||
287 | tr_cfg.sample_size = 7; | ||
288 | tr_cfg.sh_dir = regk_sser_msbfirst; | ||
289 | tr_cfg.use_dma = port->use_dma ? regk_sser_yes : regk_sser_no; | ||
290 | tr_cfg.rate_ctrl = regk_sser_bulk; | ||
291 | tr_cfg.data_pin_use = regk_sser_dout; | ||
292 | tr_cfg.bulk_wspace = 1; | ||
293 | REG_WR(sser, port->regi_sser, rw_tr_cfg, tr_cfg); | ||
294 | |||
295 | rec_cfg.sample_size = 7; | ||
296 | rec_cfg.sh_dir = regk_sser_msbfirst; | ||
297 | rec_cfg.use_dma = port->use_dma ? regk_sser_yes : regk_sser_no; | ||
298 | rec_cfg.fifo_thr = regk_sser_inf; | ||
299 | REG_WR(sser, port->regi_sser, rw_rec_cfg, rec_cfg); | ||
300 | } | ||
301 | |||
302 | static inline int sync_data_avail(struct sync_port *port) | ||
303 | { | ||
304 | int avail; | ||
305 | unsigned char *start; | ||
306 | unsigned char *end; | ||
307 | |||
308 | start = (unsigned char*)port->readp; /* cast away volatile */ | ||
309 | end = (unsigned char*)port->writep; /* cast away volatile */ | ||
310 | /* 0123456789 0123456789 | ||
311 | * ----- - ----- | ||
312 | * ^rp ^wp ^wp ^rp | ||
313 | */ | ||
314 | |||
315 | if (end >= start) | ||
316 | avail = end - start; | ||
317 | else | ||
318 | avail = port->in_buffer_size - (start - end); | ||
319 | return avail; | ||
320 | } | ||
321 | |||
322 | static inline int sync_data_avail_to_end(struct sync_port *port) | ||
323 | { | ||
324 | int avail; | ||
325 | unsigned char *start; | ||
326 | unsigned char *end; | ||
327 | |||
328 | start = (unsigned char*)port->readp; /* cast away volatile */ | ||
329 | end = (unsigned char*)port->writep; /* cast away volatile */ | ||
330 | /* 0123456789 0123456789 | ||
331 | * ----- ----- | ||
332 | * ^rp ^wp ^wp ^rp | ||
333 | */ | ||
334 | |||
335 | if (end >= start) | ||
336 | avail = end - start; | ||
337 | else | ||
338 | avail = port->flip + port->in_buffer_size - start; | ||
339 | return avail; | ||
340 | } | ||
341 | |||
342 | static int sync_serial_open(struct inode *inode, struct file *file) | ||
343 | { | ||
344 | int dev = MINOR(inode->i_rdev); | ||
345 | sync_port* port; | ||
346 | reg_dma_rw_cfg cfg = {.en = regk_dma_yes}; | ||
347 | reg_dma_rw_intr_mask intr_mask = {.data = regk_dma_yes}; | ||
348 | |||
349 | DEBUG(printk("Open sync serial port %d\n", dev)); | ||
350 | |||
351 | if (dev < 0 || dev >= NUMBER_OF_PORTS || !ports[dev].enabled) | ||
352 | { | ||
353 | DEBUG(printk("Invalid minor %d\n", dev)); | ||
354 | return -ENODEV; | ||
355 | } | ||
356 | port = &ports[dev]; | ||
357 | /* Allow open this device twice (assuming one reader and one writer) */ | ||
358 | if (port->busy == 2) | ||
359 | { | ||
360 | DEBUG(printk("Device is busy.. \n")); | ||
361 | return -EBUSY; | ||
362 | } | ||
363 | if (port->init_irqs) { | ||
364 | if (port->use_dma) { | ||
365 | if (port == &ports[0]){ | ||
366 | #ifdef SYNC_SER_DMA | ||
367 | if(request_irq(DMA4_INTR_VECT, | ||
368 | tr_interrupt, | ||
369 | 0, | ||
370 | "synchronous serial 0 dma tr", | ||
371 | &ports[0])) { | ||
372 | printk(KERN_CRIT "Can't allocate sync serial port 0 IRQ"); | ||
373 | return -EBUSY; | ||
374 | } else if(request_irq(DMA5_INTR_VECT, | ||
375 | rx_interrupt, | ||
376 | 0, | ||
377 | "synchronous serial 1 dma rx", | ||
378 | &ports[0])) { | ||
379 | free_irq(DMA4_INTR_VECT, &port[0]); | ||
380 | printk(KERN_CRIT "Can't allocate sync serial port 0 IRQ"); | ||
381 | return -EBUSY; | ||
382 | } else if (crisv32_request_dma(SYNC_SER0_TX_DMA_NBR, | ||
383 | "synchronous serial 0 dma tr", | ||
384 | DMA_VERBOSE_ON_ERROR, | ||
385 | 0, | ||
386 | dma_sser0)) { | ||
387 | free_irq(DMA4_INTR_VECT, &port[0]); | ||
388 | free_irq(DMA5_INTR_VECT, &port[0]); | ||
389 | printk(KERN_CRIT "Can't allocate sync serial port 0 TX DMA channel"); | ||
390 | return -EBUSY; | ||
391 | } else if (crisv32_request_dma(SYNC_SER0_RX_DMA_NBR, | ||
392 | "synchronous serial 0 dma rec", | ||
393 | DMA_VERBOSE_ON_ERROR, | ||
394 | 0, | ||
395 | dma_sser0)) { | ||
396 | crisv32_free_dma(SYNC_SER0_TX_DMA_NBR); | ||
397 | free_irq(DMA4_INTR_VECT, &port[0]); | ||
398 | free_irq(DMA5_INTR_VECT, &port[0]); | ||
399 | printk(KERN_CRIT "Can't allocate sync serial port 1 RX DMA channel"); | ||
400 | return -EBUSY; | ||
401 | } | ||
402 | #endif | ||
403 | } | ||
404 | else if (port == &ports[1]){ | ||
405 | #ifdef SYNC_SER_DMA | ||
406 | if (request_irq(DMA6_INTR_VECT, | ||
407 | tr_interrupt, | ||
408 | 0, | ||
409 | "synchronous serial 1 dma tr", | ||
410 | &ports[1])) { | ||
411 | printk(KERN_CRIT "Can't allocate sync serial port 1 IRQ"); | ||
412 | return -EBUSY; | ||
413 | } else if (request_irq(DMA7_INTR_VECT, | ||
414 | rx_interrupt, | ||
415 | 0, | ||
416 | "synchronous serial 1 dma rx", | ||
417 | &ports[1])) { | ||
418 | free_irq(DMA6_INTR_VECT, &ports[1]); | ||
419 | printk(KERN_CRIT "Can't allocate sync serial port 3 IRQ"); | ||
420 | return -EBUSY; | ||
421 | } else if (crisv32_request_dma(SYNC_SER1_TX_DMA_NBR, | ||
422 | "synchronous serial 1 dma tr", | ||
423 | DMA_VERBOSE_ON_ERROR, | ||
424 | 0, | ||
425 | dma_sser1)) { | ||
426 | free_irq(21, &ports[1]); | ||
427 | free_irq(20, &ports[1]); | ||
428 | printk(KERN_CRIT "Can't allocate sync serial port 3 TX DMA channel"); | ||
429 | return -EBUSY; | ||
430 | } else if (crisv32_request_dma(SYNC_SER1_RX_DMA_NBR, | ||
431 | "synchronous serial 3 dma rec", | ||
432 | DMA_VERBOSE_ON_ERROR, | ||
433 | 0, | ||
434 | dma_sser1)) { | ||
435 | crisv32_free_dma(SYNC_SER1_TX_DMA_NBR); | ||
436 | free_irq(DMA6_INTR_VECT, &ports[1]); | ||
437 | free_irq(DMA7_INTR_VECT, &ports[1]); | ||
438 | printk(KERN_CRIT "Can't allocate sync serial port 3 RX DMA channel"); | ||
439 | return -EBUSY; | ||
440 | } | ||
441 | #endif | ||
442 | } | ||
443 | |||
444 | /* Enable DMAs */ | ||
445 | REG_WR(dma, port->regi_dmain, rw_cfg, cfg); | ||
446 | REG_WR(dma, port->regi_dmaout, rw_cfg, cfg); | ||
447 | /* Enable DMA IRQs */ | ||
448 | REG_WR(dma, port->regi_dmain, rw_intr_mask, intr_mask); | ||
449 | REG_WR(dma, port->regi_dmaout, rw_intr_mask, intr_mask); | ||
450 | /* Set up wordsize = 2 for DMAs. */ | ||
451 | DMA_WR_CMD (port->regi_dmain, regk_dma_set_w_size1); | ||
452 | DMA_WR_CMD (port->regi_dmaout, regk_dma_set_w_size1); | ||
453 | |||
454 | start_dma_in(port); | ||
455 | port->init_irqs = 0; | ||
456 | } else { /* !port->use_dma */ | ||
457 | #ifdef SYNC_SER_MANUAL | ||
458 | if (port == &ports[0]) { | ||
459 | if (request_irq(SSER0_INTR_VECT, | ||
460 | manual_interrupt, | ||
461 | 0, | ||
462 | "synchronous serial manual irq", | ||
463 | &ports[0])) { | ||
464 | printk("Can't allocate sync serial manual irq"); | ||
465 | return -EBUSY; | ||
466 | } | ||
467 | } else if (port == &ports[1]) { | ||
468 | if (request_irq(SSER1_INTR_VECT, | ||
469 | manual_interrupt, | ||
470 | 0, | ||
471 | "synchronous serial manual irq", | ||
472 | &ports[1])) { | ||
473 | printk(KERN_CRIT "Can't allocate sync serial manual irq"); | ||
474 | return -EBUSY; | ||
475 | } | ||
476 | } | ||
477 | port->init_irqs = 0; | ||
478 | #else | ||
479 | panic("sync_serial: Manual mode not supported.\n"); | ||
480 | #endif /* SYNC_SER_MANUAL */ | ||
481 | } | ||
482 | } /* port->init_irqs */ | ||
483 | |||
484 | port->busy++; | ||
485 | return 0; | ||
486 | } | ||
487 | |||
488 | static int sync_serial_release(struct inode *inode, struct file *file) | ||
489 | { | ||
490 | int dev = MINOR(inode->i_rdev); | ||
491 | sync_port* port; | ||
492 | |||
493 | if (dev < 0 || dev >= NUMBER_OF_PORTS || !ports[dev].enabled) | ||
494 | { | ||
495 | DEBUG(printk("Invalid minor %d\n", dev)); | ||
496 | return -ENODEV; | ||
497 | } | ||
498 | port = &ports[dev]; | ||
499 | if (port->busy) | ||
500 | port->busy--; | ||
501 | if (!port->busy) | ||
502 | /* XXX */ ; | ||
503 | return 0; | ||
504 | } | ||
505 | |||
506 | static unsigned int sync_serial_poll(struct file *file, poll_table *wait) | ||
507 | { | ||
508 | int dev = MINOR(file->f_dentry->d_inode->i_rdev); | ||
509 | unsigned int mask = 0; | ||
510 | sync_port* port; | ||
511 | DEBUGPOLL( static unsigned int prev_mask = 0; ); | ||
512 | |||
513 | port = &ports[dev]; | ||
514 | poll_wait(file, &port->out_wait_q, wait); | ||
515 | poll_wait(file, &port->in_wait_q, wait); | ||
516 | /* Some room to write */ | ||
517 | if (port->out_count < OUT_BUFFER_SIZE) | ||
518 | mask |= POLLOUT | POLLWRNORM; | ||
519 | /* At least an inbufchunk of data */ | ||
520 | if (sync_data_avail(port) >= port->inbufchunk) | ||
521 | mask |= POLLIN | POLLRDNORM; | ||
522 | |||
523 | DEBUGPOLL(if (mask != prev_mask) | ||
524 | printk("sync_serial_poll: mask 0x%08X %s %s\n", mask, | ||
525 | mask&POLLOUT?"POLLOUT":"", mask&POLLIN?"POLLIN":""); | ||
526 | prev_mask = mask; | ||
527 | ); | ||
528 | return mask; | ||
529 | } | ||
530 | |||
531 | static int sync_serial_ioctl(struct inode *inode, struct file *file, | ||
532 | unsigned int cmd, unsigned long arg) | ||
533 | { | ||
534 | int return_val = 0; | ||
535 | int dev = MINOR(file->f_dentry->d_inode->i_rdev); | ||
536 | sync_port* port; | ||
537 | reg_sser_rw_tr_cfg tr_cfg; | ||
538 | reg_sser_rw_rec_cfg rec_cfg; | ||
539 | reg_sser_rw_frm_cfg frm_cfg; | ||
540 | reg_sser_rw_cfg gen_cfg; | ||
541 | reg_sser_rw_intr_mask intr_mask; | ||
542 | |||
543 | if (dev < 0 || dev >= NUMBER_OF_PORTS || !ports[dev].enabled) | ||
544 | { | ||
545 | DEBUG(printk("Invalid minor %d\n", dev)); | ||
546 | return -1; | ||
547 | } | ||
548 | port = &ports[dev]; | ||
549 | spin_lock_irq(&port->lock); | ||
550 | |||
551 | tr_cfg = REG_RD(sser, port->regi_sser, rw_tr_cfg); | ||
552 | rec_cfg = REG_RD(sser, port->regi_sser, rw_rec_cfg); | ||
553 | frm_cfg = REG_RD(sser, port->regi_sser, rw_frm_cfg); | ||
554 | gen_cfg = REG_RD(sser, port->regi_sser, rw_cfg); | ||
555 | intr_mask = REG_RD(sser, port->regi_sser, rw_intr_mask); | ||
556 | |||
557 | switch(cmd) | ||
558 | { | ||
559 | case SSP_SPEED: | ||
560 | if (GET_SPEED(arg) == CODEC) | ||
561 | { | ||
562 | gen_cfg.base_freq = regk_sser_f32; | ||
563 | /* FREQ = 0 => 4 MHz => clk_div = 7*/ | ||
564 | gen_cfg.clk_div = 6 + (1 << GET_FREQ(arg)); | ||
565 | } | ||
566 | else | ||
567 | { | ||
568 | gen_cfg.base_freq = regk_sser_f29_493; | ||
569 | switch (GET_SPEED(arg)) | ||
570 | { | ||
571 | case SSP150: | ||
572 | gen_cfg.clk_div = 29493000 / (150 * 8) - 1; | ||
573 | break; | ||
574 | case SSP300: | ||
575 | gen_cfg.clk_div = 29493000 / (300 * 8) - 1; | ||
576 | break; | ||
577 | case SSP600: | ||
578 | gen_cfg.clk_div = 29493000 / (600 * 8) - 1; | ||
579 | break; | ||
580 | case SSP1200: | ||
581 | gen_cfg.clk_div = 29493000 / (1200 * 8) - 1; | ||
582 | break; | ||
583 | case SSP2400: | ||
584 | gen_cfg.clk_div = 29493000 / (2400 * 8) - 1; | ||
585 | break; | ||
586 | case SSP4800: | ||
587 | gen_cfg.clk_div = 29493000 / (4800 * 8) - 1; | ||
588 | break; | ||
589 | case SSP9600: | ||
590 | gen_cfg.clk_div = 29493000 / (9600 * 8) - 1; | ||
591 | break; | ||
592 | case SSP19200: | ||
593 | gen_cfg.clk_div = 29493000 / (19200 * 8) - 1; | ||
594 | break; | ||
595 | case SSP28800: | ||
596 | gen_cfg.clk_div = 29493000 / (28800 * 8) - 1; | ||
597 | break; | ||
598 | case SSP57600: | ||
599 | gen_cfg.clk_div = 29493000 / (57600 * 8) - 1; | ||
600 | break; | ||
601 | case SSP115200: | ||
602 | gen_cfg.clk_div = 29493000 / (115200 * 8) - 1; | ||
603 | break; | ||
604 | case SSP230400: | ||
605 | gen_cfg.clk_div = 29493000 / (230400 * 8) - 1; | ||
606 | break; | ||
607 | case SSP460800: | ||
608 | gen_cfg.clk_div = 29493000 / (460800 * 8) - 1; | ||
609 | break; | ||
610 | case SSP921600: | ||
611 | gen_cfg.clk_div = 29493000 / (921600 * 8) - 1; | ||
612 | break; | ||
613 | case SSP3125000: | ||
614 | gen_cfg.base_freq = regk_sser_f100; | ||
615 | gen_cfg.clk_div = 100000000 / (3125000 * 8) - 1; | ||
616 | break; | ||
617 | |||
618 | } | ||
619 | } | ||
620 | frm_cfg.wordrate = GET_WORD_RATE(arg); | ||
621 | |||
622 | break; | ||
623 | case SSP_MODE: | ||
624 | switch(arg) | ||
625 | { | ||
626 | case MASTER_OUTPUT: | ||
627 | port->output = 1; | ||
628 | port->input = 0; | ||
629 | gen_cfg.clk_dir = regk_sser_out; | ||
630 | break; | ||
631 | case SLAVE_OUTPUT: | ||
632 | port->output = 1; | ||
633 | port->input = 0; | ||
634 | gen_cfg.clk_dir = regk_sser_in; | ||
635 | break; | ||
636 | case MASTER_INPUT: | ||
637 | port->output = 0; | ||
638 | port->input = 1; | ||
639 | gen_cfg.clk_dir = regk_sser_out; | ||
640 | break; | ||
641 | case SLAVE_INPUT: | ||
642 | port->output = 0; | ||
643 | port->input = 1; | ||
644 | gen_cfg.clk_dir = regk_sser_in; | ||
645 | break; | ||
646 | case MASTER_BIDIR: | ||
647 | port->output = 1; | ||
648 | port->input = 1; | ||
649 | gen_cfg.clk_dir = regk_sser_out; | ||
650 | break; | ||
651 | case SLAVE_BIDIR: | ||
652 | port->output = 1; | ||
653 | port->input = 1; | ||
654 | gen_cfg.clk_dir = regk_sser_in; | ||
655 | break; | ||
656 | default: | ||
657 | spin_unlock_irq(&port->lock); | ||
658 | return -EINVAL; | ||
659 | |||
660 | } | ||
661 | if (!port->use_dma || (arg == MASTER_OUTPUT || arg == SLAVE_OUTPUT)) | ||
662 | intr_mask.rdav = regk_sser_yes; | ||
663 | break; | ||
664 | case SSP_FRAME_SYNC: | ||
665 | if (arg & NORMAL_SYNC) | ||
666 | frm_cfg.tr_delay = 1; | ||
667 | else if (arg & EARLY_SYNC) | ||
668 | frm_cfg.tr_delay = 0; | ||
669 | |||
670 | tr_cfg.bulk_wspace = frm_cfg.tr_delay; | ||
671 | frm_cfg.early_wend = regk_sser_yes; | ||
672 | if (arg & BIT_SYNC) | ||
673 | frm_cfg.type = regk_sser_edge; | ||
674 | else if (arg & WORD_SYNC) | ||
675 | frm_cfg.type = regk_sser_level; | ||
676 | else if (arg & EXTENDED_SYNC) | ||
677 | frm_cfg.early_wend = regk_sser_no; | ||
678 | |||
679 | if (arg & SYNC_ON) | ||
680 | frm_cfg.frame_pin_use = regk_sser_frm; | ||
681 | else if (arg & SYNC_OFF) | ||
682 | frm_cfg.frame_pin_use = regk_sser_gio0; | ||
683 | |||
684 | if (arg & WORD_SIZE_8) | ||
685 | rec_cfg.sample_size = tr_cfg.sample_size = 7; | ||
686 | else if (arg & WORD_SIZE_12) | ||
687 | rec_cfg.sample_size = tr_cfg.sample_size = 11; | ||
688 | else if (arg & WORD_SIZE_16) | ||
689 | rec_cfg.sample_size = tr_cfg.sample_size = 15; | ||
690 | else if (arg & WORD_SIZE_24) | ||
691 | rec_cfg.sample_size = tr_cfg.sample_size = 23; | ||
692 | else if (arg & WORD_SIZE_32) | ||
693 | rec_cfg.sample_size = tr_cfg.sample_size = 31; | ||
694 | |||
695 | if (arg & BIT_ORDER_MSB) | ||
696 | rec_cfg.sh_dir = tr_cfg.sh_dir = regk_sser_msbfirst; | ||
697 | else if (arg & BIT_ORDER_LSB) | ||
698 | rec_cfg.sh_dir = tr_cfg.sh_dir = regk_sser_lsbfirst; | ||
699 | |||
700 | if (arg & FLOW_CONTROL_ENABLE) | ||
701 | rec_cfg.fifo_thr = regk_sser_thr16; | ||
702 | else if (arg & FLOW_CONTROL_DISABLE) | ||
703 | rec_cfg.fifo_thr = regk_sser_inf; | ||
704 | |||
705 | if (arg & CLOCK_NOT_GATED) | ||
706 | gen_cfg.gate_clk = regk_sser_no; | ||
707 | else if (arg & CLOCK_GATED) | ||
708 | gen_cfg.gate_clk = regk_sser_yes; | ||
709 | |||
710 | break; | ||
711 | case SSP_IPOLARITY: | ||
712 | /* NOTE!! negedge is considered NORMAL */ | ||
713 | if (arg & CLOCK_NORMAL) | ||
714 | rec_cfg.clk_pol = regk_sser_neg; | ||
715 | else if (arg & CLOCK_INVERT) | ||
716 | rec_cfg.clk_pol = regk_sser_pos; | ||
717 | |||
718 | if (arg & FRAME_NORMAL) | ||
719 | frm_cfg.level = regk_sser_pos_hi; | ||
720 | else if (arg & FRAME_INVERT) | ||
721 | frm_cfg.level = regk_sser_neg_lo; | ||
722 | |||
723 | if (arg & STATUS_NORMAL) | ||
724 | gen_cfg.hold_pol = regk_sser_pos; | ||
725 | else if (arg & STATUS_INVERT) | ||
726 | gen_cfg.hold_pol = regk_sser_neg; | ||
727 | break; | ||
728 | case SSP_OPOLARITY: | ||
729 | if (arg & CLOCK_NORMAL) | ||
730 | gen_cfg.out_clk_pol = regk_sser_neg; | ||
731 | else if (arg & CLOCK_INVERT) | ||
732 | gen_cfg.out_clk_pol = regk_sser_pos; | ||
733 | |||
734 | if (arg & FRAME_NORMAL) | ||
735 | frm_cfg.level = regk_sser_pos_hi; | ||
736 | else if (arg & FRAME_INVERT) | ||
737 | frm_cfg.level = regk_sser_neg_lo; | ||
738 | |||
739 | if (arg & STATUS_NORMAL) | ||
740 | gen_cfg.hold_pol = regk_sser_pos; | ||
741 | else if (arg & STATUS_INVERT) | ||
742 | gen_cfg.hold_pol = regk_sser_neg; | ||
743 | break; | ||
744 | case SSP_SPI: | ||
745 | rec_cfg.fifo_thr = regk_sser_inf; | ||
746 | rec_cfg.sh_dir = tr_cfg.sh_dir = regk_sser_msbfirst; | ||
747 | rec_cfg.sample_size = tr_cfg.sample_size = 7; | ||
748 | frm_cfg.frame_pin_use = regk_sser_frm; | ||
749 | frm_cfg.type = regk_sser_level; | ||
750 | frm_cfg.tr_delay = 1; | ||
751 | frm_cfg.level = regk_sser_neg_lo; | ||
752 | if (arg & SPI_SLAVE) | ||
753 | { | ||
754 | rec_cfg.clk_pol = regk_sser_neg; | ||
755 | gen_cfg.clk_dir = regk_sser_in; | ||
756 | port->input = 1; | ||
757 | port->output = 0; | ||
758 | } | ||
759 | else | ||
760 | { | ||
761 | gen_cfg.out_clk_pol = regk_sser_pos; | ||
762 | port->input = 0; | ||
763 | port->output = 1; | ||
764 | gen_cfg.clk_dir = regk_sser_out; | ||
765 | } | ||
766 | break; | ||
767 | case SSP_INBUFCHUNK: | ||
768 | break; | ||
769 | default: | ||
770 | return_val = -1; | ||
771 | } | ||
772 | |||
773 | |||
774 | if (port->started) | ||
775 | { | ||
776 | tr_cfg.tr_en = port->output; | ||
777 | rec_cfg.rec_en = port->input; | ||
778 | } | ||
779 | |||
780 | REG_WR(sser, port->regi_sser, rw_tr_cfg, tr_cfg); | ||
781 | REG_WR(sser, port->regi_sser, rw_rec_cfg, rec_cfg); | ||
782 | REG_WR(sser, port->regi_sser, rw_frm_cfg, frm_cfg); | ||
783 | REG_WR(sser, port->regi_sser, rw_intr_mask, intr_mask); | ||
784 | REG_WR(sser, port->regi_sser, rw_cfg, gen_cfg); | ||
785 | |||
786 | spin_unlock_irq(&port->lock); | ||
787 | return return_val; | ||
788 | } | ||
789 | |||
790 | static ssize_t sync_serial_write(struct file * file, const char * buf, | ||
791 | size_t count, loff_t *ppos) | ||
792 | { | ||
793 | int dev = MINOR(file->f_dentry->d_inode->i_rdev); | ||
794 | DECLARE_WAITQUEUE(wait, current); | ||
795 | sync_port *port; | ||
796 | unsigned long c, c1; | ||
797 | unsigned long free_outp; | ||
798 | unsigned long outp; | ||
799 | unsigned long out_buffer; | ||
800 | unsigned long flags; | ||
801 | |||
802 | if (dev < 0 || dev >= NUMBER_OF_PORTS || !ports[dev].enabled) | ||
803 | { | ||
804 | DEBUG(printk("Invalid minor %d\n", dev)); | ||
805 | return -ENODEV; | ||
806 | } | ||
807 | port = &ports[dev]; | ||
808 | |||
809 | DEBUGWRITE(printk("W d%d c %lu (%d/%d)\n", port->port_nbr, count, port->out_count, OUT_BUFFER_SIZE)); | ||
810 | /* Space to end of buffer */ | ||
811 | /* | ||
812 | * out_buffer <c1>012345<- c ->OUT_BUFFER_SIZE | ||
813 | * outp^ +out_count | ||
814 | ^free_outp | ||
815 | * out_buffer 45<- c ->0123OUT_BUFFER_SIZE | ||
816 | * +out_count outp^ | ||
817 | * free_outp | ||
818 | * | ||
819 | */ | ||
820 | |||
821 | /* Read variables that may be updated by interrupts */ | ||
822 | spin_lock_irqsave(&port->lock, flags); | ||
823 | count = count > OUT_BUFFER_SIZE - port->out_count ? OUT_BUFFER_SIZE - port->out_count : count; | ||
824 | outp = (unsigned long)port->outp; | ||
825 | free_outp = outp + port->out_count; | ||
826 | spin_unlock_irqrestore(&port->lock, flags); | ||
827 | out_buffer = (unsigned long)port->out_buffer; | ||
828 | |||
829 | /* Find out where and how much to write */ | ||
830 | if (free_outp >= out_buffer + OUT_BUFFER_SIZE) | ||
831 | free_outp -= OUT_BUFFER_SIZE; | ||
832 | if (free_outp >= outp) | ||
833 | c = out_buffer + OUT_BUFFER_SIZE - free_outp; | ||
834 | else | ||
835 | c = outp - free_outp; | ||
836 | if (c > count) | ||
837 | c = count; | ||
838 | |||
839 | // DEBUGWRITE(printk("w op %08lX fop %08lX c %lu\n", outp, free_outp, c)); | ||
840 | if (copy_from_user((void*)free_outp, buf, c)) | ||
841 | return -EFAULT; | ||
842 | |||
843 | if (c != count) { | ||
844 | buf += c; | ||
845 | c1 = count - c; | ||
846 | DEBUGWRITE(printk("w2 fi %lu c %lu c1 %lu\n", free_outp-out_buffer, c, c1)); | ||
847 | if (copy_from_user((void*)out_buffer, buf, c1)) | ||
848 | return -EFAULT; | ||
849 | } | ||
850 | spin_lock_irqsave(&port->lock, flags); | ||
851 | port->out_count += count; | ||
852 | spin_unlock_irqrestore(&port->lock, flags); | ||
853 | |||
854 | /* Make sure transmitter/receiver is running */ | ||
855 | if (!port->started) | ||
856 | { | ||
857 | reg_sser_rw_cfg cfg = REG_RD(sser, port->regi_sser, rw_cfg); | ||
858 | reg_sser_rw_tr_cfg tr_cfg = REG_RD(sser, port->regi_sser, rw_tr_cfg); | ||
859 | reg_sser_rw_rec_cfg rec_cfg = REG_RD(sser, port->regi_sser, rw_rec_cfg); | ||
860 | cfg.en = regk_sser_yes; | ||
861 | tr_cfg.tr_en = port->output; | ||
862 | rec_cfg.rec_en = port->input; | ||
863 | REG_WR(sser, port->regi_sser, rw_cfg, cfg); | ||
864 | REG_WR(sser, port->regi_sser, rw_tr_cfg, tr_cfg); | ||
865 | REG_WR(sser, port->regi_sser, rw_rec_cfg, rec_cfg); | ||
866 | port->started = 1; | ||
867 | } | ||
868 | |||
869 | if (file->f_flags & O_NONBLOCK) { | ||
870 | spin_lock_irqsave(&port->lock, flags); | ||
871 | if (!port->tr_running) { | ||
872 | if (!port->use_dma) { | ||
873 | reg_sser_rw_intr_mask intr_mask; | ||
874 | intr_mask = REG_RD(sser, port->regi_sser, rw_intr_mask); | ||
875 | /* Start sender by writing data */ | ||
876 | send_word(port); | ||
877 | /* and enable transmitter ready IRQ */ | ||
878 | intr_mask.trdy = 1; | ||
879 | REG_WR(sser, port->regi_sser, rw_intr_mask, intr_mask); | ||
880 | } else { | ||
881 | start_dma(port, (unsigned char* volatile )port->outp, c); | ||
882 | } | ||
883 | } | ||
884 | spin_unlock_irqrestore(&port->lock, flags); | ||
885 | DEBUGWRITE(printk("w d%d c %lu NB\n", | ||
886 | port->port_nbr, count)); | ||
887 | return count; | ||
888 | } | ||
889 | |||
890 | /* Sleep until all sent */ | ||
891 | |||
892 | add_wait_queue(&port->out_wait_q, &wait); | ||
893 | set_current_state(TASK_INTERRUPTIBLE); | ||
894 | spin_lock_irqsave(&port->lock, flags); | ||
895 | if (!port->tr_running) { | ||
896 | if (!port->use_dma) { | ||
897 | reg_sser_rw_intr_mask intr_mask; | ||
898 | intr_mask = REG_RD(sser, port->regi_sser, rw_intr_mask); | ||
899 | /* Start sender by writing data */ | ||
900 | send_word(port); | ||
901 | /* and enable transmitter ready IRQ */ | ||
902 | intr_mask.trdy = 1; | ||
903 | REG_WR(sser, port->regi_sser, rw_intr_mask, intr_mask); | ||
904 | } else { | ||
905 | start_dma(port, port->outp, c); | ||
906 | } | ||
907 | } | ||
908 | spin_unlock_irqrestore(&port->lock, flags); | ||
909 | schedule(); | ||
910 | set_current_state(TASK_RUNNING); | ||
911 | remove_wait_queue(&port->out_wait_q, &wait); | ||
912 | if (signal_pending(current)) | ||
913 | { | ||
914 | return -EINTR; | ||
915 | } | ||
916 | DEBUGWRITE(printk("w d%d c %lu\n", port->port_nbr, count)); | ||
917 | return count; | ||
918 | } | ||
919 | |||
920 | static ssize_t sync_serial_read(struct file * file, char * buf, | ||
921 | size_t count, loff_t *ppos) | ||
922 | { | ||
923 | int dev = MINOR(file->f_dentry->d_inode->i_rdev); | ||
924 | int avail; | ||
925 | sync_port *port; | ||
926 | unsigned char* start; | ||
927 | unsigned char* end; | ||
928 | unsigned long flags; | ||
929 | |||
930 | if (dev < 0 || dev >= NUMBER_OF_PORTS || !ports[dev].enabled) | ||
931 | { | ||
932 | DEBUG(printk("Invalid minor %d\n", dev)); | ||
933 | return -ENODEV; | ||
934 | } | ||
935 | port = &ports[dev]; | ||
936 | |||
937 | DEBUGREAD(printk("R%d c %d ri %lu wi %lu /%lu\n", dev, count, port->readp - port->flip, port->writep - port->flip, port->in_buffer_size)); | ||
938 | |||
939 | if (!port->started) | ||
940 | { | ||
941 | reg_sser_rw_cfg cfg = REG_RD(sser, port->regi_sser, rw_cfg); | ||
942 | reg_sser_rw_tr_cfg tr_cfg = REG_RD(sser, port->regi_sser, rw_tr_cfg); | ||
943 | reg_sser_rw_rec_cfg rec_cfg = REG_RD(sser, port->regi_sser, rw_rec_cfg); | ||
944 | cfg.en = regk_sser_yes; | ||
945 | tr_cfg.tr_en = regk_sser_yes; | ||
946 | rec_cfg.rec_en = regk_sser_yes; | ||
947 | REG_WR(sser, port->regi_sser, rw_cfg, cfg); | ||
948 | REG_WR(sser, port->regi_sser, rw_tr_cfg, tr_cfg); | ||
949 | REG_WR(sser, port->regi_sser, rw_rec_cfg, rec_cfg); | ||
950 | port->started = 1; | ||
951 | } | ||
952 | |||
953 | |||
954 | /* Calculate number of available bytes */ | ||
955 | /* Save pointers to avoid that they are modified by interrupt */ | ||
956 | spin_lock_irqsave(&port->lock, flags); | ||
957 | start = (unsigned char*)port->readp; /* cast away volatile */ | ||
958 | end = (unsigned char*)port->writep; /* cast away volatile */ | ||
959 | spin_unlock_irqrestore(&port->lock, flags); | ||
960 | while ((start == end) && !port->full) /* No data */ | ||
961 | { | ||
962 | if (file->f_flags & O_NONBLOCK) | ||
963 | { | ||
964 | return -EAGAIN; | ||
965 | } | ||
966 | |||
967 | interruptible_sleep_on(&port->in_wait_q); | ||
968 | if (signal_pending(current)) | ||
969 | { | ||
970 | return -EINTR; | ||
971 | } | ||
972 | spin_lock_irqsave(&port->lock, flags); | ||
973 | start = (unsigned char*)port->readp; /* cast away volatile */ | ||
974 | end = (unsigned char*)port->writep; /* cast away volatile */ | ||
975 | spin_unlock_irqrestore(&port->lock, flags); | ||
976 | } | ||
977 | |||
978 | /* Lazy read, never return wrapped data. */ | ||
979 | if (port->full) | ||
980 | avail = port->in_buffer_size; | ||
981 | else if (end > start) | ||
982 | avail = end - start; | ||
983 | else | ||
984 | avail = port->flip + port->in_buffer_size - start; | ||
985 | |||
986 | count = count > avail ? avail : count; | ||
987 | if (copy_to_user(buf, start, count)) | ||
988 | return -EFAULT; | ||
989 | /* Disable interrupts while updating readp */ | ||
990 | spin_lock_irqsave(&port->lock, flags); | ||
991 | port->readp += count; | ||
992 | if (port->readp >= port->flip + port->in_buffer_size) /* Wrap? */ | ||
993 | port->readp = port->flip; | ||
994 | port->full = 0; | ||
995 | spin_unlock_irqrestore(&port->lock, flags); | ||
996 | DEBUGREAD(printk("r %d\n", count)); | ||
997 | return count; | ||
998 | } | ||
999 | |||
1000 | static void send_word(sync_port* port) | ||
1001 | { | ||
1002 | reg_sser_rw_tr_cfg tr_cfg = REG_RD(sser, port->regi_sser, rw_tr_cfg); | ||
1003 | reg_sser_rw_tr_data tr_data = {0}; | ||
1004 | |||
1005 | switch(tr_cfg.sample_size) | ||
1006 | { | ||
1007 | case 8: | ||
1008 | port->out_count--; | ||
1009 | tr_data.data = *port->outp++; | ||
1010 | REG_WR(sser, port->regi_sser, rw_tr_data, tr_data); | ||
1011 | if (port->outp >= port->out_buffer + OUT_BUFFER_SIZE) | ||
1012 | port->outp = port->out_buffer; | ||
1013 | break; | ||
1014 | case 12: | ||
1015 | { | ||
1016 | int data = (*port->outp++) << 8; | ||
1017 | data |= *port->outp++; | ||
1018 | port->out_count-=2; | ||
1019 | tr_data.data = data; | ||
1020 | REG_WR(sser, port->regi_sser, rw_tr_data, tr_data); | ||
1021 | if (port->outp >= port->out_buffer + OUT_BUFFER_SIZE) | ||
1022 | port->outp = port->out_buffer; | ||
1023 | } | ||
1024 | break; | ||
1025 | case 16: | ||
1026 | port->out_count-=2; | ||
1027 | tr_data.data = *(unsigned short *)port->outp; | ||
1028 | REG_WR(sser, port->regi_sser, rw_tr_data, tr_data); | ||
1029 | port->outp+=2; | ||
1030 | if (port->outp >= port->out_buffer + OUT_BUFFER_SIZE) | ||
1031 | port->outp = port->out_buffer; | ||
1032 | break; | ||
1033 | case 24: | ||
1034 | port->out_count-=3; | ||
1035 | tr_data.data = *(unsigned short *)port->outp; | ||
1036 | REG_WR(sser, port->regi_sser, rw_tr_data, tr_data); | ||
1037 | port->outp+=2; | ||
1038 | tr_data.data = *port->outp++; | ||
1039 | REG_WR(sser, port->regi_sser, rw_tr_data, tr_data); | ||
1040 | if (port->outp >= port->out_buffer + OUT_BUFFER_SIZE) | ||
1041 | port->outp = port->out_buffer; | ||
1042 | break; | ||
1043 | case 32: | ||
1044 | port->out_count-=4; | ||
1045 | tr_data.data = *(unsigned short *)port->outp; | ||
1046 | REG_WR(sser, port->regi_sser, rw_tr_data, tr_data); | ||
1047 | port->outp+=2; | ||
1048 | tr_data.data = *(unsigned short *)port->outp; | ||
1049 | REG_WR(sser, port->regi_sser, rw_tr_data, tr_data); | ||
1050 | port->outp+=2; | ||
1051 | if (port->outp >= port->out_buffer + OUT_BUFFER_SIZE) | ||
1052 | port->outp = port->out_buffer; | ||
1053 | break; | ||
1054 | } | ||
1055 | } | ||
1056 | |||
1057 | |||
1058 | static void start_dma(struct sync_port* port, const char* data, int count) | ||
1059 | { | ||
1060 | port->tr_running = 1; | ||
1061 | port->out_descr.buf = (char*)virt_to_phys((char*)data); | ||
1062 | port->out_descr.after = port->out_descr.buf + count; | ||
1063 | port->out_descr.eol = port->out_descr.intr = 1; | ||
1064 | |||
1065 | port->out_context.saved_data = (dma_descr_data*)virt_to_phys(&port->out_descr); | ||
1066 | port->out_context.saved_data_buf = port->out_descr.buf; | ||
1067 | |||
1068 | DMA_START_CONTEXT(port->regi_dmaout, virt_to_phys((char*)&port->out_context)); | ||
1069 | DEBUGTXINT(printk("dma %08lX c %d\n", (unsigned long)data, count)); | ||
1070 | } | ||
1071 | |||
1072 | static void start_dma_in(sync_port* port) | ||
1073 | { | ||
1074 | int i; | ||
1075 | char* buf; | ||
1076 | port->writep = port->flip; | ||
1077 | |||
1078 | if (port->writep > port->flip + port->in_buffer_size) | ||
1079 | { | ||
1080 | panic("Offset too large in sync serial driver\n"); | ||
1081 | return; | ||
1082 | } | ||
1083 | buf = (char*)virt_to_phys(port->in_buffer); | ||
1084 | for (i = 0; i < NUM_IN_DESCR; i++) { | ||
1085 | port->in_descr[i].buf = buf; | ||
1086 | port->in_descr[i].after = buf + port->inbufchunk; | ||
1087 | port->in_descr[i].intr = 1; | ||
1088 | port->in_descr[i].next = (dma_descr_data*)virt_to_phys(&port->in_descr[i+1]); | ||
1089 | port->in_descr[i].buf = buf; | ||
1090 | buf += port->inbufchunk; | ||
1091 | } | ||
1092 | /* Link the last descriptor to the first */ | ||
1093 | port->in_descr[i-1].next = (dma_descr_data*)virt_to_phys(&port->in_descr[0]); | ||
1094 | port->in_descr[i-1].eol = regk_sser_yes; | ||
1095 | port->next_rx_desc = &port->in_descr[0]; | ||
1096 | port->prev_rx_desc = &port->in_descr[NUM_IN_DESCR - 1]; | ||
1097 | port->in_context.saved_data = (dma_descr_data*)virt_to_phys(&port->in_descr[0]); | ||
1098 | port->in_context.saved_data_buf = port->in_descr[0].buf; | ||
1099 | DMA_START_CONTEXT(port->regi_dmain, virt_to_phys(&port->in_context)); | ||
1100 | } | ||
1101 | |||
1102 | #ifdef SYNC_SER_DMA | ||
1103 | static irqreturn_t tr_interrupt(int irq, void *dev_id, struct pt_regs * regs) | ||
1104 | { | ||
1105 | reg_dma_r_masked_intr masked; | ||
1106 | reg_dma_rw_ack_intr ack_intr = {.data = regk_dma_yes}; | ||
1107 | int i; | ||
1108 | struct dma_descr_data *descr; | ||
1109 | unsigned int sentl; | ||
1110 | int found = 0; | ||
1111 | |||
1112 | for (i = 0; i < NUMBER_OF_PORTS; i++) | ||
1113 | { | ||
1114 | sync_port *port = &ports[i]; | ||
1115 | if (!port->enabled || !port->use_dma ) | ||
1116 | continue; | ||
1117 | |||
1118 | masked = REG_RD(dma, port->regi_dmaout, r_masked_intr); | ||
1119 | |||
1120 | if (masked.data) /* IRQ active for the port? */ | ||
1121 | { | ||
1122 | found = 1; | ||
1123 | /* Clear IRQ */ | ||
1124 | REG_WR(dma, port->regi_dmaout, rw_ack_intr, ack_intr); | ||
1125 | descr = &port->out_descr; | ||
1126 | sentl = descr->after - descr->buf; | ||
1127 | port->out_count -= sentl; | ||
1128 | port->outp += sentl; | ||
1129 | if (port->outp >= port->out_buffer + OUT_BUFFER_SIZE) | ||
1130 | port->outp = port->out_buffer; | ||
1131 | if (port->out_count) { | ||
1132 | int c; | ||
1133 | c = port->out_buffer + OUT_BUFFER_SIZE - port->outp; | ||
1134 | if (c > port->out_count) | ||
1135 | c = port->out_count; | ||
1136 | DEBUGTXINT(printk("tx_int DMAWRITE %i %i\n", sentl, c)); | ||
1137 | start_dma(port, port->outp, c); | ||
1138 | } else { | ||
1139 | DEBUGTXINT(printk("tx_int DMA stop %i\n", sentl)); | ||
1140 | port->tr_running = 0; | ||
1141 | } | ||
1142 | wake_up_interruptible(&port->out_wait_q); /* wake up the waiting process */ | ||
1143 | } | ||
1144 | } | ||
1145 | return IRQ_RETVAL(found); | ||
1146 | } /* tr_interrupt */ | ||
1147 | |||
1148 | static irqreturn_t rx_interrupt(int irq, void *dev_id, struct pt_regs * regs) | ||
1149 | { | ||
1150 | reg_dma_r_masked_intr masked; | ||
1151 | reg_dma_rw_ack_intr ack_intr = {.data = regk_dma_yes}; | ||
1152 | |||
1153 | int i; | ||
1154 | int found = 0; | ||
1155 | |||
1156 | for (i = 0; i < NUMBER_OF_PORTS; i++) | ||
1157 | { | ||
1158 | sync_port *port = &ports[i]; | ||
1159 | |||
1160 | if (!port->enabled || !port->use_dma ) | ||
1161 | continue; | ||
1162 | |||
1163 | masked = REG_RD(dma, port->regi_dmain, r_masked_intr); | ||
1164 | |||
1165 | if (masked.data) /* Descriptor interrupt */ | ||
1166 | { | ||
1167 | found = 1; | ||
1168 | while (REG_RD(dma, port->regi_dmain, rw_data) != | ||
1169 | virt_to_phys(port->next_rx_desc)) { | ||
1170 | |||
1171 | if (port->writep + port->inbufchunk > port->flip + port->in_buffer_size) { | ||
1172 | int first_size = port->flip + port->in_buffer_size - port->writep; | ||
1173 | memcpy((char*)port->writep, phys_to_virt((unsigned)port->next_rx_desc->buf), first_size); | ||
1174 | memcpy(port->flip, phys_to_virt((unsigned)port->next_rx_desc->buf+first_size), port->inbufchunk - first_size); | ||
1175 | port->writep = port->flip + port->inbufchunk - first_size; | ||
1176 | } else { | ||
1177 | memcpy((char*)port->writep, | ||
1178 | phys_to_virt((unsigned)port->next_rx_desc->buf), | ||
1179 | port->inbufchunk); | ||
1180 | port->writep += port->inbufchunk; | ||
1181 | if (port->writep >= port->flip + port->in_buffer_size) | ||
1182 | port->writep = port->flip; | ||
1183 | } | ||
1184 | if (port->writep == port->readp) | ||
1185 | { | ||
1186 | port->full = 1; | ||
1187 | } | ||
1188 | |||
1189 | port->next_rx_desc->eol = 0; | ||
1190 | port->prev_rx_desc->eol = 1; | ||
1191 | port->prev_rx_desc = phys_to_virt((unsigned)port->next_rx_desc); | ||
1192 | port->next_rx_desc = phys_to_virt((unsigned)port->next_rx_desc->next); | ||
1193 | wake_up_interruptible(&port->in_wait_q); /* wake up the waiting process */ | ||
1194 | DMA_CONTINUE(port->regi_dmain); | ||
1195 | REG_WR(dma, port->regi_dmain, rw_ack_intr, ack_intr); | ||
1196 | |||
1197 | } | ||
1198 | } | ||
1199 | } | ||
1200 | return IRQ_RETVAL(found); | ||
1201 | } /* rx_interrupt */ | ||
1202 | #endif /* SYNC_SER_DMA */ | ||
1203 | |||
1204 | #ifdef SYNC_SER_MANUAL | ||
1205 | static irqreturn_t manual_interrupt(int irq, void *dev_id, struct pt_regs * regs) | ||
1206 | { | ||
1207 | int i; | ||
1208 | int found = 0; | ||
1209 | reg_sser_r_masked_intr masked; | ||
1210 | |||
1211 | for (i = 0; i < NUMBER_OF_PORTS; i++) | ||
1212 | { | ||
1213 | sync_port* port = &ports[i]; | ||
1214 | |||
1215 | if (!port->enabled || port->use_dma) | ||
1216 | { | ||
1217 | continue; | ||
1218 | } | ||
1219 | |||
1220 | masked = REG_RD(sser, port->regi_sser, r_masked_intr); | ||
1221 | if (masked.rdav) /* Data received? */ | ||
1222 | { | ||
1223 | reg_sser_rw_rec_cfg rec_cfg = REG_RD(sser, port->regi_sser, rw_rec_cfg); | ||
1224 | reg_sser_r_rec_data data = REG_RD(sser, port->regi_sser, r_rec_data); | ||
1225 | found = 1; | ||
1226 | /* Read data */ | ||
1227 | switch(rec_cfg.sample_size) | ||
1228 | { | ||
1229 | case 8: | ||
1230 | *port->writep++ = data.data & 0xff; | ||
1231 | break; | ||
1232 | case 12: | ||
1233 | *port->writep = (data.data & 0x0ff0) >> 4; | ||
1234 | *(port->writep + 1) = data.data & 0x0f; | ||
1235 | port->writep+=2; | ||
1236 | break; | ||
1237 | case 16: | ||
1238 | *(unsigned short*)port->writep = data.data; | ||
1239 | port->writep+=2; | ||
1240 | break; | ||
1241 | case 24: | ||
1242 | *(unsigned int*)port->writep = data.data; | ||
1243 | port->writep+=3; | ||
1244 | break; | ||
1245 | case 32: | ||
1246 | *(unsigned int*)port->writep = data.data; | ||
1247 | port->writep+=4; | ||
1248 | break; | ||
1249 | } | ||
1250 | |||
1251 | if (port->writep >= port->flip + port->in_buffer_size) /* Wrap? */ | ||
1252 | port->writep = port->flip; | ||
1253 | if (port->writep == port->readp) { | ||
1254 | /* receive buffer overrun, discard oldest data | ||
1255 | */ | ||
1256 | port->readp++; | ||
1257 | if (port->readp >= port->flip + port->in_buffer_size) /* Wrap? */ | ||
1258 | port->readp = port->flip; | ||
1259 | } | ||
1260 | if (sync_data_avail(port) >= port->inbufchunk) | ||
1261 | wake_up_interruptible(&port->in_wait_q); /* Wake up application */ | ||
1262 | } | ||
1263 | |||
1264 | if (masked.trdy) /* Transmitter ready? */ | ||
1265 | { | ||
1266 | found = 1; | ||
1267 | if (port->out_count > 0) /* More data to send */ | ||
1268 | send_word(port); | ||
1269 | else /* transmission finished */ | ||
1270 | { | ||
1271 | reg_sser_rw_intr_mask intr_mask; | ||
1272 | intr_mask = REG_RD(sser, port->regi_sser, rw_intr_mask); | ||
1273 | intr_mask.trdy = 0; | ||
1274 | REG_WR(sser, port->regi_sser, rw_intr_mask, intr_mask); | ||
1275 | wake_up_interruptible(&port->out_wait_q); /* Wake up application */ | ||
1276 | } | ||
1277 | } | ||
1278 | } | ||
1279 | return IRQ_RETVAL(found); | ||
1280 | } | ||
1281 | #endif | ||
1282 | |||
1283 | module_init(etrax_sync_serial_init); | ||