1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3 * tw68_risc.c
4 * Part of the device driver for Techwell 68xx based cards
5 *
6 * Much of this code is derived from the cx88 and sa7134 drivers, which
7 * were in turn derived from the bt87x driver. The original work was by
8 * Gerd Knorr; more recently the code was enhanced by Mauro Carvalho Chehab,
9 * Hans Verkuil, Andy Walls and many others. Their work is gratefully
10 * acknowledged. Full credit goes to them - any problems within this code
11 * are mine.
12 *
13 * Copyright (C) 2009 William M. Brack
14 *
15 * Refactored and updated to the latest v4l core frameworks:
16 *
17 * Copyright (C) 2014 Hans Verkuil <hverkuil@xs4all.nl>
18 */
19
20 #include "tw68.h"
21
22 /**
23 * tw68_risc_field
24 * @rp: pointer to current risc program position
25 * @sglist: pointer to "scatter-gather list" of buffer pointers
26 * @offset: offset to target memory buffer
27 * @sync_line: 0 -> no sync, 1 -> odd sync, 2 -> even sync
28 * @bpl: number of bytes per scan line
29 * @padding: number of bytes of padding to add
30 * @lines: number of lines in field
31 * @jump: insert a jump at the start
32 */
tw68_risc_field(__le32 * rp,struct scatterlist * sglist,unsigned int offset,u32 sync_line,unsigned int bpl,unsigned int padding,unsigned int lines,bool jump)33 static __le32 *tw68_risc_field(__le32 *rp, struct scatterlist *sglist,
34 unsigned int offset, u32 sync_line,
35 unsigned int bpl, unsigned int padding,
36 unsigned int lines, bool jump)
37 {
38 struct scatterlist *sg;
39 unsigned int line, todo, done;
40
41 if (jump) {
42 *(rp++) = cpu_to_le32(RISC_JUMP);
43 *(rp++) = 0;
44 }
45
46 /* sync instruction */
47 if (sync_line == 1)
48 *(rp++) = cpu_to_le32(RISC_SYNCO);
49 else
50 *(rp++) = cpu_to_le32(RISC_SYNCE);
51 *(rp++) = 0;
52
53 /* scan lines */
54 sg = sglist;
55 for (line = 0; line < lines; line++) {
56 /* calculate next starting position */
57 while (offset && offset >= sg_dma_len(sg)) {
58 offset -= sg_dma_len(sg);
59 sg = sg_next(sg);
60 }
61 if (bpl <= sg_dma_len(sg) - offset) {
62 /* fits into current chunk */
63 *(rp++) = cpu_to_le32(RISC_LINESTART |
64 /* (offset<<12) |*/ bpl);
65 *(rp++) = cpu_to_le32(sg_dma_address(sg) + offset);
66 offset += bpl;
67 } else {
68 /*
69 * scanline needs to be split. Put the start in
70 * whatever memory remains using RISC_LINESTART,
71 * then the remainder into following addresses
72 * given by the scatter-gather list.
73 */
74 todo = bpl; /* one full line to be done */
75 /* first fragment */
76 done = (sg_dma_len(sg) - offset);
77 *(rp++) = cpu_to_le32(RISC_LINESTART |
78 (7 << 24) |
79 done);
80 *(rp++) = cpu_to_le32(sg_dma_address(sg) + offset);
81 todo -= done;
82 sg = sg_next(sg);
83 /* succeeding fragments have no offset */
84 while (todo > sg_dma_len(sg)) {
85 *(rp++) = cpu_to_le32(RISC_INLINE |
86 (done << 12) |
87 sg_dma_len(sg));
88 *(rp++) = cpu_to_le32(sg_dma_address(sg));
89 todo -= sg_dma_len(sg);
90 sg = sg_next(sg);
91 done += sg_dma_len(sg);
92 }
93 if (todo) {
94 /* final chunk - offset 0, count 'todo' */
95 *(rp++) = cpu_to_le32(RISC_INLINE |
96 (done << 12) |
97 todo);
98 *(rp++) = cpu_to_le32(sg_dma_address(sg));
99 }
100 offset = todo;
101 }
102 offset += padding;
103 }
104
105 return rp;
106 }
107
108 /**
109 * tw68_risc_buffer
110 *
111 * This routine is called by tw68-video. It allocates
112 * memory for the dma controller "program" and then fills in that
113 * memory with the appropriate "instructions".
114 *
115 * @pci: structure with info about the pci
116 * slot which our device is in.
117 * @buf: structure with info about the memory
118 * used for our controller program.
119 * @sglist: scatter-gather list entry
120 * @top_offset: offset within the risc program area for the
121 * first odd frame line
122 * @bottom_offset: offset within the risc program area for the
123 * first even frame line
124 * @bpl: number of data bytes per scan line
125 * @padding: number of extra bytes to add at end of line
126 * @lines: number of scan lines
127 */
tw68_risc_buffer(struct pci_dev * pci,struct tw68_buf * buf,struct scatterlist * sglist,unsigned int top_offset,unsigned int bottom_offset,unsigned int bpl,unsigned int padding,unsigned int lines)128 int tw68_risc_buffer(struct pci_dev *pci,
129 struct tw68_buf *buf,
130 struct scatterlist *sglist,
131 unsigned int top_offset,
132 unsigned int bottom_offset,
133 unsigned int bpl,
134 unsigned int padding,
135 unsigned int lines)
136 {
137 u32 instructions, fields;
138 __le32 *rp;
139
140 fields = 0;
141 if (UNSET != top_offset)
142 fields++;
143 if (UNSET != bottom_offset)
144 fields++;
145 /*
146 * estimate risc mem: worst case is one write per page border +
147 * one write per scan line + syncs + 2 jumps (all 2 dwords).
148 * Padding can cause next bpl to start close to a page border.
149 * First DMA region may be smaller than PAGE_SIZE
150 */
151 instructions = fields * (1 + (((bpl + padding) * lines) /
152 PAGE_SIZE) + lines) + 4;
153 buf->size = instructions * 8;
154 buf->cpu = pci_alloc_consistent(pci, buf->size, &buf->dma);
155 if (buf->cpu == NULL)
156 return -ENOMEM;
157
158 /* write risc instructions */
159 rp = buf->cpu;
160 if (UNSET != top_offset) /* generates SYNCO */
161 rp = tw68_risc_field(rp, sglist, top_offset, 1,
162 bpl, padding, lines, true);
163 if (UNSET != bottom_offset) /* generates SYNCE */
164 rp = tw68_risc_field(rp, sglist, bottom_offset, 2,
165 bpl, padding, lines, top_offset == UNSET);
166
167 /* save pointer to jmp instruction address */
168 buf->jmp = rp;
169 buf->cpu[1] = cpu_to_le32(buf->dma + 8);
170 /* assure risc buffer hasn't overflowed */
171 BUG_ON((buf->jmp - buf->cpu + 2) * sizeof(buf->cpu[0]) > buf->size);
172 return 0;
173 }
174
175 #if 0
176 /* ------------------------------------------------------------------ */
177 /* debug helper code */
178
179 static void tw68_risc_decode(u32 risc, u32 addr)
180 {
181 #define RISC_OP(reg) (((reg) >> 28) & 7)
182 static struct instr_details {
183 char *name;
184 u8 has_data_type;
185 u8 has_byte_info;
186 u8 has_addr;
187 } instr[8] = {
188 [RISC_OP(RISC_SYNCO)] = {"syncOdd", 0, 0, 0},
189 [RISC_OP(RISC_SYNCE)] = {"syncEven", 0, 0, 0},
190 [RISC_OP(RISC_JUMP)] = {"jump", 0, 0, 1},
191 [RISC_OP(RISC_LINESTART)] = {"lineStart", 1, 1, 1},
192 [RISC_OP(RISC_INLINE)] = {"inline", 1, 1, 1},
193 };
194 u32 p;
195
196 p = RISC_OP(risc);
197 if (!(risc & 0x80000000) || !instr[p].name) {
198 pr_debug("0x%08x [ INVALID ]\n", risc);
199 return;
200 }
201 pr_debug("0x%08x %-9s IRQ=%d",
202 risc, instr[p].name, (risc >> 27) & 1);
203 if (instr[p].has_data_type)
204 pr_debug(" Type=%d", (risc >> 24) & 7);
205 if (instr[p].has_byte_info)
206 pr_debug(" Start=0x%03x Count=%03u",
207 (risc >> 12) & 0xfff, risc & 0xfff);
208 if (instr[p].has_addr)
209 pr_debug(" StartAddr=0x%08x", addr);
210 pr_debug("\n");
211 }
212
213 void tw68_risc_program_dump(struct tw68_core *core, struct tw68_buf *buf)
214 {
215 const __le32 *addr;
216
217 pr_debug("%s: risc_program_dump: risc=%p, buf->cpu=0x%p, buf->jmp=0x%p\n",
218 core->name, buf, buf->cpu, buf->jmp);
219 for (addr = buf->cpu; addr <= buf->jmp; addr += 2)
220 tw68_risc_decode(*addr, *(addr+1));
221 }
222 #endif
223
