]>
Commit | Line | Data |
---|---|---|
3e38691e WD |
1 | /* The dpalloc function used and implemented in this file was derieved |
2 | * from PPCBoot/U-Boot file "cpu/mpc8260/commproc.c". | |
3 | */ | |
4 | ||
5 | /* Author: Arun Dharankar <[email protected]> | |
6 | * This example is meant to only demonstrate how the IDMA could be used. | |
7 | */ | |
8 | ||
9 | /* | |
10 | * This file is based on "arch/ppc/8260_io/commproc.c" - here is it's | |
11 | * copyright notice: | |
12 | * | |
13 | * General Purpose functions for the global management of the | |
14 | * 8260 Communication Processor Module. | |
15 | * Copyright (c) 1999 Dan Malek ([email protected]) | |
16 | * Copyright (c) 2000 MontaVista Software, Inc ([email protected]) | |
17 | * 2.3.99 Updates | |
18 | * | |
19 | * In addition to the individual control of the communication | |
20 | * channels, there are a few functions that globally affect the | |
21 | * communication processor. | |
22 | * | |
23 | * Buffer descriptors must be allocated from the dual ported memory | |
24 | * space. The allocator for that is here. When the communication | |
25 | * process is reset, we reclaim the memory available. There is | |
26 | * currently no deallocator for this memory. | |
27 | */ | |
28 | ||
29 | ||
3e38691e WD |
30 | #include <common.h> |
31 | #include <syscall.h> | |
32 | ||
33 | #define STANDALONE | |
34 | ||
35 | #ifndef STANDALONE /* Linked into/Part of PPCBoot */ | |
36 | #include <command.h> | |
37 | #include <watchdog.h> | |
38 | #else /* Standalone app of PPCBoot */ | |
39 | #include <syscall.h> | |
40 | #define printf mon_printf | |
41 | #define tstc mon_tstc | |
42 | #define getc mon_getc | |
43 | #define putc mon_putc | |
44 | #define udelay mon_udelay | |
45 | #define malloc mon_malloc | |
46 | #define WATCHDOG_RESET() { \ | |
47 | *(ushort *)(CFG_IMMR + 0x1000E) = 0x556c; \ | |
48 | *(ushort *)(CFG_IMMR + 0x1000E) = 0xaa39; \ | |
49 | } | |
50 | #endif /* STANDALONE */ | |
51 | ||
52 | static int debug = 1; | |
53 | ||
54 | #define DEBUG(fmt, args...) { \ | |
55 | if(debug != 0) { \ | |
56 | printf("[%s %d %s]: ",__FILE__,__LINE__,__FUNCTION__); \ | |
57 | printf(fmt, ##args); \ | |
58 | } \ | |
59 | } | |
60 | ||
61 | #define CPM_CR_IDMA1_SBLOCK (0x14) | |
62 | #define CPM_CR_IDMA2_SBLOCK (0x15) | |
63 | #define CPM_CR_IDMA3_SBLOCK (0x16) | |
64 | #define CPM_CR_IDMA4_SBLOCK (0x17) | |
65 | #define CPM_CR_IDMA1_PAGE (0x07) | |
66 | #define CPM_CR_IDMA2_PAGE (0x08) | |
67 | #define CPM_CR_IDMA3_PAGE (0x09) | |
68 | #define CPM_CR_IDMA4_PAGE (0x0a) | |
69 | #define PROFF_IDMA1_BASE ((uint)0x87fe) | |
70 | #define PROFF_IDMA2_BASE ((uint)0x88fe) | |
71 | #define PROFF_IDMA3_BASE ((uint)0x89fe) | |
72 | #define PROFF_IDMA4_BASE ((uint)0x8afe) | |
73 | ||
74 | #define CPM_CR_INIT_TRX ((ushort)0x0000) | |
75 | #define CPM_CR_FLG ((ushort)0x0001) | |
76 | ||
77 | #define mk_cr_cmd(PG, SBC, MCN, OP) \ | |
78 | ((PG << 26) | (SBC << 21) | (MCN << 6) | OP) | |
79 | ||
80 | ||
81 | #pragma pack(1) | |
82 | typedef struct ibdbits { | |
83 | unsigned b_valid:1; | |
84 | unsigned b_resv1:1; | |
85 | unsigned b_wrap:1; | |
86 | unsigned b_interrupt:1; | |
87 | unsigned b_last:1; | |
88 | unsigned b_resv2:1; | |
89 | unsigned b_cm:1; | |
90 | unsigned b_resv3:2; | |
91 | unsigned b_sdn:1; | |
92 | unsigned b_ddn:1; | |
93 | unsigned b_dgbl:1; | |
94 | unsigned b_dbo:2; | |
95 | unsigned b_resv4:1; | |
96 | unsigned b_ddtb:1; | |
97 | unsigned b_resv5:2; | |
98 | unsigned b_sgbl:1; | |
99 | unsigned b_sbo:2; | |
100 | unsigned b_resv6:1; | |
101 | unsigned b_sdtb:1; | |
102 | unsigned b_resv7:9; | |
103 | } ibdbits_t; | |
104 | ||
105 | #pragma pack(1) | |
106 | typedef union ibdbitsu { | |
107 | ibdbits_t b; | |
108 | uint i; | |
109 | } ibdbitsu_t; | |
110 | ||
111 | #pragma pack(1) | |
112 | typedef struct idma_buf_desc { | |
113 | ibdbitsu_t ibd_bits; /* Status and Control */ | |
114 | uint ibd_datlen; /* Data length in buffer */ | |
115 | uint ibd_sbuf; /* Source buffer addr in host mem */ | |
116 | uint ibd_dbuf; /* Destination buffer addr in host mem */ | |
117 | } ibd_t; | |
118 | ||
119 | ||
120 | #pragma pack(1) | |
121 | typedef struct dcmbits { | |
122 | unsigned b_fb:1; | |
123 | unsigned b_lp:1; | |
124 | unsigned b_resv1:3; | |
125 | unsigned b_tc2:1; | |
126 | unsigned b_resv2:1; | |
127 | unsigned b_wrap:3; | |
128 | unsigned b_sinc:1; | |
129 | unsigned b_dinc:1; | |
130 | unsigned b_erm:1; | |
131 | unsigned b_dt:1; | |
132 | unsigned b_sd:2; | |
133 | } dcmbits_t; | |
134 | ||
135 | #pragma pack(1) | |
136 | typedef union dcmbitsu { | |
137 | dcmbits_t b; | |
138 | ushort i; | |
139 | } dcmbitsu_t; | |
140 | ||
141 | #pragma pack(1) | |
142 | typedef struct pram_idma { | |
143 | ushort pi_ibase; | |
144 | dcmbitsu_t pi_dcmbits; | |
145 | ushort pi_ibdptr; | |
146 | ushort pi_dprbuf; | |
147 | ushort pi_bufinv; /* internal to CPM */ | |
148 | ushort pi_ssmax; | |
149 | ushort pi_dprinptr; /* internal to CPM */ | |
150 | ushort pi_sts; | |
151 | ushort pi_dproutptr; /* internal to CPM */ | |
152 | ushort pi_seob; | |
153 | ushort pi_deob; | |
154 | ushort pi_dts; | |
155 | ushort pi_retadd; | |
156 | ushort pi_resv1; /* internal to CPM */ | |
157 | uint pi_bdcnt; | |
158 | uint pi_sptr; | |
159 | uint pi_dptr; | |
160 | uint pi_istate; | |
161 | } pram_idma_t; | |
162 | ||
163 | ||
164 | volatile immap_t *immap = (immap_t *) CFG_IMMR; | |
165 | volatile ibd_t *bdf; | |
166 | volatile pram_idma_t *piptr; | |
167 | ||
168 | volatile int dmadone; | |
169 | volatile int *dmadonep = &dmadone; | |
170 | void dmadone_handler (void *); | |
171 | ||
172 | int idma_init (void); | |
173 | void idma_start (int, int, int, uint, uint, int); | |
174 | uint dpalloc (uint, uint); | |
175 | ||
176 | ||
177 | uint dpinit_done = 0; | |
178 | ||
179 | ||
180 | #ifdef STANDALONE | |
181 | int ctrlc (void) | |
182 | { | |
183 | if (mon_tstc()) { | |
184 | switch (mon_getc ()) { | |
185 | case 0x03: /* ^C - Control C */ | |
186 | return 1; | |
187 | default: | |
188 | break; | |
189 | } | |
190 | } | |
191 | return 0; | |
192 | } | |
193 | void * memset(void * s,int c,size_t count) | |
194 | { | |
195 | char *xs = (char *) s; | |
196 | while (count--) | |
197 | *xs++ = c; | |
198 | return s; | |
199 | } | |
200 | int memcmp(const void * cs,const void * ct,size_t count) | |
201 | { | |
202 | const unsigned char *su1, *su2; | |
203 | int res = 0; | |
204 | for( su1 = cs, su2 = ct; 0 < count; ++su1, ++su2, count--) | |
205 | if ((res = *su1 - *su2) != 0) | |
206 | break; | |
207 | return res; | |
208 | } | |
209 | #endif /* STANDALONE */ | |
210 | ||
211 | #ifdef STANDALONE | |
212 | int mem_to_mem_idma2intr (bd_t * bd, int argc, char *argv[]) | |
213 | #else | |
214 | int do_idma (bd_t * bd, int argc, char *argv[]) | |
215 | #endif /* STANDALONE */ | |
216 | { | |
217 | int i; | |
218 | ||
219 | dpinit_done = 0; | |
220 | ||
221 | idma_init (); | |
222 | ||
223 | DEBUG ("Installing dma handler\n"); | |
224 | mon_install_hdlr (7, dmadone_handler, (void *) bdf); | |
225 | ||
226 | memset ((void *) 0x100000, 'a', 512); | |
227 | memset ((void *) 0x200000, 'b', 512); | |
228 | ||
229 | for (i = 0; i < 32; i++) { | |
230 | printf ("Startin IDMA, iteration=%d\n", i); | |
231 | idma_start (1, 1, 512, 0x100000, 0x200000, 3); | |
232 | } | |
233 | ||
234 | DEBUG ("Uninstalling dma handler\n"); | |
235 | mon_free_hdlr (7); | |
236 | ||
237 | return 0; | |
238 | } | |
239 | ||
240 | void | |
241 | idma_start (int sinc, int dinc, int sz, uint sbuf, uint dbuf, int ttype) | |
242 | { | |
243 | /* ttype is for M-M, M-P, P-M or P-P: not used for now */ | |
244 | ||
245 | piptr->pi_istate = 0; /* manual says: clear it before every START_IDMA */ | |
246 | piptr->pi_dcmbits.b.b_resv1 = 0; | |
247 | ||
248 | if (sinc == 1) | |
249 | piptr->pi_dcmbits.b.b_sinc = 1; | |
250 | else | |
251 | piptr->pi_dcmbits.b.b_sinc = 0; | |
252 | ||
253 | if (dinc == 1) | |
254 | piptr->pi_dcmbits.b.b_dinc = 1; | |
255 | else | |
256 | piptr->pi_dcmbits.b.b_dinc = 0; | |
257 | ||
258 | piptr->pi_dcmbits.b.b_erm = 0; | |
259 | piptr->pi_dcmbits.b.b_sd = 0x00; /* M-M */ | |
260 | ||
261 | bdf->ibd_sbuf = sbuf; | |
262 | bdf->ibd_dbuf = dbuf; | |
263 | bdf->ibd_bits.b.b_cm = 0; | |
264 | bdf->ibd_bits.b.b_interrupt = 1; | |
265 | bdf->ibd_bits.b.b_wrap = 1; | |
266 | bdf->ibd_bits.b.b_last = 1; | |
267 | bdf->ibd_bits.b.b_sdn = 0; | |
268 | bdf->ibd_bits.b.b_ddn = 0; | |
269 | bdf->ibd_bits.b.b_dgbl = 0; | |
270 | bdf->ibd_bits.b.b_ddtb = 0; | |
271 | bdf->ibd_bits.b.b_sgbl = 0; | |
272 | bdf->ibd_bits.b.b_sdtb = 0; | |
273 | bdf->ibd_bits.b.b_dbo = 1; | |
274 | bdf->ibd_bits.b.b_sbo = 1; | |
275 | bdf->ibd_bits.b.b_valid = 1; | |
276 | bdf->ibd_datlen = 512; | |
277 | ||
278 | *dmadonep = 0; | |
279 | ||
280 | immap->im_sdma.sdma_idmr2 = (uchar) 0xf; | |
281 | ||
282 | immap->im_cpm.cp_cpcr = mk_cr_cmd (CPM_CR_IDMA2_PAGE, | |
283 | CPM_CR_IDMA2_SBLOCK, 0x0, | |
284 | 0x9) | 0x00010000; | |
285 | ||
286 | while (*dmadonep != 1) { | |
287 | if (ctrlc ()) { | |
288 | DEBUG ("\nInterrupted waiting for DMA interrupt.\n"); | |
289 | goto done; | |
290 | } | |
291 | printf ("Waiting for DMA interrupt (dmadone=%d b_valid = %d)...\n", | |
292 | dmadone, bdf->ibd_bits.b.b_valid); | |
293 | udelay (1000000); | |
294 | } | |
295 | printf ("DMA complete notification received!\n"); | |
296 | ||
297 | done: | |
298 | DEBUG ("memcmp(0x%08x, 0x%08x, 512) = %d\n", | |
299 | sbuf, dbuf, memcmp ((void *) sbuf, (void *) dbuf, 512)); | |
300 | ||
301 | return; | |
302 | } | |
303 | ||
304 | #define MAX_INT_BUFSZ 64 | |
305 | #define DCM_WRAP 0 /* MUST be consistant with MAX_INT_BUFSZ */ | |
306 | ||
307 | int idma_init (void) | |
308 | { | |
309 | uint memaddr; | |
310 | ||
311 | immap->im_cpm.cp_rccr &= ~0x00F3FFFF; | |
312 | immap->im_cpm.cp_rccr |= 0x00A00A00; | |
313 | ||
314 | memaddr = dpalloc (sizeof (pram_idma_t), 64); | |
315 | ||
316 | *(volatile ushort *) &immap->im_dprambase[PROFF_IDMA2_BASE] = memaddr; | |
317 | piptr = (volatile pram_idma_t *) ((uint) (immap) + memaddr); | |
318 | ||
319 | piptr->pi_resv1 = 0; /* manual says: clear it */ | |
320 | piptr->pi_dcmbits.b.b_fb = 0; | |
321 | piptr->pi_dcmbits.b.b_lp = 1; | |
322 | piptr->pi_dcmbits.b.b_erm = 0; | |
323 | piptr->pi_dcmbits.b.b_dt = 0; | |
324 | ||
325 | memaddr = (uint) dpalloc (sizeof (ibd_t), 64); | |
326 | piptr->pi_ibase = piptr->pi_ibdptr = (volatile short) memaddr; | |
327 | bdf = (volatile ibd_t *) ((uint) (immap) + memaddr); | |
328 | bdf->ibd_bits.b.b_valid = 0; | |
329 | ||
330 | memaddr = (uint) dpalloc (64, 64); | |
331 | piptr->pi_dprbuf = (volatile ushort) memaddr; | |
332 | piptr->pi_dcmbits.b.b_wrap = 4; | |
333 | piptr->pi_ssmax = 32; | |
334 | ||
335 | piptr->pi_sts = piptr->pi_ssmax; | |
336 | piptr->pi_dts = piptr->pi_ssmax; | |
337 | ||
338 | return 1; | |
339 | } | |
340 | ||
341 | void dmadone_handler (void *arg) | |
342 | { | |
343 | immap->im_sdma.sdma_idmr2 = (uchar) 0x0; | |
344 | ||
345 | *dmadonep = 1; | |
346 | ||
347 | return; | |
348 | } | |
349 | ||
350 | ||
351 | static uint dpbase = 0; | |
352 | ||
353 | uint dpalloc (uint size, uint align) | |
354 | { | |
355 | DECLARE_GLOBAL_DATA_PTR; | |
356 | ||
357 | volatile immap_t *immr = (immap_t *) CFG_IMMR; | |
358 | uint retloc; | |
359 | uint align_mask, off; | |
360 | uint savebase; | |
361 | ||
362 | /* Pointer to initial global data area */ | |
363 | ||
364 | if (dpinit_done == 0) { | |
365 | dpbase = gd->dp_alloc_base; | |
366 | dpinit_done = 1; | |
367 | } | |
368 | ||
369 | align_mask = align - 1; | |
370 | savebase = dpbase; | |
371 | ||
372 | if ((off = (dpbase & align_mask)) != 0) | |
373 | dpbase += (align - off); | |
374 | ||
375 | if ((off = size & align_mask) != 0) | |
376 | size += align - off; | |
377 | ||
378 | if ((dpbase + size) >= gd->dp_alloc_top) { | |
379 | dpbase = savebase; | |
380 | printf ("dpalloc: ran out of dual port ram!"); | |
381 | return 0; | |
382 | } | |
383 | ||
384 | retloc = dpbase; | |
385 | dpbase += size; | |
386 | ||
387 | memset ((void *) &immr->im_dprambase[retloc], 0, size); | |
388 | ||
389 | return (retloc); | |
390 | } |