1 /*
2  * Copyright (C) ST-Ericsson SA 2007-2010
3  * Author: Per Forlin <per.forlin@stericsson.com> for ST-Ericsson
4  * Author: Jonas Aaberg <jonas.aberg@stericsson.com> for ST-Ericsson
5  * License terms: GNU General Public License (GPL) version 2
6  */
7 
8 #include <linux/kernel.h>
9 #include <linux/platform_data/dma-ste-dma40.h>
10 
11 #include "ste_dma40_ll.h"
12 
d40_width_to_bits(enum dma_slave_buswidth width)13 static u8 d40_width_to_bits(enum dma_slave_buswidth width)
14 {
15 	if (width == DMA_SLAVE_BUSWIDTH_1_BYTE)
16 		return STEDMA40_ESIZE_8_BIT;
17 	else if (width == DMA_SLAVE_BUSWIDTH_2_BYTES)
18 		return STEDMA40_ESIZE_16_BIT;
19 	else if (width == DMA_SLAVE_BUSWIDTH_8_BYTES)
20 		return STEDMA40_ESIZE_64_BIT;
21 	else
22 		return STEDMA40_ESIZE_32_BIT;
23 }
24 
25 /* Sets up proper LCSP1 and LCSP3 register for a logical channel */
d40_log_cfg(struct stedma40_chan_cfg * cfg,u32 * lcsp1,u32 * lcsp3)26 void d40_log_cfg(struct stedma40_chan_cfg *cfg,
27 		 u32 *lcsp1, u32 *lcsp3)
28 {
29 	u32 l3 = 0; /* dst */
30 	u32 l1 = 0; /* src */
31 
32 	/* src is mem? -> increase address pos */
33 	if (cfg->dir ==  DMA_MEM_TO_DEV ||
34 	    cfg->dir ==  DMA_MEM_TO_MEM)
35 		l1 |= BIT(D40_MEM_LCSP1_SCFG_INCR_POS);
36 
37 	/* dst is mem? -> increase address pos */
38 	if (cfg->dir ==  DMA_DEV_TO_MEM ||
39 	    cfg->dir ==  DMA_MEM_TO_MEM)
40 		l3 |= BIT(D40_MEM_LCSP3_DCFG_INCR_POS);
41 
42 	/* src is hw? -> master port 1 */
43 	if (cfg->dir ==  DMA_DEV_TO_MEM ||
44 	    cfg->dir ==  DMA_DEV_TO_DEV)
45 		l1 |= BIT(D40_MEM_LCSP1_SCFG_MST_POS);
46 
47 	/* dst is hw? -> master port 1 */
48 	if (cfg->dir ==  DMA_MEM_TO_DEV ||
49 	    cfg->dir ==  DMA_DEV_TO_DEV)
50 		l3 |= BIT(D40_MEM_LCSP3_DCFG_MST_POS);
51 
52 	l3 |= BIT(D40_MEM_LCSP3_DCFG_EIM_POS);
53 	l3 |= cfg->dst_info.psize << D40_MEM_LCSP3_DCFG_PSIZE_POS;
54 	l3 |= d40_width_to_bits(cfg->dst_info.data_width)
55 		<< D40_MEM_LCSP3_DCFG_ESIZE_POS;
56 
57 	l1 |= BIT(D40_MEM_LCSP1_SCFG_EIM_POS);
58 	l1 |= cfg->src_info.psize << D40_MEM_LCSP1_SCFG_PSIZE_POS;
59 	l1 |= d40_width_to_bits(cfg->src_info.data_width)
60 		<< D40_MEM_LCSP1_SCFG_ESIZE_POS;
61 
62 	*lcsp1 = l1;
63 	*lcsp3 = l3;
64 
65 }
66 
d40_phy_cfg(struct stedma40_chan_cfg * cfg,u32 * src_cfg,u32 * dst_cfg)67 void d40_phy_cfg(struct stedma40_chan_cfg *cfg, u32 *src_cfg, u32 *dst_cfg)
68 {
69 	u32 src = 0;
70 	u32 dst = 0;
71 
72 	if ((cfg->dir == DMA_DEV_TO_MEM) ||
73 	    (cfg->dir == DMA_DEV_TO_DEV)) {
74 		/* Set master port to 1 */
75 		src |= BIT(D40_SREG_CFG_MST_POS);
76 		src |= D40_TYPE_TO_EVENT(cfg->dev_type);
77 
78 		if (cfg->src_info.flow_ctrl == STEDMA40_NO_FLOW_CTRL)
79 			src |= BIT(D40_SREG_CFG_PHY_TM_POS);
80 		else
81 			src |= 3 << D40_SREG_CFG_PHY_TM_POS;
82 	}
83 	if ((cfg->dir == DMA_MEM_TO_DEV) ||
84 	    (cfg->dir == DMA_DEV_TO_DEV)) {
85 		/* Set master port to 1 */
86 		dst |= BIT(D40_SREG_CFG_MST_POS);
87 		dst |= D40_TYPE_TO_EVENT(cfg->dev_type);
88 
89 		if (cfg->dst_info.flow_ctrl == STEDMA40_NO_FLOW_CTRL)
90 			dst |= BIT(D40_SREG_CFG_PHY_TM_POS);
91 		else
92 			dst |= 3 << D40_SREG_CFG_PHY_TM_POS;
93 	}
94 	/* Interrupt on end of transfer for destination */
95 	dst |= BIT(D40_SREG_CFG_TIM_POS);
96 
97 	/* Generate interrupt on error */
98 	src |= BIT(D40_SREG_CFG_EIM_POS);
99 	dst |= BIT(D40_SREG_CFG_EIM_POS);
100 
101 	/* PSIZE */
102 	if (cfg->src_info.psize != STEDMA40_PSIZE_PHY_1) {
103 		src |= BIT(D40_SREG_CFG_PHY_PEN_POS);
104 		src |= cfg->src_info.psize << D40_SREG_CFG_PSIZE_POS;
105 	}
106 	if (cfg->dst_info.psize != STEDMA40_PSIZE_PHY_1) {
107 		dst |= BIT(D40_SREG_CFG_PHY_PEN_POS);
108 		dst |= cfg->dst_info.psize << D40_SREG_CFG_PSIZE_POS;
109 	}
110 
111 	/* Element size */
112 	src |= d40_width_to_bits(cfg->src_info.data_width)
113 		<< D40_SREG_CFG_ESIZE_POS;
114 	dst |= d40_width_to_bits(cfg->dst_info.data_width)
115 		<< D40_SREG_CFG_ESIZE_POS;
116 
117 	/* Set the priority bit to high for the physical channel */
118 	if (cfg->high_priority) {
119 		src |= BIT(D40_SREG_CFG_PRI_POS);
120 		dst |= BIT(D40_SREG_CFG_PRI_POS);
121 	}
122 
123 	if (cfg->src_info.big_endian)
124 		src |= BIT(D40_SREG_CFG_LBE_POS);
125 	if (cfg->dst_info.big_endian)
126 		dst |= BIT(D40_SREG_CFG_LBE_POS);
127 
128 	*src_cfg = src;
129 	*dst_cfg = dst;
130 }
131 
d40_phy_fill_lli(struct d40_phy_lli * lli,dma_addr_t data,u32 data_size,dma_addr_t next_lli,u32 reg_cfg,struct stedma40_half_channel_info * info,unsigned int flags)132 static int d40_phy_fill_lli(struct d40_phy_lli *lli,
133 			    dma_addr_t data,
134 			    u32 data_size,
135 			    dma_addr_t next_lli,
136 			    u32 reg_cfg,
137 			    struct stedma40_half_channel_info *info,
138 			    unsigned int flags)
139 {
140 	bool addr_inc = flags & LLI_ADDR_INC;
141 	bool term_int = flags & LLI_TERM_INT;
142 	unsigned int data_width = info->data_width;
143 	int psize = info->psize;
144 	int num_elems;
145 
146 	if (psize == STEDMA40_PSIZE_PHY_1)
147 		num_elems = 1;
148 	else
149 		num_elems = 2 << psize;
150 
151 	/* Must be aligned */
152 	if (!IS_ALIGNED(data, data_width))
153 		return -EINVAL;
154 
155 	/* Transfer size can't be smaller than (num_elms * elem_size) */
156 	if (data_size < num_elems * data_width)
157 		return -EINVAL;
158 
159 	/* The number of elements. IE now many chunks */
160 	lli->reg_elt = (data_size / data_width) << D40_SREG_ELEM_PHY_ECNT_POS;
161 
162 	/*
163 	 * Distance to next element sized entry.
164 	 * Usually the size of the element unless you want gaps.
165 	 */
166 	if (addr_inc)
167 		lli->reg_elt |= data_width << D40_SREG_ELEM_PHY_EIDX_POS;
168 
169 	/* Where the data is */
170 	lli->reg_ptr = data;
171 	lli->reg_cfg = reg_cfg;
172 
173 	/* If this scatter list entry is the last one, no next link */
174 	if (next_lli == 0)
175 		lli->reg_lnk = BIT(D40_SREG_LNK_PHY_TCP_POS);
176 	else
177 		lli->reg_lnk = next_lli;
178 
179 	/* Set/clear interrupt generation on this link item.*/
180 	if (term_int)
181 		lli->reg_cfg |= BIT(D40_SREG_CFG_TIM_POS);
182 	else
183 		lli->reg_cfg &= ~BIT(D40_SREG_CFG_TIM_POS);
184 
185 	/*
186 	 * Post link - D40_SREG_LNK_PHY_PRE_POS = 0
187 	 * Relink happens after transfer completion.
188 	 */
189 
190 	return 0;
191 }
192 
d40_seg_size(int size,int data_width1,int data_width2)193 static int d40_seg_size(int size, int data_width1, int data_width2)
194 {
195 	u32 max_w = max(data_width1, data_width2);
196 	u32 min_w = min(data_width1, data_width2);
197 	u32 seg_max = ALIGN(STEDMA40_MAX_SEG_SIZE * min_w, max_w);
198 
199 	if (seg_max > STEDMA40_MAX_SEG_SIZE)
200 		seg_max -= max_w;
201 
202 	if (size <= seg_max)
203 		return size;
204 
205 	if (size <= 2 * seg_max)
206 		return ALIGN(size / 2, max_w);
207 
208 	return seg_max;
209 }
210 
211 static struct d40_phy_lli *
d40_phy_buf_to_lli(struct d40_phy_lli * lli,dma_addr_t addr,u32 size,dma_addr_t lli_phys,dma_addr_t first_phys,u32 reg_cfg,struct stedma40_half_channel_info * info,struct stedma40_half_channel_info * otherinfo,unsigned long flags)212 d40_phy_buf_to_lli(struct d40_phy_lli *lli, dma_addr_t addr, u32 size,
213 		   dma_addr_t lli_phys, dma_addr_t first_phys, u32 reg_cfg,
214 		   struct stedma40_half_channel_info *info,
215 		   struct stedma40_half_channel_info *otherinfo,
216 		   unsigned long flags)
217 {
218 	bool lastlink = flags & LLI_LAST_LINK;
219 	bool addr_inc = flags & LLI_ADDR_INC;
220 	bool term_int = flags & LLI_TERM_INT;
221 	bool cyclic = flags & LLI_CYCLIC;
222 	int err;
223 	dma_addr_t next = lli_phys;
224 	int size_rest = size;
225 	int size_seg = 0;
226 
227 	/*
228 	 * This piece may be split up based on d40_seg_size(); we only want the
229 	 * term int on the last part.
230 	 */
231 	if (term_int)
232 		flags &= ~LLI_TERM_INT;
233 
234 	do {
235 		size_seg = d40_seg_size(size_rest, info->data_width,
236 					otherinfo->data_width);
237 		size_rest -= size_seg;
238 
239 		if (size_rest == 0 && term_int)
240 			flags |= LLI_TERM_INT;
241 
242 		if (size_rest == 0 && lastlink)
243 			next = cyclic ? first_phys : 0;
244 		else
245 			next = ALIGN(next + sizeof(struct d40_phy_lli),
246 				     D40_LLI_ALIGN);
247 
248 		err = d40_phy_fill_lli(lli, addr, size_seg, next,
249 				       reg_cfg, info, flags);
250 
251 		if (err)
252 			goto err;
253 
254 		lli++;
255 		if (addr_inc)
256 			addr += size_seg;
257 	} while (size_rest);
258 
259 	return lli;
260 
261 err:
262 	return NULL;
263 }
264 
d40_phy_sg_to_lli(struct scatterlist * sg,int sg_len,dma_addr_t target,struct d40_phy_lli * lli_sg,dma_addr_t lli_phys,u32 reg_cfg,struct stedma40_half_channel_info * info,struct stedma40_half_channel_info * otherinfo,unsigned long flags)265 int d40_phy_sg_to_lli(struct scatterlist *sg,
266 		      int sg_len,
267 		      dma_addr_t target,
268 		      struct d40_phy_lli *lli_sg,
269 		      dma_addr_t lli_phys,
270 		      u32 reg_cfg,
271 		      struct stedma40_half_channel_info *info,
272 		      struct stedma40_half_channel_info *otherinfo,
273 		      unsigned long flags)
274 {
275 	int total_size = 0;
276 	int i;
277 	struct scatterlist *current_sg = sg;
278 	struct d40_phy_lli *lli = lli_sg;
279 	dma_addr_t l_phys = lli_phys;
280 
281 	if (!target)
282 		flags |= LLI_ADDR_INC;
283 
284 	for_each_sg(sg, current_sg, sg_len, i) {
285 		dma_addr_t sg_addr = sg_dma_address(current_sg);
286 		unsigned int len = sg_dma_len(current_sg);
287 		dma_addr_t dst = target ?: sg_addr;
288 
289 		total_size += sg_dma_len(current_sg);
290 
291 		if (i == sg_len - 1)
292 			flags |= LLI_TERM_INT | LLI_LAST_LINK;
293 
294 		l_phys = ALIGN(lli_phys + (lli - lli_sg) *
295 			       sizeof(struct d40_phy_lli), D40_LLI_ALIGN);
296 
297 		lli = d40_phy_buf_to_lli(lli, dst, len, l_phys, lli_phys,
298 					 reg_cfg, info, otherinfo, flags);
299 
300 		if (lli == NULL)
301 			return -EINVAL;
302 	}
303 
304 	return total_size;
305 }
306 
307 
308 /* DMA logical lli operations */
309 
d40_log_lli_link(struct d40_log_lli * lli_dst,struct d40_log_lli * lli_src,int next,unsigned int flags)310 static void d40_log_lli_link(struct d40_log_lli *lli_dst,
311 			     struct d40_log_lli *lli_src,
312 			     int next, unsigned int flags)
313 {
314 	bool interrupt = flags & LLI_TERM_INT;
315 	u32 slos = 0;
316 	u32 dlos = 0;
317 
318 	if (next != -EINVAL) {
319 		slos = next * 2;
320 		dlos = next * 2 + 1;
321 	}
322 
323 	if (interrupt) {
324 		lli_dst->lcsp13 |= D40_MEM_LCSP1_SCFG_TIM_MASK;
325 		lli_dst->lcsp13 |= D40_MEM_LCSP3_DTCP_MASK;
326 	}
327 
328 	lli_src->lcsp13 = (lli_src->lcsp13 & ~D40_MEM_LCSP1_SLOS_MASK) |
329 		(slos << D40_MEM_LCSP1_SLOS_POS);
330 
331 	lli_dst->lcsp13 = (lli_dst->lcsp13 & ~D40_MEM_LCSP1_SLOS_MASK) |
332 		(dlos << D40_MEM_LCSP1_SLOS_POS);
333 }
334 
d40_log_lli_lcpa_write(struct d40_log_lli_full * lcpa,struct d40_log_lli * lli_dst,struct d40_log_lli * lli_src,int next,unsigned int flags)335 void d40_log_lli_lcpa_write(struct d40_log_lli_full *lcpa,
336 			   struct d40_log_lli *lli_dst,
337 			   struct d40_log_lli *lli_src,
338 			   int next, unsigned int flags)
339 {
340 	d40_log_lli_link(lli_dst, lli_src, next, flags);
341 
342 	writel_relaxed(lli_src->lcsp02, &lcpa[0].lcsp0);
343 	writel_relaxed(lli_src->lcsp13, &lcpa[0].lcsp1);
344 	writel_relaxed(lli_dst->lcsp02, &lcpa[0].lcsp2);
345 	writel_relaxed(lli_dst->lcsp13, &lcpa[0].lcsp3);
346 }
347 
d40_log_lli_lcla_write(struct d40_log_lli * lcla,struct d40_log_lli * lli_dst,struct d40_log_lli * lli_src,int next,unsigned int flags)348 void d40_log_lli_lcla_write(struct d40_log_lli *lcla,
349 			   struct d40_log_lli *lli_dst,
350 			   struct d40_log_lli *lli_src,
351 			   int next, unsigned int flags)
352 {
353 	d40_log_lli_link(lli_dst, lli_src, next, flags);
354 
355 	writel_relaxed(lli_src->lcsp02, &lcla[0].lcsp02);
356 	writel_relaxed(lli_src->lcsp13, &lcla[0].lcsp13);
357 	writel_relaxed(lli_dst->lcsp02, &lcla[1].lcsp02);
358 	writel_relaxed(lli_dst->lcsp13, &lcla[1].lcsp13);
359 }
360 
d40_log_fill_lli(struct d40_log_lli * lli,dma_addr_t data,u32 data_size,u32 reg_cfg,u32 data_width,unsigned int flags)361 static void d40_log_fill_lli(struct d40_log_lli *lli,
362 			     dma_addr_t data, u32 data_size,
363 			     u32 reg_cfg,
364 			     u32 data_width,
365 			     unsigned int flags)
366 {
367 	bool addr_inc = flags & LLI_ADDR_INC;
368 
369 	lli->lcsp13 = reg_cfg;
370 
371 	/* The number of elements to transfer */
372 	lli->lcsp02 = ((data_size / data_width) <<
373 		       D40_MEM_LCSP0_ECNT_POS) & D40_MEM_LCSP0_ECNT_MASK;
374 
375 	BUG_ON((data_size / data_width) > STEDMA40_MAX_SEG_SIZE);
376 
377 	/* 16 LSBs address of the current element */
378 	lli->lcsp02 |= data & D40_MEM_LCSP0_SPTR_MASK;
379 	/* 16 MSBs address of the current element */
380 	lli->lcsp13 |= data & D40_MEM_LCSP1_SPTR_MASK;
381 
382 	if (addr_inc)
383 		lli->lcsp13 |= D40_MEM_LCSP1_SCFG_INCR_MASK;
384 
385 }
386 
d40_log_buf_to_lli(struct d40_log_lli * lli_sg,dma_addr_t addr,int size,u32 lcsp13,u32 data_width1,u32 data_width2,unsigned int flags)387 static struct d40_log_lli *d40_log_buf_to_lli(struct d40_log_lli *lli_sg,
388 				       dma_addr_t addr,
389 				       int size,
390 				       u32 lcsp13, /* src or dst*/
391 				       u32 data_width1,
392 				       u32 data_width2,
393 				       unsigned int flags)
394 {
395 	bool addr_inc = flags & LLI_ADDR_INC;
396 	struct d40_log_lli *lli = lli_sg;
397 	int size_rest = size;
398 	int size_seg = 0;
399 
400 	do {
401 		size_seg = d40_seg_size(size_rest, data_width1, data_width2);
402 		size_rest -= size_seg;
403 
404 		d40_log_fill_lli(lli,
405 				 addr,
406 				 size_seg,
407 				 lcsp13, data_width1,
408 				 flags);
409 		if (addr_inc)
410 			addr += size_seg;
411 		lli++;
412 	} while (size_rest);
413 
414 	return lli;
415 }
416 
d40_log_sg_to_lli(struct scatterlist * sg,int sg_len,dma_addr_t dev_addr,struct d40_log_lli * lli_sg,u32 lcsp13,u32 data_width1,u32 data_width2)417 int d40_log_sg_to_lli(struct scatterlist *sg,
418 		      int sg_len,
419 		      dma_addr_t dev_addr,
420 		      struct d40_log_lli *lli_sg,
421 		      u32 lcsp13, /* src or dst*/
422 		      u32 data_width1, u32 data_width2)
423 {
424 	int total_size = 0;
425 	struct scatterlist *current_sg = sg;
426 	int i;
427 	struct d40_log_lli *lli = lli_sg;
428 	unsigned long flags = 0;
429 
430 	if (!dev_addr)
431 		flags |= LLI_ADDR_INC;
432 
433 	for_each_sg(sg, current_sg, sg_len, i) {
434 		dma_addr_t sg_addr = sg_dma_address(current_sg);
435 		unsigned int len = sg_dma_len(current_sg);
436 		dma_addr_t addr = dev_addr ?: sg_addr;
437 
438 		total_size += sg_dma_len(current_sg);
439 
440 		lli = d40_log_buf_to_lli(lli, addr, len,
441 					 lcsp13,
442 					 data_width1,
443 					 data_width2,
444 					 flags);
445 	}
446 
447 	return total_size;
448 }
449