Linux Audio

Check our new training course

Loading...
v4.6
 
   1/*
   2 * Copyright (C) Freescale Semicondutor, Inc. 2007, 2008.
   3 * Copyright (C) Semihalf 2009
   4 * Copyright (C) Ilya Yanok, Emcraft Systems 2010
   5 * Copyright (C) Alexander Popov, Promcontroller 2014
 
   6 *
   7 * Written by Piotr Ziecik <kosmo@semihalf.com>. Hardware description
   8 * (defines, structures and comments) was taken from MPC5121 DMA driver
   9 * written by Hongjun Chen <hong-jun.chen@freescale.com>.
  10 *
  11 * Approved as OSADL project by a majority of OSADL members and funded
  12 * by OSADL membership fees in 2009;  for details see www.osadl.org.
  13 *
  14 * This program is free software; you can redistribute it and/or modify it
  15 * under the terms of the GNU General Public License as published by the Free
  16 * Software Foundation; either version 2 of the License, or (at your option)
  17 * any later version.
  18 *
  19 * This program is distributed in the hope that it will be useful, but WITHOUT
  20 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  21 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  22 * more details.
  23 *
  24 * The full GNU General Public License is included in this distribution in the
  25 * file called COPYING.
  26 */
  27
  28/*
  29 * MPC512x and MPC8308 DMA driver. It supports
  30 * memory to memory data transfers (tested using dmatest module) and
  31 * data transfers between memory and peripheral I/O memory
  32 * by means of slave scatter/gather with these limitations:
  33 *  - chunked transfers (described by s/g lists with more than one item)
  34 *     are refused as long as proper support for scatter/gather is missing;
  35 *  - transfers on MPC8308 always start from software as this SoC appears
  36 *     not to have external request lines for peripheral flow control;
  37 *  - only peripheral devices with 4-byte FIFO access register are supported;
  38 *  - minimal memory <-> I/O memory transfer chunk is 4 bytes and consequently
  39 *     source and destination addresses must be 4-byte aligned
  40 *     and transfer size must be aligned on (4 * maxburst) boundary;
 
  41 */
  42
  43#include <linux/module.h>
  44#include <linux/dmaengine.h>
  45#include <linux/dma-mapping.h>
  46#include <linux/interrupt.h>
  47#include <linux/io.h>
  48#include <linux/slab.h>
  49#include <linux/of_address.h>
  50#include <linux/of_device.h>
  51#include <linux/of_irq.h>
  52#include <linux/of_dma.h>
  53#include <linux/of_platform.h>
  54
  55#include <linux/random.h>
  56
  57#include "dmaengine.h"
  58
  59/* Number of DMA Transfer descriptors allocated per channel */
  60#define MPC_DMA_DESCRIPTORS	64
  61
  62/* Macro definitions */
  63#define MPC_DMA_TCD_OFFSET	0x1000
  64
  65/*
  66 * Maximum channel counts for individual hardware variants
  67 * and the maximum channel count over all supported controllers,
  68 * used for data structure size
  69 */
  70#define MPC8308_DMACHAN_MAX	16
  71#define MPC512x_DMACHAN_MAX	64
  72#define MPC_DMA_CHANNELS	64
  73
  74/* Arbitration mode of group and channel */
  75#define MPC_DMA_DMACR_EDCG	(1 << 31)
  76#define MPC_DMA_DMACR_ERGA	(1 << 3)
  77#define MPC_DMA_DMACR_ERCA	(1 << 2)
  78
  79/* Error codes */
  80#define MPC_DMA_DMAES_VLD	(1 << 31)
  81#define MPC_DMA_DMAES_GPE	(1 << 15)
  82#define MPC_DMA_DMAES_CPE	(1 << 14)
  83#define MPC_DMA_DMAES_ERRCHN(err) \
  84				(((err) >> 8) & 0x3f)
  85#define MPC_DMA_DMAES_SAE	(1 << 7)
  86#define MPC_DMA_DMAES_SOE	(1 << 6)
  87#define MPC_DMA_DMAES_DAE	(1 << 5)
  88#define MPC_DMA_DMAES_DOE	(1 << 4)
  89#define MPC_DMA_DMAES_NCE	(1 << 3)
  90#define MPC_DMA_DMAES_SGE	(1 << 2)
  91#define MPC_DMA_DMAES_SBE	(1 << 1)
  92#define MPC_DMA_DMAES_DBE	(1 << 0)
  93
  94#define MPC_DMA_DMAGPOR_SNOOP_ENABLE	(1 << 6)
  95
  96#define MPC_DMA_TSIZE_1		0x00
  97#define MPC_DMA_TSIZE_2		0x01
  98#define MPC_DMA_TSIZE_4		0x02
  99#define MPC_DMA_TSIZE_16	0x04
 100#define MPC_DMA_TSIZE_32	0x05
 101
 102/* MPC5121 DMA engine registers */
 103struct __attribute__ ((__packed__)) mpc_dma_regs {
 104	/* 0x00 */
 105	u32 dmacr;		/* DMA control register */
 106	u32 dmaes;		/* DMA error status */
 107	/* 0x08 */
 108	u32 dmaerqh;		/* DMA enable request high(channels 63~32) */
 109	u32 dmaerql;		/* DMA enable request low(channels 31~0) */
 110	u32 dmaeeih;		/* DMA enable error interrupt high(ch63~32) */
 111	u32 dmaeeil;		/* DMA enable error interrupt low(ch31~0) */
 112	/* 0x18 */
 113	u8 dmaserq;		/* DMA set enable request */
 114	u8 dmacerq;		/* DMA clear enable request */
 115	u8 dmaseei;		/* DMA set enable error interrupt */
 116	u8 dmaceei;		/* DMA clear enable error interrupt */
 117	/* 0x1c */
 118	u8 dmacint;		/* DMA clear interrupt request */
 119	u8 dmacerr;		/* DMA clear error */
 120	u8 dmassrt;		/* DMA set start bit */
 121	u8 dmacdne;		/* DMA clear DONE status bit */
 122	/* 0x20 */
 123	u32 dmainth;		/* DMA interrupt request high(ch63~32) */
 124	u32 dmaintl;		/* DMA interrupt request low(ch31~0) */
 125	u32 dmaerrh;		/* DMA error high(ch63~32) */
 126	u32 dmaerrl;		/* DMA error low(ch31~0) */
 127	/* 0x30 */
 128	u32 dmahrsh;		/* DMA hw request status high(ch63~32) */
 129	u32 dmahrsl;		/* DMA hardware request status low(ch31~0) */
 130	union {
 131		u32 dmaihsa;	/* DMA interrupt high select AXE(ch63~32) */
 132		u32 dmagpor;	/* (General purpose register on MPC8308) */
 133	};
 134	u32 dmailsa;		/* DMA interrupt low select AXE(ch31~0) */
 135	/* 0x40 ~ 0xff */
 136	u32 reserve0[48];	/* Reserved */
 137	/* 0x100 */
 138	u8 dchpri[MPC_DMA_CHANNELS];
 139	/* DMA channels(0~63) priority */
 140};
 141
 142struct __attribute__ ((__packed__)) mpc_dma_tcd {
 143	/* 0x00 */
 144	u32 saddr;		/* Source address */
 145
 146	u32 smod:5;		/* Source address modulo */
 147	u32 ssize:3;		/* Source data transfer size */
 148	u32 dmod:5;		/* Destination address modulo */
 149	u32 dsize:3;		/* Destination data transfer size */
 150	u32 soff:16;		/* Signed source address offset */
 151
 152	/* 0x08 */
 153	u32 nbytes;		/* Inner "minor" byte count */
 154	u32 slast;		/* Last source address adjustment */
 155	u32 daddr;		/* Destination address */
 156
 157	/* 0x14 */
 158	u32 citer_elink:1;	/* Enable channel-to-channel linking on
 159				 * minor loop complete
 160				 */
 161	u32 citer_linkch:6;	/* Link channel for minor loop complete */
 162	u32 citer:9;		/* Current "major" iteration count */
 163	u32 doff:16;		/* Signed destination address offset */
 164
 165	/* 0x18 */
 166	u32 dlast_sga;		/* Last Destination address adjustment/scatter
 167				 * gather address
 168				 */
 169
 170	/* 0x1c */
 171	u32 biter_elink:1;	/* Enable channel-to-channel linking on major
 172				 * loop complete
 173				 */
 174	u32 biter_linkch:6;
 175	u32 biter:9;		/* Beginning "major" iteration count */
 176	u32 bwc:2;		/* Bandwidth control */
 177	u32 major_linkch:6;	/* Link channel number */
 178	u32 done:1;		/* Channel done */
 179	u32 active:1;		/* Channel active */
 180	u32 major_elink:1;	/* Enable channel-to-channel linking on major
 181				 * loop complete
 182				 */
 183	u32 e_sg:1;		/* Enable scatter/gather processing */
 184	u32 d_req:1;		/* Disable request */
 185	u32 int_half:1;		/* Enable an interrupt when major counter is
 186				 * half complete
 187				 */
 188	u32 int_maj:1;		/* Enable an interrupt when major iteration
 189				 * count completes
 190				 */
 191	u32 start:1;		/* Channel start */
 192};
 193
 194struct mpc_dma_desc {
 195	struct dma_async_tx_descriptor	desc;
 196	struct mpc_dma_tcd		*tcd;
 197	dma_addr_t			tcd_paddr;
 198	int				error;
 199	struct list_head		node;
 200	int				will_access_peripheral;
 201};
 202
 203struct mpc_dma_chan {
 204	struct dma_chan			chan;
 205	struct list_head		free;
 206	struct list_head		prepared;
 207	struct list_head		queued;
 208	struct list_head		active;
 209	struct list_head		completed;
 210	struct mpc_dma_tcd		*tcd;
 211	dma_addr_t			tcd_paddr;
 212
 213	/* Settings for access to peripheral FIFO */
 214	dma_addr_t			src_per_paddr;
 215	u32				src_tcd_nunits;
 
 216	dma_addr_t			dst_per_paddr;
 217	u32				dst_tcd_nunits;
 
 218
 219	/* Lock for this structure */
 220	spinlock_t			lock;
 221};
 222
 223struct mpc_dma {
 224	struct dma_device		dma;
 225	struct tasklet_struct		tasklet;
 226	struct mpc_dma_chan		channels[MPC_DMA_CHANNELS];
 227	struct mpc_dma_regs __iomem	*regs;
 228	struct mpc_dma_tcd __iomem	*tcd;
 229	int				irq;
 230	int				irq2;
 231	uint				error_status;
 232	int				is_mpc8308;
 233
 234	/* Lock for error_status field in this structure */
 235	spinlock_t			error_status_lock;
 236};
 237
 238#define DRV_NAME	"mpc512x_dma"
 239
 240/* Convert struct dma_chan to struct mpc_dma_chan */
 241static inline struct mpc_dma_chan *dma_chan_to_mpc_dma_chan(struct dma_chan *c)
 242{
 243	return container_of(c, struct mpc_dma_chan, chan);
 244}
 245
 246/* Convert struct dma_chan to struct mpc_dma */
 247static inline struct mpc_dma *dma_chan_to_mpc_dma(struct dma_chan *c)
 248{
 249	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(c);
 
 250	return container_of(mchan, struct mpc_dma, channels[c->chan_id]);
 251}
 252
 253/*
 254 * Execute all queued DMA descriptors.
 255 *
 256 * Following requirements must be met while calling mpc_dma_execute():
 257 * 	a) mchan->lock is acquired,
 258 * 	b) mchan->active list is empty,
 259 * 	c) mchan->queued list contains at least one entry.
 260 */
 261static void mpc_dma_execute(struct mpc_dma_chan *mchan)
 262{
 263	struct mpc_dma *mdma = dma_chan_to_mpc_dma(&mchan->chan);
 264	struct mpc_dma_desc *first = NULL;
 265	struct mpc_dma_desc *prev = NULL;
 266	struct mpc_dma_desc *mdesc;
 267	int cid = mchan->chan.chan_id;
 268
 269	while (!list_empty(&mchan->queued)) {
 270		mdesc = list_first_entry(&mchan->queued,
 271						struct mpc_dma_desc, node);
 272		/*
 273		 * Grab either several mem-to-mem transfer descriptors
 274		 * or one peripheral transfer descriptor,
 275		 * don't mix mem-to-mem and peripheral transfer descriptors
 276		 * within the same 'active' list.
 277		 */
 278		if (mdesc->will_access_peripheral) {
 279			if (list_empty(&mchan->active))
 280				list_move_tail(&mdesc->node, &mchan->active);
 281			break;
 282		} else {
 283			list_move_tail(&mdesc->node, &mchan->active);
 284		}
 285	}
 286
 287	/* Chain descriptors into one transaction */
 288	list_for_each_entry(mdesc, &mchan->active, node) {
 289		if (!first)
 290			first = mdesc;
 291
 292		if (!prev) {
 293			prev = mdesc;
 294			continue;
 295		}
 296
 297		prev->tcd->dlast_sga = mdesc->tcd_paddr;
 298		prev->tcd->e_sg = 1;
 299		mdesc->tcd->start = 1;
 300
 301		prev = mdesc;
 302	}
 303
 304	prev->tcd->int_maj = 1;
 305
 306	/* Send first descriptor in chain into hardware */
 307	memcpy_toio(&mdma->tcd[cid], first->tcd, sizeof(struct mpc_dma_tcd));
 308
 309	if (first != prev)
 310		mdma->tcd[cid].e_sg = 1;
 311
 312	if (mdma->is_mpc8308) {
 313		/* MPC8308, no request lines, software initiated start */
 314		out_8(&mdma->regs->dmassrt, cid);
 315	} else if (first->will_access_peripheral) {
 316		/* Peripherals involved, start by external request signal */
 317		out_8(&mdma->regs->dmaserq, cid);
 318	} else {
 319		/* Memory to memory transfer, software initiated start */
 320		out_8(&mdma->regs->dmassrt, cid);
 321	}
 322}
 323
 324/* Handle interrupt on one half of DMA controller (32 channels) */
 325static void mpc_dma_irq_process(struct mpc_dma *mdma, u32 is, u32 es, int off)
 326{
 327	struct mpc_dma_chan *mchan;
 328	struct mpc_dma_desc *mdesc;
 329	u32 status = is | es;
 330	int ch;
 331
 332	while ((ch = fls(status) - 1) >= 0) {
 333		status &= ~(1 << ch);
 334		mchan = &mdma->channels[ch + off];
 335
 336		spin_lock(&mchan->lock);
 337
 338		out_8(&mdma->regs->dmacint, ch + off);
 339		out_8(&mdma->regs->dmacerr, ch + off);
 340
 341		/* Check error status */
 342		if (es & (1 << ch))
 343			list_for_each_entry(mdesc, &mchan->active, node)
 344				mdesc->error = -EIO;
 345
 346		/* Execute queued descriptors */
 347		list_splice_tail_init(&mchan->active, &mchan->completed);
 348		if (!list_empty(&mchan->queued))
 349			mpc_dma_execute(mchan);
 350
 351		spin_unlock(&mchan->lock);
 352	}
 353}
 354
 355/* Interrupt handler */
 356static irqreturn_t mpc_dma_irq(int irq, void *data)
 357{
 358	struct mpc_dma *mdma = data;
 359	uint es;
 360
 361	/* Save error status register */
 362	es = in_be32(&mdma->regs->dmaes);
 363	spin_lock(&mdma->error_status_lock);
 364	if ((es & MPC_DMA_DMAES_VLD) && mdma->error_status == 0)
 365		mdma->error_status = es;
 366	spin_unlock(&mdma->error_status_lock);
 367
 368	/* Handle interrupt on each channel */
 369	if (mdma->dma.chancnt > 32) {
 370		mpc_dma_irq_process(mdma, in_be32(&mdma->regs->dmainth),
 371					in_be32(&mdma->regs->dmaerrh), 32);
 372	}
 373	mpc_dma_irq_process(mdma, in_be32(&mdma->regs->dmaintl),
 374					in_be32(&mdma->regs->dmaerrl), 0);
 375
 376	/* Schedule tasklet */
 377	tasklet_schedule(&mdma->tasklet);
 378
 379	return IRQ_HANDLED;
 380}
 381
 382/* process completed descriptors */
 383static void mpc_dma_process_completed(struct mpc_dma *mdma)
 384{
 385	dma_cookie_t last_cookie = 0;
 386	struct mpc_dma_chan *mchan;
 387	struct mpc_dma_desc *mdesc;
 388	struct dma_async_tx_descriptor *desc;
 389	unsigned long flags;
 390	LIST_HEAD(list);
 391	int i;
 392
 393	for (i = 0; i < mdma->dma.chancnt; i++) {
 394		mchan = &mdma->channels[i];
 395
 396		/* Get all completed descriptors */
 397		spin_lock_irqsave(&mchan->lock, flags);
 398		if (!list_empty(&mchan->completed))
 399			list_splice_tail_init(&mchan->completed, &list);
 400		spin_unlock_irqrestore(&mchan->lock, flags);
 401
 402		if (list_empty(&list))
 403			continue;
 404
 405		/* Execute callbacks and run dependencies */
 406		list_for_each_entry(mdesc, &list, node) {
 407			desc = &mdesc->desc;
 408
 409			if (desc->callback)
 410				desc->callback(desc->callback_param);
 411
 412			last_cookie = desc->cookie;
 413			dma_run_dependencies(desc);
 414		}
 415
 416		/* Free descriptors */
 417		spin_lock_irqsave(&mchan->lock, flags);
 418		list_splice_tail_init(&list, &mchan->free);
 419		mchan->chan.completed_cookie = last_cookie;
 420		spin_unlock_irqrestore(&mchan->lock, flags);
 421	}
 422}
 423
 424/* DMA Tasklet */
 425static void mpc_dma_tasklet(unsigned long data)
 426{
 427	struct mpc_dma *mdma = (void *)data;
 428	unsigned long flags;
 429	uint es;
 430
 431	spin_lock_irqsave(&mdma->error_status_lock, flags);
 432	es = mdma->error_status;
 433	mdma->error_status = 0;
 434	spin_unlock_irqrestore(&mdma->error_status_lock, flags);
 435
 436	/* Print nice error report */
 437	if (es) {
 438		dev_err(mdma->dma.dev,
 439			"Hardware reported following error(s) on channel %u:\n",
 440						      MPC_DMA_DMAES_ERRCHN(es));
 441
 442		if (es & MPC_DMA_DMAES_GPE)
 443			dev_err(mdma->dma.dev, "- Group Priority Error\n");
 444		if (es & MPC_DMA_DMAES_CPE)
 445			dev_err(mdma->dma.dev, "- Channel Priority Error\n");
 446		if (es & MPC_DMA_DMAES_SAE)
 447			dev_err(mdma->dma.dev, "- Source Address Error\n");
 448		if (es & MPC_DMA_DMAES_SOE)
 449			dev_err(mdma->dma.dev, "- Source Offset"
 450						" Configuration Error\n");
 451		if (es & MPC_DMA_DMAES_DAE)
 452			dev_err(mdma->dma.dev, "- Destination Address"
 453								" Error\n");
 454		if (es & MPC_DMA_DMAES_DOE)
 455			dev_err(mdma->dma.dev, "- Destination Offset"
 456						" Configuration Error\n");
 457		if (es & MPC_DMA_DMAES_NCE)
 458			dev_err(mdma->dma.dev, "- NBytes/Citter"
 459						" Configuration Error\n");
 460		if (es & MPC_DMA_DMAES_SGE)
 461			dev_err(mdma->dma.dev, "- Scatter/Gather"
 462						" Configuration Error\n");
 463		if (es & MPC_DMA_DMAES_SBE)
 464			dev_err(mdma->dma.dev, "- Source Bus Error\n");
 465		if (es & MPC_DMA_DMAES_DBE)
 466			dev_err(mdma->dma.dev, "- Destination Bus Error\n");
 467	}
 468
 469	mpc_dma_process_completed(mdma);
 470}
 471
 472/* Submit descriptor to hardware */
 473static dma_cookie_t mpc_dma_tx_submit(struct dma_async_tx_descriptor *txd)
 474{
 475	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(txd->chan);
 476	struct mpc_dma_desc *mdesc;
 477	unsigned long flags;
 478	dma_cookie_t cookie;
 479
 480	mdesc = container_of(txd, struct mpc_dma_desc, desc);
 481
 482	spin_lock_irqsave(&mchan->lock, flags);
 483
 484	/* Move descriptor to queue */
 485	list_move_tail(&mdesc->node, &mchan->queued);
 486
 487	/* If channel is idle, execute all queued descriptors */
 488	if (list_empty(&mchan->active))
 489		mpc_dma_execute(mchan);
 490
 491	/* Update cookie */
 492	cookie = dma_cookie_assign(txd);
 493	spin_unlock_irqrestore(&mchan->lock, flags);
 494
 495	return cookie;
 496}
 497
 498/* Alloc channel resources */
 499static int mpc_dma_alloc_chan_resources(struct dma_chan *chan)
 500{
 501	struct mpc_dma *mdma = dma_chan_to_mpc_dma(chan);
 502	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(chan);
 503	struct mpc_dma_desc *mdesc;
 504	struct mpc_dma_tcd *tcd;
 505	dma_addr_t tcd_paddr;
 506	unsigned long flags;
 507	LIST_HEAD(descs);
 508	int i;
 509
 510	/* Alloc DMA memory for Transfer Control Descriptors */
 511	tcd = dma_alloc_coherent(mdma->dma.dev,
 512			MPC_DMA_DESCRIPTORS * sizeof(struct mpc_dma_tcd),
 513							&tcd_paddr, GFP_KERNEL);
 514	if (!tcd)
 515		return -ENOMEM;
 516
 517	/* Alloc descriptors for this channel */
 518	for (i = 0; i < MPC_DMA_DESCRIPTORS; i++) {
 519		mdesc = kzalloc(sizeof(struct mpc_dma_desc), GFP_KERNEL);
 520		if (!mdesc) {
 521			dev_notice(mdma->dma.dev, "Memory allocation error. "
 522					"Allocated only %u descriptors\n", i);
 523			break;
 524		}
 525
 526		dma_async_tx_descriptor_init(&mdesc->desc, chan);
 527		mdesc->desc.flags = DMA_CTRL_ACK;
 528		mdesc->desc.tx_submit = mpc_dma_tx_submit;
 529
 530		mdesc->tcd = &tcd[i];
 531		mdesc->tcd_paddr = tcd_paddr + (i * sizeof(struct mpc_dma_tcd));
 532
 533		list_add_tail(&mdesc->node, &descs);
 534	}
 535
 536	/* Return error only if no descriptors were allocated */
 537	if (i == 0) {
 538		dma_free_coherent(mdma->dma.dev,
 539			MPC_DMA_DESCRIPTORS * sizeof(struct mpc_dma_tcd),
 540								tcd, tcd_paddr);
 541		return -ENOMEM;
 542	}
 543
 544	spin_lock_irqsave(&mchan->lock, flags);
 545	mchan->tcd = tcd;
 546	mchan->tcd_paddr = tcd_paddr;
 547	list_splice_tail_init(&descs, &mchan->free);
 548	spin_unlock_irqrestore(&mchan->lock, flags);
 549
 550	/* Enable Error Interrupt */
 551	out_8(&mdma->regs->dmaseei, chan->chan_id);
 552
 553	return 0;
 554}
 555
 556/* Free channel resources */
 557static void mpc_dma_free_chan_resources(struct dma_chan *chan)
 558{
 559	struct mpc_dma *mdma = dma_chan_to_mpc_dma(chan);
 560	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(chan);
 561	struct mpc_dma_desc *mdesc, *tmp;
 562	struct mpc_dma_tcd *tcd;
 563	dma_addr_t tcd_paddr;
 564	unsigned long flags;
 565	LIST_HEAD(descs);
 566
 567	spin_lock_irqsave(&mchan->lock, flags);
 568
 569	/* Channel must be idle */
 570	BUG_ON(!list_empty(&mchan->prepared));
 571	BUG_ON(!list_empty(&mchan->queued));
 572	BUG_ON(!list_empty(&mchan->active));
 573	BUG_ON(!list_empty(&mchan->completed));
 574
 575	/* Move data */
 576	list_splice_tail_init(&mchan->free, &descs);
 577	tcd = mchan->tcd;
 578	tcd_paddr = mchan->tcd_paddr;
 579
 580	spin_unlock_irqrestore(&mchan->lock, flags);
 581
 582	/* Free DMA memory used by descriptors */
 583	dma_free_coherent(mdma->dma.dev,
 584			MPC_DMA_DESCRIPTORS * sizeof(struct mpc_dma_tcd),
 585								tcd, tcd_paddr);
 586
 587	/* Free descriptors */
 588	list_for_each_entry_safe(mdesc, tmp, &descs, node)
 589		kfree(mdesc);
 590
 591	/* Disable Error Interrupt */
 592	out_8(&mdma->regs->dmaceei, chan->chan_id);
 593}
 594
 595/* Send all pending descriptor to hardware */
 596static void mpc_dma_issue_pending(struct dma_chan *chan)
 597{
 598	/*
 599	 * We are posting descriptors to the hardware as soon as
 600	 * they are ready, so this function does nothing.
 601	 */
 602}
 603
 604/* Check request completion status */
 605static enum dma_status
 606mpc_dma_tx_status(struct dma_chan *chan, dma_cookie_t cookie,
 607	       struct dma_tx_state *txstate)
 608{
 609	return dma_cookie_status(chan, cookie, txstate);
 610}
 611
 612/* Prepare descriptor for memory to memory copy */
 613static struct dma_async_tx_descriptor *
 614mpc_dma_prep_memcpy(struct dma_chan *chan, dma_addr_t dst, dma_addr_t src,
 615					size_t len, unsigned long flags)
 616{
 617	struct mpc_dma *mdma = dma_chan_to_mpc_dma(chan);
 618	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(chan);
 619	struct mpc_dma_desc *mdesc = NULL;
 620	struct mpc_dma_tcd *tcd;
 621	unsigned long iflags;
 622
 623	/* Get free descriptor */
 624	spin_lock_irqsave(&mchan->lock, iflags);
 625	if (!list_empty(&mchan->free)) {
 626		mdesc = list_first_entry(&mchan->free, struct mpc_dma_desc,
 627									node);
 628		list_del(&mdesc->node);
 629	}
 630	spin_unlock_irqrestore(&mchan->lock, iflags);
 631
 632	if (!mdesc) {
 633		/* try to free completed descriptors */
 634		mpc_dma_process_completed(mdma);
 635		return NULL;
 636	}
 637
 638	mdesc->error = 0;
 639	mdesc->will_access_peripheral = 0;
 640	tcd = mdesc->tcd;
 641
 642	/* Prepare Transfer Control Descriptor for this transaction */
 643	memset(tcd, 0, sizeof(struct mpc_dma_tcd));
 644
 645	if (IS_ALIGNED(src | dst | len, 32)) {
 646		tcd->ssize = MPC_DMA_TSIZE_32;
 647		tcd->dsize = MPC_DMA_TSIZE_32;
 648		tcd->soff = 32;
 649		tcd->doff = 32;
 650	} else if (!mdma->is_mpc8308 && IS_ALIGNED(src | dst | len, 16)) {
 651		/* MPC8308 doesn't support 16 byte transfers */
 652		tcd->ssize = MPC_DMA_TSIZE_16;
 653		tcd->dsize = MPC_DMA_TSIZE_16;
 654		tcd->soff = 16;
 655		tcd->doff = 16;
 656	} else if (IS_ALIGNED(src | dst | len, 4)) {
 657		tcd->ssize = MPC_DMA_TSIZE_4;
 658		tcd->dsize = MPC_DMA_TSIZE_4;
 659		tcd->soff = 4;
 660		tcd->doff = 4;
 661	} else if (IS_ALIGNED(src | dst | len, 2)) {
 662		tcd->ssize = MPC_DMA_TSIZE_2;
 663		tcd->dsize = MPC_DMA_TSIZE_2;
 664		tcd->soff = 2;
 665		tcd->doff = 2;
 666	} else {
 667		tcd->ssize = MPC_DMA_TSIZE_1;
 668		tcd->dsize = MPC_DMA_TSIZE_1;
 669		tcd->soff = 1;
 670		tcd->doff = 1;
 671	}
 672
 673	tcd->saddr = src;
 674	tcd->daddr = dst;
 675	tcd->nbytes = len;
 676	tcd->biter = 1;
 677	tcd->citer = 1;
 678
 679	/* Place descriptor in prepared list */
 680	spin_lock_irqsave(&mchan->lock, iflags);
 681	list_add_tail(&mdesc->node, &mchan->prepared);
 682	spin_unlock_irqrestore(&mchan->lock, iflags);
 683
 684	return &mdesc->desc;
 685}
 686
 
 
 
 
 
 
 
 
 
 687static struct dma_async_tx_descriptor *
 688mpc_dma_prep_slave_sg(struct dma_chan *chan, struct scatterlist *sgl,
 689		unsigned int sg_len, enum dma_transfer_direction direction,
 690		unsigned long flags, void *context)
 691{
 692	struct mpc_dma *mdma = dma_chan_to_mpc_dma(chan);
 693	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(chan);
 694	struct mpc_dma_desc *mdesc = NULL;
 695	dma_addr_t per_paddr;
 696	u32 tcd_nunits;
 697	struct mpc_dma_tcd *tcd;
 698	unsigned long iflags;
 699	struct scatterlist *sg;
 700	size_t len;
 701	int iter, i;
 702
 703	/* Currently there is no proper support for scatter/gather */
 704	if (sg_len != 1)
 705		return NULL;
 706
 707	if (!is_slave_direction(direction))
 708		return NULL;
 709
 710	for_each_sg(sgl, sg, sg_len, i) {
 711		spin_lock_irqsave(&mchan->lock, iflags);
 712
 713		mdesc = list_first_entry(&mchan->free,
 714						struct mpc_dma_desc, node);
 715		if (!mdesc) {
 716			spin_unlock_irqrestore(&mchan->lock, iflags);
 717			/* Try to free completed descriptors */
 718			mpc_dma_process_completed(mdma);
 719			return NULL;
 720		}
 721
 722		list_del(&mdesc->node);
 723
 724		if (direction == DMA_DEV_TO_MEM) {
 725			per_paddr = mchan->src_per_paddr;
 726			tcd_nunits = mchan->src_tcd_nunits;
 727		} else {
 728			per_paddr = mchan->dst_per_paddr;
 729			tcd_nunits = mchan->dst_tcd_nunits;
 730		}
 731
 732		spin_unlock_irqrestore(&mchan->lock, iflags);
 733
 734		if (per_paddr == 0 || tcd_nunits == 0)
 735			goto err_prep;
 736
 737		mdesc->error = 0;
 738		mdesc->will_access_peripheral = 1;
 739
 740		/* Prepare Transfer Control Descriptor for this transaction */
 741		tcd = mdesc->tcd;
 742
 743		memset(tcd, 0, sizeof(struct mpc_dma_tcd));
 744
 745		if (!IS_ALIGNED(sg_dma_address(sg), 4))
 746			goto err_prep;
 747
 748		if (direction == DMA_DEV_TO_MEM) {
 749			tcd->saddr = per_paddr;
 750			tcd->daddr = sg_dma_address(sg);
 
 
 
 
 751			tcd->soff = 0;
 752			tcd->doff = 4;
 753		} else {
 754			tcd->saddr = sg_dma_address(sg);
 755			tcd->daddr = per_paddr;
 756			tcd->soff = 4;
 
 
 
 
 757			tcd->doff = 0;
 758		}
 759
 760		tcd->ssize = MPC_DMA_TSIZE_4;
 761		tcd->dsize = MPC_DMA_TSIZE_4;
 762
 763		len = sg_dma_len(sg);
 764		tcd->nbytes = tcd_nunits * 4;
 765		if (!IS_ALIGNED(len, tcd->nbytes))
 766			goto err_prep;
 767
 768		iter = len / tcd->nbytes;
 769		if (iter >= 1 << 15) {
 770			/* len is too big */
 771			goto err_prep;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 772		}
 773		/* citer_linkch contains the high bits of iter */
 774		tcd->biter = iter & 0x1ff;
 775		tcd->biter_linkch = iter >> 9;
 776		tcd->citer = tcd->biter;
 777		tcd->citer_linkch = tcd->biter_linkch;
 778
 779		tcd->e_sg = 0;
 780		tcd->d_req = 1;
 781
 782		/* Place descriptor in prepared list */
 783		spin_lock_irqsave(&mchan->lock, iflags);
 784		list_add_tail(&mdesc->node, &mchan->prepared);
 785		spin_unlock_irqrestore(&mchan->lock, iflags);
 786	}
 787
 788	return &mdesc->desc;
 789
 790err_prep:
 791	/* Put the descriptor back */
 792	spin_lock_irqsave(&mchan->lock, iflags);
 793	list_add_tail(&mdesc->node, &mchan->free);
 794	spin_unlock_irqrestore(&mchan->lock, iflags);
 795
 796	return NULL;
 797}
 798
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 799static int mpc_dma_device_config(struct dma_chan *chan,
 800				 struct dma_slave_config *cfg)
 801{
 802	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(chan);
 
 803	unsigned long flags;
 804
 805	/*
 806	 * Software constraints:
 807	 *  - only transfers between a peripheral device and
 808	 *     memory are supported;
 809	 *  - only peripheral devices with 4-byte FIFO access register
 810	 *     are supported;
 811	 *  - minimal transfer chunk is 4 bytes and consequently
 812	 *     source and destination addresses must be 4-byte aligned
 813	 *     and transfer size must be aligned on (4 * maxburst)
 814	 *     boundary;
 815	 *  - during the transfer RAM address is being incremented by
 816	 *     the size of minimal transfer chunk;
 817	 *  - peripheral port's address is constant during the transfer.
 818	 */
 819
 820	if (cfg->src_addr_width != DMA_SLAVE_BUSWIDTH_4_BYTES ||
 821	    cfg->dst_addr_width != DMA_SLAVE_BUSWIDTH_4_BYTES ||
 822	    !IS_ALIGNED(cfg->src_addr, 4) ||
 823	    !IS_ALIGNED(cfg->dst_addr, 4)) {
 824		return -EINVAL;
 825	}
 826
 
 
 
 
 827	spin_lock_irqsave(&mchan->lock, flags);
 828
 829	mchan->src_per_paddr = cfg->src_addr;
 830	mchan->src_tcd_nunits = cfg->src_maxburst;
 
 831	mchan->dst_per_paddr = cfg->dst_addr;
 832	mchan->dst_tcd_nunits = cfg->dst_maxburst;
 
 833
 834	/* Apply defaults */
 835	if (mchan->src_tcd_nunits == 0)
 836		mchan->src_tcd_nunits = 1;
 837	if (mchan->dst_tcd_nunits == 0)
 838		mchan->dst_tcd_nunits = 1;
 839
 840	spin_unlock_irqrestore(&mchan->lock, flags);
 841
 842	return 0;
 843}
 844
 845static int mpc_dma_device_terminate_all(struct dma_chan *chan)
 846{
 847	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(chan);
 848	struct mpc_dma *mdma = dma_chan_to_mpc_dma(chan);
 849	unsigned long flags;
 850
 851	/* Disable channel requests */
 852	spin_lock_irqsave(&mchan->lock, flags);
 853
 854	out_8(&mdma->regs->dmacerq, chan->chan_id);
 855	list_splice_tail_init(&mchan->prepared, &mchan->free);
 856	list_splice_tail_init(&mchan->queued, &mchan->free);
 857	list_splice_tail_init(&mchan->active, &mchan->free);
 858
 859	spin_unlock_irqrestore(&mchan->lock, flags);
 860
 861	return 0;
 862}
 863
 864static int mpc_dma_probe(struct platform_device *op)
 865{
 866	struct device_node *dn = op->dev.of_node;
 867	struct device *dev = &op->dev;
 868	struct dma_device *dma;
 869	struct mpc_dma *mdma;
 870	struct mpc_dma_chan *mchan;
 871	struct resource res;
 872	ulong regs_start, regs_size;
 873	int retval, i;
 874	u8 chancnt;
 875
 876	mdma = devm_kzalloc(dev, sizeof(struct mpc_dma), GFP_KERNEL);
 877	if (!mdma) {
 878		dev_err(dev, "Memory exhausted!\n");
 879		retval = -ENOMEM;
 880		goto err;
 881	}
 882
 883	mdma->irq = irq_of_parse_and_map(dn, 0);
 884	if (mdma->irq == NO_IRQ) {
 885		dev_err(dev, "Error mapping IRQ!\n");
 886		retval = -EINVAL;
 887		goto err;
 888	}
 889
 890	if (of_device_is_compatible(dn, "fsl,mpc8308-dma")) {
 891		mdma->is_mpc8308 = 1;
 892		mdma->irq2 = irq_of_parse_and_map(dn, 1);
 893		if (mdma->irq2 == NO_IRQ) {
 894			dev_err(dev, "Error mapping IRQ!\n");
 895			retval = -EINVAL;
 896			goto err_dispose1;
 897		}
 898	}
 899
 900	retval = of_address_to_resource(dn, 0, &res);
 901	if (retval) {
 902		dev_err(dev, "Error parsing memory region!\n");
 903		goto err_dispose2;
 904	}
 905
 906	regs_start = res.start;
 907	regs_size = resource_size(&res);
 908
 909	if (!devm_request_mem_region(dev, regs_start, regs_size, DRV_NAME)) {
 910		dev_err(dev, "Error requesting memory region!\n");
 911		retval = -EBUSY;
 912		goto err_dispose2;
 913	}
 914
 915	mdma->regs = devm_ioremap(dev, regs_start, regs_size);
 916	if (!mdma->regs) {
 917		dev_err(dev, "Error mapping memory region!\n");
 918		retval = -ENOMEM;
 919		goto err_dispose2;
 920	}
 921
 922	mdma->tcd = (struct mpc_dma_tcd *)((u8 *)(mdma->regs)
 923							+ MPC_DMA_TCD_OFFSET);
 924
 925	retval = request_irq(mdma->irq, &mpc_dma_irq, 0, DRV_NAME, mdma);
 926	if (retval) {
 927		dev_err(dev, "Error requesting IRQ!\n");
 928		retval = -EINVAL;
 929		goto err_dispose2;
 930	}
 931
 932	if (mdma->is_mpc8308) {
 933		retval = request_irq(mdma->irq2, &mpc_dma_irq, 0,
 934							DRV_NAME, mdma);
 935		if (retval) {
 936			dev_err(dev, "Error requesting IRQ2!\n");
 937			retval = -EINVAL;
 938			goto err_free1;
 939		}
 940	}
 941
 942	spin_lock_init(&mdma->error_status_lock);
 943
 944	dma = &mdma->dma;
 945	dma->dev = dev;
 946	dma->device_alloc_chan_resources = mpc_dma_alloc_chan_resources;
 947	dma->device_free_chan_resources = mpc_dma_free_chan_resources;
 948	dma->device_issue_pending = mpc_dma_issue_pending;
 949	dma->device_tx_status = mpc_dma_tx_status;
 950	dma->device_prep_dma_memcpy = mpc_dma_prep_memcpy;
 951	dma->device_prep_slave_sg = mpc_dma_prep_slave_sg;
 952	dma->device_config = mpc_dma_device_config;
 953	dma->device_terminate_all = mpc_dma_device_terminate_all;
 954
 955	INIT_LIST_HEAD(&dma->channels);
 956	dma_cap_set(DMA_MEMCPY, dma->cap_mask);
 957	dma_cap_set(DMA_SLAVE, dma->cap_mask);
 958
 959	if (mdma->is_mpc8308)
 960		chancnt = MPC8308_DMACHAN_MAX;
 961	else
 962		chancnt = MPC512x_DMACHAN_MAX;
 963
 964	for (i = 0; i < chancnt; i++) {
 965		mchan = &mdma->channels[i];
 966
 967		mchan->chan.device = dma;
 968		dma_cookie_init(&mchan->chan);
 969
 970		INIT_LIST_HEAD(&mchan->free);
 971		INIT_LIST_HEAD(&mchan->prepared);
 972		INIT_LIST_HEAD(&mchan->queued);
 973		INIT_LIST_HEAD(&mchan->active);
 974		INIT_LIST_HEAD(&mchan->completed);
 975
 976		spin_lock_init(&mchan->lock);
 977		list_add_tail(&mchan->chan.device_node, &dma->channels);
 978	}
 979
 980	tasklet_init(&mdma->tasklet, mpc_dma_tasklet, (unsigned long)mdma);
 981
 982	/*
 983	 * Configure DMA Engine:
 984	 * - Dynamic clock,
 985	 * - Round-robin group arbitration,
 986	 * - Round-robin channel arbitration.
 987	 */
 988	if (mdma->is_mpc8308) {
 989		/* MPC8308 has 16 channels and lacks some registers */
 990		out_be32(&mdma->regs->dmacr, MPC_DMA_DMACR_ERCA);
 991
 992		/* enable snooping */
 993		out_be32(&mdma->regs->dmagpor, MPC_DMA_DMAGPOR_SNOOP_ENABLE);
 994		/* Disable error interrupts */
 995		out_be32(&mdma->regs->dmaeeil, 0);
 996
 997		/* Clear interrupts status */
 998		out_be32(&mdma->regs->dmaintl, 0xFFFF);
 999		out_be32(&mdma->regs->dmaerrl, 0xFFFF);
1000	} else {
1001		out_be32(&mdma->regs->dmacr, MPC_DMA_DMACR_EDCG |
1002					MPC_DMA_DMACR_ERGA | MPC_DMA_DMACR_ERCA);
 
1003
1004		/* Disable hardware DMA requests */
1005		out_be32(&mdma->regs->dmaerqh, 0);
1006		out_be32(&mdma->regs->dmaerql, 0);
1007
1008		/* Disable error interrupts */
1009		out_be32(&mdma->regs->dmaeeih, 0);
1010		out_be32(&mdma->regs->dmaeeil, 0);
1011
1012		/* Clear interrupts status */
1013		out_be32(&mdma->regs->dmainth, 0xFFFFFFFF);
1014		out_be32(&mdma->regs->dmaintl, 0xFFFFFFFF);
1015		out_be32(&mdma->regs->dmaerrh, 0xFFFFFFFF);
1016		out_be32(&mdma->regs->dmaerrl, 0xFFFFFFFF);
1017
1018		/* Route interrupts to IPIC */
1019		out_be32(&mdma->regs->dmaihsa, 0);
1020		out_be32(&mdma->regs->dmailsa, 0);
1021	}
1022
1023	/* Register DMA engine */
1024	dev_set_drvdata(dev, mdma);
1025	retval = dma_async_device_register(dma);
1026	if (retval)
1027		goto err_free2;
1028
1029	/* Register with OF helpers for DMA lookups (nonfatal) */
1030	if (dev->of_node) {
1031		retval = of_dma_controller_register(dev->of_node,
1032						of_dma_xlate_by_chan_id, mdma);
1033		if (retval)
1034			dev_warn(dev, "Could not register for OF lookup\n");
1035	}
1036
1037	return 0;
1038
1039err_free2:
1040	if (mdma->is_mpc8308)
1041		free_irq(mdma->irq2, mdma);
1042err_free1:
1043	free_irq(mdma->irq, mdma);
1044err_dispose2:
1045	if (mdma->is_mpc8308)
1046		irq_dispose_mapping(mdma->irq2);
1047err_dispose1:
1048	irq_dispose_mapping(mdma->irq);
1049err:
1050	return retval;
1051}
1052
1053static int mpc_dma_remove(struct platform_device *op)
1054{
1055	struct device *dev = &op->dev;
1056	struct mpc_dma *mdma = dev_get_drvdata(dev);
1057
1058	if (dev->of_node)
1059		of_dma_controller_free(dev->of_node);
1060	dma_async_device_unregister(&mdma->dma);
1061	if (mdma->is_mpc8308) {
1062		free_irq(mdma->irq2, mdma);
1063		irq_dispose_mapping(mdma->irq2);
1064	}
1065	free_irq(mdma->irq, mdma);
1066	irq_dispose_mapping(mdma->irq);
 
1067
1068	return 0;
1069}
1070
1071static const struct of_device_id mpc_dma_match[] = {
1072	{ .compatible = "fsl,mpc5121-dma", },
1073	{ .compatible = "fsl,mpc8308-dma", },
1074	{},
1075};
1076MODULE_DEVICE_TABLE(of, mpc_dma_match);
1077
1078static struct platform_driver mpc_dma_driver = {
1079	.probe		= mpc_dma_probe,
1080	.remove		= mpc_dma_remove,
1081	.driver = {
1082		.name = DRV_NAME,
1083		.of_match_table	= mpc_dma_match,
1084	},
1085};
1086
1087module_platform_driver(mpc_dma_driver);
1088
1089MODULE_LICENSE("GPL");
1090MODULE_AUTHOR("Piotr Ziecik <kosmo@semihalf.com>");
v5.9
   1// SPDX-License-Identifier: GPL-2.0-or-later
   2/*
   3 * Copyright (C) Freescale Semicondutor, Inc. 2007, 2008.
   4 * Copyright (C) Semihalf 2009
   5 * Copyright (C) Ilya Yanok, Emcraft Systems 2010
   6 * Copyright (C) Alexander Popov, Promcontroller 2014
   7 * Copyright (C) Mario Six, Guntermann & Drunck GmbH, 2016
   8 *
   9 * Written by Piotr Ziecik <kosmo@semihalf.com>. Hardware description
  10 * (defines, structures and comments) was taken from MPC5121 DMA driver
  11 * written by Hongjun Chen <hong-jun.chen@freescale.com>.
  12 *
  13 * Approved as OSADL project by a majority of OSADL members and funded
  14 * by OSADL membership fees in 2009;  for details see www.osadl.org.
 
 
 
 
 
 
 
 
 
 
 
 
 
  15 */
  16
  17/*
  18 * MPC512x and MPC8308 DMA driver. It supports memory to memory data transfers
  19 * (tested using dmatest module) and data transfers between memory and
  20 * peripheral I/O memory by means of slave scatter/gather with these
  21 * limitations:
  22 *  - chunked transfers (described by s/g lists with more than one item) are
  23 *     refused as long as proper support for scatter/gather is missing
  24 *  - transfers on MPC8308 always start from software as this SoC does not have
  25 *     external request lines for peripheral flow control
  26 *  - memory <-> I/O memory transfer chunks of sizes of 1, 2, 4, 16 (for
  27 *     MPC512x), and 32 bytes are supported, and, consequently, source
  28 *     addresses and destination addresses must be aligned accordingly;
  29 *     furthermore, for MPC512x SoCs, the transfer size must be aligned on
  30 *     (chunk size * maxburst)
  31 */
  32
  33#include <linux/module.h>
  34#include <linux/dmaengine.h>
  35#include <linux/dma-mapping.h>
  36#include <linux/interrupt.h>
  37#include <linux/io.h>
  38#include <linux/slab.h>
  39#include <linux/of_address.h>
  40#include <linux/of_device.h>
  41#include <linux/of_irq.h>
  42#include <linux/of_dma.h>
  43#include <linux/of_platform.h>
  44
  45#include <linux/random.h>
  46
  47#include "dmaengine.h"
  48
  49/* Number of DMA Transfer descriptors allocated per channel */
  50#define MPC_DMA_DESCRIPTORS	64
  51
  52/* Macro definitions */
  53#define MPC_DMA_TCD_OFFSET	0x1000
  54
  55/*
  56 * Maximum channel counts for individual hardware variants
  57 * and the maximum channel count over all supported controllers,
  58 * used for data structure size
  59 */
  60#define MPC8308_DMACHAN_MAX	16
  61#define MPC512x_DMACHAN_MAX	64
  62#define MPC_DMA_CHANNELS	64
  63
  64/* Arbitration mode of group and channel */
  65#define MPC_DMA_DMACR_EDCG	(1 << 31)
  66#define MPC_DMA_DMACR_ERGA	(1 << 3)
  67#define MPC_DMA_DMACR_ERCA	(1 << 2)
  68
  69/* Error codes */
  70#define MPC_DMA_DMAES_VLD	(1 << 31)
  71#define MPC_DMA_DMAES_GPE	(1 << 15)
  72#define MPC_DMA_DMAES_CPE	(1 << 14)
  73#define MPC_DMA_DMAES_ERRCHN(err) \
  74				(((err) >> 8) & 0x3f)
  75#define MPC_DMA_DMAES_SAE	(1 << 7)
  76#define MPC_DMA_DMAES_SOE	(1 << 6)
  77#define MPC_DMA_DMAES_DAE	(1 << 5)
  78#define MPC_DMA_DMAES_DOE	(1 << 4)
  79#define MPC_DMA_DMAES_NCE	(1 << 3)
  80#define MPC_DMA_DMAES_SGE	(1 << 2)
  81#define MPC_DMA_DMAES_SBE	(1 << 1)
  82#define MPC_DMA_DMAES_DBE	(1 << 0)
  83
  84#define MPC_DMA_DMAGPOR_SNOOP_ENABLE	(1 << 6)
  85
  86#define MPC_DMA_TSIZE_1		0x00
  87#define MPC_DMA_TSIZE_2		0x01
  88#define MPC_DMA_TSIZE_4		0x02
  89#define MPC_DMA_TSIZE_16	0x04
  90#define MPC_DMA_TSIZE_32	0x05
  91
  92/* MPC5121 DMA engine registers */
  93struct __attribute__ ((__packed__)) mpc_dma_regs {
  94	/* 0x00 */
  95	u32 dmacr;		/* DMA control register */
  96	u32 dmaes;		/* DMA error status */
  97	/* 0x08 */
  98	u32 dmaerqh;		/* DMA enable request high(channels 63~32) */
  99	u32 dmaerql;		/* DMA enable request low(channels 31~0) */
 100	u32 dmaeeih;		/* DMA enable error interrupt high(ch63~32) */
 101	u32 dmaeeil;		/* DMA enable error interrupt low(ch31~0) */
 102	/* 0x18 */
 103	u8 dmaserq;		/* DMA set enable request */
 104	u8 dmacerq;		/* DMA clear enable request */
 105	u8 dmaseei;		/* DMA set enable error interrupt */
 106	u8 dmaceei;		/* DMA clear enable error interrupt */
 107	/* 0x1c */
 108	u8 dmacint;		/* DMA clear interrupt request */
 109	u8 dmacerr;		/* DMA clear error */
 110	u8 dmassrt;		/* DMA set start bit */
 111	u8 dmacdne;		/* DMA clear DONE status bit */
 112	/* 0x20 */
 113	u32 dmainth;		/* DMA interrupt request high(ch63~32) */
 114	u32 dmaintl;		/* DMA interrupt request low(ch31~0) */
 115	u32 dmaerrh;		/* DMA error high(ch63~32) */
 116	u32 dmaerrl;		/* DMA error low(ch31~0) */
 117	/* 0x30 */
 118	u32 dmahrsh;		/* DMA hw request status high(ch63~32) */
 119	u32 dmahrsl;		/* DMA hardware request status low(ch31~0) */
 120	union {
 121		u32 dmaihsa;	/* DMA interrupt high select AXE(ch63~32) */
 122		u32 dmagpor;	/* (General purpose register on MPC8308) */
 123	};
 124	u32 dmailsa;		/* DMA interrupt low select AXE(ch31~0) */
 125	/* 0x40 ~ 0xff */
 126	u32 reserve0[48];	/* Reserved */
 127	/* 0x100 */
 128	u8 dchpri[MPC_DMA_CHANNELS];
 129	/* DMA channels(0~63) priority */
 130};
 131
 132struct __attribute__ ((__packed__)) mpc_dma_tcd {
 133	/* 0x00 */
 134	u32 saddr;		/* Source address */
 135
 136	u32 smod:5;		/* Source address modulo */
 137	u32 ssize:3;		/* Source data transfer size */
 138	u32 dmod:5;		/* Destination address modulo */
 139	u32 dsize:3;		/* Destination data transfer size */
 140	u32 soff:16;		/* Signed source address offset */
 141
 142	/* 0x08 */
 143	u32 nbytes;		/* Inner "minor" byte count */
 144	u32 slast;		/* Last source address adjustment */
 145	u32 daddr;		/* Destination address */
 146
 147	/* 0x14 */
 148	u32 citer_elink:1;	/* Enable channel-to-channel linking on
 149				 * minor loop complete
 150				 */
 151	u32 citer_linkch:6;	/* Link channel for minor loop complete */
 152	u32 citer:9;		/* Current "major" iteration count */
 153	u32 doff:16;		/* Signed destination address offset */
 154
 155	/* 0x18 */
 156	u32 dlast_sga;		/* Last Destination address adjustment/scatter
 157				 * gather address
 158				 */
 159
 160	/* 0x1c */
 161	u32 biter_elink:1;	/* Enable channel-to-channel linking on major
 162				 * loop complete
 163				 */
 164	u32 biter_linkch:6;
 165	u32 biter:9;		/* Beginning "major" iteration count */
 166	u32 bwc:2;		/* Bandwidth control */
 167	u32 major_linkch:6;	/* Link channel number */
 168	u32 done:1;		/* Channel done */
 169	u32 active:1;		/* Channel active */
 170	u32 major_elink:1;	/* Enable channel-to-channel linking on major
 171				 * loop complete
 172				 */
 173	u32 e_sg:1;		/* Enable scatter/gather processing */
 174	u32 d_req:1;		/* Disable request */
 175	u32 int_half:1;		/* Enable an interrupt when major counter is
 176				 * half complete
 177				 */
 178	u32 int_maj:1;		/* Enable an interrupt when major iteration
 179				 * count completes
 180				 */
 181	u32 start:1;		/* Channel start */
 182};
 183
 184struct mpc_dma_desc {
 185	struct dma_async_tx_descriptor	desc;
 186	struct mpc_dma_tcd		*tcd;
 187	dma_addr_t			tcd_paddr;
 188	int				error;
 189	struct list_head		node;
 190	int				will_access_peripheral;
 191};
 192
 193struct mpc_dma_chan {
 194	struct dma_chan			chan;
 195	struct list_head		free;
 196	struct list_head		prepared;
 197	struct list_head		queued;
 198	struct list_head		active;
 199	struct list_head		completed;
 200	struct mpc_dma_tcd		*tcd;
 201	dma_addr_t			tcd_paddr;
 202
 203	/* Settings for access to peripheral FIFO */
 204	dma_addr_t			src_per_paddr;
 205	u32				src_tcd_nunits;
 206	u8				swidth;
 207	dma_addr_t			dst_per_paddr;
 208	u32				dst_tcd_nunits;
 209	u8				dwidth;
 210
 211	/* Lock for this structure */
 212	spinlock_t			lock;
 213};
 214
 215struct mpc_dma {
 216	struct dma_device		dma;
 217	struct tasklet_struct		tasklet;
 218	struct mpc_dma_chan		channels[MPC_DMA_CHANNELS];
 219	struct mpc_dma_regs __iomem	*regs;
 220	struct mpc_dma_tcd __iomem	*tcd;
 221	int				irq;
 222	int				irq2;
 223	uint				error_status;
 224	int				is_mpc8308;
 225
 226	/* Lock for error_status field in this structure */
 227	spinlock_t			error_status_lock;
 228};
 229
 230#define DRV_NAME	"mpc512x_dma"
 231
 232/* Convert struct dma_chan to struct mpc_dma_chan */
 233static inline struct mpc_dma_chan *dma_chan_to_mpc_dma_chan(struct dma_chan *c)
 234{
 235	return container_of(c, struct mpc_dma_chan, chan);
 236}
 237
 238/* Convert struct dma_chan to struct mpc_dma */
 239static inline struct mpc_dma *dma_chan_to_mpc_dma(struct dma_chan *c)
 240{
 241	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(c);
 242
 243	return container_of(mchan, struct mpc_dma, channels[c->chan_id]);
 244}
 245
 246/*
 247 * Execute all queued DMA descriptors.
 248 *
 249 * Following requirements must be met while calling mpc_dma_execute():
 250 *	a) mchan->lock is acquired,
 251 *	b) mchan->active list is empty,
 252 *	c) mchan->queued list contains at least one entry.
 253 */
 254static void mpc_dma_execute(struct mpc_dma_chan *mchan)
 255{
 256	struct mpc_dma *mdma = dma_chan_to_mpc_dma(&mchan->chan);
 257	struct mpc_dma_desc *first = NULL;
 258	struct mpc_dma_desc *prev = NULL;
 259	struct mpc_dma_desc *mdesc;
 260	int cid = mchan->chan.chan_id;
 261
 262	while (!list_empty(&mchan->queued)) {
 263		mdesc = list_first_entry(&mchan->queued,
 264						struct mpc_dma_desc, node);
 265		/*
 266		 * Grab either several mem-to-mem transfer descriptors
 267		 * or one peripheral transfer descriptor,
 268		 * don't mix mem-to-mem and peripheral transfer descriptors
 269		 * within the same 'active' list.
 270		 */
 271		if (mdesc->will_access_peripheral) {
 272			if (list_empty(&mchan->active))
 273				list_move_tail(&mdesc->node, &mchan->active);
 274			break;
 275		} else {
 276			list_move_tail(&mdesc->node, &mchan->active);
 277		}
 278	}
 279
 280	/* Chain descriptors into one transaction */
 281	list_for_each_entry(mdesc, &mchan->active, node) {
 282		if (!first)
 283			first = mdesc;
 284
 285		if (!prev) {
 286			prev = mdesc;
 287			continue;
 288		}
 289
 290		prev->tcd->dlast_sga = mdesc->tcd_paddr;
 291		prev->tcd->e_sg = 1;
 292		mdesc->tcd->start = 1;
 293
 294		prev = mdesc;
 295	}
 296
 297	prev->tcd->int_maj = 1;
 298
 299	/* Send first descriptor in chain into hardware */
 300	memcpy_toio(&mdma->tcd[cid], first->tcd, sizeof(struct mpc_dma_tcd));
 301
 302	if (first != prev)
 303		mdma->tcd[cid].e_sg = 1;
 304
 305	if (mdma->is_mpc8308) {
 306		/* MPC8308, no request lines, software initiated start */
 307		out_8(&mdma->regs->dmassrt, cid);
 308	} else if (first->will_access_peripheral) {
 309		/* Peripherals involved, start by external request signal */
 310		out_8(&mdma->regs->dmaserq, cid);
 311	} else {
 312		/* Memory to memory transfer, software initiated start */
 313		out_8(&mdma->regs->dmassrt, cid);
 314	}
 315}
 316
 317/* Handle interrupt on one half of DMA controller (32 channels) */
 318static void mpc_dma_irq_process(struct mpc_dma *mdma, u32 is, u32 es, int off)
 319{
 320	struct mpc_dma_chan *mchan;
 321	struct mpc_dma_desc *mdesc;
 322	u32 status = is | es;
 323	int ch;
 324
 325	while ((ch = fls(status) - 1) >= 0) {
 326		status &= ~(1 << ch);
 327		mchan = &mdma->channels[ch + off];
 328
 329		spin_lock(&mchan->lock);
 330
 331		out_8(&mdma->regs->dmacint, ch + off);
 332		out_8(&mdma->regs->dmacerr, ch + off);
 333
 334		/* Check error status */
 335		if (es & (1 << ch))
 336			list_for_each_entry(mdesc, &mchan->active, node)
 337				mdesc->error = -EIO;
 338
 339		/* Execute queued descriptors */
 340		list_splice_tail_init(&mchan->active, &mchan->completed);
 341		if (!list_empty(&mchan->queued))
 342			mpc_dma_execute(mchan);
 343
 344		spin_unlock(&mchan->lock);
 345	}
 346}
 347
 348/* Interrupt handler */
 349static irqreturn_t mpc_dma_irq(int irq, void *data)
 350{
 351	struct mpc_dma *mdma = data;
 352	uint es;
 353
 354	/* Save error status register */
 355	es = in_be32(&mdma->regs->dmaes);
 356	spin_lock(&mdma->error_status_lock);
 357	if ((es & MPC_DMA_DMAES_VLD) && mdma->error_status == 0)
 358		mdma->error_status = es;
 359	spin_unlock(&mdma->error_status_lock);
 360
 361	/* Handle interrupt on each channel */
 362	if (mdma->dma.chancnt > 32) {
 363		mpc_dma_irq_process(mdma, in_be32(&mdma->regs->dmainth),
 364					in_be32(&mdma->regs->dmaerrh), 32);
 365	}
 366	mpc_dma_irq_process(mdma, in_be32(&mdma->regs->dmaintl),
 367					in_be32(&mdma->regs->dmaerrl), 0);
 368
 369	/* Schedule tasklet */
 370	tasklet_schedule(&mdma->tasklet);
 371
 372	return IRQ_HANDLED;
 373}
 374
 375/* process completed descriptors */
 376static void mpc_dma_process_completed(struct mpc_dma *mdma)
 377{
 378	dma_cookie_t last_cookie = 0;
 379	struct mpc_dma_chan *mchan;
 380	struct mpc_dma_desc *mdesc;
 381	struct dma_async_tx_descriptor *desc;
 382	unsigned long flags;
 383	LIST_HEAD(list);
 384	int i;
 385
 386	for (i = 0; i < mdma->dma.chancnt; i++) {
 387		mchan = &mdma->channels[i];
 388
 389		/* Get all completed descriptors */
 390		spin_lock_irqsave(&mchan->lock, flags);
 391		if (!list_empty(&mchan->completed))
 392			list_splice_tail_init(&mchan->completed, &list);
 393		spin_unlock_irqrestore(&mchan->lock, flags);
 394
 395		if (list_empty(&list))
 396			continue;
 397
 398		/* Execute callbacks and run dependencies */
 399		list_for_each_entry(mdesc, &list, node) {
 400			desc = &mdesc->desc;
 401
 402			dmaengine_desc_get_callback_invoke(desc, NULL);
 
 403
 404			last_cookie = desc->cookie;
 405			dma_run_dependencies(desc);
 406		}
 407
 408		/* Free descriptors */
 409		spin_lock_irqsave(&mchan->lock, flags);
 410		list_splice_tail_init(&list, &mchan->free);
 411		mchan->chan.completed_cookie = last_cookie;
 412		spin_unlock_irqrestore(&mchan->lock, flags);
 413	}
 414}
 415
 416/* DMA Tasklet */
 417static void mpc_dma_tasklet(unsigned long data)
 418{
 419	struct mpc_dma *mdma = (void *)data;
 420	unsigned long flags;
 421	uint es;
 422
 423	spin_lock_irqsave(&mdma->error_status_lock, flags);
 424	es = mdma->error_status;
 425	mdma->error_status = 0;
 426	spin_unlock_irqrestore(&mdma->error_status_lock, flags);
 427
 428	/* Print nice error report */
 429	if (es) {
 430		dev_err(mdma->dma.dev,
 431			"Hardware reported following error(s) on channel %u:\n",
 432						      MPC_DMA_DMAES_ERRCHN(es));
 433
 434		if (es & MPC_DMA_DMAES_GPE)
 435			dev_err(mdma->dma.dev, "- Group Priority Error\n");
 436		if (es & MPC_DMA_DMAES_CPE)
 437			dev_err(mdma->dma.dev, "- Channel Priority Error\n");
 438		if (es & MPC_DMA_DMAES_SAE)
 439			dev_err(mdma->dma.dev, "- Source Address Error\n");
 440		if (es & MPC_DMA_DMAES_SOE)
 441			dev_err(mdma->dma.dev, "- Source Offset Configuration Error\n");
 
 442		if (es & MPC_DMA_DMAES_DAE)
 443			dev_err(mdma->dma.dev, "- Destination Address Error\n");
 
 444		if (es & MPC_DMA_DMAES_DOE)
 445			dev_err(mdma->dma.dev, "- Destination Offset Configuration Error\n");
 
 446		if (es & MPC_DMA_DMAES_NCE)
 447			dev_err(mdma->dma.dev, "- NBytes/Citter Configuration Error\n");
 
 448		if (es & MPC_DMA_DMAES_SGE)
 449			dev_err(mdma->dma.dev, "- Scatter/Gather Configuration Error\n");
 
 450		if (es & MPC_DMA_DMAES_SBE)
 451			dev_err(mdma->dma.dev, "- Source Bus Error\n");
 452		if (es & MPC_DMA_DMAES_DBE)
 453			dev_err(mdma->dma.dev, "- Destination Bus Error\n");
 454	}
 455
 456	mpc_dma_process_completed(mdma);
 457}
 458
 459/* Submit descriptor to hardware */
 460static dma_cookie_t mpc_dma_tx_submit(struct dma_async_tx_descriptor *txd)
 461{
 462	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(txd->chan);
 463	struct mpc_dma_desc *mdesc;
 464	unsigned long flags;
 465	dma_cookie_t cookie;
 466
 467	mdesc = container_of(txd, struct mpc_dma_desc, desc);
 468
 469	spin_lock_irqsave(&mchan->lock, flags);
 470
 471	/* Move descriptor to queue */
 472	list_move_tail(&mdesc->node, &mchan->queued);
 473
 474	/* If channel is idle, execute all queued descriptors */
 475	if (list_empty(&mchan->active))
 476		mpc_dma_execute(mchan);
 477
 478	/* Update cookie */
 479	cookie = dma_cookie_assign(txd);
 480	spin_unlock_irqrestore(&mchan->lock, flags);
 481
 482	return cookie;
 483}
 484
 485/* Alloc channel resources */
 486static int mpc_dma_alloc_chan_resources(struct dma_chan *chan)
 487{
 488	struct mpc_dma *mdma = dma_chan_to_mpc_dma(chan);
 489	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(chan);
 490	struct mpc_dma_desc *mdesc;
 491	struct mpc_dma_tcd *tcd;
 492	dma_addr_t tcd_paddr;
 493	unsigned long flags;
 494	LIST_HEAD(descs);
 495	int i;
 496
 497	/* Alloc DMA memory for Transfer Control Descriptors */
 498	tcd = dma_alloc_coherent(mdma->dma.dev,
 499			MPC_DMA_DESCRIPTORS * sizeof(struct mpc_dma_tcd),
 500							&tcd_paddr, GFP_KERNEL);
 501	if (!tcd)
 502		return -ENOMEM;
 503
 504	/* Alloc descriptors for this channel */
 505	for (i = 0; i < MPC_DMA_DESCRIPTORS; i++) {
 506		mdesc = kzalloc(sizeof(struct mpc_dma_desc), GFP_KERNEL);
 507		if (!mdesc) {
 508			dev_notice(mdma->dma.dev,
 509				"Memory allocation error. Allocated only %u descriptors\n", i);
 510			break;
 511		}
 512
 513		dma_async_tx_descriptor_init(&mdesc->desc, chan);
 514		mdesc->desc.flags = DMA_CTRL_ACK;
 515		mdesc->desc.tx_submit = mpc_dma_tx_submit;
 516
 517		mdesc->tcd = &tcd[i];
 518		mdesc->tcd_paddr = tcd_paddr + (i * sizeof(struct mpc_dma_tcd));
 519
 520		list_add_tail(&mdesc->node, &descs);
 521	}
 522
 523	/* Return error only if no descriptors were allocated */
 524	if (i == 0) {
 525		dma_free_coherent(mdma->dma.dev,
 526			MPC_DMA_DESCRIPTORS * sizeof(struct mpc_dma_tcd),
 527								tcd, tcd_paddr);
 528		return -ENOMEM;
 529	}
 530
 531	spin_lock_irqsave(&mchan->lock, flags);
 532	mchan->tcd = tcd;
 533	mchan->tcd_paddr = tcd_paddr;
 534	list_splice_tail_init(&descs, &mchan->free);
 535	spin_unlock_irqrestore(&mchan->lock, flags);
 536
 537	/* Enable Error Interrupt */
 538	out_8(&mdma->regs->dmaseei, chan->chan_id);
 539
 540	return 0;
 541}
 542
 543/* Free channel resources */
 544static void mpc_dma_free_chan_resources(struct dma_chan *chan)
 545{
 546	struct mpc_dma *mdma = dma_chan_to_mpc_dma(chan);
 547	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(chan);
 548	struct mpc_dma_desc *mdesc, *tmp;
 549	struct mpc_dma_tcd *tcd;
 550	dma_addr_t tcd_paddr;
 551	unsigned long flags;
 552	LIST_HEAD(descs);
 553
 554	spin_lock_irqsave(&mchan->lock, flags);
 555
 556	/* Channel must be idle */
 557	BUG_ON(!list_empty(&mchan->prepared));
 558	BUG_ON(!list_empty(&mchan->queued));
 559	BUG_ON(!list_empty(&mchan->active));
 560	BUG_ON(!list_empty(&mchan->completed));
 561
 562	/* Move data */
 563	list_splice_tail_init(&mchan->free, &descs);
 564	tcd = mchan->tcd;
 565	tcd_paddr = mchan->tcd_paddr;
 566
 567	spin_unlock_irqrestore(&mchan->lock, flags);
 568
 569	/* Free DMA memory used by descriptors */
 570	dma_free_coherent(mdma->dma.dev,
 571			MPC_DMA_DESCRIPTORS * sizeof(struct mpc_dma_tcd),
 572								tcd, tcd_paddr);
 573
 574	/* Free descriptors */
 575	list_for_each_entry_safe(mdesc, tmp, &descs, node)
 576		kfree(mdesc);
 577
 578	/* Disable Error Interrupt */
 579	out_8(&mdma->regs->dmaceei, chan->chan_id);
 580}
 581
 582/* Send all pending descriptor to hardware */
 583static void mpc_dma_issue_pending(struct dma_chan *chan)
 584{
 585	/*
 586	 * We are posting descriptors to the hardware as soon as
 587	 * they are ready, so this function does nothing.
 588	 */
 589}
 590
 591/* Check request completion status */
 592static enum dma_status
 593mpc_dma_tx_status(struct dma_chan *chan, dma_cookie_t cookie,
 594	       struct dma_tx_state *txstate)
 595{
 596	return dma_cookie_status(chan, cookie, txstate);
 597}
 598
 599/* Prepare descriptor for memory to memory copy */
 600static struct dma_async_tx_descriptor *
 601mpc_dma_prep_memcpy(struct dma_chan *chan, dma_addr_t dst, dma_addr_t src,
 602					size_t len, unsigned long flags)
 603{
 604	struct mpc_dma *mdma = dma_chan_to_mpc_dma(chan);
 605	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(chan);
 606	struct mpc_dma_desc *mdesc = NULL;
 607	struct mpc_dma_tcd *tcd;
 608	unsigned long iflags;
 609
 610	/* Get free descriptor */
 611	spin_lock_irqsave(&mchan->lock, iflags);
 612	if (!list_empty(&mchan->free)) {
 613		mdesc = list_first_entry(&mchan->free, struct mpc_dma_desc,
 614									node);
 615		list_del(&mdesc->node);
 616	}
 617	spin_unlock_irqrestore(&mchan->lock, iflags);
 618
 619	if (!mdesc) {
 620		/* try to free completed descriptors */
 621		mpc_dma_process_completed(mdma);
 622		return NULL;
 623	}
 624
 625	mdesc->error = 0;
 626	mdesc->will_access_peripheral = 0;
 627	tcd = mdesc->tcd;
 628
 629	/* Prepare Transfer Control Descriptor for this transaction */
 630	memset(tcd, 0, sizeof(struct mpc_dma_tcd));
 631
 632	if (IS_ALIGNED(src | dst | len, 32)) {
 633		tcd->ssize = MPC_DMA_TSIZE_32;
 634		tcd->dsize = MPC_DMA_TSIZE_32;
 635		tcd->soff = 32;
 636		tcd->doff = 32;
 637	} else if (!mdma->is_mpc8308 && IS_ALIGNED(src | dst | len, 16)) {
 638		/* MPC8308 doesn't support 16 byte transfers */
 639		tcd->ssize = MPC_DMA_TSIZE_16;
 640		tcd->dsize = MPC_DMA_TSIZE_16;
 641		tcd->soff = 16;
 642		tcd->doff = 16;
 643	} else if (IS_ALIGNED(src | dst | len, 4)) {
 644		tcd->ssize = MPC_DMA_TSIZE_4;
 645		tcd->dsize = MPC_DMA_TSIZE_4;
 646		tcd->soff = 4;
 647		tcd->doff = 4;
 648	} else if (IS_ALIGNED(src | dst | len, 2)) {
 649		tcd->ssize = MPC_DMA_TSIZE_2;
 650		tcd->dsize = MPC_DMA_TSIZE_2;
 651		tcd->soff = 2;
 652		tcd->doff = 2;
 653	} else {
 654		tcd->ssize = MPC_DMA_TSIZE_1;
 655		tcd->dsize = MPC_DMA_TSIZE_1;
 656		tcd->soff = 1;
 657		tcd->doff = 1;
 658	}
 659
 660	tcd->saddr = src;
 661	tcd->daddr = dst;
 662	tcd->nbytes = len;
 663	tcd->biter = 1;
 664	tcd->citer = 1;
 665
 666	/* Place descriptor in prepared list */
 667	spin_lock_irqsave(&mchan->lock, iflags);
 668	list_add_tail(&mdesc->node, &mchan->prepared);
 669	spin_unlock_irqrestore(&mchan->lock, iflags);
 670
 671	return &mdesc->desc;
 672}
 673
 674inline u8 buswidth_to_dmatsize(u8 buswidth)
 675{
 676	u8 res;
 677
 678	for (res = 0; buswidth > 1; buswidth /= 2)
 679		res++;
 680	return res;
 681}
 682
 683static struct dma_async_tx_descriptor *
 684mpc_dma_prep_slave_sg(struct dma_chan *chan, struct scatterlist *sgl,
 685		unsigned int sg_len, enum dma_transfer_direction direction,
 686		unsigned long flags, void *context)
 687{
 688	struct mpc_dma *mdma = dma_chan_to_mpc_dma(chan);
 689	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(chan);
 690	struct mpc_dma_desc *mdesc = NULL;
 691	dma_addr_t per_paddr;
 692	u32 tcd_nunits;
 693	struct mpc_dma_tcd *tcd;
 694	unsigned long iflags;
 695	struct scatterlist *sg;
 696	size_t len;
 697	int iter, i;
 698
 699	/* Currently there is no proper support for scatter/gather */
 700	if (sg_len != 1)
 701		return NULL;
 702
 703	if (!is_slave_direction(direction))
 704		return NULL;
 705
 706	for_each_sg(sgl, sg, sg_len, i) {
 707		spin_lock_irqsave(&mchan->lock, iflags);
 708
 709		mdesc = list_first_entry(&mchan->free,
 710						struct mpc_dma_desc, node);
 711		if (!mdesc) {
 712			spin_unlock_irqrestore(&mchan->lock, iflags);
 713			/* Try to free completed descriptors */
 714			mpc_dma_process_completed(mdma);
 715			return NULL;
 716		}
 717
 718		list_del(&mdesc->node);
 719
 720		if (direction == DMA_DEV_TO_MEM) {
 721			per_paddr = mchan->src_per_paddr;
 722			tcd_nunits = mchan->src_tcd_nunits;
 723		} else {
 724			per_paddr = mchan->dst_per_paddr;
 725			tcd_nunits = mchan->dst_tcd_nunits;
 726		}
 727
 728		spin_unlock_irqrestore(&mchan->lock, iflags);
 729
 730		if (per_paddr == 0 || tcd_nunits == 0)
 731			goto err_prep;
 732
 733		mdesc->error = 0;
 734		mdesc->will_access_peripheral = 1;
 735
 736		/* Prepare Transfer Control Descriptor for this transaction */
 737		tcd = mdesc->tcd;
 738
 739		memset(tcd, 0, sizeof(struct mpc_dma_tcd));
 740
 
 
 
 741		if (direction == DMA_DEV_TO_MEM) {
 742			tcd->saddr = per_paddr;
 743			tcd->daddr = sg_dma_address(sg);
 744
 745			if (!IS_ALIGNED(sg_dma_address(sg), mchan->dwidth))
 746				goto err_prep;
 747
 748			tcd->soff = 0;
 749			tcd->doff = mchan->dwidth;
 750		} else {
 751			tcd->saddr = sg_dma_address(sg);
 752			tcd->daddr = per_paddr;
 753
 754			if (!IS_ALIGNED(sg_dma_address(sg), mchan->swidth))
 755				goto err_prep;
 756
 757			tcd->soff = mchan->swidth;
 758			tcd->doff = 0;
 759		}
 760
 761		tcd->ssize = buswidth_to_dmatsize(mchan->swidth);
 762		tcd->dsize = buswidth_to_dmatsize(mchan->dwidth);
 
 
 
 
 
 763
 764		if (mdma->is_mpc8308) {
 765			tcd->nbytes = sg_dma_len(sg);
 766			if (!IS_ALIGNED(tcd->nbytes, mchan->swidth))
 767				goto err_prep;
 768
 769			/* No major loops for MPC8303 */
 770			tcd->biter = 1;
 771			tcd->citer = 1;
 772		} else {
 773			len = sg_dma_len(sg);
 774			tcd->nbytes = tcd_nunits * tcd->ssize;
 775			if (!IS_ALIGNED(len, tcd->nbytes))
 776				goto err_prep;
 777
 778			iter = len / tcd->nbytes;
 779			if (iter >= 1 << 15) {
 780				/* len is too big */
 781				goto err_prep;
 782			}
 783			/* citer_linkch contains the high bits of iter */
 784			tcd->biter = iter & 0x1ff;
 785			tcd->biter_linkch = iter >> 9;
 786			tcd->citer = tcd->biter;
 787			tcd->citer_linkch = tcd->biter_linkch;
 788		}
 
 
 
 
 
 789
 790		tcd->e_sg = 0;
 791		tcd->d_req = 1;
 792
 793		/* Place descriptor in prepared list */
 794		spin_lock_irqsave(&mchan->lock, iflags);
 795		list_add_tail(&mdesc->node, &mchan->prepared);
 796		spin_unlock_irqrestore(&mchan->lock, iflags);
 797	}
 798
 799	return &mdesc->desc;
 800
 801err_prep:
 802	/* Put the descriptor back */
 803	spin_lock_irqsave(&mchan->lock, iflags);
 804	list_add_tail(&mdesc->node, &mchan->free);
 805	spin_unlock_irqrestore(&mchan->lock, iflags);
 806
 807	return NULL;
 808}
 809
 810inline bool is_buswidth_valid(u8 buswidth, bool is_mpc8308)
 811{
 812	switch (buswidth) {
 813	case 16:
 814		if (is_mpc8308)
 815			return false;
 816	case 1:
 817	case 2:
 818	case 4:
 819	case 32:
 820		break;
 821	default:
 822		return false;
 823	}
 824
 825	return true;
 826}
 827
 828static int mpc_dma_device_config(struct dma_chan *chan,
 829				 struct dma_slave_config *cfg)
 830{
 831	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(chan);
 832	struct mpc_dma *mdma = dma_chan_to_mpc_dma(&mchan->chan);
 833	unsigned long flags;
 834
 835	/*
 836	 * Software constraints:
 837	 *  - only transfers between a peripheral device and memory are
 838	 *     supported
 839	 *  - transfer chunk sizes of 1, 2, 4, 16 (for MPC512x), and 32 bytes
 840	 *     are supported, and, consequently, source addresses and
 841	 *     destination addresses; must be aligned accordingly; furthermore,
 842	 *     for MPC512x SoCs, the transfer size must be aligned on (chunk
 843	 *     size * maxburst)
 844	 *  - during the transfer, the RAM address is incremented by the size
 845	 *     of transfer chunk
 846	 *  - the peripheral port's address is constant during the transfer.
 
 847	 */
 848
 849	if (!IS_ALIGNED(cfg->src_addr, cfg->src_addr_width) ||
 850	    !IS_ALIGNED(cfg->dst_addr, cfg->dst_addr_width)) {
 
 
 851		return -EINVAL;
 852	}
 853
 854	if (!is_buswidth_valid(cfg->src_addr_width, mdma->is_mpc8308) ||
 855	    !is_buswidth_valid(cfg->dst_addr_width, mdma->is_mpc8308))
 856		return -EINVAL;
 857
 858	spin_lock_irqsave(&mchan->lock, flags);
 859
 860	mchan->src_per_paddr = cfg->src_addr;
 861	mchan->src_tcd_nunits = cfg->src_maxburst;
 862	mchan->swidth = cfg->src_addr_width;
 863	mchan->dst_per_paddr = cfg->dst_addr;
 864	mchan->dst_tcd_nunits = cfg->dst_maxburst;
 865	mchan->dwidth = cfg->dst_addr_width;
 866
 867	/* Apply defaults */
 868	if (mchan->src_tcd_nunits == 0)
 869		mchan->src_tcd_nunits = 1;
 870	if (mchan->dst_tcd_nunits == 0)
 871		mchan->dst_tcd_nunits = 1;
 872
 873	spin_unlock_irqrestore(&mchan->lock, flags);
 874
 875	return 0;
 876}
 877
 878static int mpc_dma_device_terminate_all(struct dma_chan *chan)
 879{
 880	struct mpc_dma_chan *mchan = dma_chan_to_mpc_dma_chan(chan);
 881	struct mpc_dma *mdma = dma_chan_to_mpc_dma(chan);
 882	unsigned long flags;
 883
 884	/* Disable channel requests */
 885	spin_lock_irqsave(&mchan->lock, flags);
 886
 887	out_8(&mdma->regs->dmacerq, chan->chan_id);
 888	list_splice_tail_init(&mchan->prepared, &mchan->free);
 889	list_splice_tail_init(&mchan->queued, &mchan->free);
 890	list_splice_tail_init(&mchan->active, &mchan->free);
 891
 892	spin_unlock_irqrestore(&mchan->lock, flags);
 893
 894	return 0;
 895}
 896
 897static int mpc_dma_probe(struct platform_device *op)
 898{
 899	struct device_node *dn = op->dev.of_node;
 900	struct device *dev = &op->dev;
 901	struct dma_device *dma;
 902	struct mpc_dma *mdma;
 903	struct mpc_dma_chan *mchan;
 904	struct resource res;
 905	ulong regs_start, regs_size;
 906	int retval, i;
 907	u8 chancnt;
 908
 909	mdma = devm_kzalloc(dev, sizeof(struct mpc_dma), GFP_KERNEL);
 910	if (!mdma) {
 
 911		retval = -ENOMEM;
 912		goto err;
 913	}
 914
 915	mdma->irq = irq_of_parse_and_map(dn, 0);
 916	if (!mdma->irq) {
 917		dev_err(dev, "Error mapping IRQ!\n");
 918		retval = -EINVAL;
 919		goto err;
 920	}
 921
 922	if (of_device_is_compatible(dn, "fsl,mpc8308-dma")) {
 923		mdma->is_mpc8308 = 1;
 924		mdma->irq2 = irq_of_parse_and_map(dn, 1);
 925		if (!mdma->irq2) {
 926			dev_err(dev, "Error mapping IRQ!\n");
 927			retval = -EINVAL;
 928			goto err_dispose1;
 929		}
 930	}
 931
 932	retval = of_address_to_resource(dn, 0, &res);
 933	if (retval) {
 934		dev_err(dev, "Error parsing memory region!\n");
 935		goto err_dispose2;
 936	}
 937
 938	regs_start = res.start;
 939	regs_size = resource_size(&res);
 940
 941	if (!devm_request_mem_region(dev, regs_start, regs_size, DRV_NAME)) {
 942		dev_err(dev, "Error requesting memory region!\n");
 943		retval = -EBUSY;
 944		goto err_dispose2;
 945	}
 946
 947	mdma->regs = devm_ioremap(dev, regs_start, regs_size);
 948	if (!mdma->regs) {
 949		dev_err(dev, "Error mapping memory region!\n");
 950		retval = -ENOMEM;
 951		goto err_dispose2;
 952	}
 953
 954	mdma->tcd = (struct mpc_dma_tcd *)((u8 *)(mdma->regs)
 955							+ MPC_DMA_TCD_OFFSET);
 956
 957	retval = request_irq(mdma->irq, &mpc_dma_irq, 0, DRV_NAME, mdma);
 958	if (retval) {
 959		dev_err(dev, "Error requesting IRQ!\n");
 960		retval = -EINVAL;
 961		goto err_dispose2;
 962	}
 963
 964	if (mdma->is_mpc8308) {
 965		retval = request_irq(mdma->irq2, &mpc_dma_irq, 0,
 966							DRV_NAME, mdma);
 967		if (retval) {
 968			dev_err(dev, "Error requesting IRQ2!\n");
 969			retval = -EINVAL;
 970			goto err_free1;
 971		}
 972	}
 973
 974	spin_lock_init(&mdma->error_status_lock);
 975
 976	dma = &mdma->dma;
 977	dma->dev = dev;
 978	dma->device_alloc_chan_resources = mpc_dma_alloc_chan_resources;
 979	dma->device_free_chan_resources = mpc_dma_free_chan_resources;
 980	dma->device_issue_pending = mpc_dma_issue_pending;
 981	dma->device_tx_status = mpc_dma_tx_status;
 982	dma->device_prep_dma_memcpy = mpc_dma_prep_memcpy;
 983	dma->device_prep_slave_sg = mpc_dma_prep_slave_sg;
 984	dma->device_config = mpc_dma_device_config;
 985	dma->device_terminate_all = mpc_dma_device_terminate_all;
 986
 987	INIT_LIST_HEAD(&dma->channels);
 988	dma_cap_set(DMA_MEMCPY, dma->cap_mask);
 989	dma_cap_set(DMA_SLAVE, dma->cap_mask);
 990
 991	if (mdma->is_mpc8308)
 992		chancnt = MPC8308_DMACHAN_MAX;
 993	else
 994		chancnt = MPC512x_DMACHAN_MAX;
 995
 996	for (i = 0; i < chancnt; i++) {
 997		mchan = &mdma->channels[i];
 998
 999		mchan->chan.device = dma;
1000		dma_cookie_init(&mchan->chan);
1001
1002		INIT_LIST_HEAD(&mchan->free);
1003		INIT_LIST_HEAD(&mchan->prepared);
1004		INIT_LIST_HEAD(&mchan->queued);
1005		INIT_LIST_HEAD(&mchan->active);
1006		INIT_LIST_HEAD(&mchan->completed);
1007
1008		spin_lock_init(&mchan->lock);
1009		list_add_tail(&mchan->chan.device_node, &dma->channels);
1010	}
1011
1012	tasklet_init(&mdma->tasklet, mpc_dma_tasklet, (unsigned long)mdma);
1013
1014	/*
1015	 * Configure DMA Engine:
1016	 * - Dynamic clock,
1017	 * - Round-robin group arbitration,
1018	 * - Round-robin channel arbitration.
1019	 */
1020	if (mdma->is_mpc8308) {
1021		/* MPC8308 has 16 channels and lacks some registers */
1022		out_be32(&mdma->regs->dmacr, MPC_DMA_DMACR_ERCA);
1023
1024		/* enable snooping */
1025		out_be32(&mdma->regs->dmagpor, MPC_DMA_DMAGPOR_SNOOP_ENABLE);
1026		/* Disable error interrupts */
1027		out_be32(&mdma->regs->dmaeeil, 0);
1028
1029		/* Clear interrupts status */
1030		out_be32(&mdma->regs->dmaintl, 0xFFFF);
1031		out_be32(&mdma->regs->dmaerrl, 0xFFFF);
1032	} else {
1033		out_be32(&mdma->regs->dmacr, MPC_DMA_DMACR_EDCG |
1034						MPC_DMA_DMACR_ERGA |
1035						MPC_DMA_DMACR_ERCA);
1036
1037		/* Disable hardware DMA requests */
1038		out_be32(&mdma->regs->dmaerqh, 0);
1039		out_be32(&mdma->regs->dmaerql, 0);
1040
1041		/* Disable error interrupts */
1042		out_be32(&mdma->regs->dmaeeih, 0);
1043		out_be32(&mdma->regs->dmaeeil, 0);
1044
1045		/* Clear interrupts status */
1046		out_be32(&mdma->regs->dmainth, 0xFFFFFFFF);
1047		out_be32(&mdma->regs->dmaintl, 0xFFFFFFFF);
1048		out_be32(&mdma->regs->dmaerrh, 0xFFFFFFFF);
1049		out_be32(&mdma->regs->dmaerrl, 0xFFFFFFFF);
1050
1051		/* Route interrupts to IPIC */
1052		out_be32(&mdma->regs->dmaihsa, 0);
1053		out_be32(&mdma->regs->dmailsa, 0);
1054	}
1055
1056	/* Register DMA engine */
1057	dev_set_drvdata(dev, mdma);
1058	retval = dma_async_device_register(dma);
1059	if (retval)
1060		goto err_free2;
1061
1062	/* Register with OF helpers for DMA lookups (nonfatal) */
1063	if (dev->of_node) {
1064		retval = of_dma_controller_register(dev->of_node,
1065						of_dma_xlate_by_chan_id, mdma);
1066		if (retval)
1067			dev_warn(dev, "Could not register for OF lookup\n");
1068	}
1069
1070	return 0;
1071
1072err_free2:
1073	if (mdma->is_mpc8308)
1074		free_irq(mdma->irq2, mdma);
1075err_free1:
1076	free_irq(mdma->irq, mdma);
1077err_dispose2:
1078	if (mdma->is_mpc8308)
1079		irq_dispose_mapping(mdma->irq2);
1080err_dispose1:
1081	irq_dispose_mapping(mdma->irq);
1082err:
1083	return retval;
1084}
1085
1086static int mpc_dma_remove(struct platform_device *op)
1087{
1088	struct device *dev = &op->dev;
1089	struct mpc_dma *mdma = dev_get_drvdata(dev);
1090
1091	if (dev->of_node)
1092		of_dma_controller_free(dev->of_node);
1093	dma_async_device_unregister(&mdma->dma);
1094	if (mdma->is_mpc8308) {
1095		free_irq(mdma->irq2, mdma);
1096		irq_dispose_mapping(mdma->irq2);
1097	}
1098	free_irq(mdma->irq, mdma);
1099	irq_dispose_mapping(mdma->irq);
1100	tasklet_kill(&mdma->tasklet);
1101
1102	return 0;
1103}
1104
1105static const struct of_device_id mpc_dma_match[] = {
1106	{ .compatible = "fsl,mpc5121-dma", },
1107	{ .compatible = "fsl,mpc8308-dma", },
1108	{},
1109};
1110MODULE_DEVICE_TABLE(of, mpc_dma_match);
1111
1112static struct platform_driver mpc_dma_driver = {
1113	.probe		= mpc_dma_probe,
1114	.remove		= mpc_dma_remove,
1115	.driver = {
1116		.name = DRV_NAME,
1117		.of_match_table	= mpc_dma_match,
1118	},
1119};
1120
1121module_platform_driver(mpc_dma_driver);
1122
1123MODULE_LICENSE("GPL");
1124MODULE_AUTHOR("Piotr Ziecik <kosmo@semihalf.com>");