Linux Audio

Check our new training course

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