Linux Audio

Check our new training course

Buildroot integration, development and maintenance

Need a Buildroot system for your embedded project?
Loading...
v5.4
 
   1/*
   2 * DMM IOMMU driver support functions for TI OMAP processors.
   3 *
   4 * Copyright (C) 2011 Texas Instruments Incorporated - http://www.ti.com/
   5 * Author: Rob Clark <rob@ti.com>
   6 *         Andy Gross <andy.gross@ti.com>
   7 *
   8 * This program is free software; you can redistribute it and/or
   9 * modify it under the terms of the GNU General Public License as
  10 * published by the Free Software Foundation version 2.
  11 *
  12 * This program is distributed "as is" WITHOUT ANY WARRANTY of any
  13 * kind, whether express or implied; without even the implied warranty
  14 * of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 * GNU General Public License for more details.
  16 */
  17
  18#include <linux/completion.h>
  19#include <linux/delay.h>
  20#include <linux/dma-mapping.h>
  21#include <linux/dmaengine.h>
  22#include <linux/errno.h>
  23#include <linux/init.h>
  24#include <linux/interrupt.h>
  25#include <linux/list.h>
  26#include <linux/mm.h>
  27#include <linux/module.h>
 
  28#include <linux/platform_device.h> /* platform_device() */
  29#include <linux/sched.h>
  30#include <linux/seq_file.h>
  31#include <linux/slab.h>
  32#include <linux/time.h>
  33#include <linux/vmalloc.h>
  34#include <linux/wait.h>
  35
  36#include "omap_dmm_tiler.h"
  37#include "omap_dmm_priv.h"
  38
  39#define DMM_DRIVER_NAME "dmm"
  40
  41/* mappings for associating views to luts */
  42static struct tcm *containers[TILFMT_NFORMATS];
  43static struct dmm *omap_dmm;
  44
  45#if defined(CONFIG_OF)
  46static const struct of_device_id dmm_of_match[];
  47#endif
  48
  49/* global spinlock for protecting lists */
  50static DEFINE_SPINLOCK(list_lock);
  51
  52/* Geometry table */
  53#define GEOM(xshift, yshift, bytes_per_pixel) { \
  54		.x_shft = (xshift), \
  55		.y_shft = (yshift), \
  56		.cpp    = (bytes_per_pixel), \
  57		.slot_w = 1 << (SLOT_WIDTH_BITS - (xshift)), \
  58		.slot_h = 1 << (SLOT_HEIGHT_BITS - (yshift)), \
  59	}
  60
  61static const struct {
  62	u32 x_shft;	/* unused X-bits (as part of bpp) */
  63	u32 y_shft;	/* unused Y-bits (as part of bpp) */
  64	u32 cpp;		/* bytes/chars per pixel */
  65	u32 slot_w;	/* width of each slot (in pixels) */
  66	u32 slot_h;	/* height of each slot (in pixels) */
  67} geom[TILFMT_NFORMATS] = {
  68	[TILFMT_8BIT]  = GEOM(0, 0, 1),
  69	[TILFMT_16BIT] = GEOM(0, 1, 2),
  70	[TILFMT_32BIT] = GEOM(1, 1, 4),
  71	[TILFMT_PAGE]  = GEOM(SLOT_WIDTH_BITS, SLOT_HEIGHT_BITS, 1),
  72};
  73
  74
  75/* lookup table for registers w/ per-engine instances */
  76static const u32 reg[][4] = {
  77	[PAT_STATUS] = {DMM_PAT_STATUS__0, DMM_PAT_STATUS__1,
  78			DMM_PAT_STATUS__2, DMM_PAT_STATUS__3},
  79	[PAT_DESCR]  = {DMM_PAT_DESCR__0, DMM_PAT_DESCR__1,
  80			DMM_PAT_DESCR__2, DMM_PAT_DESCR__3},
  81};
  82
  83static int dmm_dma_copy(struct dmm *dmm, dma_addr_t src, dma_addr_t dst)
  84{
  85	struct dma_device *dma_dev = dmm->wa_dma_chan->device;
  86	struct dma_async_tx_descriptor *tx;
  87	enum dma_status status;
  88	dma_cookie_t cookie;
  89
  90	tx = dma_dev->device_prep_dma_memcpy(dmm->wa_dma_chan, dst, src, 4, 0);
  91	if (!tx) {
  92		dev_err(dmm->dev, "Failed to prepare DMA memcpy\n");
  93		return -EIO;
  94	}
  95
  96	cookie = tx->tx_submit(tx);
  97	if (dma_submit_error(cookie)) {
  98		dev_err(dmm->dev, "Failed to do DMA tx_submit\n");
  99		return -EIO;
 100	}
 101
 102	dma_async_issue_pending(dmm->wa_dma_chan);
 103	status = dma_sync_wait(dmm->wa_dma_chan, cookie);
 104	if (status != DMA_COMPLETE)
 105		dev_err(dmm->dev, "i878 wa DMA copy failure\n");
 106
 107	dmaengine_terminate_all(dmm->wa_dma_chan);
 108	return 0;
 109}
 110
 111static u32 dmm_read_wa(struct dmm *dmm, u32 reg)
 112{
 113	dma_addr_t src, dst;
 114	int r;
 115
 116	src = dmm->phys_base + reg;
 117	dst = dmm->wa_dma_handle;
 118
 119	r = dmm_dma_copy(dmm, src, dst);
 120	if (r) {
 121		dev_err(dmm->dev, "sDMA read transfer timeout\n");
 122		return readl(dmm->base + reg);
 123	}
 124
 125	/*
 126	 * As per i878 workaround, the DMA is used to access the DMM registers.
 127	 * Make sure that the readl is not moved by the compiler or the CPU
 128	 * earlier than the DMA finished writing the value to memory.
 129	 */
 130	rmb();
 131	return readl(dmm->wa_dma_data);
 132}
 133
 134static void dmm_write_wa(struct dmm *dmm, u32 val, u32 reg)
 135{
 136	dma_addr_t src, dst;
 137	int r;
 138
 139	writel(val, dmm->wa_dma_data);
 140	/*
 141	 * As per i878 workaround, the DMA is used to access the DMM registers.
 142	 * Make sure that the writel is not moved by the compiler or the CPU, so
 143	 * the data will be in place before we start the DMA to do the actual
 144	 * register write.
 145	 */
 146	wmb();
 147
 148	src = dmm->wa_dma_handle;
 149	dst = dmm->phys_base + reg;
 150
 151	r = dmm_dma_copy(dmm, src, dst);
 152	if (r) {
 153		dev_err(dmm->dev, "sDMA write transfer timeout\n");
 154		writel(val, dmm->base + reg);
 155	}
 156}
 157
 158static u32 dmm_read(struct dmm *dmm, u32 reg)
 159{
 160	if (dmm->dmm_workaround) {
 161		u32 v;
 162		unsigned long flags;
 163
 164		spin_lock_irqsave(&dmm->wa_lock, flags);
 165		v = dmm_read_wa(dmm, reg);
 166		spin_unlock_irqrestore(&dmm->wa_lock, flags);
 167
 168		return v;
 169	} else {
 170		return readl(dmm->base + reg);
 171	}
 172}
 173
 174static void dmm_write(struct dmm *dmm, u32 val, u32 reg)
 175{
 176	if (dmm->dmm_workaround) {
 177		unsigned long flags;
 178
 179		spin_lock_irqsave(&dmm->wa_lock, flags);
 180		dmm_write_wa(dmm, val, reg);
 181		spin_unlock_irqrestore(&dmm->wa_lock, flags);
 182	} else {
 183		writel(val, dmm->base + reg);
 184	}
 185}
 186
 187static int dmm_workaround_init(struct dmm *dmm)
 188{
 189	dma_cap_mask_t mask;
 190
 191	spin_lock_init(&dmm->wa_lock);
 192
 193	dmm->wa_dma_data = dma_alloc_coherent(dmm->dev,  sizeof(u32),
 194					      &dmm->wa_dma_handle, GFP_KERNEL);
 195	if (!dmm->wa_dma_data)
 196		return -ENOMEM;
 197
 198	dma_cap_zero(mask);
 199	dma_cap_set(DMA_MEMCPY, mask);
 200
 201	dmm->wa_dma_chan = dma_request_channel(mask, NULL, NULL);
 202	if (!dmm->wa_dma_chan) {
 203		dma_free_coherent(dmm->dev, 4, dmm->wa_dma_data, dmm->wa_dma_handle);
 204		return -ENODEV;
 205	}
 206
 207	return 0;
 208}
 209
 210static void dmm_workaround_uninit(struct dmm *dmm)
 211{
 212	dma_release_channel(dmm->wa_dma_chan);
 213
 214	dma_free_coherent(dmm->dev, 4, dmm->wa_dma_data, dmm->wa_dma_handle);
 215}
 216
 217/* simple allocator to grab next 16 byte aligned memory from txn */
 218static void *alloc_dma(struct dmm_txn *txn, size_t sz, dma_addr_t *pa)
 219{
 220	void *ptr;
 221	struct refill_engine *engine = txn->engine_handle;
 222
 223	/* dmm programming requires 16 byte aligned addresses */
 224	txn->current_pa = round_up(txn->current_pa, 16);
 225	txn->current_va = (void *)round_up((long)txn->current_va, 16);
 226
 227	ptr = txn->current_va;
 228	*pa = txn->current_pa;
 229
 230	txn->current_pa += sz;
 231	txn->current_va += sz;
 232
 233	BUG_ON((txn->current_va - engine->refill_va) > REFILL_BUFFER_SIZE);
 234
 235	return ptr;
 236}
 237
 238/* check status and spin until wait_mask comes true */
 239static int wait_status(struct refill_engine *engine, u32 wait_mask)
 240{
 241	struct dmm *dmm = engine->dmm;
 242	u32 r = 0, err, i;
 243
 244	i = DMM_FIXED_RETRY_COUNT;
 245	while (true) {
 246		r = dmm_read(dmm, reg[PAT_STATUS][engine->id]);
 247		err = r & DMM_PATSTATUS_ERR;
 248		if (err) {
 249			dev_err(dmm->dev,
 250				"%s: error (engine%d). PAT_STATUS: 0x%08x\n",
 251				__func__, engine->id, r);
 252			return -EFAULT;
 253		}
 254
 255		if ((r & wait_mask) == wait_mask)
 256			break;
 257
 258		if (--i == 0) {
 259			dev_err(dmm->dev,
 260				"%s: timeout (engine%d). PAT_STATUS: 0x%08x\n",
 261				__func__, engine->id, r);
 262			return -ETIMEDOUT;
 263		}
 264
 265		udelay(1);
 266	}
 267
 268	return 0;
 269}
 270
 271static void release_engine(struct refill_engine *engine)
 272{
 273	unsigned long flags;
 274
 275	spin_lock_irqsave(&list_lock, flags);
 276	list_add(&engine->idle_node, &omap_dmm->idle_head);
 277	spin_unlock_irqrestore(&list_lock, flags);
 278
 279	atomic_inc(&omap_dmm->engine_counter);
 280	wake_up_interruptible(&omap_dmm->engine_queue);
 281}
 282
 283static irqreturn_t omap_dmm_irq_handler(int irq, void *arg)
 284{
 285	struct dmm *dmm = arg;
 286	u32 status = dmm_read(dmm, DMM_PAT_IRQSTATUS);
 287	int i;
 288
 289	/* ack IRQ */
 290	dmm_write(dmm, status, DMM_PAT_IRQSTATUS);
 291
 292	for (i = 0; i < dmm->num_engines; i++) {
 293		if (status & DMM_IRQSTAT_ERR_MASK)
 294			dev_err(dmm->dev,
 295				"irq error(engine%d): IRQSTAT 0x%02x\n",
 296				i, status & 0xff);
 297
 298		if (status & DMM_IRQSTAT_LST) {
 299			if (dmm->engines[i].async)
 300				release_engine(&dmm->engines[i]);
 301
 302			complete(&dmm->engines[i].compl);
 303		}
 304
 305		status >>= 8;
 306	}
 307
 308	return IRQ_HANDLED;
 309}
 310
 311/**
 312 * Get a handle for a DMM transaction
 313 */
 314static struct dmm_txn *dmm_txn_init(struct dmm *dmm, struct tcm *tcm)
 315{
 316	struct dmm_txn *txn = NULL;
 317	struct refill_engine *engine = NULL;
 318	int ret;
 319	unsigned long flags;
 320
 321
 322	/* wait until an engine is available */
 323	ret = wait_event_interruptible(omap_dmm->engine_queue,
 324		atomic_add_unless(&omap_dmm->engine_counter, -1, 0));
 325	if (ret)
 326		return ERR_PTR(ret);
 327
 328	/* grab an idle engine */
 329	spin_lock_irqsave(&list_lock, flags);
 330	if (!list_empty(&dmm->idle_head)) {
 331		engine = list_entry(dmm->idle_head.next, struct refill_engine,
 332					idle_node);
 333		list_del(&engine->idle_node);
 334	}
 335	spin_unlock_irqrestore(&list_lock, flags);
 336
 337	BUG_ON(!engine);
 338
 339	txn = &engine->txn;
 340	engine->tcm = tcm;
 341	txn->engine_handle = engine;
 342	txn->last_pat = NULL;
 343	txn->current_va = engine->refill_va;
 344	txn->current_pa = engine->refill_pa;
 345
 346	return txn;
 347}
 348
 349/**
 350 * Add region to DMM transaction.  If pages or pages[i] is NULL, then the
 351 * corresponding slot is cleared (ie. dummy_pa is programmed)
 352 */
 353static void dmm_txn_append(struct dmm_txn *txn, struct pat_area *area,
 354		struct page **pages, u32 npages, u32 roll)
 355{
 356	dma_addr_t pat_pa = 0, data_pa = 0;
 357	u32 *data;
 358	struct pat *pat;
 359	struct refill_engine *engine = txn->engine_handle;
 360	int columns = (1 + area->x1 - area->x0);
 361	int rows = (1 + area->y1 - area->y0);
 362	int i = columns*rows;
 363
 364	pat = alloc_dma(txn, sizeof(*pat), &pat_pa);
 365
 366	if (txn->last_pat)
 367		txn->last_pat->next_pa = (u32)pat_pa;
 368
 369	pat->area = *area;
 370
 371	/* adjust Y coordinates based off of container parameters */
 372	pat->area.y0 += engine->tcm->y_offset;
 373	pat->area.y1 += engine->tcm->y_offset;
 374
 375	pat->ctrl = (struct pat_ctrl){
 376			.start = 1,
 377			.lut_id = engine->tcm->lut_id,
 378		};
 379
 380	data = alloc_dma(txn, 4*i, &data_pa);
 381	/* FIXME: what if data_pa is more than 32-bit ? */
 382	pat->data_pa = data_pa;
 383
 384	while (i--) {
 385		int n = i + roll;
 386		if (n >= npages)
 387			n -= npages;
 388		data[i] = (pages && pages[n]) ?
 389			page_to_phys(pages[n]) : engine->dmm->dummy_pa;
 390	}
 391
 392	txn->last_pat = pat;
 393
 394	return;
 395}
 396
 397/**
 398 * Commit the DMM transaction.
 399 */
 400static int dmm_txn_commit(struct dmm_txn *txn, bool wait)
 401{
 402	int ret = 0;
 403	struct refill_engine *engine = txn->engine_handle;
 404	struct dmm *dmm = engine->dmm;
 405
 406	if (!txn->last_pat) {
 407		dev_err(engine->dmm->dev, "need at least one txn\n");
 408		ret = -EINVAL;
 409		goto cleanup;
 410	}
 411
 412	txn->last_pat->next_pa = 0;
 413	/* ensure that the written descriptors are visible to DMM */
 414	wmb();
 415
 416	/*
 417	 * NOTE: the wmb() above should be enough, but there seems to be a bug
 418	 * in OMAP's memory barrier implementation, which in some rare cases may
 419	 * cause the writes not to be observable after wmb().
 420	 */
 421
 422	/* read back to ensure the data is in RAM */
 423	readl(&txn->last_pat->next_pa);
 424
 425	/* write to PAT_DESCR to clear out any pending transaction */
 426	dmm_write(dmm, 0x0, reg[PAT_DESCR][engine->id]);
 427
 428	/* wait for engine ready: */
 429	ret = wait_status(engine, DMM_PATSTATUS_READY);
 430	if (ret) {
 431		ret = -EFAULT;
 432		goto cleanup;
 433	}
 434
 435	/* mark whether it is async to denote list management in IRQ handler */
 436	engine->async = wait ? false : true;
 437	reinit_completion(&engine->compl);
 438	/* verify that the irq handler sees the 'async' and completion value */
 439	smp_mb();
 440
 441	/* kick reload */
 442	dmm_write(dmm, engine->refill_pa, reg[PAT_DESCR][engine->id]);
 443
 444	if (wait) {
 445		if (!wait_for_completion_timeout(&engine->compl,
 446				msecs_to_jiffies(100))) {
 447			dev_err(dmm->dev, "timed out waiting for done\n");
 448			ret = -ETIMEDOUT;
 449			goto cleanup;
 450		}
 451
 452		/* Check the engine status before continue */
 453		ret = wait_status(engine, DMM_PATSTATUS_READY |
 454				  DMM_PATSTATUS_VALID | DMM_PATSTATUS_DONE);
 455	}
 456
 457cleanup:
 458	/* only place engine back on list if we are done with it */
 459	if (ret || wait)
 460		release_engine(engine);
 461
 462	return ret;
 463}
 464
 465/*
 466 * DMM programming
 467 */
 468static int fill(struct tcm_area *area, struct page **pages,
 469		u32 npages, u32 roll, bool wait)
 470{
 471	int ret = 0;
 472	struct tcm_area slice, area_s;
 473	struct dmm_txn *txn;
 474
 475	/*
 476	 * FIXME
 477	 *
 478	 * Asynchronous fill does not work reliably, as the driver does not
 479	 * handle errors in the async code paths. The fill operation may
 480	 * silently fail, leading to leaking DMM engines, which may eventually
 481	 * lead to deadlock if we run out of DMM engines.
 482	 *
 483	 * For now, always set 'wait' so that we only use sync fills. Async
 484	 * fills should be fixed, or alternatively we could decide to only
 485	 * support sync fills and so the whole async code path could be removed.
 486	 */
 487
 488	wait = true;
 489
 490	txn = dmm_txn_init(omap_dmm, area->tcm);
 491	if (IS_ERR_OR_NULL(txn))
 492		return -ENOMEM;
 493
 494	tcm_for_each_slice(slice, *area, area_s) {
 495		struct pat_area p_area = {
 496				.x0 = slice.p0.x,  .y0 = slice.p0.y,
 497				.x1 = slice.p1.x,  .y1 = slice.p1.y,
 498		};
 499
 500		dmm_txn_append(txn, &p_area, pages, npages, roll);
 501
 502		roll += tcm_sizeof(slice);
 503	}
 504
 505	ret = dmm_txn_commit(txn, wait);
 506
 507	return ret;
 508}
 509
 510/*
 511 * Pin/unpin
 512 */
 513
 514/* note: slots for which pages[i] == NULL are filled w/ dummy page
 515 */
 516int tiler_pin(struct tiler_block *block, struct page **pages,
 517		u32 npages, u32 roll, bool wait)
 518{
 519	int ret;
 520
 521	ret = fill(&block->area, pages, npages, roll, wait);
 522
 523	if (ret)
 524		tiler_unpin(block);
 525
 526	return ret;
 527}
 528
 529int tiler_unpin(struct tiler_block *block)
 530{
 531	return fill(&block->area, NULL, 0, 0, false);
 532}
 533
 534/*
 535 * Reserve/release
 536 */
 537struct tiler_block *tiler_reserve_2d(enum tiler_fmt fmt, u16 w,
 538		u16 h, u16 align)
 539{
 540	struct tiler_block *block;
 541	u32 min_align = 128;
 542	int ret;
 543	unsigned long flags;
 544	u32 slot_bytes;
 545
 546	block = kzalloc(sizeof(*block), GFP_KERNEL);
 547	if (!block)
 548		return ERR_PTR(-ENOMEM);
 549
 550	BUG_ON(!validfmt(fmt));
 551
 552	/* convert width/height to slots */
 553	w = DIV_ROUND_UP(w, geom[fmt].slot_w);
 554	h = DIV_ROUND_UP(h, geom[fmt].slot_h);
 555
 556	/* convert alignment to slots */
 557	slot_bytes = geom[fmt].slot_w * geom[fmt].cpp;
 558	min_align = max(min_align, slot_bytes);
 559	align = (align > min_align) ? ALIGN(align, min_align) : min_align;
 560	align /= slot_bytes;
 561
 562	block->fmt = fmt;
 563
 564	ret = tcm_reserve_2d(containers[fmt], w, h, align, -1, slot_bytes,
 565			&block->area);
 566	if (ret) {
 567		kfree(block);
 568		return ERR_PTR(-ENOMEM);
 569	}
 570
 571	/* add to allocation list */
 572	spin_lock_irqsave(&list_lock, flags);
 573	list_add(&block->alloc_node, &omap_dmm->alloc_head);
 574	spin_unlock_irqrestore(&list_lock, flags);
 575
 576	return block;
 577}
 578
 579struct tiler_block *tiler_reserve_1d(size_t size)
 580{
 581	struct tiler_block *block = kzalloc(sizeof(*block), GFP_KERNEL);
 582	int num_pages = (size + PAGE_SIZE - 1) >> PAGE_SHIFT;
 583	unsigned long flags;
 584
 585	if (!block)
 586		return ERR_PTR(-ENOMEM);
 587
 588	block->fmt = TILFMT_PAGE;
 589
 590	if (tcm_reserve_1d(containers[TILFMT_PAGE], num_pages,
 591				&block->area)) {
 592		kfree(block);
 593		return ERR_PTR(-ENOMEM);
 594	}
 595
 596	spin_lock_irqsave(&list_lock, flags);
 597	list_add(&block->alloc_node, &omap_dmm->alloc_head);
 598	spin_unlock_irqrestore(&list_lock, flags);
 599
 600	return block;
 601}
 602
 603/* note: if you have pin'd pages, you should have already unpin'd first! */
 604int tiler_release(struct tiler_block *block)
 605{
 606	int ret = tcm_free(&block->area);
 607	unsigned long flags;
 608
 609	if (block->area.tcm)
 610		dev_err(omap_dmm->dev, "failed to release block\n");
 611
 612	spin_lock_irqsave(&list_lock, flags);
 613	list_del(&block->alloc_node);
 614	spin_unlock_irqrestore(&list_lock, flags);
 615
 616	kfree(block);
 617	return ret;
 618}
 619
 620/*
 621 * Utils
 622 */
 623
 624/* calculate the tiler space address of a pixel in a view orientation...
 625 * below description copied from the display subsystem section of TRM:
 626 *
 627 * When the TILER is addressed, the bits:
 628 *   [28:27] = 0x0 for 8-bit tiled
 629 *             0x1 for 16-bit tiled
 630 *             0x2 for 32-bit tiled
 631 *             0x3 for page mode
 632 *   [31:29] = 0x0 for 0-degree view
 633 *             0x1 for 180-degree view + mirroring
 634 *             0x2 for 0-degree view + mirroring
 635 *             0x3 for 180-degree view
 636 *             0x4 for 270-degree view + mirroring
 637 *             0x5 for 270-degree view
 638 *             0x6 for 90-degree view
 639 *             0x7 for 90-degree view + mirroring
 640 * Otherwise the bits indicated the corresponding bit address to access
 641 * the SDRAM.
 642 */
 643static u32 tiler_get_address(enum tiler_fmt fmt, u32 orient, u32 x, u32 y)
 644{
 645	u32 x_bits, y_bits, tmp, x_mask, y_mask, alignment;
 646
 647	x_bits = CONT_WIDTH_BITS - geom[fmt].x_shft;
 648	y_bits = CONT_HEIGHT_BITS - geom[fmt].y_shft;
 649	alignment = geom[fmt].x_shft + geom[fmt].y_shft;
 650
 651	/* validate coordinate */
 652	x_mask = MASK(x_bits);
 653	y_mask = MASK(y_bits);
 654
 655	if (x < 0 || x > x_mask || y < 0 || y > y_mask) {
 656		DBG("invalid coords: %u < 0 || %u > %u || %u < 0 || %u > %u",
 657				x, x, x_mask, y, y, y_mask);
 658		return 0;
 659	}
 660
 661	/* account for mirroring */
 662	if (orient & MASK_X_INVERT)
 663		x ^= x_mask;
 664	if (orient & MASK_Y_INVERT)
 665		y ^= y_mask;
 666
 667	/* get coordinate address */
 668	if (orient & MASK_XY_FLIP)
 669		tmp = ((x << y_bits) + y);
 670	else
 671		tmp = ((y << x_bits) + x);
 672
 673	return TIL_ADDR((tmp << alignment), orient, fmt);
 674}
 675
 676dma_addr_t tiler_ssptr(struct tiler_block *block)
 677{
 678	BUG_ON(!validfmt(block->fmt));
 679
 680	return TILVIEW_8BIT + tiler_get_address(block->fmt, 0,
 681			block->area.p0.x * geom[block->fmt].slot_w,
 682			block->area.p0.y * geom[block->fmt].slot_h);
 683}
 684
 685dma_addr_t tiler_tsptr(struct tiler_block *block, u32 orient,
 686		u32 x, u32 y)
 687{
 688	struct tcm_pt *p = &block->area.p0;
 689	BUG_ON(!validfmt(block->fmt));
 690
 691	return tiler_get_address(block->fmt, orient,
 692			(p->x * geom[block->fmt].slot_w) + x,
 693			(p->y * geom[block->fmt].slot_h) + y);
 694}
 695
 696void tiler_align(enum tiler_fmt fmt, u16 *w, u16 *h)
 697{
 698	BUG_ON(!validfmt(fmt));
 699	*w = round_up(*w, geom[fmt].slot_w);
 700	*h = round_up(*h, geom[fmt].slot_h);
 701}
 702
 703u32 tiler_stride(enum tiler_fmt fmt, u32 orient)
 704{
 705	BUG_ON(!validfmt(fmt));
 706
 707	if (orient & MASK_XY_FLIP)
 708		return 1 << (CONT_HEIGHT_BITS + geom[fmt].x_shft);
 709	else
 710		return 1 << (CONT_WIDTH_BITS + geom[fmt].y_shft);
 711}
 712
 713size_t tiler_size(enum tiler_fmt fmt, u16 w, u16 h)
 714{
 715	tiler_align(fmt, &w, &h);
 716	return geom[fmt].cpp * w * h;
 717}
 718
 719size_t tiler_vsize(enum tiler_fmt fmt, u16 w, u16 h)
 720{
 721	BUG_ON(!validfmt(fmt));
 722	return round_up(geom[fmt].cpp * w, PAGE_SIZE) * h;
 723}
 724
 725u32 tiler_get_cpu_cache_flags(void)
 726{
 727	return omap_dmm->plat_data->cpu_cache_flags;
 728}
 729
 730bool dmm_is_available(void)
 731{
 732	return omap_dmm ? true : false;
 733}
 734
 735static int omap_dmm_remove(struct platform_device *dev)
 736{
 737	struct tiler_block *block, *_block;
 738	int i;
 739	unsigned long flags;
 740
 741	if (omap_dmm) {
 742		/* Disable all enabled interrupts */
 743		dmm_write(omap_dmm, 0x7e7e7e7e, DMM_PAT_IRQENABLE_CLR);
 744		free_irq(omap_dmm->irq, omap_dmm);
 745
 746		/* free all area regions */
 747		spin_lock_irqsave(&list_lock, flags);
 748		list_for_each_entry_safe(block, _block, &omap_dmm->alloc_head,
 749					alloc_node) {
 750			list_del(&block->alloc_node);
 751			kfree(block);
 752		}
 753		spin_unlock_irqrestore(&list_lock, flags);
 754
 755		for (i = 0; i < omap_dmm->num_lut; i++)
 756			if (omap_dmm->tcm && omap_dmm->tcm[i])
 757				omap_dmm->tcm[i]->deinit(omap_dmm->tcm[i]);
 758		kfree(omap_dmm->tcm);
 759
 760		kfree(omap_dmm->engines);
 761		if (omap_dmm->refill_va)
 762			dma_free_wc(omap_dmm->dev,
 763				    REFILL_BUFFER_SIZE * omap_dmm->num_engines,
 764				    omap_dmm->refill_va, omap_dmm->refill_pa);
 765		if (omap_dmm->dummy_page)
 766			__free_page(omap_dmm->dummy_page);
 767
 768		if (omap_dmm->dmm_workaround)
 769			dmm_workaround_uninit(omap_dmm);
 770
 771		iounmap(omap_dmm->base);
 772		kfree(omap_dmm);
 773		omap_dmm = NULL;
 774	}
 775
 776	return 0;
 777}
 778
 779static int omap_dmm_probe(struct platform_device *dev)
 780{
 781	int ret = -EFAULT, i;
 782	struct tcm_area area = {0};
 783	u32 hwinfo, pat_geom;
 784	struct resource *mem;
 785
 786	omap_dmm = kzalloc(sizeof(*omap_dmm), GFP_KERNEL);
 787	if (!omap_dmm)
 788		goto fail;
 789
 790	/* initialize lists */
 791	INIT_LIST_HEAD(&omap_dmm->alloc_head);
 792	INIT_LIST_HEAD(&omap_dmm->idle_head);
 793
 794	init_waitqueue_head(&omap_dmm->engine_queue);
 795
 796	if (dev->dev.of_node) {
 797		const struct of_device_id *match;
 798
 799		match = of_match_node(dmm_of_match, dev->dev.of_node);
 800		if (!match) {
 801			dev_err(&dev->dev, "failed to find matching device node\n");
 802			ret = -ENODEV;
 803			goto fail;
 804		}
 805
 806		omap_dmm->plat_data = match->data;
 807	}
 808
 809	/* lookup hwmod data - base address and irq */
 810	mem = platform_get_resource(dev, IORESOURCE_MEM, 0);
 811	if (!mem) {
 812		dev_err(&dev->dev, "failed to get base address resource\n");
 813		goto fail;
 814	}
 815
 816	omap_dmm->phys_base = mem->start;
 817	omap_dmm->base = ioremap(mem->start, SZ_2K);
 818
 819	if (!omap_dmm->base) {
 820		dev_err(&dev->dev, "failed to get dmm base address\n");
 821		goto fail;
 822	}
 823
 824	omap_dmm->irq = platform_get_irq(dev, 0);
 825	if (omap_dmm->irq < 0) {
 826		dev_err(&dev->dev, "failed to get IRQ resource\n");
 827		goto fail;
 828	}
 829
 830	omap_dmm->dev = &dev->dev;
 831
 832	if (of_machine_is_compatible("ti,dra7")) {
 833		/*
 834		 * DRA7 Errata i878 says that MPU should not be used to access
 835		 * RAM and DMM at the same time. As it's not possible to prevent
 836		 * MPU accessing RAM, we need to access DMM via a proxy.
 837		 */
 838		if (!dmm_workaround_init(omap_dmm)) {
 839			omap_dmm->dmm_workaround = true;
 840			dev_info(&dev->dev,
 841				"workaround for errata i878 in use\n");
 842		} else {
 843			dev_warn(&dev->dev,
 844				 "failed to initialize work-around for i878\n");
 845		}
 846	}
 847
 848	hwinfo = dmm_read(omap_dmm, DMM_PAT_HWINFO);
 849	omap_dmm->num_engines = (hwinfo >> 24) & 0x1F;
 850	omap_dmm->num_lut = (hwinfo >> 16) & 0x1F;
 851	omap_dmm->container_width = 256;
 852	omap_dmm->container_height = 128;
 853
 854	atomic_set(&omap_dmm->engine_counter, omap_dmm->num_engines);
 855
 856	/* read out actual LUT width and height */
 857	pat_geom = dmm_read(omap_dmm, DMM_PAT_GEOMETRY);
 858	omap_dmm->lut_width = ((pat_geom >> 16) & 0xF) << 5;
 859	omap_dmm->lut_height = ((pat_geom >> 24) & 0xF) << 5;
 860
 861	/* increment LUT by one if on OMAP5 */
 862	/* LUT has twice the height, and is split into a separate container */
 863	if (omap_dmm->lut_height != omap_dmm->container_height)
 864		omap_dmm->num_lut++;
 865
 866	/* initialize DMM registers */
 867	dmm_write(omap_dmm, 0x88888888, DMM_PAT_VIEW__0);
 868	dmm_write(omap_dmm, 0x88888888, DMM_PAT_VIEW__1);
 869	dmm_write(omap_dmm, 0x80808080, DMM_PAT_VIEW_MAP__0);
 870	dmm_write(omap_dmm, 0x80000000, DMM_PAT_VIEW_MAP_BASE);
 871	dmm_write(omap_dmm, 0x88888888, DMM_TILER_OR__0);
 872	dmm_write(omap_dmm, 0x88888888, DMM_TILER_OR__1);
 873
 874	omap_dmm->dummy_page = alloc_page(GFP_KERNEL | __GFP_DMA32);
 875	if (!omap_dmm->dummy_page) {
 876		dev_err(&dev->dev, "could not allocate dummy page\n");
 877		ret = -ENOMEM;
 878		goto fail;
 879	}
 880
 881	/* set dma mask for device */
 882	ret = dma_set_coherent_mask(&dev->dev, DMA_BIT_MASK(32));
 883	if (ret)
 884		goto fail;
 885
 886	omap_dmm->dummy_pa = page_to_phys(omap_dmm->dummy_page);
 887
 888	/* alloc refill memory */
 889	omap_dmm->refill_va = dma_alloc_wc(&dev->dev,
 890					   REFILL_BUFFER_SIZE * omap_dmm->num_engines,
 891					   &omap_dmm->refill_pa, GFP_KERNEL);
 892	if (!omap_dmm->refill_va) {
 893		dev_err(&dev->dev, "could not allocate refill memory\n");
 
 894		goto fail;
 895	}
 896
 897	/* alloc engines */
 898	omap_dmm->engines = kcalloc(omap_dmm->num_engines,
 899				    sizeof(*omap_dmm->engines), GFP_KERNEL);
 900	if (!omap_dmm->engines) {
 901		ret = -ENOMEM;
 902		goto fail;
 903	}
 904
 905	for (i = 0; i < omap_dmm->num_engines; i++) {
 906		omap_dmm->engines[i].id = i;
 907		omap_dmm->engines[i].dmm = omap_dmm;
 908		omap_dmm->engines[i].refill_va = omap_dmm->refill_va +
 909						(REFILL_BUFFER_SIZE * i);
 910		omap_dmm->engines[i].refill_pa = omap_dmm->refill_pa +
 911						(REFILL_BUFFER_SIZE * i);
 912		init_completion(&omap_dmm->engines[i].compl);
 913
 914		list_add(&omap_dmm->engines[i].idle_node, &omap_dmm->idle_head);
 915	}
 916
 917	omap_dmm->tcm = kcalloc(omap_dmm->num_lut, sizeof(*omap_dmm->tcm),
 918				GFP_KERNEL);
 919	if (!omap_dmm->tcm) {
 920		ret = -ENOMEM;
 921		goto fail;
 922	}
 923
 924	/* init containers */
 925	/* Each LUT is associated with a TCM (container manager).  We use the
 926	   lut_id to denote the lut_id used to identify the correct LUT for
 927	   programming during reill operations */
 928	for (i = 0; i < omap_dmm->num_lut; i++) {
 929		omap_dmm->tcm[i] = sita_init(omap_dmm->container_width,
 930						omap_dmm->container_height);
 931
 932		if (!omap_dmm->tcm[i]) {
 933			dev_err(&dev->dev, "failed to allocate container\n");
 934			ret = -ENOMEM;
 935			goto fail;
 936		}
 937
 938		omap_dmm->tcm[i]->lut_id = i;
 939	}
 940
 941	/* assign access mode containers to applicable tcm container */
 942	/* OMAP 4 has 1 container for all 4 views */
 943	/* OMAP 5 has 2 containers, 1 for 2D and 1 for 1D */
 944	containers[TILFMT_8BIT] = omap_dmm->tcm[0];
 945	containers[TILFMT_16BIT] = omap_dmm->tcm[0];
 946	containers[TILFMT_32BIT] = omap_dmm->tcm[0];
 947
 948	if (omap_dmm->container_height != omap_dmm->lut_height) {
 949		/* second LUT is used for PAGE mode.  Programming must use
 950		   y offset that is added to all y coordinates.  LUT id is still
 951		   0, because it is the same LUT, just the upper 128 lines */
 952		containers[TILFMT_PAGE] = omap_dmm->tcm[1];
 953		omap_dmm->tcm[1]->y_offset = OMAP5_LUT_OFFSET;
 954		omap_dmm->tcm[1]->lut_id = 0;
 955	} else {
 956		containers[TILFMT_PAGE] = omap_dmm->tcm[0];
 957	}
 958
 959	area = (struct tcm_area) {
 960		.tcm = NULL,
 961		.p1.x = omap_dmm->container_width - 1,
 962		.p1.y = omap_dmm->container_height - 1,
 963	};
 964
 965	ret = request_irq(omap_dmm->irq, omap_dmm_irq_handler, IRQF_SHARED,
 966				"omap_dmm_irq_handler", omap_dmm);
 967
 968	if (ret) {
 969		dev_err(&dev->dev, "couldn't register IRQ %d, error %d\n",
 970			omap_dmm->irq, ret);
 971		omap_dmm->irq = -1;
 972		goto fail;
 973	}
 974
 975	/* Enable all interrupts for each refill engine except
 976	 * ERR_LUT_MISS<n> (which is just advisory, and we don't care
 977	 * about because we want to be able to refill live scanout
 978	 * buffers for accelerated pan/scroll) and FILL_DSC<n> which
 979	 * we just generally don't care about.
 980	 */
 981	dmm_write(omap_dmm, 0x7e7e7e7e, DMM_PAT_IRQENABLE_SET);
 982
 983	/* initialize all LUTs to dummy page entries */
 984	for (i = 0; i < omap_dmm->num_lut; i++) {
 985		area.tcm = omap_dmm->tcm[i];
 986		if (fill(&area, NULL, 0, 0, true))
 987			dev_err(omap_dmm->dev, "refill failed");
 988	}
 989
 990	dev_info(omap_dmm->dev, "initialized all PAT entries\n");
 991
 992	return 0;
 993
 994fail:
 995	if (omap_dmm_remove(dev))
 996		dev_err(&dev->dev, "cleanup failed\n");
 997	return ret;
 998}
 999
1000/*
1001 * debugfs support
1002 */
1003
1004#ifdef CONFIG_DEBUG_FS
1005
1006static const char *alphabet = "abcdefghijklmnopqrstuvwxyz"
1007				"ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789";
1008static const char *special = ".,:;'\"`~!^-+";
1009
1010static void fill_map(char **map, int xdiv, int ydiv, struct tcm_area *a,
1011							char c, bool ovw)
1012{
1013	int x, y;
1014	for (y = a->p0.y / ydiv; y <= a->p1.y / ydiv; y++)
1015		for (x = a->p0.x / xdiv; x <= a->p1.x / xdiv; x++)
1016			if (map[y][x] == ' ' || ovw)
1017				map[y][x] = c;
1018}
1019
1020static void fill_map_pt(char **map, int xdiv, int ydiv, struct tcm_pt *p,
1021									char c)
1022{
1023	map[p->y / ydiv][p->x / xdiv] = c;
1024}
1025
1026static char read_map_pt(char **map, int xdiv, int ydiv, struct tcm_pt *p)
1027{
1028	return map[p->y / ydiv][p->x / xdiv];
1029}
1030
1031static int map_width(int xdiv, int x0, int x1)
1032{
1033	return (x1 / xdiv) - (x0 / xdiv) + 1;
1034}
1035
1036static void text_map(char **map, int xdiv, char *nice, int yd, int x0, int x1)
1037{
1038	char *p = map[yd] + (x0 / xdiv);
1039	int w = (map_width(xdiv, x0, x1) - strlen(nice)) / 2;
1040	if (w >= 0) {
1041		p += w;
1042		while (*nice)
1043			*p++ = *nice++;
1044	}
1045}
1046
1047static void map_1d_info(char **map, int xdiv, int ydiv, char *nice,
1048							struct tcm_area *a)
1049{
1050	sprintf(nice, "%dK", tcm_sizeof(*a) * 4);
1051	if (a->p0.y + 1 < a->p1.y) {
1052		text_map(map, xdiv, nice, (a->p0.y + a->p1.y) / 2 / ydiv, 0,
1053							256 - 1);
1054	} else if (a->p0.y < a->p1.y) {
1055		if (strlen(nice) < map_width(xdiv, a->p0.x, 256 - 1))
1056			text_map(map, xdiv, nice, a->p0.y / ydiv,
1057					a->p0.x + xdiv,	256 - 1);
1058		else if (strlen(nice) < map_width(xdiv, 0, a->p1.x))
1059			text_map(map, xdiv, nice, a->p1.y / ydiv,
1060					0, a->p1.y - xdiv);
1061	} else if (strlen(nice) + 1 < map_width(xdiv, a->p0.x, a->p1.x)) {
1062		text_map(map, xdiv, nice, a->p0.y / ydiv, a->p0.x, a->p1.x);
1063	}
1064}
1065
1066static void map_2d_info(char **map, int xdiv, int ydiv, char *nice,
1067							struct tcm_area *a)
1068{
1069	sprintf(nice, "(%d*%d)", tcm_awidth(*a), tcm_aheight(*a));
1070	if (strlen(nice) + 1 < map_width(xdiv, a->p0.x, a->p1.x))
1071		text_map(map, xdiv, nice, (a->p0.y + a->p1.y) / 2 / ydiv,
1072							a->p0.x, a->p1.x);
1073}
1074
1075int tiler_map_show(struct seq_file *s, void *arg)
1076{
1077	int xdiv = 2, ydiv = 1;
1078	char **map = NULL, *global_map;
1079	struct tiler_block *block;
1080	struct tcm_area a, p;
1081	int i;
1082	const char *m2d = alphabet;
1083	const char *a2d = special;
1084	const char *m2dp = m2d, *a2dp = a2d;
1085	char nice[128];
1086	int h_adj;
1087	int w_adj;
1088	unsigned long flags;
1089	int lut_idx;
1090
1091
1092	if (!omap_dmm) {
1093		/* early return if dmm/tiler device is not initialized */
1094		return 0;
1095	}
1096
1097	h_adj = omap_dmm->container_height / ydiv;
1098	w_adj = omap_dmm->container_width / xdiv;
1099
1100	map = kmalloc_array(h_adj, sizeof(*map), GFP_KERNEL);
1101	global_map = kmalloc_array(w_adj + 1, h_adj, GFP_KERNEL);
1102
1103	if (!map || !global_map)
1104		goto error;
1105
1106	for (lut_idx = 0; lut_idx < omap_dmm->num_lut; lut_idx++) {
1107		memset(map, 0, h_adj * sizeof(*map));
1108		memset(global_map, ' ', (w_adj + 1) * h_adj);
1109
1110		for (i = 0; i < omap_dmm->container_height; i++) {
1111			map[i] = global_map + i * (w_adj + 1);
1112			map[i][w_adj] = 0;
1113		}
1114
1115		spin_lock_irqsave(&list_lock, flags);
1116
1117		list_for_each_entry(block, &omap_dmm->alloc_head, alloc_node) {
1118			if (block->area.tcm == omap_dmm->tcm[lut_idx]) {
1119				if (block->fmt != TILFMT_PAGE) {
1120					fill_map(map, xdiv, ydiv, &block->area,
1121						*m2dp, true);
1122					if (!*++a2dp)
1123						a2dp = a2d;
1124					if (!*++m2dp)
1125						m2dp = m2d;
1126					map_2d_info(map, xdiv, ydiv, nice,
1127							&block->area);
1128				} else {
1129					bool start = read_map_pt(map, xdiv,
1130						ydiv, &block->area.p0) == ' ';
1131					bool end = read_map_pt(map, xdiv, ydiv,
1132							&block->area.p1) == ' ';
1133
1134					tcm_for_each_slice(a, block->area, p)
1135						fill_map(map, xdiv, ydiv, &a,
1136							'=', true);
1137					fill_map_pt(map, xdiv, ydiv,
1138							&block->area.p0,
1139							start ? '<' : 'X');
1140					fill_map_pt(map, xdiv, ydiv,
1141							&block->area.p1,
1142							end ? '>' : 'X');
1143					map_1d_info(map, xdiv, ydiv, nice,
1144							&block->area);
1145				}
1146			}
1147		}
1148
1149		spin_unlock_irqrestore(&list_lock, flags);
1150
1151		if (s) {
1152			seq_printf(s, "CONTAINER %d DUMP BEGIN\n", lut_idx);
1153			for (i = 0; i < 128; i++)
1154				seq_printf(s, "%03d:%s\n", i, map[i]);
1155			seq_printf(s, "CONTAINER %d DUMP END\n", lut_idx);
1156		} else {
1157			dev_dbg(omap_dmm->dev, "CONTAINER %d DUMP BEGIN\n",
1158				lut_idx);
1159			for (i = 0; i < 128; i++)
1160				dev_dbg(omap_dmm->dev, "%03d:%s\n", i, map[i]);
1161			dev_dbg(omap_dmm->dev, "CONTAINER %d DUMP END\n",
1162				lut_idx);
1163		}
1164	}
1165
1166error:
1167	kfree(map);
1168	kfree(global_map);
1169
1170	return 0;
1171}
1172#endif
1173
1174#ifdef CONFIG_PM_SLEEP
1175static int omap_dmm_resume(struct device *dev)
1176{
1177	struct tcm_area area;
1178	int i;
1179
1180	if (!omap_dmm)
1181		return -ENODEV;
1182
1183	area = (struct tcm_area) {
1184		.tcm = NULL,
1185		.p1.x = omap_dmm->container_width - 1,
1186		.p1.y = omap_dmm->container_height - 1,
1187	};
1188
1189	/* initialize all LUTs to dummy page entries */
1190	for (i = 0; i < omap_dmm->num_lut; i++) {
1191		area.tcm = omap_dmm->tcm[i];
1192		if (fill(&area, NULL, 0, 0, true))
1193			dev_err(dev, "refill failed");
1194	}
1195
1196	return 0;
1197}
1198#endif
1199
1200static SIMPLE_DEV_PM_OPS(omap_dmm_pm_ops, NULL, omap_dmm_resume);
1201
1202#if defined(CONFIG_OF)
1203static const struct dmm_platform_data dmm_omap4_platform_data = {
1204	.cpu_cache_flags = OMAP_BO_WC,
1205};
1206
1207static const struct dmm_platform_data dmm_omap5_platform_data = {
1208	.cpu_cache_flags = OMAP_BO_UNCACHED,
1209};
1210
1211static const struct of_device_id dmm_of_match[] = {
1212	{
1213		.compatible = "ti,omap4-dmm",
1214		.data = &dmm_omap4_platform_data,
1215	},
1216	{
1217		.compatible = "ti,omap5-dmm",
1218		.data = &dmm_omap5_platform_data,
1219	},
1220	{},
1221};
1222#endif
1223
1224struct platform_driver omap_dmm_driver = {
1225	.probe = omap_dmm_probe,
1226	.remove = omap_dmm_remove,
1227	.driver = {
1228		.owner = THIS_MODULE,
1229		.name = DMM_DRIVER_NAME,
1230		.of_match_table = of_match_ptr(dmm_of_match),
1231		.pm = &omap_dmm_pm_ops,
1232	},
1233};
1234
1235MODULE_LICENSE("GPL v2");
1236MODULE_AUTHOR("Andy Gross <andy.gross@ti.com>");
1237MODULE_DESCRIPTION("OMAP DMM/Tiler Driver");
v6.9.4
   1// SPDX-License-Identifier: GPL-2.0-only
   2/*
   3 * DMM IOMMU driver support functions for TI OMAP processors.
   4 *
   5 * Copyright (C) 2011 Texas Instruments Incorporated - https://www.ti.com/
   6 * Author: Rob Clark <rob@ti.com>
   7 *         Andy Gross <andy.gross@ti.com>
 
 
 
 
 
 
 
 
 
   8 */
   9
  10#include <linux/completion.h>
  11#include <linux/delay.h>
  12#include <linux/dma-mapping.h>
  13#include <linux/dmaengine.h>
  14#include <linux/errno.h>
  15#include <linux/init.h>
  16#include <linux/interrupt.h>
  17#include <linux/list.h>
  18#include <linux/mm.h>
  19#include <linux/module.h>
  20#include <linux/of.h>
  21#include <linux/platform_device.h> /* platform_device() */
  22#include <linux/sched.h>
  23#include <linux/seq_file.h>
  24#include <linux/slab.h>
  25#include <linux/time.h>
  26#include <linux/vmalloc.h>
  27#include <linux/wait.h>
  28
  29#include "omap_dmm_tiler.h"
  30#include "omap_dmm_priv.h"
  31
  32#define DMM_DRIVER_NAME "dmm"
  33
  34/* mappings for associating views to luts */
  35static struct tcm *containers[TILFMT_NFORMATS];
  36static struct dmm *omap_dmm;
  37
  38#if defined(CONFIG_OF)
  39static const struct of_device_id dmm_of_match[];
  40#endif
  41
  42/* global spinlock for protecting lists */
  43static DEFINE_SPINLOCK(list_lock);
  44
  45/* Geometry table */
  46#define GEOM(xshift, yshift, bytes_per_pixel) { \
  47		.x_shft = (xshift), \
  48		.y_shft = (yshift), \
  49		.cpp    = (bytes_per_pixel), \
  50		.slot_w = 1 << (SLOT_WIDTH_BITS - (xshift)), \
  51		.slot_h = 1 << (SLOT_HEIGHT_BITS - (yshift)), \
  52	}
  53
  54static const struct {
  55	u32 x_shft;	/* unused X-bits (as part of bpp) */
  56	u32 y_shft;	/* unused Y-bits (as part of bpp) */
  57	u32 cpp;		/* bytes/chars per pixel */
  58	u32 slot_w;	/* width of each slot (in pixels) */
  59	u32 slot_h;	/* height of each slot (in pixels) */
  60} geom[TILFMT_NFORMATS] = {
  61	[TILFMT_8BIT]  = GEOM(0, 0, 1),
  62	[TILFMT_16BIT] = GEOM(0, 1, 2),
  63	[TILFMT_32BIT] = GEOM(1, 1, 4),
  64	[TILFMT_PAGE]  = GEOM(SLOT_WIDTH_BITS, SLOT_HEIGHT_BITS, 1),
  65};
  66
  67
  68/* lookup table for registers w/ per-engine instances */
  69static const u32 reg[][4] = {
  70	[PAT_STATUS] = {DMM_PAT_STATUS__0, DMM_PAT_STATUS__1,
  71			DMM_PAT_STATUS__2, DMM_PAT_STATUS__3},
  72	[PAT_DESCR]  = {DMM_PAT_DESCR__0, DMM_PAT_DESCR__1,
  73			DMM_PAT_DESCR__2, DMM_PAT_DESCR__3},
  74};
  75
  76static int dmm_dma_copy(struct dmm *dmm, dma_addr_t src, dma_addr_t dst)
  77{
 
  78	struct dma_async_tx_descriptor *tx;
  79	enum dma_status status;
  80	dma_cookie_t cookie;
  81
  82	tx = dmaengine_prep_dma_memcpy(dmm->wa_dma_chan, dst, src, 4, 0);
  83	if (!tx) {
  84		dev_err(dmm->dev, "Failed to prepare DMA memcpy\n");
  85		return -EIO;
  86	}
  87
  88	cookie = tx->tx_submit(tx);
  89	if (dma_submit_error(cookie)) {
  90		dev_err(dmm->dev, "Failed to do DMA tx_submit\n");
  91		return -EIO;
  92	}
  93
 
  94	status = dma_sync_wait(dmm->wa_dma_chan, cookie);
  95	if (status != DMA_COMPLETE)
  96		dev_err(dmm->dev, "i878 wa DMA copy failure\n");
  97
  98	dmaengine_terminate_all(dmm->wa_dma_chan);
  99	return 0;
 100}
 101
 102static u32 dmm_read_wa(struct dmm *dmm, u32 reg)
 103{
 104	dma_addr_t src, dst;
 105	int r;
 106
 107	src = dmm->phys_base + reg;
 108	dst = dmm->wa_dma_handle;
 109
 110	r = dmm_dma_copy(dmm, src, dst);
 111	if (r) {
 112		dev_err(dmm->dev, "sDMA read transfer timeout\n");
 113		return readl(dmm->base + reg);
 114	}
 115
 116	/*
 117	 * As per i878 workaround, the DMA is used to access the DMM registers.
 118	 * Make sure that the readl is not moved by the compiler or the CPU
 119	 * earlier than the DMA finished writing the value to memory.
 120	 */
 121	rmb();
 122	return readl(dmm->wa_dma_data);
 123}
 124
 125static void dmm_write_wa(struct dmm *dmm, u32 val, u32 reg)
 126{
 127	dma_addr_t src, dst;
 128	int r;
 129
 130	writel(val, dmm->wa_dma_data);
 131	/*
 132	 * As per i878 workaround, the DMA is used to access the DMM registers.
 133	 * Make sure that the writel is not moved by the compiler or the CPU, so
 134	 * the data will be in place before we start the DMA to do the actual
 135	 * register write.
 136	 */
 137	wmb();
 138
 139	src = dmm->wa_dma_handle;
 140	dst = dmm->phys_base + reg;
 141
 142	r = dmm_dma_copy(dmm, src, dst);
 143	if (r) {
 144		dev_err(dmm->dev, "sDMA write transfer timeout\n");
 145		writel(val, dmm->base + reg);
 146	}
 147}
 148
 149static u32 dmm_read(struct dmm *dmm, u32 reg)
 150{
 151	if (dmm->dmm_workaround) {
 152		u32 v;
 153		unsigned long flags;
 154
 155		spin_lock_irqsave(&dmm->wa_lock, flags);
 156		v = dmm_read_wa(dmm, reg);
 157		spin_unlock_irqrestore(&dmm->wa_lock, flags);
 158
 159		return v;
 160	} else {
 161		return readl(dmm->base + reg);
 162	}
 163}
 164
 165static void dmm_write(struct dmm *dmm, u32 val, u32 reg)
 166{
 167	if (dmm->dmm_workaround) {
 168		unsigned long flags;
 169
 170		spin_lock_irqsave(&dmm->wa_lock, flags);
 171		dmm_write_wa(dmm, val, reg);
 172		spin_unlock_irqrestore(&dmm->wa_lock, flags);
 173	} else {
 174		writel(val, dmm->base + reg);
 175	}
 176}
 177
 178static int dmm_workaround_init(struct dmm *dmm)
 179{
 180	dma_cap_mask_t mask;
 181
 182	spin_lock_init(&dmm->wa_lock);
 183
 184	dmm->wa_dma_data = dma_alloc_coherent(dmm->dev,  sizeof(u32),
 185					      &dmm->wa_dma_handle, GFP_KERNEL);
 186	if (!dmm->wa_dma_data)
 187		return -ENOMEM;
 188
 189	dma_cap_zero(mask);
 190	dma_cap_set(DMA_MEMCPY, mask);
 191
 192	dmm->wa_dma_chan = dma_request_channel(mask, NULL, NULL);
 193	if (!dmm->wa_dma_chan) {
 194		dma_free_coherent(dmm->dev, 4, dmm->wa_dma_data, dmm->wa_dma_handle);
 195		return -ENODEV;
 196	}
 197
 198	return 0;
 199}
 200
 201static void dmm_workaround_uninit(struct dmm *dmm)
 202{
 203	dma_release_channel(dmm->wa_dma_chan);
 204
 205	dma_free_coherent(dmm->dev, 4, dmm->wa_dma_data, dmm->wa_dma_handle);
 206}
 207
 208/* simple allocator to grab next 16 byte aligned memory from txn */
 209static void *alloc_dma(struct dmm_txn *txn, size_t sz, dma_addr_t *pa)
 210{
 211	void *ptr;
 212	struct refill_engine *engine = txn->engine_handle;
 213
 214	/* dmm programming requires 16 byte aligned addresses */
 215	txn->current_pa = round_up(txn->current_pa, 16);
 216	txn->current_va = (void *)round_up((long)txn->current_va, 16);
 217
 218	ptr = txn->current_va;
 219	*pa = txn->current_pa;
 220
 221	txn->current_pa += sz;
 222	txn->current_va += sz;
 223
 224	BUG_ON((txn->current_va - engine->refill_va) > REFILL_BUFFER_SIZE);
 225
 226	return ptr;
 227}
 228
 229/* check status and spin until wait_mask comes true */
 230static int wait_status(struct refill_engine *engine, u32 wait_mask)
 231{
 232	struct dmm *dmm = engine->dmm;
 233	u32 r = 0, err, i;
 234
 235	i = DMM_FIXED_RETRY_COUNT;
 236	while (true) {
 237		r = dmm_read(dmm, reg[PAT_STATUS][engine->id]);
 238		err = r & DMM_PATSTATUS_ERR;
 239		if (err) {
 240			dev_err(dmm->dev,
 241				"%s: error (engine%d). PAT_STATUS: 0x%08x\n",
 242				__func__, engine->id, r);
 243			return -EFAULT;
 244		}
 245
 246		if ((r & wait_mask) == wait_mask)
 247			break;
 248
 249		if (--i == 0) {
 250			dev_err(dmm->dev,
 251				"%s: timeout (engine%d). PAT_STATUS: 0x%08x\n",
 252				__func__, engine->id, r);
 253			return -ETIMEDOUT;
 254		}
 255
 256		udelay(1);
 257	}
 258
 259	return 0;
 260}
 261
 262static void release_engine(struct refill_engine *engine)
 263{
 264	unsigned long flags;
 265
 266	spin_lock_irqsave(&list_lock, flags);
 267	list_add(&engine->idle_node, &omap_dmm->idle_head);
 268	spin_unlock_irqrestore(&list_lock, flags);
 269
 270	atomic_inc(&omap_dmm->engine_counter);
 271	wake_up_interruptible(&omap_dmm->engine_queue);
 272}
 273
 274static irqreturn_t omap_dmm_irq_handler(int irq, void *arg)
 275{
 276	struct dmm *dmm = arg;
 277	u32 status = dmm_read(dmm, DMM_PAT_IRQSTATUS);
 278	int i;
 279
 280	/* ack IRQ */
 281	dmm_write(dmm, status, DMM_PAT_IRQSTATUS);
 282
 283	for (i = 0; i < dmm->num_engines; i++) {
 284		if (status & DMM_IRQSTAT_ERR_MASK)
 285			dev_err(dmm->dev,
 286				"irq error(engine%d): IRQSTAT 0x%02x\n",
 287				i, status & 0xff);
 288
 289		if (status & DMM_IRQSTAT_LST) {
 290			if (dmm->engines[i].async)
 291				release_engine(&dmm->engines[i]);
 292
 293			complete(&dmm->engines[i].compl);
 294		}
 295
 296		status >>= 8;
 297	}
 298
 299	return IRQ_HANDLED;
 300}
 301
 302/*
 303 * Get a handle for a DMM transaction
 304 */
 305static struct dmm_txn *dmm_txn_init(struct dmm *dmm, struct tcm *tcm)
 306{
 307	struct dmm_txn *txn = NULL;
 308	struct refill_engine *engine = NULL;
 309	int ret;
 310	unsigned long flags;
 311
 312
 313	/* wait until an engine is available */
 314	ret = wait_event_interruptible(omap_dmm->engine_queue,
 315		atomic_add_unless(&omap_dmm->engine_counter, -1, 0));
 316	if (ret)
 317		return ERR_PTR(ret);
 318
 319	/* grab an idle engine */
 320	spin_lock_irqsave(&list_lock, flags);
 321	if (!list_empty(&dmm->idle_head)) {
 322		engine = list_entry(dmm->idle_head.next, struct refill_engine,
 323					idle_node);
 324		list_del(&engine->idle_node);
 325	}
 326	spin_unlock_irqrestore(&list_lock, flags);
 327
 328	BUG_ON(!engine);
 329
 330	txn = &engine->txn;
 331	engine->tcm = tcm;
 332	txn->engine_handle = engine;
 333	txn->last_pat = NULL;
 334	txn->current_va = engine->refill_va;
 335	txn->current_pa = engine->refill_pa;
 336
 337	return txn;
 338}
 339
 340/*
 341 * Add region to DMM transaction.  If pages or pages[i] is NULL, then the
 342 * corresponding slot is cleared (ie. dummy_pa is programmed)
 343 */
 344static void dmm_txn_append(struct dmm_txn *txn, struct pat_area *area,
 345		struct page **pages, u32 npages, u32 roll)
 346{
 347	dma_addr_t pat_pa = 0, data_pa = 0;
 348	u32 *data;
 349	struct pat *pat;
 350	struct refill_engine *engine = txn->engine_handle;
 351	int columns = (1 + area->x1 - area->x0);
 352	int rows = (1 + area->y1 - area->y0);
 353	int i = columns*rows;
 354
 355	pat = alloc_dma(txn, sizeof(*pat), &pat_pa);
 356
 357	if (txn->last_pat)
 358		txn->last_pat->next_pa = (u32)pat_pa;
 359
 360	pat->area = *area;
 361
 362	/* adjust Y coordinates based off of container parameters */
 363	pat->area.y0 += engine->tcm->y_offset;
 364	pat->area.y1 += engine->tcm->y_offset;
 365
 366	pat->ctrl = (struct pat_ctrl){
 367			.start = 1,
 368			.lut_id = engine->tcm->lut_id,
 369		};
 370
 371	data = alloc_dma(txn, 4*i, &data_pa);
 372	/* FIXME: what if data_pa is more than 32-bit ? */
 373	pat->data_pa = data_pa;
 374
 375	while (i--) {
 376		int n = i + roll;
 377		if (n >= npages)
 378			n -= npages;
 379		data[i] = (pages && pages[n]) ?
 380			page_to_phys(pages[n]) : engine->dmm->dummy_pa;
 381	}
 382
 383	txn->last_pat = pat;
 384
 385	return;
 386}
 387
 388/*
 389 * Commit the DMM transaction.
 390 */
 391static int dmm_txn_commit(struct dmm_txn *txn, bool wait)
 392{
 393	int ret = 0;
 394	struct refill_engine *engine = txn->engine_handle;
 395	struct dmm *dmm = engine->dmm;
 396
 397	if (!txn->last_pat) {
 398		dev_err(engine->dmm->dev, "need at least one txn\n");
 399		ret = -EINVAL;
 400		goto cleanup;
 401	}
 402
 403	txn->last_pat->next_pa = 0;
 404	/* ensure that the written descriptors are visible to DMM */
 405	wmb();
 406
 407	/*
 408	 * NOTE: the wmb() above should be enough, but there seems to be a bug
 409	 * in OMAP's memory barrier implementation, which in some rare cases may
 410	 * cause the writes not to be observable after wmb().
 411	 */
 412
 413	/* read back to ensure the data is in RAM */
 414	readl(&txn->last_pat->next_pa);
 415
 416	/* write to PAT_DESCR to clear out any pending transaction */
 417	dmm_write(dmm, 0x0, reg[PAT_DESCR][engine->id]);
 418
 419	/* wait for engine ready: */
 420	ret = wait_status(engine, DMM_PATSTATUS_READY);
 421	if (ret) {
 422		ret = -EFAULT;
 423		goto cleanup;
 424	}
 425
 426	/* mark whether it is async to denote list management in IRQ handler */
 427	engine->async = wait ? false : true;
 428	reinit_completion(&engine->compl);
 429	/* verify that the irq handler sees the 'async' and completion value */
 430	smp_mb();
 431
 432	/* kick reload */
 433	dmm_write(dmm, engine->refill_pa, reg[PAT_DESCR][engine->id]);
 434
 435	if (wait) {
 436		if (!wait_for_completion_timeout(&engine->compl,
 437				msecs_to_jiffies(100))) {
 438			dev_err(dmm->dev, "timed out waiting for done\n");
 439			ret = -ETIMEDOUT;
 440			goto cleanup;
 441		}
 442
 443		/* Check the engine status before continue */
 444		ret = wait_status(engine, DMM_PATSTATUS_READY |
 445				  DMM_PATSTATUS_VALID | DMM_PATSTATUS_DONE);
 446	}
 447
 448cleanup:
 449	/* only place engine back on list if we are done with it */
 450	if (ret || wait)
 451		release_engine(engine);
 452
 453	return ret;
 454}
 455
 456/*
 457 * DMM programming
 458 */
 459static int fill(struct tcm_area *area, struct page **pages,
 460		u32 npages, u32 roll, bool wait)
 461{
 462	int ret = 0;
 463	struct tcm_area slice, area_s;
 464	struct dmm_txn *txn;
 465
 466	/*
 467	 * FIXME
 468	 *
 469	 * Asynchronous fill does not work reliably, as the driver does not
 470	 * handle errors in the async code paths. The fill operation may
 471	 * silently fail, leading to leaking DMM engines, which may eventually
 472	 * lead to deadlock if we run out of DMM engines.
 473	 *
 474	 * For now, always set 'wait' so that we only use sync fills. Async
 475	 * fills should be fixed, or alternatively we could decide to only
 476	 * support sync fills and so the whole async code path could be removed.
 477	 */
 478
 479	wait = true;
 480
 481	txn = dmm_txn_init(omap_dmm, area->tcm);
 482	if (IS_ERR_OR_NULL(txn))
 483		return -ENOMEM;
 484
 485	tcm_for_each_slice(slice, *area, area_s) {
 486		struct pat_area p_area = {
 487				.x0 = slice.p0.x,  .y0 = slice.p0.y,
 488				.x1 = slice.p1.x,  .y1 = slice.p1.y,
 489		};
 490
 491		dmm_txn_append(txn, &p_area, pages, npages, roll);
 492
 493		roll += tcm_sizeof(slice);
 494	}
 495
 496	ret = dmm_txn_commit(txn, wait);
 497
 498	return ret;
 499}
 500
 501/*
 502 * Pin/unpin
 503 */
 504
 505/* note: slots for which pages[i] == NULL are filled w/ dummy page
 506 */
 507int tiler_pin(struct tiler_block *block, struct page **pages,
 508		u32 npages, u32 roll, bool wait)
 509{
 510	int ret;
 511
 512	ret = fill(&block->area, pages, npages, roll, wait);
 513
 514	if (ret)
 515		tiler_unpin(block);
 516
 517	return ret;
 518}
 519
 520int tiler_unpin(struct tiler_block *block)
 521{
 522	return fill(&block->area, NULL, 0, 0, false);
 523}
 524
 525/*
 526 * Reserve/release
 527 */
 528struct tiler_block *tiler_reserve_2d(enum tiler_fmt fmt, u16 w,
 529		u16 h, u16 align)
 530{
 531	struct tiler_block *block;
 532	u32 min_align = 128;
 533	int ret;
 534	unsigned long flags;
 535	u32 slot_bytes;
 536
 537	block = kzalloc(sizeof(*block), GFP_KERNEL);
 538	if (!block)
 539		return ERR_PTR(-ENOMEM);
 540
 541	BUG_ON(!validfmt(fmt));
 542
 543	/* convert width/height to slots */
 544	w = DIV_ROUND_UP(w, geom[fmt].slot_w);
 545	h = DIV_ROUND_UP(h, geom[fmt].slot_h);
 546
 547	/* convert alignment to slots */
 548	slot_bytes = geom[fmt].slot_w * geom[fmt].cpp;
 549	min_align = max(min_align, slot_bytes);
 550	align = (align > min_align) ? ALIGN(align, min_align) : min_align;
 551	align /= slot_bytes;
 552
 553	block->fmt = fmt;
 554
 555	ret = tcm_reserve_2d(containers[fmt], w, h, align, -1, slot_bytes,
 556			&block->area);
 557	if (ret) {
 558		kfree(block);
 559		return ERR_PTR(-ENOMEM);
 560	}
 561
 562	/* add to allocation list */
 563	spin_lock_irqsave(&list_lock, flags);
 564	list_add(&block->alloc_node, &omap_dmm->alloc_head);
 565	spin_unlock_irqrestore(&list_lock, flags);
 566
 567	return block;
 568}
 569
 570struct tiler_block *tiler_reserve_1d(size_t size)
 571{
 572	struct tiler_block *block = kzalloc(sizeof(*block), GFP_KERNEL);
 573	int num_pages = (size + PAGE_SIZE - 1) >> PAGE_SHIFT;
 574	unsigned long flags;
 575
 576	if (!block)
 577		return ERR_PTR(-ENOMEM);
 578
 579	block->fmt = TILFMT_PAGE;
 580
 581	if (tcm_reserve_1d(containers[TILFMT_PAGE], num_pages,
 582				&block->area)) {
 583		kfree(block);
 584		return ERR_PTR(-ENOMEM);
 585	}
 586
 587	spin_lock_irqsave(&list_lock, flags);
 588	list_add(&block->alloc_node, &omap_dmm->alloc_head);
 589	spin_unlock_irqrestore(&list_lock, flags);
 590
 591	return block;
 592}
 593
 594/* note: if you have pin'd pages, you should have already unpin'd first! */
 595int tiler_release(struct tiler_block *block)
 596{
 597	int ret = tcm_free(&block->area);
 598	unsigned long flags;
 599
 600	if (block->area.tcm)
 601		dev_err(omap_dmm->dev, "failed to release block\n");
 602
 603	spin_lock_irqsave(&list_lock, flags);
 604	list_del(&block->alloc_node);
 605	spin_unlock_irqrestore(&list_lock, flags);
 606
 607	kfree(block);
 608	return ret;
 609}
 610
 611/*
 612 * Utils
 613 */
 614
 615/* calculate the tiler space address of a pixel in a view orientation...
 616 * below description copied from the display subsystem section of TRM:
 617 *
 618 * When the TILER is addressed, the bits:
 619 *   [28:27] = 0x0 for 8-bit tiled
 620 *             0x1 for 16-bit tiled
 621 *             0x2 for 32-bit tiled
 622 *             0x3 for page mode
 623 *   [31:29] = 0x0 for 0-degree view
 624 *             0x1 for 180-degree view + mirroring
 625 *             0x2 for 0-degree view + mirroring
 626 *             0x3 for 180-degree view
 627 *             0x4 for 270-degree view + mirroring
 628 *             0x5 for 270-degree view
 629 *             0x6 for 90-degree view
 630 *             0x7 for 90-degree view + mirroring
 631 * Otherwise the bits indicated the corresponding bit address to access
 632 * the SDRAM.
 633 */
 634static u32 tiler_get_address(enum tiler_fmt fmt, u32 orient, u32 x, u32 y)
 635{
 636	u32 x_bits, y_bits, tmp, x_mask, y_mask, alignment;
 637
 638	x_bits = CONT_WIDTH_BITS - geom[fmt].x_shft;
 639	y_bits = CONT_HEIGHT_BITS - geom[fmt].y_shft;
 640	alignment = geom[fmt].x_shft + geom[fmt].y_shft;
 641
 642	/* validate coordinate */
 643	x_mask = MASK(x_bits);
 644	y_mask = MASK(y_bits);
 645
 646	if (x < 0 || x > x_mask || y < 0 || y > y_mask) {
 647		DBG("invalid coords: %u < 0 || %u > %u || %u < 0 || %u > %u",
 648				x, x, x_mask, y, y, y_mask);
 649		return 0;
 650	}
 651
 652	/* account for mirroring */
 653	if (orient & MASK_X_INVERT)
 654		x ^= x_mask;
 655	if (orient & MASK_Y_INVERT)
 656		y ^= y_mask;
 657
 658	/* get coordinate address */
 659	if (orient & MASK_XY_FLIP)
 660		tmp = ((x << y_bits) + y);
 661	else
 662		tmp = ((y << x_bits) + x);
 663
 664	return TIL_ADDR((tmp << alignment), orient, fmt);
 665}
 666
 667dma_addr_t tiler_ssptr(struct tiler_block *block)
 668{
 669	BUG_ON(!validfmt(block->fmt));
 670
 671	return TILVIEW_8BIT + tiler_get_address(block->fmt, 0,
 672			block->area.p0.x * geom[block->fmt].slot_w,
 673			block->area.p0.y * geom[block->fmt].slot_h);
 674}
 675
 676dma_addr_t tiler_tsptr(struct tiler_block *block, u32 orient,
 677		u32 x, u32 y)
 678{
 679	struct tcm_pt *p = &block->area.p0;
 680	BUG_ON(!validfmt(block->fmt));
 681
 682	return tiler_get_address(block->fmt, orient,
 683			(p->x * geom[block->fmt].slot_w) + x,
 684			(p->y * geom[block->fmt].slot_h) + y);
 685}
 686
 687void tiler_align(enum tiler_fmt fmt, u16 *w, u16 *h)
 688{
 689	BUG_ON(!validfmt(fmt));
 690	*w = round_up(*w, geom[fmt].slot_w);
 691	*h = round_up(*h, geom[fmt].slot_h);
 692}
 693
 694u32 tiler_stride(enum tiler_fmt fmt, u32 orient)
 695{
 696	BUG_ON(!validfmt(fmt));
 697
 698	if (orient & MASK_XY_FLIP)
 699		return 1 << (CONT_HEIGHT_BITS + geom[fmt].x_shft);
 700	else
 701		return 1 << (CONT_WIDTH_BITS + geom[fmt].y_shft);
 702}
 703
 704size_t tiler_size(enum tiler_fmt fmt, u16 w, u16 h)
 705{
 706	tiler_align(fmt, &w, &h);
 707	return geom[fmt].cpp * w * h;
 708}
 709
 710size_t tiler_vsize(enum tiler_fmt fmt, u16 w, u16 h)
 711{
 712	BUG_ON(!validfmt(fmt));
 713	return round_up(geom[fmt].cpp * w, PAGE_SIZE) * h;
 714}
 715
 716u32 tiler_get_cpu_cache_flags(void)
 717{
 718	return omap_dmm->plat_data->cpu_cache_flags;
 719}
 720
 721bool dmm_is_available(void)
 722{
 723	return omap_dmm ? true : false;
 724}
 725
 726static void omap_dmm_remove(struct platform_device *dev)
 727{
 728	struct tiler_block *block, *_block;
 729	int i;
 730	unsigned long flags;
 731
 732	if (omap_dmm) {
 733		/* Disable all enabled interrupts */
 734		dmm_write(omap_dmm, 0x7e7e7e7e, DMM_PAT_IRQENABLE_CLR);
 735		free_irq(omap_dmm->irq, omap_dmm);
 736
 737		/* free all area regions */
 738		spin_lock_irqsave(&list_lock, flags);
 739		list_for_each_entry_safe(block, _block, &omap_dmm->alloc_head,
 740					alloc_node) {
 741			list_del(&block->alloc_node);
 742			kfree(block);
 743		}
 744		spin_unlock_irqrestore(&list_lock, flags);
 745
 746		for (i = 0; i < omap_dmm->num_lut; i++)
 747			if (omap_dmm->tcm && omap_dmm->tcm[i])
 748				omap_dmm->tcm[i]->deinit(omap_dmm->tcm[i]);
 749		kfree(omap_dmm->tcm);
 750
 751		kfree(omap_dmm->engines);
 752		if (omap_dmm->refill_va)
 753			dma_free_wc(omap_dmm->dev,
 754				    REFILL_BUFFER_SIZE * omap_dmm->num_engines,
 755				    omap_dmm->refill_va, omap_dmm->refill_pa);
 756		if (omap_dmm->dummy_page)
 757			__free_page(omap_dmm->dummy_page);
 758
 759		if (omap_dmm->dmm_workaround)
 760			dmm_workaround_uninit(omap_dmm);
 761
 762		iounmap(omap_dmm->base);
 763		kfree(omap_dmm);
 764		omap_dmm = NULL;
 765	}
 
 
 766}
 767
 768static int omap_dmm_probe(struct platform_device *dev)
 769{
 770	int ret = -EFAULT, i;
 771	struct tcm_area area = {0};
 772	u32 hwinfo, pat_geom;
 773	struct resource *mem;
 774
 775	omap_dmm = kzalloc(sizeof(*omap_dmm), GFP_KERNEL);
 776	if (!omap_dmm)
 777		goto fail;
 778
 779	/* initialize lists */
 780	INIT_LIST_HEAD(&omap_dmm->alloc_head);
 781	INIT_LIST_HEAD(&omap_dmm->idle_head);
 782
 783	init_waitqueue_head(&omap_dmm->engine_queue);
 784
 785	if (dev->dev.of_node) {
 786		const struct of_device_id *match;
 787
 788		match = of_match_node(dmm_of_match, dev->dev.of_node);
 789		if (!match) {
 790			dev_err(&dev->dev, "failed to find matching device node\n");
 791			ret = -ENODEV;
 792			goto fail;
 793		}
 794
 795		omap_dmm->plat_data = match->data;
 796	}
 797
 798	/* lookup hwmod data - base address and irq */
 799	mem = platform_get_resource(dev, IORESOURCE_MEM, 0);
 800	if (!mem) {
 801		dev_err(&dev->dev, "failed to get base address resource\n");
 802		goto fail;
 803	}
 804
 805	omap_dmm->phys_base = mem->start;
 806	omap_dmm->base = ioremap(mem->start, SZ_2K);
 807
 808	if (!omap_dmm->base) {
 809		dev_err(&dev->dev, "failed to get dmm base address\n");
 810		goto fail;
 811	}
 812
 813	omap_dmm->irq = platform_get_irq(dev, 0);
 814	if (omap_dmm->irq < 0)
 
 815		goto fail;
 
 816
 817	omap_dmm->dev = &dev->dev;
 818
 819	if (of_machine_is_compatible("ti,dra7")) {
 820		/*
 821		 * DRA7 Errata i878 says that MPU should not be used to access
 822		 * RAM and DMM at the same time. As it's not possible to prevent
 823		 * MPU accessing RAM, we need to access DMM via a proxy.
 824		 */
 825		if (!dmm_workaround_init(omap_dmm)) {
 826			omap_dmm->dmm_workaround = true;
 827			dev_info(&dev->dev,
 828				"workaround for errata i878 in use\n");
 829		} else {
 830			dev_warn(&dev->dev,
 831				 "failed to initialize work-around for i878\n");
 832		}
 833	}
 834
 835	hwinfo = dmm_read(omap_dmm, DMM_PAT_HWINFO);
 836	omap_dmm->num_engines = (hwinfo >> 24) & 0x1F;
 837	omap_dmm->num_lut = (hwinfo >> 16) & 0x1F;
 838	omap_dmm->container_width = 256;
 839	omap_dmm->container_height = 128;
 840
 841	atomic_set(&omap_dmm->engine_counter, omap_dmm->num_engines);
 842
 843	/* read out actual LUT width and height */
 844	pat_geom = dmm_read(omap_dmm, DMM_PAT_GEOMETRY);
 845	omap_dmm->lut_width = ((pat_geom >> 16) & 0xF) << 5;
 846	omap_dmm->lut_height = ((pat_geom >> 24) & 0xF) << 5;
 847
 848	/* increment LUT by one if on OMAP5 */
 849	/* LUT has twice the height, and is split into a separate container */
 850	if (omap_dmm->lut_height != omap_dmm->container_height)
 851		omap_dmm->num_lut++;
 852
 853	/* initialize DMM registers */
 854	dmm_write(omap_dmm, 0x88888888, DMM_PAT_VIEW__0);
 855	dmm_write(omap_dmm, 0x88888888, DMM_PAT_VIEW__1);
 856	dmm_write(omap_dmm, 0x80808080, DMM_PAT_VIEW_MAP__0);
 857	dmm_write(omap_dmm, 0x80000000, DMM_PAT_VIEW_MAP_BASE);
 858	dmm_write(omap_dmm, 0x88888888, DMM_TILER_OR__0);
 859	dmm_write(omap_dmm, 0x88888888, DMM_TILER_OR__1);
 860
 861	omap_dmm->dummy_page = alloc_page(GFP_KERNEL | __GFP_DMA32);
 862	if (!omap_dmm->dummy_page) {
 863		dev_err(&dev->dev, "could not allocate dummy page\n");
 864		ret = -ENOMEM;
 865		goto fail;
 866	}
 867
 868	/* set dma mask for device */
 869	ret = dma_set_coherent_mask(&dev->dev, DMA_BIT_MASK(32));
 870	if (ret)
 871		goto fail;
 872
 873	omap_dmm->dummy_pa = page_to_phys(omap_dmm->dummy_page);
 874
 875	/* alloc refill memory */
 876	omap_dmm->refill_va = dma_alloc_wc(&dev->dev,
 877					   REFILL_BUFFER_SIZE * omap_dmm->num_engines,
 878					   &omap_dmm->refill_pa, GFP_KERNEL);
 879	if (!omap_dmm->refill_va) {
 880		dev_err(&dev->dev, "could not allocate refill memory\n");
 881		ret = -ENOMEM;
 882		goto fail;
 883	}
 884
 885	/* alloc engines */
 886	omap_dmm->engines = kcalloc(omap_dmm->num_engines,
 887				    sizeof(*omap_dmm->engines), GFP_KERNEL);
 888	if (!omap_dmm->engines) {
 889		ret = -ENOMEM;
 890		goto fail;
 891	}
 892
 893	for (i = 0; i < omap_dmm->num_engines; i++) {
 894		omap_dmm->engines[i].id = i;
 895		omap_dmm->engines[i].dmm = omap_dmm;
 896		omap_dmm->engines[i].refill_va = omap_dmm->refill_va +
 897						(REFILL_BUFFER_SIZE * i);
 898		omap_dmm->engines[i].refill_pa = omap_dmm->refill_pa +
 899						(REFILL_BUFFER_SIZE * i);
 900		init_completion(&omap_dmm->engines[i].compl);
 901
 902		list_add(&omap_dmm->engines[i].idle_node, &omap_dmm->idle_head);
 903	}
 904
 905	omap_dmm->tcm = kcalloc(omap_dmm->num_lut, sizeof(*omap_dmm->tcm),
 906				GFP_KERNEL);
 907	if (!omap_dmm->tcm) {
 908		ret = -ENOMEM;
 909		goto fail;
 910	}
 911
 912	/* init containers */
 913	/* Each LUT is associated with a TCM (container manager).  We use the
 914	   lut_id to denote the lut_id used to identify the correct LUT for
 915	   programming during reill operations */
 916	for (i = 0; i < omap_dmm->num_lut; i++) {
 917		omap_dmm->tcm[i] = sita_init(omap_dmm->container_width,
 918						omap_dmm->container_height);
 919
 920		if (!omap_dmm->tcm[i]) {
 921			dev_err(&dev->dev, "failed to allocate container\n");
 922			ret = -ENOMEM;
 923			goto fail;
 924		}
 925
 926		omap_dmm->tcm[i]->lut_id = i;
 927	}
 928
 929	/* assign access mode containers to applicable tcm container */
 930	/* OMAP 4 has 1 container for all 4 views */
 931	/* OMAP 5 has 2 containers, 1 for 2D and 1 for 1D */
 932	containers[TILFMT_8BIT] = omap_dmm->tcm[0];
 933	containers[TILFMT_16BIT] = omap_dmm->tcm[0];
 934	containers[TILFMT_32BIT] = omap_dmm->tcm[0];
 935
 936	if (omap_dmm->container_height != omap_dmm->lut_height) {
 937		/* second LUT is used for PAGE mode.  Programming must use
 938		   y offset that is added to all y coordinates.  LUT id is still
 939		   0, because it is the same LUT, just the upper 128 lines */
 940		containers[TILFMT_PAGE] = omap_dmm->tcm[1];
 941		omap_dmm->tcm[1]->y_offset = OMAP5_LUT_OFFSET;
 942		omap_dmm->tcm[1]->lut_id = 0;
 943	} else {
 944		containers[TILFMT_PAGE] = omap_dmm->tcm[0];
 945	}
 946
 947	area = (struct tcm_area) {
 948		.tcm = NULL,
 949		.p1.x = omap_dmm->container_width - 1,
 950		.p1.y = omap_dmm->container_height - 1,
 951	};
 952
 953	ret = request_irq(omap_dmm->irq, omap_dmm_irq_handler, IRQF_SHARED,
 954				"omap_dmm_irq_handler", omap_dmm);
 955
 956	if (ret) {
 957		dev_err(&dev->dev, "couldn't register IRQ %d, error %d\n",
 958			omap_dmm->irq, ret);
 959		omap_dmm->irq = -1;
 960		goto fail;
 961	}
 962
 963	/* Enable all interrupts for each refill engine except
 964	 * ERR_LUT_MISS<n> (which is just advisory, and we don't care
 965	 * about because we want to be able to refill live scanout
 966	 * buffers for accelerated pan/scroll) and FILL_DSC<n> which
 967	 * we just generally don't care about.
 968	 */
 969	dmm_write(omap_dmm, 0x7e7e7e7e, DMM_PAT_IRQENABLE_SET);
 970
 971	/* initialize all LUTs to dummy page entries */
 972	for (i = 0; i < omap_dmm->num_lut; i++) {
 973		area.tcm = omap_dmm->tcm[i];
 974		if (fill(&area, NULL, 0, 0, true))
 975			dev_err(omap_dmm->dev, "refill failed");
 976	}
 977
 978	dev_info(omap_dmm->dev, "initialized all PAT entries\n");
 979
 980	return 0;
 981
 982fail:
 983	omap_dmm_remove(dev);
 
 984	return ret;
 985}
 986
 987/*
 988 * debugfs support
 989 */
 990
 991#ifdef CONFIG_DEBUG_FS
 992
 993static const char *alphabet = "abcdefghijklmnopqrstuvwxyz"
 994				"ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789";
 995static const char *special = ".,:;'\"`~!^-+";
 996
 997static void fill_map(char **map, int xdiv, int ydiv, struct tcm_area *a,
 998							char c, bool ovw)
 999{
1000	int x, y;
1001	for (y = a->p0.y / ydiv; y <= a->p1.y / ydiv; y++)
1002		for (x = a->p0.x / xdiv; x <= a->p1.x / xdiv; x++)
1003			if (map[y][x] == ' ' || ovw)
1004				map[y][x] = c;
1005}
1006
1007static void fill_map_pt(char **map, int xdiv, int ydiv, struct tcm_pt *p,
1008									char c)
1009{
1010	map[p->y / ydiv][p->x / xdiv] = c;
1011}
1012
1013static char read_map_pt(char **map, int xdiv, int ydiv, struct tcm_pt *p)
1014{
1015	return map[p->y / ydiv][p->x / xdiv];
1016}
1017
1018static int map_width(int xdiv, int x0, int x1)
1019{
1020	return (x1 / xdiv) - (x0 / xdiv) + 1;
1021}
1022
1023static void text_map(char **map, int xdiv, char *nice, int yd, int x0, int x1)
1024{
1025	char *p = map[yd] + (x0 / xdiv);
1026	int w = (map_width(xdiv, x0, x1) - strlen(nice)) / 2;
1027	if (w >= 0) {
1028		p += w;
1029		while (*nice)
1030			*p++ = *nice++;
1031	}
1032}
1033
1034static void map_1d_info(char **map, int xdiv, int ydiv, char *nice,
1035							struct tcm_area *a)
1036{
1037	sprintf(nice, "%dK", tcm_sizeof(*a) * 4);
1038	if (a->p0.y + 1 < a->p1.y) {
1039		text_map(map, xdiv, nice, (a->p0.y + a->p1.y) / 2 / ydiv, 0,
1040							256 - 1);
1041	} else if (a->p0.y < a->p1.y) {
1042		if (strlen(nice) < map_width(xdiv, a->p0.x, 256 - 1))
1043			text_map(map, xdiv, nice, a->p0.y / ydiv,
1044					a->p0.x + xdiv,	256 - 1);
1045		else if (strlen(nice) < map_width(xdiv, 0, a->p1.x))
1046			text_map(map, xdiv, nice, a->p1.y / ydiv,
1047					0, a->p1.y - xdiv);
1048	} else if (strlen(nice) + 1 < map_width(xdiv, a->p0.x, a->p1.x)) {
1049		text_map(map, xdiv, nice, a->p0.y / ydiv, a->p0.x, a->p1.x);
1050	}
1051}
1052
1053static void map_2d_info(char **map, int xdiv, int ydiv, char *nice,
1054							struct tcm_area *a)
1055{
1056	sprintf(nice, "(%d*%d)", tcm_awidth(*a), tcm_aheight(*a));
1057	if (strlen(nice) + 1 < map_width(xdiv, a->p0.x, a->p1.x))
1058		text_map(map, xdiv, nice, (a->p0.y + a->p1.y) / 2 / ydiv,
1059							a->p0.x, a->p1.x);
1060}
1061
1062int tiler_map_show(struct seq_file *s, void *arg)
1063{
1064	int xdiv = 2, ydiv = 1;
1065	char **map = NULL, *global_map;
1066	struct tiler_block *block;
1067	struct tcm_area a, p;
1068	int i;
1069	const char *m2d = alphabet;
1070	const char *a2d = special;
1071	const char *m2dp = m2d, *a2dp = a2d;
1072	char nice[128];
1073	int h_adj;
1074	int w_adj;
1075	unsigned long flags;
1076	int lut_idx;
1077
1078
1079	if (!omap_dmm) {
1080		/* early return if dmm/tiler device is not initialized */
1081		return 0;
1082	}
1083
1084	h_adj = omap_dmm->container_height / ydiv;
1085	w_adj = omap_dmm->container_width / xdiv;
1086
1087	map = kmalloc_array(h_adj, sizeof(*map), GFP_KERNEL);
1088	global_map = kmalloc_array(w_adj + 1, h_adj, GFP_KERNEL);
1089
1090	if (!map || !global_map)
1091		goto error;
1092
1093	for (lut_idx = 0; lut_idx < omap_dmm->num_lut; lut_idx++) {
1094		memset(map, 0, h_adj * sizeof(*map));
1095		memset(global_map, ' ', (w_adj + 1) * h_adj);
1096
1097		for (i = 0; i < omap_dmm->container_height; i++) {
1098			map[i] = global_map + i * (w_adj + 1);
1099			map[i][w_adj] = 0;
1100		}
1101
1102		spin_lock_irqsave(&list_lock, flags);
1103
1104		list_for_each_entry(block, &omap_dmm->alloc_head, alloc_node) {
1105			if (block->area.tcm == omap_dmm->tcm[lut_idx]) {
1106				if (block->fmt != TILFMT_PAGE) {
1107					fill_map(map, xdiv, ydiv, &block->area,
1108						*m2dp, true);
1109					if (!*++a2dp)
1110						a2dp = a2d;
1111					if (!*++m2dp)
1112						m2dp = m2d;
1113					map_2d_info(map, xdiv, ydiv, nice,
1114							&block->area);
1115				} else {
1116					bool start = read_map_pt(map, xdiv,
1117						ydiv, &block->area.p0) == ' ';
1118					bool end = read_map_pt(map, xdiv, ydiv,
1119							&block->area.p1) == ' ';
1120
1121					tcm_for_each_slice(a, block->area, p)
1122						fill_map(map, xdiv, ydiv, &a,
1123							'=', true);
1124					fill_map_pt(map, xdiv, ydiv,
1125							&block->area.p0,
1126							start ? '<' : 'X');
1127					fill_map_pt(map, xdiv, ydiv,
1128							&block->area.p1,
1129							end ? '>' : 'X');
1130					map_1d_info(map, xdiv, ydiv, nice,
1131							&block->area);
1132				}
1133			}
1134		}
1135
1136		spin_unlock_irqrestore(&list_lock, flags);
1137
1138		if (s) {
1139			seq_printf(s, "CONTAINER %d DUMP BEGIN\n", lut_idx);
1140			for (i = 0; i < 128; i++)
1141				seq_printf(s, "%03d:%s\n", i, map[i]);
1142			seq_printf(s, "CONTAINER %d DUMP END\n", lut_idx);
1143		} else {
1144			dev_dbg(omap_dmm->dev, "CONTAINER %d DUMP BEGIN\n",
1145				lut_idx);
1146			for (i = 0; i < 128; i++)
1147				dev_dbg(omap_dmm->dev, "%03d:%s\n", i, map[i]);
1148			dev_dbg(omap_dmm->dev, "CONTAINER %d DUMP END\n",
1149				lut_idx);
1150		}
1151	}
1152
1153error:
1154	kfree(map);
1155	kfree(global_map);
1156
1157	return 0;
1158}
1159#endif
1160
1161#ifdef CONFIG_PM_SLEEP
1162static int omap_dmm_resume(struct device *dev)
1163{
1164	struct tcm_area area;
1165	int i;
1166
1167	if (!omap_dmm)
1168		return -ENODEV;
1169
1170	area = (struct tcm_area) {
1171		.tcm = NULL,
1172		.p1.x = omap_dmm->container_width - 1,
1173		.p1.y = omap_dmm->container_height - 1,
1174	};
1175
1176	/* initialize all LUTs to dummy page entries */
1177	for (i = 0; i < omap_dmm->num_lut; i++) {
1178		area.tcm = omap_dmm->tcm[i];
1179		if (fill(&area, NULL, 0, 0, true))
1180			dev_err(dev, "refill failed");
1181	}
1182
1183	return 0;
1184}
1185#endif
1186
1187static SIMPLE_DEV_PM_OPS(omap_dmm_pm_ops, NULL, omap_dmm_resume);
1188
1189#if defined(CONFIG_OF)
1190static const struct dmm_platform_data dmm_omap4_platform_data = {
1191	.cpu_cache_flags = OMAP_BO_WC,
1192};
1193
1194static const struct dmm_platform_data dmm_omap5_platform_data = {
1195	.cpu_cache_flags = OMAP_BO_UNCACHED,
1196};
1197
1198static const struct of_device_id dmm_of_match[] = {
1199	{
1200		.compatible = "ti,omap4-dmm",
1201		.data = &dmm_omap4_platform_data,
1202	},
1203	{
1204		.compatible = "ti,omap5-dmm",
1205		.data = &dmm_omap5_platform_data,
1206	},
1207	{},
1208};
1209#endif
1210
1211struct platform_driver omap_dmm_driver = {
1212	.probe = omap_dmm_probe,
1213	.remove_new = omap_dmm_remove,
1214	.driver = {
1215		.owner = THIS_MODULE,
1216		.name = DMM_DRIVER_NAME,
1217		.of_match_table = of_match_ptr(dmm_of_match),
1218		.pm = &omap_dmm_pm_ops,
1219	},
1220};
1221
1222MODULE_LICENSE("GPL v2");
1223MODULE_AUTHOR("Andy Gross <andy.gross@ti.com>");
1224MODULE_DESCRIPTION("OMAP DMM/Tiler Driver");