diff options
author | Linus Torvalds <torvalds@ppc970.osdl.org> | 2005-04-16 18:20:36 -0400 |
---|---|---|
committer | Linus Torvalds <torvalds@ppc970.osdl.org> | 2005-04-16 18:20:36 -0400 |
commit | 1da177e4c3f41524e886b7f1b8a0c1fc7321cac2 (patch) | |
tree | 0bba044c4ce775e45a88a51686b5d9f90697ea9d /drivers/net/wan/wanxlfw.S |
Linux-2.6.12-rc2v2.6.12-rc2
Initial git repository build. I'm not bothering with the full history,
even though we have it. We can create a separate "historical" git
archive of that later if we want to, and in the meantime it's about
3.2GB when imported into git - space that would just make the early
git days unnecessarily complicated, when we don't have a lot of good
infrastructure for it.
Let it rip!
Diffstat (limited to 'drivers/net/wan/wanxlfw.S')
-rw-r--r-- | drivers/net/wan/wanxlfw.S | 895 |
1 files changed, 895 insertions, 0 deletions
diff --git a/drivers/net/wan/wanxlfw.S b/drivers/net/wan/wanxlfw.S new file mode 100644 index 000000000000..73aae2bf2f1c --- /dev/null +++ b/drivers/net/wan/wanxlfw.S | |||
@@ -0,0 +1,895 @@ | |||
1 | .psize 0 | ||
2 | /* | ||
3 | wanXL serial card driver for Linux | ||
4 | card firmware part | ||
5 | |||
6 | Copyright (C) 2003 Krzysztof Halasa <khc@pm.waw.pl> | ||
7 | |||
8 | This program is free software; you can redistribute it and/or modify it | ||
9 | under the terms of version 2 of the GNU General Public License | ||
10 | as published by the Free Software Foundation. | ||
11 | |||
12 | |||
13 | |||
14 | |||
15 | DPRAM BDs: | ||
16 | 0x000 - 0x050 TX#0 0x050 - 0x140 RX#0 | ||
17 | 0x140 - 0x190 TX#1 0x190 - 0x280 RX#1 | ||
18 | 0x280 - 0x2D0 TX#2 0x2D0 - 0x3C0 RX#2 | ||
19 | 0x3C0 - 0x410 TX#3 0x410 - 0x500 RX#3 | ||
20 | |||
21 | |||
22 | 000 5FF 1536 Bytes Dual-Port RAM User Data / BDs | ||
23 | 600 6FF 256 Bytes Dual-Port RAM User Data / BDs | ||
24 | 700 7FF 256 Bytes Dual-Port RAM User Data / BDs | ||
25 | C00 CBF 192 Bytes Dual-Port RAM Parameter RAM Page 1 | ||
26 | D00 DBF 192 Bytes Dual-Port RAM Parameter RAM Page 2 | ||
27 | E00 EBF 192 Bytes Dual-Port RAM Parameter RAM Page 3 | ||
28 | F00 FBF 192 Bytes Dual-Port RAM Parameter RAM Page 4 | ||
29 | |||
30 | local interrupts level | ||
31 | NMI 7 | ||
32 | PIT timer, CPM (RX/TX complete) 4 | ||
33 | PCI9060 DMA and PCI doorbells 3 | ||
34 | Cable - not used 1 | ||
35 | */ | ||
36 | |||
37 | #include <linux/hdlc.h> | ||
38 | #include "wanxl.h" | ||
39 | |||
40 | /* memory addresses and offsets */ | ||
41 | |||
42 | MAX_RAM_SIZE = 16 * 1024 * 1024 // max RAM supported by hardware | ||
43 | |||
44 | PCI9060_VECTOR = 0x0000006C | ||
45 | CPM_IRQ_BASE = 0x40 | ||
46 | ERROR_VECTOR = CPM_IRQ_BASE * 4 | ||
47 | SCC1_VECTOR = (CPM_IRQ_BASE + 0x1E) * 4 | ||
48 | SCC2_VECTOR = (CPM_IRQ_BASE + 0x1D) * 4 | ||
49 | SCC3_VECTOR = (CPM_IRQ_BASE + 0x1C) * 4 | ||
50 | SCC4_VECTOR = (CPM_IRQ_BASE + 0x1B) * 4 | ||
51 | CPM_IRQ_LEVEL = 4 | ||
52 | TIMER_IRQ = 128 | ||
53 | TIMER_IRQ_LEVEL = 4 | ||
54 | PITR_CONST = 0x100 + 16 // 1 Hz timer | ||
55 | |||
56 | MBAR = 0x0003FF00 | ||
57 | |||
58 | VALUE_WINDOW = 0x40000000 | ||
59 | ORDER_WINDOW = 0xC0000000 | ||
60 | |||
61 | PLX = 0xFFF90000 | ||
62 | |||
63 | CSRA = 0xFFFB0000 | ||
64 | CSRB = 0xFFFB0002 | ||
65 | CSRC = 0xFFFB0004 | ||
66 | CSRD = 0xFFFB0006 | ||
67 | STATUS_CABLE_LL = 0x2000 | ||
68 | STATUS_CABLE_DTR = 0x1000 | ||
69 | |||
70 | DPRBASE = 0xFFFC0000 | ||
71 | |||
72 | SCC1_BASE = DPRBASE + 0xC00 | ||
73 | MISC_BASE = DPRBASE + 0xCB0 | ||
74 | SCC2_BASE = DPRBASE + 0xD00 | ||
75 | SCC3_BASE = DPRBASE + 0xE00 | ||
76 | SCC4_BASE = DPRBASE + 0xF00 | ||
77 | |||
78 | // offset from SCCx_BASE | ||
79 | // SCC_xBASE contain offsets from DPRBASE and must be divisible by 8 | ||
80 | SCC_RBASE = 0 // 16-bit RxBD base address | ||
81 | SCC_TBASE = 2 // 16-bit TxBD base address | ||
82 | SCC_RFCR = 4 // 8-bit Rx function code | ||
83 | SCC_TFCR = 5 // 8-bit Tx function code | ||
84 | SCC_MRBLR = 6 // 16-bit maximum Rx buffer length | ||
85 | SCC_C_MASK = 0x34 // 32-bit CRC constant | ||
86 | SCC_C_PRES = 0x38 // 32-bit CRC preset | ||
87 | SCC_MFLR = 0x46 // 16-bit max Rx frame length (without flags) | ||
88 | |||
89 | REGBASE = DPRBASE + 0x1000 | ||
90 | PICR = REGBASE + 0x026 // 16-bit periodic irq control | ||
91 | PITR = REGBASE + 0x02A // 16-bit periodic irq timing | ||
92 | OR1 = REGBASE + 0x064 // 32-bit RAM bank #1 options | ||
93 | CICR = REGBASE + 0x540 // 32(24)-bit CP interrupt config | ||
94 | CIMR = REGBASE + 0x548 // 32-bit CP interrupt mask | ||
95 | CISR = REGBASE + 0x54C // 32-bit CP interrupts in-service | ||
96 | PADIR = REGBASE + 0x550 // 16-bit PortA data direction bitmap | ||
97 | PAPAR = REGBASE + 0x552 // 16-bit PortA pin assignment bitmap | ||
98 | PAODR = REGBASE + 0x554 // 16-bit PortA open drain bitmap | ||
99 | PADAT = REGBASE + 0x556 // 16-bit PortA data register | ||
100 | |||
101 | PCDIR = REGBASE + 0x560 // 16-bit PortC data direction bitmap | ||
102 | PCPAR = REGBASE + 0x562 // 16-bit PortC pin assignment bitmap | ||
103 | PCSO = REGBASE + 0x564 // 16-bit PortC special options | ||
104 | PCDAT = REGBASE + 0x566 // 16-bit PortC data register | ||
105 | PCINT = REGBASE + 0x568 // 16-bit PortC interrupt control | ||
106 | CR = REGBASE + 0x5C0 // 16-bit Command register | ||
107 | |||
108 | SCC1_REGS = REGBASE + 0x600 | ||
109 | SCC2_REGS = REGBASE + 0x620 | ||
110 | SCC3_REGS = REGBASE + 0x640 | ||
111 | SCC4_REGS = REGBASE + 0x660 | ||
112 | SICR = REGBASE + 0x6EC // 32-bit SI clock route | ||
113 | |||
114 | // offset from SCCx_REGS | ||
115 | SCC_GSMR_L = 0x00 // 32 bits | ||
116 | SCC_GSMR_H = 0x04 // 32 bits | ||
117 | SCC_PSMR = 0x08 // 16 bits | ||
118 | SCC_TODR = 0x0C // 16 bits | ||
119 | SCC_DSR = 0x0E // 16 bits | ||
120 | SCC_SCCE = 0x10 // 16 bits | ||
121 | SCC_SCCM = 0x14 // 16 bits | ||
122 | SCC_SCCS = 0x17 // 8 bits | ||
123 | |||
124 | #if QUICC_MEMCPY_USES_PLX | ||
125 | .macro memcpy_from_pci src, dest, len // len must be < 8 MB | ||
126 | addl #3, \len | ||
127 | andl #0xFFFFFFFC, \len // always copy n * 4 bytes | ||
128 | movel \src, PLX_DMA_0_PCI | ||
129 | movel \dest, PLX_DMA_0_LOCAL | ||
130 | movel \len, PLX_DMA_0_LENGTH | ||
131 | movel #0x0103, PLX_DMA_CMD_STS // start channel 0 transfer | ||
132 | bsr memcpy_from_pci_run | ||
133 | .endm | ||
134 | |||
135 | .macro memcpy_to_pci src, dest, len | ||
136 | addl #3, \len | ||
137 | andl #0xFFFFFFFC, \len // always copy n * 4 bytes | ||
138 | movel \src, PLX_DMA_1_LOCAL | ||
139 | movel \dest, PLX_DMA_1_PCI | ||
140 | movel \len, PLX_DMA_1_LENGTH | ||
141 | movel #0x0301, PLX_DMA_CMD_STS // start channel 1 transfer | ||
142 | bsr memcpy_to_pci_run | ||
143 | .endm | ||
144 | |||
145 | #else | ||
146 | |||
147 | .macro memcpy src, dest, len // len must be < 65536 bytes | ||
148 | movel %d7, -(%sp) // src and dest must be < 256 MB | ||
149 | movel \len, %d7 // bits 0 and 1 | ||
150 | lsrl #2, \len | ||
151 | andl \len, \len | ||
152 | beq 99f // only 0 - 3 bytes | ||
153 | subl #1, \len // for dbf | ||
154 | 98: movel (\src)+, (\dest)+ | ||
155 | dbfw \len, 98b | ||
156 | 99: movel %d7, \len | ||
157 | btstl #1, \len | ||
158 | beq 99f | ||
159 | movew (\src)+, (\dest)+ | ||
160 | 99: btstl #0, \len | ||
161 | beq 99f | ||
162 | moveb (\src)+, (\dest)+ | ||
163 | 99: | ||
164 | movel (%sp)+, %d7 | ||
165 | .endm | ||
166 | |||
167 | .macro memcpy_from_pci src, dest, len | ||
168 | addl #VALUE_WINDOW, \src | ||
169 | memcpy \src, \dest, \len | ||
170 | .endm | ||
171 | |||
172 | .macro memcpy_to_pci src, dest, len | ||
173 | addl #VALUE_WINDOW, \dest | ||
174 | memcpy \src, \dest, \len | ||
175 | .endm | ||
176 | #endif | ||
177 | |||
178 | |||
179 | .macro wait_for_command | ||
180 | 99: btstl #0, CR | ||
181 | bne 99b | ||
182 | .endm | ||
183 | |||
184 | |||
185 | |||
186 | |||
187 | /****************************** card initialization *******************/ | ||
188 | .text | ||
189 | .global _start | ||
190 | _start: bra init | ||
191 | |||
192 | .org _start + 4 | ||
193 | ch_status_addr: .long 0, 0, 0, 0 | ||
194 | rx_descs_addr: .long 0 | ||
195 | |||
196 | init: | ||
197 | #if DETECT_RAM | ||
198 | movel OR1, %d0 | ||
199 | andl #0xF00007FF, %d0 // mask AMxx bits | ||
200 | orl #0xFFFF800 & ~(MAX_RAM_SIZE - 1), %d0 // update RAM bank size | ||
201 | movel %d0, OR1 | ||
202 | #endif | ||
203 | |||
204 | addl #VALUE_WINDOW, rx_descs_addr // PCI addresses of shared data | ||
205 | clrl %d0 // D0 = 4 * port | ||
206 | init_1: tstl ch_status_addr(%d0) | ||
207 | beq init_2 | ||
208 | addl #VALUE_WINDOW, ch_status_addr(%d0) | ||
209 | init_2: addl #4, %d0 | ||
210 | cmpl #4 * 4, %d0 | ||
211 | bne init_1 | ||
212 | |||
213 | movel #pci9060_interrupt, PCI9060_VECTOR | ||
214 | movel #error_interrupt, ERROR_VECTOR | ||
215 | movel #port_interrupt_1, SCC1_VECTOR | ||
216 | movel #port_interrupt_2, SCC2_VECTOR | ||
217 | movel #port_interrupt_3, SCC3_VECTOR | ||
218 | movel #port_interrupt_4, SCC4_VECTOR | ||
219 | movel #timer_interrupt, TIMER_IRQ * 4 | ||
220 | |||
221 | movel #0x78000000, CIMR // only SCCx IRQs from CPM | ||
222 | movew #(TIMER_IRQ_LEVEL << 8) + TIMER_IRQ, PICR // interrupt from PIT | ||
223 | movew #PITR_CONST, PITR | ||
224 | |||
225 | // SCC1=SCCa SCC2=SCCb SCC3=SCCc SCC4=SCCd prio=4 HP=-1 IRQ=64-79 | ||
226 | movel #0xD41F40 + (CPM_IRQ_LEVEL << 13), CICR | ||
227 | movel #0x543, PLX_DMA_0_MODE // 32-bit, Ready, Burst, IRQ | ||
228 | movel #0x543, PLX_DMA_1_MODE | ||
229 | movel #0x0, PLX_DMA_0_DESC // from PCI to local | ||
230 | movel #0x8, PLX_DMA_1_DESC // from local to PCI | ||
231 | movel #0x101, PLX_DMA_CMD_STS // enable both DMA channels | ||
232 | // enable local IRQ, DMA, doorbells and PCI IRQ | ||
233 | orl #0x000F0300, PLX_INTERRUPT_CS | ||
234 | |||
235 | #if DETECT_RAM | ||
236 | bsr ram_test | ||
237 | #else | ||
238 | movel #1, PLX_MAILBOX_5 // non-zero value = init complete | ||
239 | #endif | ||
240 | bsr check_csr | ||
241 | |||
242 | movew #0xFFFF, PAPAR // all pins are clocks/data | ||
243 | clrw PADIR // first function | ||
244 | clrw PCSO // CD and CTS always active | ||
245 | |||
246 | |||
247 | /****************************** main loop *****************************/ | ||
248 | |||
249 | main: movel channel_stats, %d7 // D7 = doorbell + irq status | ||
250 | clrl channel_stats | ||
251 | |||
252 | tstl %d7 | ||
253 | bne main_1 | ||
254 | // nothing to do - wait for next event | ||
255 | stop #0x2200 // supervisor + IRQ level 2 | ||
256 | movew #0x2700, %sr // disable IRQs again | ||
257 | bra main | ||
258 | |||
259 | main_1: clrl %d0 // D0 = 4 * port | ||
260 | clrl %d6 // D6 = doorbell to host value | ||
261 | |||
262 | main_l: btstl #DOORBELL_TO_CARD_CLOSE_0, %d7 | ||
263 | beq main_op | ||
264 | bclrl #DOORBELL_TO_CARD_OPEN_0, %d7 // in case both bits are set | ||
265 | bsr close_port | ||
266 | main_op: | ||
267 | btstl #DOORBELL_TO_CARD_OPEN_0, %d7 | ||
268 | beq main_cl | ||
269 | bsr open_port | ||
270 | main_cl: | ||
271 | btstl #DOORBELL_TO_CARD_TX_0, %d7 | ||
272 | beq main_txend | ||
273 | bsr tx | ||
274 | main_txend: | ||
275 | btstl #TASK_SCC_0, %d7 | ||
276 | beq main_next | ||
277 | bsr tx_end | ||
278 | bsr rx | ||
279 | |||
280 | main_next: | ||
281 | lsrl #1, %d7 // port status for next port | ||
282 | addl #4, %d0 // D0 = 4 * next port | ||
283 | cmpl #4 * 4, %d0 | ||
284 | bne main_l | ||
285 | movel %d6, PLX_DOORBELL_FROM_CARD // signal the host | ||
286 | bra main | ||
287 | |||
288 | |||
289 | /****************************** open port *****************************/ | ||
290 | |||
291 | open_port: // D0 = 4 * port, D6 = doorbell to host | ||
292 | movel ch_status_addr(%d0), %a0 // A0 = port status address | ||
293 | tstl STATUS_OPEN(%a0) | ||
294 | bne open_port_ret // port already open | ||
295 | movel #1, STATUS_OPEN(%a0) // confirm the port is open | ||
296 | // setup BDs | ||
297 | clrl tx_in(%d0) | ||
298 | clrl tx_out(%d0) | ||
299 | clrl tx_count(%d0) | ||
300 | clrl rx_in(%d0) | ||
301 | |||
302 | movel SICR, %d1 // D1 = clock settings in SICR | ||
303 | andl clocking_mask(%d0), %d1 | ||
304 | cmpl #CLOCK_TXFROMRX, STATUS_CLOCKING(%a0) | ||
305 | bne open_port_clock_ext | ||
306 | orl clocking_txfromrx(%d0), %d1 | ||
307 | bra open_port_set_clock | ||
308 | |||
309 | open_port_clock_ext: | ||
310 | orl clocking_ext(%d0), %d1 | ||
311 | open_port_set_clock: | ||
312 | movel %d1, SICR // update clock settings in SICR | ||
313 | |||
314 | orw #STATUS_CABLE_DTR, csr_output(%d0) // DTR on | ||
315 | bsr check_csr // call with disabled timer interrupt | ||
316 | |||
317 | // Setup TX descriptors | ||
318 | movel first_buffer(%d0), %d1 // D1 = starting buffer address | ||
319 | movel tx_first_bd(%d0), %a1 // A1 = starting TX BD address | ||
320 | movel #TX_BUFFERS - 2, %d2 // D2 = TX_BUFFERS - 1 counter | ||
321 | movel #0x18000000, %d3 // D3 = initial TX BD flags: Int + Last | ||
322 | cmpl #PARITY_NONE, STATUS_PARITY(%a0) | ||
323 | beq open_port_tx_loop | ||
324 | bsetl #26, %d3 // TX BD flag: Transmit CRC | ||
325 | open_port_tx_loop: | ||
326 | movel %d3, (%a1)+ // TX flags + length | ||
327 | movel %d1, (%a1)+ // buffer address | ||
328 | addl #BUFFER_LENGTH, %d1 | ||
329 | dbfw %d2, open_port_tx_loop | ||
330 | |||
331 | bsetl #29, %d3 // TX BD flag: Wrap (last BD) | ||
332 | movel %d3, (%a1)+ // Final TX flags + length | ||
333 | movel %d1, (%a1)+ // buffer address | ||
334 | |||
335 | // Setup RX descriptors // A1 = starting RX BD address | ||
336 | movel #RX_BUFFERS - 2, %d2 // D2 = RX_BUFFERS - 1 counter | ||
337 | open_port_rx_loop: | ||
338 | movel #0x90000000, (%a1)+ // RX flags + length | ||
339 | movel %d1, (%a1)+ // buffer address | ||
340 | addl #BUFFER_LENGTH, %d1 | ||
341 | dbfw %d2, open_port_rx_loop | ||
342 | |||
343 | movel #0xB0000000, (%a1)+ // Final RX flags + length | ||
344 | movel %d1, (%a1)+ // buffer address | ||
345 | |||
346 | // Setup port parameters | ||
347 | movel scc_base_addr(%d0), %a1 // A1 = SCC_BASE address | ||
348 | movel scc_reg_addr(%d0), %a2 // A2 = SCC_REGS address | ||
349 | |||
350 | movel #0xFFFF, SCC_SCCE(%a2) // clear status bits | ||
351 | movel #0x0000, SCC_SCCM(%a2) // interrupt mask | ||
352 | |||
353 | movel tx_first_bd(%d0), %d1 | ||
354 | movew %d1, SCC_TBASE(%a1) // D1 = offset of first TxBD | ||
355 | addl #TX_BUFFERS * 8, %d1 | ||
356 | movew %d1, SCC_RBASE(%a1) // D1 = offset of first RxBD | ||
357 | moveb #0x8, SCC_RFCR(%a1) // Intel mode, 1000 | ||
358 | moveb #0x8, SCC_TFCR(%a1) | ||
359 | |||
360 | // Parity settings | ||
361 | cmpl #PARITY_CRC16_PR1_CCITT, STATUS_PARITY(%a0) | ||
362 | bne open_port_parity_1 | ||
363 | clrw SCC_PSMR(%a2) // CRC16-CCITT | ||
364 | movel #0xF0B8, SCC_C_MASK(%a1) | ||
365 | movel #0xFFFF, SCC_C_PRES(%a1) | ||
366 | movew #HDLC_MAX_MRU + 2, SCC_MFLR(%a1) // 2 bytes for CRC | ||
367 | movew #2, parity_bytes(%d0) | ||
368 | bra open_port_2 | ||
369 | |||
370 | open_port_parity_1: | ||
371 | cmpl #PARITY_CRC32_PR1_CCITT, STATUS_PARITY(%a0) | ||
372 | bne open_port_parity_2 | ||
373 | movew #0x0800, SCC_PSMR(%a2) // CRC32-CCITT | ||
374 | movel #0xDEBB20E3, SCC_C_MASK(%a1) | ||
375 | movel #0xFFFFFFFF, SCC_C_PRES(%a1) | ||
376 | movew #HDLC_MAX_MRU + 4, SCC_MFLR(%a1) // 4 bytes for CRC | ||
377 | movew #4, parity_bytes(%d0) | ||
378 | bra open_port_2 | ||
379 | |||
380 | open_port_parity_2: | ||
381 | cmpl #PARITY_CRC16_PR0_CCITT, STATUS_PARITY(%a0) | ||
382 | bne open_port_parity_3 | ||
383 | clrw SCC_PSMR(%a2) // CRC16-CCITT preset 0 | ||
384 | movel #0xF0B8, SCC_C_MASK(%a1) | ||
385 | clrl SCC_C_PRES(%a1) | ||
386 | movew #HDLC_MAX_MRU + 2, SCC_MFLR(%a1) // 2 bytes for CRC | ||
387 | movew #2, parity_bytes(%d0) | ||
388 | bra open_port_2 | ||
389 | |||
390 | open_port_parity_3: | ||
391 | cmpl #PARITY_CRC32_PR0_CCITT, STATUS_PARITY(%a0) | ||
392 | bne open_port_parity_4 | ||
393 | movew #0x0800, SCC_PSMR(%a2) // CRC32-CCITT preset 0 | ||
394 | movel #0xDEBB20E3, SCC_C_MASK(%a1) | ||
395 | clrl SCC_C_PRES(%a1) | ||
396 | movew #HDLC_MAX_MRU + 4, SCC_MFLR(%a1) // 4 bytes for CRC | ||
397 | movew #4, parity_bytes(%d0) | ||
398 | bra open_port_2 | ||
399 | |||
400 | open_port_parity_4: | ||
401 | clrw SCC_PSMR(%a2) // no parity | ||
402 | movel #0xF0B8, SCC_C_MASK(%a1) | ||
403 | movel #0xFFFF, SCC_C_PRES(%a1) | ||
404 | movew #HDLC_MAX_MRU, SCC_MFLR(%a1) // 0 bytes for CRC | ||
405 | clrw parity_bytes(%d0) | ||
406 | |||
407 | open_port_2: | ||
408 | movel #0x00000003, SCC_GSMR_H(%a2) // RTSM | ||
409 | cmpl #ENCODING_NRZI, STATUS_ENCODING(%a0) | ||
410 | bne open_port_nrz | ||
411 | movel #0x10040900, SCC_GSMR_L(%a2) // NRZI: TCI Tend RECN+TENC=1 | ||
412 | bra open_port_3 | ||
413 | |||
414 | open_port_nrz: | ||
415 | movel #0x10040000, SCC_GSMR_L(%a2) // NRZ: TCI Tend RECN+TENC=0 | ||
416 | open_port_3: | ||
417 | movew #BUFFER_LENGTH, SCC_MRBLR(%a1) | ||
418 | movel %d0, %d1 | ||
419 | lsll #4, %d1 // D1 bits 7 and 6 = port | ||
420 | orl #1, %d1 | ||
421 | movew %d1, CR // Init SCC RX and TX params | ||
422 | wait_for_command | ||
423 | |||
424 | // TCI Tend ENR ENT | ||
425 | movew #0x001F, SCC_SCCM(%a2) // TXE RXF BSY TXB RXB interrupts | ||
426 | orl #0x00000030, SCC_GSMR_L(%a2) // enable SCC | ||
427 | open_port_ret: | ||
428 | rts | ||
429 | |||
430 | |||
431 | /****************************** close port ****************************/ | ||
432 | |||
433 | close_port: // D0 = 4 * port, D6 = doorbell to host | ||
434 | movel scc_reg_addr(%d0), %a0 // A0 = SCC_REGS address | ||
435 | clrw SCC_SCCM(%a0) // no SCC interrupts | ||
436 | andl #0xFFFFFFCF, SCC_GSMR_L(%a0) // Disable ENT and ENR | ||
437 | |||
438 | andw #~STATUS_CABLE_DTR, csr_output(%d0) // DTR off | ||
439 | bsr check_csr // call with disabled timer interrupt | ||
440 | |||
441 | movel ch_status_addr(%d0), %d1 | ||
442 | clrl STATUS_OPEN(%d1) // confirm the port is closed | ||
443 | rts | ||
444 | |||
445 | |||
446 | /****************************** transmit packet ***********************/ | ||
447 | // queue packets for transmission | ||
448 | tx: // D0 = 4 * port, D6 = doorbell to host | ||
449 | cmpl #TX_BUFFERS, tx_count(%d0) | ||
450 | beq tx_ret // all DB's = descs in use | ||
451 | |||
452 | movel tx_out(%d0), %d1 | ||
453 | movel %d1, %d2 // D1 = D2 = tx_out BD# = desc# | ||
454 | mulul #DESC_LENGTH, %d2 // D2 = TX desc offset | ||
455 | addl ch_status_addr(%d0), %d2 | ||
456 | addl #STATUS_TX_DESCS, %d2 // D2 = TX desc address | ||
457 | cmpl #PACKET_FULL, (%d2) // desc status | ||
458 | bne tx_ret | ||
459 | |||
460 | // queue it | ||
461 | movel 4(%d2), %a0 // PCI address | ||
462 | lsll #3, %d1 // BD is 8-bytes long | ||
463 | addl tx_first_bd(%d0), %d1 // D1 = current tx_out BD addr | ||
464 | |||
465 | movel 4(%d1), %a1 // A1 = dest address | ||
466 | movel 8(%d2), %d2 // D2 = length | ||
467 | movew %d2, 2(%d1) // length into BD | ||
468 | memcpy_from_pci %a0, %a1, %d2 | ||
469 | bsetl #31, (%d1) // CP go ahead | ||
470 | |||
471 | // update tx_out and tx_count | ||
472 | movel tx_out(%d0), %d1 | ||
473 | addl #1, %d1 | ||
474 | cmpl #TX_BUFFERS, %d1 | ||
475 | bne tx_1 | ||
476 | clrl %d1 | ||
477 | tx_1: movel %d1, tx_out(%d0) | ||
478 | |||
479 | addl #1, tx_count(%d0) | ||
480 | bra tx | ||
481 | |||
482 | tx_ret: rts | ||
483 | |||
484 | |||
485 | /****************************** packet received ***********************/ | ||
486 | |||
487 | // Service receive buffers // D0 = 4 * port, D6 = doorbell to host | ||
488 | rx: movel rx_in(%d0), %d1 // D1 = rx_in BD# | ||
489 | lsll #3, %d1 // BD is 8-bytes long | ||
490 | addl rx_first_bd(%d0), %d1 // D1 = current rx_in BD address | ||
491 | movew (%d1), %d2 // D2 = RX BD flags | ||
492 | btstl #15, %d2 | ||
493 | bne rx_ret // BD still empty | ||
494 | |||
495 | btstl #1, %d2 | ||
496 | bne rx_overrun | ||
497 | |||
498 | tstw parity_bytes(%d0) | ||
499 | bne rx_parity | ||
500 | bclrl #2, %d2 // do not test for CRC errors | ||
501 | rx_parity: | ||
502 | andw #0x0CBC, %d2 // mask status bits | ||
503 | cmpw #0x0C00, %d2 // correct frame | ||
504 | bne rx_bad_frame | ||
505 | clrl %d3 | ||
506 | movew 2(%d1), %d3 | ||
507 | subw parity_bytes(%d0), %d3 // D3 = packet length | ||
508 | cmpw #HDLC_MAX_MRU, %d3 | ||
509 | bgt rx_bad_frame | ||
510 | |||
511 | rx_good_frame: | ||
512 | movel rx_out, %d2 | ||
513 | mulul #DESC_LENGTH, %d2 | ||
514 | addl rx_descs_addr, %d2 // D2 = RX desc address | ||
515 | cmpl #PACKET_EMPTY, (%d2) // desc stat | ||
516 | bne rx_overrun | ||
517 | |||
518 | movel %d3, 8(%d2) | ||
519 | movel 4(%d1), %a0 // A0 = source address | ||
520 | movel 4(%d2), %a1 | ||
521 | tstl %a1 | ||
522 | beq rx_ignore_data | ||
523 | memcpy_to_pci %a0, %a1, %d3 | ||
524 | rx_ignore_data: | ||
525 | movel packet_full(%d0), (%d2) // update desc stat | ||
526 | |||
527 | // update D6 and rx_out | ||
528 | bsetl #DOORBELL_FROM_CARD_RX, %d6 // signal host that RX completed | ||
529 | movel rx_out, %d2 | ||
530 | addl #1, %d2 | ||
531 | cmpl #RX_QUEUE_LENGTH, %d2 | ||
532 | bne rx_1 | ||
533 | clrl %d2 | ||
534 | rx_1: movel %d2, rx_out | ||
535 | |||
536 | rx_free_bd: | ||
537 | andw #0xF000, (%d1) // clear CM and error bits | ||
538 | bsetl #31, (%d1) // free BD | ||
539 | // update rx_in | ||
540 | movel rx_in(%d0), %d1 | ||
541 | addl #1, %d1 | ||
542 | cmpl #RX_BUFFERS, %d1 | ||
543 | bne rx_2 | ||
544 | clrl %d1 | ||
545 | rx_2: movel %d1, rx_in(%d0) | ||
546 | bra rx | ||
547 | |||
548 | rx_overrun: | ||
549 | movel ch_status_addr(%d0), %d2 | ||
550 | addl #1, STATUS_RX_OVERRUNS(%d2) | ||
551 | bra rx_free_bd | ||
552 | |||
553 | rx_bad_frame: | ||
554 | movel ch_status_addr(%d0), %d2 | ||
555 | addl #1, STATUS_RX_FRAME_ERRORS(%d2) | ||
556 | bra rx_free_bd | ||
557 | |||
558 | rx_ret: rts | ||
559 | |||
560 | |||
561 | /****************************** packet transmitted ********************/ | ||
562 | |||
563 | // Service transmit buffers // D0 = 4 * port, D6 = doorbell to host | ||
564 | tx_end: tstl tx_count(%d0) | ||
565 | beq tx_end_ret // TX buffers already empty | ||
566 | |||
567 | movel tx_in(%d0), %d1 | ||
568 | movel %d1, %d2 // D1 = D2 = tx_in BD# = desc# | ||
569 | lsll #3, %d1 // BD is 8-bytes long | ||
570 | addl tx_first_bd(%d0), %d1 // D1 = current tx_in BD address | ||
571 | movew (%d1), %d3 // D3 = TX BD flags | ||
572 | btstl #15, %d3 | ||
573 | bne tx_end_ret // BD still being transmitted | ||
574 | |||
575 | // update D6, tx_in and tx_count | ||
576 | orl bell_tx(%d0), %d6 // signal host that TX desc freed | ||
577 | subl #1, tx_count(%d0) | ||
578 | movel tx_in(%d0), %d1 | ||
579 | addl #1, %d1 | ||
580 | cmpl #TX_BUFFERS, %d1 | ||
581 | bne tx_end_1 | ||
582 | clrl %d1 | ||
583 | tx_end_1: | ||
584 | movel %d1, tx_in(%d0) | ||
585 | |||
586 | // free host's descriptor | ||
587 | mulul #DESC_LENGTH, %d2 // D2 = TX desc offset | ||
588 | addl ch_status_addr(%d0), %d2 | ||
589 | addl #STATUS_TX_DESCS, %d2 // D2 = TX desc address | ||
590 | btstl #1, %d3 | ||
591 | bne tx_end_underrun | ||
592 | movel #PACKET_SENT, (%d2) | ||
593 | bra tx_end | ||
594 | |||
595 | tx_end_underrun: | ||
596 | movel #PACKET_UNDERRUN, (%d2) | ||
597 | bra tx_end | ||
598 | |||
599 | tx_end_ret: rts | ||
600 | |||
601 | |||
602 | /****************************** PLX PCI9060 DMA memcpy ****************/ | ||
603 | |||
604 | #if QUICC_MEMCPY_USES_PLX | ||
605 | // called with interrupts disabled | ||
606 | memcpy_from_pci_run: | ||
607 | movel %d0, -(%sp) | ||
608 | movew %sr, -(%sp) | ||
609 | memcpy_1: | ||
610 | movel PLX_DMA_CMD_STS, %d0 // do not btst PLX register directly | ||
611 | btstl #4, %d0 // transfer done? | ||
612 | bne memcpy_end | ||
613 | stop #0x2200 // enable PCI9060 interrupts | ||
614 | movew #0x2700, %sr // disable interrupts again | ||
615 | bra memcpy_1 | ||
616 | |||
617 | memcpy_to_pci_run: | ||
618 | movel %d0, -(%sp) | ||
619 | movew %sr, -(%sp) | ||
620 | memcpy_2: | ||
621 | movel PLX_DMA_CMD_STS, %d0 // do not btst PLX register directly | ||
622 | btstl #12, %d0 // transfer done? | ||
623 | bne memcpy_end | ||
624 | stop #0x2200 // enable PCI9060 interrupts | ||
625 | movew #0x2700, %sr // disable interrupts again | ||
626 | bra memcpy_2 | ||
627 | |||
628 | memcpy_end: | ||
629 | movew (%sp)+, %sr | ||
630 | movel (%sp)+, %d0 | ||
631 | rts | ||
632 | #endif | ||
633 | |||
634 | |||
635 | |||
636 | |||
637 | |||
638 | |||
639 | /****************************** PLX PCI9060 interrupt *****************/ | ||
640 | |||
641 | pci9060_interrupt: | ||
642 | movel %d0, -(%sp) | ||
643 | |||
644 | movel PLX_DOORBELL_TO_CARD, %d0 | ||
645 | movel %d0, PLX_DOORBELL_TO_CARD // confirm all requests | ||
646 | orl %d0, channel_stats | ||
647 | |||
648 | movel #0x0909, PLX_DMA_CMD_STS // clear DMA ch #0 and #1 interrupts | ||
649 | |||
650 | movel (%sp)+, %d0 | ||
651 | rte | ||
652 | |||
653 | /****************************** SCC interrupts ************************/ | ||
654 | |||
655 | port_interrupt_1: | ||
656 | orl #0, SCC1_REGS + SCC_SCCE; // confirm SCC events | ||
657 | orl #1 << TASK_SCC_0, channel_stats | ||
658 | movel #0x40000000, CISR | ||
659 | rte | ||
660 | |||
661 | port_interrupt_2: | ||
662 | orl #0, SCC2_REGS + SCC_SCCE; // confirm SCC events | ||
663 | orl #1 << TASK_SCC_1, channel_stats | ||
664 | movel #0x20000000, CISR | ||
665 | rte | ||
666 | |||
667 | port_interrupt_3: | ||
668 | orl #0, SCC3_REGS + SCC_SCCE; // confirm SCC events | ||
669 | orl #1 << TASK_SCC_2, channel_stats | ||
670 | movel #0x10000000, CISR | ||
671 | rte | ||
672 | |||
673 | port_interrupt_4: | ||
674 | orl #0, SCC4_REGS + SCC_SCCE; // confirm SCC events | ||
675 | orl #1 << TASK_SCC_3, channel_stats | ||
676 | movel #0x08000000, CISR | ||
677 | rte | ||
678 | |||
679 | error_interrupt: | ||
680 | rte | ||
681 | |||
682 | |||
683 | /****************************** cable and PM routine ******************/ | ||
684 | // modified registers: none | ||
685 | check_csr: | ||
686 | movel %d0, -(%sp) | ||
687 | movel %d1, -(%sp) | ||
688 | movel %d2, -(%sp) | ||
689 | movel %a0, -(%sp) | ||
690 | movel %a1, -(%sp) | ||
691 | |||
692 | clrl %d0 // D0 = 4 * port | ||
693 | movel #CSRA, %a0 // A0 = CSR address | ||
694 | |||
695 | check_csr_loop: | ||
696 | movew (%a0), %d1 // D1 = CSR input bits | ||
697 | andl #0xE7, %d1 // PM and cable sense bits (no DCE bit) | ||
698 | cmpw #STATUS_CABLE_V35 * (1 + 1 << STATUS_CABLE_PM_SHIFT), %d1 | ||
699 | bne check_csr_1 | ||
700 | movew #0x0E08, %d1 | ||
701 | bra check_csr_valid | ||
702 | |||
703 | check_csr_1: | ||
704 | cmpw #STATUS_CABLE_X21 * (1 + 1 << STATUS_CABLE_PM_SHIFT), %d1 | ||
705 | bne check_csr_2 | ||
706 | movew #0x0408, %d1 | ||
707 | bra check_csr_valid | ||
708 | |||
709 | check_csr_2: | ||
710 | cmpw #STATUS_CABLE_V24 * (1 + 1 << STATUS_CABLE_PM_SHIFT), %d1 | ||
711 | bne check_csr_3 | ||
712 | movew #0x0208, %d1 | ||
713 | bra check_csr_valid | ||
714 | |||
715 | check_csr_3: | ||
716 | cmpw #STATUS_CABLE_EIA530 * (1 + 1 << STATUS_CABLE_PM_SHIFT), %d1 | ||
717 | bne check_csr_disable | ||
718 | movew #0x0D08, %d1 | ||
719 | bra check_csr_valid | ||
720 | |||
721 | check_csr_disable: | ||
722 | movew #0x0008, %d1 // D1 = disable everything | ||
723 | movew #0x80E7, %d2 // D2 = input mask: ignore DSR | ||
724 | bra check_csr_write | ||
725 | |||
726 | check_csr_valid: // D1 = mode and IRQ bits | ||
727 | movew csr_output(%d0), %d2 | ||
728 | andw #0x3000, %d2 // D2 = requested LL and DTR bits | ||
729 | orw %d2, %d1 // D1 = all requested output bits | ||
730 | movew #0x80FF, %d2 // D2 = input mask: include DSR | ||
731 | |||
732 | check_csr_write: | ||
733 | cmpw old_csr_output(%d0), %d1 | ||
734 | beq check_csr_input | ||
735 | movew %d1, old_csr_output(%d0) | ||
736 | movew %d1, (%a0) // Write CSR output bits | ||
737 | |||
738 | check_csr_input: | ||
739 | movew (PCDAT), %d1 | ||
740 | andw dcd_mask(%d0), %d1 | ||
741 | beq check_csr_dcd_on // DCD and CTS signals are negated | ||
742 | movew (%a0), %d1 // D1 = CSR input bits | ||
743 | andw #~STATUS_CABLE_DCD, %d1 // DCD off | ||
744 | bra check_csr_previous | ||
745 | |||
746 | check_csr_dcd_on: | ||
747 | movew (%a0), %d1 // D1 = CSR input bits | ||
748 | orw #STATUS_CABLE_DCD, %d1 // DCD on | ||
749 | check_csr_previous: | ||
750 | andw %d2, %d1 // input mask | ||
751 | movel ch_status_addr(%d0), %a1 | ||
752 | cmpl STATUS_CABLE(%a1), %d1 // check for change | ||
753 | beq check_csr_next | ||
754 | movel %d1, STATUS_CABLE(%a1) // update status | ||
755 | movel bell_cable(%d0), PLX_DOORBELL_FROM_CARD // signal the host | ||
756 | |||
757 | check_csr_next: | ||
758 | addl #2, %a0 // next CSR register | ||
759 | addl #4, %d0 // D0 = 4 * next port | ||
760 | cmpl #4 * 4, %d0 | ||
761 | bne check_csr_loop | ||
762 | |||
763 | movel (%sp)+, %a1 | ||
764 | movel (%sp)+, %a0 | ||
765 | movel (%sp)+, %d2 | ||
766 | movel (%sp)+, %d1 | ||
767 | movel (%sp)+, %d0 | ||
768 | rts | ||
769 | |||
770 | |||
771 | /****************************** timer interrupt ***********************/ | ||
772 | |||
773 | timer_interrupt: | ||
774 | bsr check_csr | ||
775 | rte | ||
776 | |||
777 | |||
778 | /****************************** RAM sizing and test *******************/ | ||
779 | #if DETECT_RAM | ||
780 | ram_test: | ||
781 | movel #0x12345678, %d1 // D1 = test value | ||
782 | movel %d1, (128 * 1024 - 4) | ||
783 | movel #128 * 1024, %d0 // D0 = RAM size tested | ||
784 | ram_test_size: | ||
785 | cmpl #MAX_RAM_SIZE, %d0 | ||
786 | beq ram_test_size_found | ||
787 | movel %d0, %a0 | ||
788 | addl #128 * 1024 - 4, %a0 | ||
789 | cmpl (%a0), %d1 | ||
790 | beq ram_test_size_check | ||
791 | ram_test_next_size: | ||
792 | lsll #1, %d0 | ||
793 | bra ram_test_size | ||
794 | |||
795 | ram_test_size_check: | ||
796 | eorl #0xFFFFFFFF, %d1 | ||
797 | movel %d1, (128 * 1024 - 4) | ||
798 | cmpl (%a0), %d1 | ||
799 | bne ram_test_next_size | ||
800 | |||
801 | ram_test_size_found: // D0 = RAM size | ||
802 | movel %d0, %a0 // A0 = fill ptr | ||
803 | subl #firmware_end + 4, %d0 | ||
804 | lsrl #2, %d0 | ||
805 | movel %d0, %d1 // D1 = DBf counter | ||
806 | ram_test_fill: | ||
807 | movel %a0, -(%a0) | ||
808 | dbfw %d1, ram_test_fill | ||
809 | subl #0x10000, %d1 | ||
810 | cmpl #0xFFFFFFFF, %d1 | ||
811 | bne ram_test_fill | ||
812 | |||
813 | ram_test_loop: // D0 = DBf counter | ||
814 | cmpl (%a0)+, %a0 | ||
815 | dbnew %d0, ram_test_loop | ||
816 | bne ram_test_found_bad | ||
817 | subl #0x10000, %d0 | ||
818 | cmpl #0xFFFFFFFF, %d0 | ||
819 | bne ram_test_loop | ||
820 | bra ram_test_all_ok | ||
821 | |||
822 | ram_test_found_bad: | ||
823 | subl #4, %a0 | ||
824 | ram_test_all_ok: | ||
825 | movel %a0, PLX_MAILBOX_5 | ||
826 | rts | ||
827 | #endif | ||
828 | |||
829 | |||
830 | /****************************** constants *****************************/ | ||
831 | |||
832 | scc_reg_addr: | ||
833 | .long SCC1_REGS, SCC2_REGS, SCC3_REGS, SCC4_REGS | ||
834 | scc_base_addr: | ||
835 | .long SCC1_BASE, SCC2_BASE, SCC3_BASE, SCC4_BASE | ||
836 | |||
837 | tx_first_bd: | ||
838 | .long DPRBASE | ||
839 | .long DPRBASE + (TX_BUFFERS + RX_BUFFERS) * 8 | ||
840 | .long DPRBASE + (TX_BUFFERS + RX_BUFFERS) * 8 * 2 | ||
841 | .long DPRBASE + (TX_BUFFERS + RX_BUFFERS) * 8 * 3 | ||
842 | |||
843 | rx_first_bd: | ||
844 | .long DPRBASE + TX_BUFFERS * 8 | ||
845 | .long DPRBASE + TX_BUFFERS * 8 + (TX_BUFFERS + RX_BUFFERS) * 8 | ||
846 | .long DPRBASE + TX_BUFFERS * 8 + (TX_BUFFERS + RX_BUFFERS) * 8 * 2 | ||
847 | .long DPRBASE + TX_BUFFERS * 8 + (TX_BUFFERS + RX_BUFFERS) * 8 * 3 | ||
848 | |||
849 | first_buffer: | ||
850 | .long BUFFERS_ADDR | ||
851 | .long BUFFERS_ADDR + (TX_BUFFERS + RX_BUFFERS) * BUFFER_LENGTH | ||
852 | .long BUFFERS_ADDR + (TX_BUFFERS + RX_BUFFERS) * BUFFER_LENGTH * 2 | ||
853 | .long BUFFERS_ADDR + (TX_BUFFERS + RX_BUFFERS) * BUFFER_LENGTH * 3 | ||
854 | |||
855 | bell_tx: | ||
856 | .long 1 << DOORBELL_FROM_CARD_TX_0, 1 << DOORBELL_FROM_CARD_TX_1 | ||
857 | .long 1 << DOORBELL_FROM_CARD_TX_2, 1 << DOORBELL_FROM_CARD_TX_3 | ||
858 | |||
859 | bell_cable: | ||
860 | .long 1 << DOORBELL_FROM_CARD_CABLE_0, 1 << DOORBELL_FROM_CARD_CABLE_1 | ||
861 | .long 1 << DOORBELL_FROM_CARD_CABLE_2, 1 << DOORBELL_FROM_CARD_CABLE_3 | ||
862 | |||
863 | packet_full: | ||
864 | .long PACKET_FULL, PACKET_FULL + 1, PACKET_FULL + 2, PACKET_FULL + 3 | ||
865 | |||
866 | clocking_ext: | ||
867 | .long 0x0000002C, 0x00003E00, 0x002C0000, 0x3E000000 | ||
868 | clocking_txfromrx: | ||
869 | .long 0x0000002D, 0x00003F00, 0x002D0000, 0x3F000000 | ||
870 | clocking_mask: | ||
871 | .long 0x000000FF, 0x0000FF00, 0x00FF0000, 0xFF000000 | ||
872 | dcd_mask: | ||
873 | .word 0x020, 0, 0x080, 0, 0x200, 0, 0x800 | ||
874 | |||
875 | .ascii "wanXL firmware\n" | ||
876 | .asciz "Copyright (C) 2003 Krzysztof Halasa <khc@pm.waw.pl>\n" | ||
877 | |||
878 | |||
879 | /****************************** variables *****************************/ | ||
880 | |||
881 | .align 4 | ||
882 | channel_stats: .long 0 | ||
883 | |||
884 | tx_in: .long 0, 0, 0, 0 // transmitted | ||
885 | tx_out: .long 0, 0, 0, 0 // received from host for transmission | ||
886 | tx_count: .long 0, 0, 0, 0 // currently in transmit queue | ||
887 | |||
888 | rx_in: .long 0, 0, 0, 0 // received from port | ||
889 | rx_out: .long 0 // transmitted to host | ||
890 | parity_bytes: .word 0, 0, 0, 0, 0, 0, 0 // only 4 words are used | ||
891 | |||
892 | csr_output: .word 0 | ||
893 | old_csr_output: .word 0, 0, 0, 0, 0, 0, 0 | ||
894 | .align 4 | ||
895 | firmware_end: // must be dword-aligned | ||