cache-l2x0.c 39.1 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
/*
 * arch/arm/mm/cache-l2x0.c - L210/L220 cache controller support
 *
 * Copyright (C) 2007 ARM Limited
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License version 2 as
 * published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
 */
19
#include <linux/err.h>
20
#include <linux/init.h>
21
#include <linux/spinlock.h>
22
#include <linux/io.h>
23 24
#include <linux/of.h>
#include <linux/of_address.h>
25 26 27

#include <asm/cacheflush.h>
#include <asm/hardware/cache-l2x0.h>
28
#include "cache-tauros3.h"
29
#include "cache-aurora-l2.h"
30

31
struct l2c_init_data {
R
Russell King 已提交
32
	unsigned num_lock;
33
	void (*of_parse)(const struct device_node *, u32 *, u32 *);
R
Russell King 已提交
34
	void (*enable)(void __iomem *, u32, unsigned);
35
	void (*fixup)(void __iomem *, u32, struct outer_cache_fns *);
36
	void (*save)(void __iomem *);
37 38 39
	struct outer_cache_fns outer_cache;
};

40 41 42
#define CACHE_LINE_SIZE		32

static void __iomem *l2x0_base;
43
static DEFINE_RAW_SPINLOCK(l2x0_lock);
44 45
static u32 l2x0_way_mask;	/* Bitmask of active ways */
static u32 l2x0_size;
46
static unsigned long sync_reg_offset = L2X0_CACHE_SYNC;
47

48 49
struct l2x0_regs l2x0_saved_regs;

50 51 52
/*
 * Common code for all cache controllers.
 */
R
Russell King 已提交
53
static inline void l2c_wait_mask(void __iomem *reg, unsigned long mask)
54
{
55
	/* wait for cache operation by line or way to complete */
56
	while (readl_relaxed(reg) & mask)
57
		cpu_relax();
58 59
}

60 61 62 63 64 65 66 67 68 69
/*
 * This should only be called when we have a requirement that the
 * register be written due to a work-around, as platforms running
 * in non-secure mode may not be able to access this register.
 */
static inline void l2c_set_debug(void __iomem *base, unsigned long val)
{
	outer_cache.set_debug(val);
}

70 71 72
static void __l2c_op_way(void __iomem *reg)
{
	writel_relaxed(l2x0_way_mask, reg);
R
Russell King 已提交
73
	l2c_wait_mask(reg, l2x0_way_mask);
74 75
}

76 77 78 79 80 81 82 83 84 85 86 87
static inline void l2c_unlock(void __iomem *base, unsigned num)
{
	unsigned i;

	for (i = 0; i < num; i++) {
		writel_relaxed(0, base + L2X0_LOCKDOWN_WAY_D_BASE +
			       i * L2X0_LOCKDOWN_STRIDE);
		writel_relaxed(0, base + L2X0_LOCKDOWN_WAY_I_BASE +
			       i * L2X0_LOCKDOWN_STRIDE);
	}
}

R
Russell King 已提交
88 89 90 91 92 93 94 95
/*
 * Enable the L2 cache controller.  This function must only be
 * called when the cache controller is known to be disabled.
 */
static void l2c_enable(void __iomem *base, u32 aux, unsigned num_lock)
{
	unsigned long flags;

96 97 98
	/* Only write the aux register if it needs changing */
	if (readl_relaxed(base + L2X0_AUX_CTRL) != aux)
		writel_relaxed(aux, base + L2X0_AUX_CTRL);
R
Russell King 已提交
99

100 101
	l2c_unlock(base, num_lock);

R
Russell King 已提交
102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119
	local_irq_save(flags);
	__l2c_op_way(base + L2X0_INV_WAY);
	writel_relaxed(0, base + sync_reg_offset);
	l2c_wait_mask(base + sync_reg_offset, 1);
	local_irq_restore(flags);

	writel_relaxed(L2X0_CTRL_EN, base + L2X0_CTRL);
}

static void l2c_disable(void)
{
	void __iomem *base = l2x0_base;

	outer_cache.flush_all();
	writel_relaxed(0, base + L2X0_CTRL);
	dsb(st);
}

120 121 122 123 124 125
#ifdef CONFIG_CACHE_PL310
static inline void cache_wait(void __iomem *reg, unsigned long mask)
{
	/* cache operations by line are atomic on PL310 */
}
#else
R
Russell King 已提交
126
#define cache_wait	l2c_wait_mask
127 128
#endif

129 130
static inline void cache_sync(void)
{
131
	void __iomem *base = l2x0_base;
132

133
	writel_relaxed(0, base + sync_reg_offset);
134
	cache_wait(base + L2X0_CACHE_SYNC, 1);
135 136
}

137 138 139 140
static inline void l2x0_clean_line(unsigned long addr)
{
	void __iomem *base = l2x0_base;
	cache_wait(base + L2X0_CLEAN_LINE_PA, 1);
141
	writel_relaxed(addr, base + L2X0_CLEAN_LINE_PA);
142 143 144 145 146 147
}

static inline void l2x0_inv_line(unsigned long addr)
{
	void __iomem *base = l2x0_base;
	cache_wait(base + L2X0_INV_LINE_PA, 1);
148
	writel_relaxed(addr, base + L2X0_INV_LINE_PA);
149 150
}

151
#if defined(CONFIG_PL310_ERRATA_588369) || defined(CONFIG_PL310_ERRATA_727915)
152 153 154
static inline void debug_writel(unsigned long val)
{
	if (outer_cache.set_debug)
155
		l2c_set_debug(l2x0_base, val);
156
}
157 158 159 160 161 162
#else
/* Optimised out for non-errata case */
static inline void debug_writel(unsigned long val)
{
}
#endif
163

164
#ifdef CONFIG_PL310_ERRATA_588369
165 166 167 168 169 170
static inline void l2x0_flush_line(unsigned long addr)
{
	void __iomem *base = l2x0_base;

	/* Clean by PA followed by Invalidate by PA */
	cache_wait(base + L2X0_CLEAN_LINE_PA, 1);
171
	writel_relaxed(addr, base + L2X0_CLEAN_LINE_PA);
172
	cache_wait(base + L2X0_INV_LINE_PA, 1);
173
	writel_relaxed(addr, base + L2X0_INV_LINE_PA);
174 175 176
}
#else

177 178 179 180
static inline void l2x0_flush_line(unsigned long addr)
{
	void __iomem *base = l2x0_base;
	cache_wait(base + L2X0_CLEAN_INV_LINE_PA, 1);
181
	writel_relaxed(addr, base + L2X0_CLEAN_INV_LINE_PA);
182
}
183
#endif
184

185 186 187 188
static void l2x0_cache_sync(void)
{
	unsigned long flags;

189
	raw_spin_lock_irqsave(&l2x0_lock, flags);
190
	cache_sync();
191
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
192 193
}

194
static void __l2x0_flush_all(void)
195
{
196
	debug_writel(0x03);
197
	__l2c_op_way(l2x0_base + L2X0_CLEAN_INV_WAY);
198
	cache_sync();
199
	debug_writel(0x00);
200 201 202 203 204 205 206
}

static void l2x0_flush_all(void)
{
	unsigned long flags;

	/* clean all ways */
207
	raw_spin_lock_irqsave(&l2x0_lock, flags);
208
	__l2x0_flush_all();
209
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
210 211
}

212 213 214 215 216
static void l2x0_clean_all(void)
{
	unsigned long flags;

	/* clean all ways */
217
	raw_spin_lock_irqsave(&l2x0_lock, flags);
218
	__l2c_op_way(l2x0_base + L2X0_CLEAN_WAY);
219
	cache_sync();
220
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
221 222
}

223
static void l2x0_inv_all(void)
224
{
225 226
	unsigned long flags;

227
	/* invalidate all ways */
228
	raw_spin_lock_irqsave(&l2x0_lock, flags);
229
	/* Invalidating when L2 is enabled is a nono */
230
	BUG_ON(readl(l2x0_base + L2X0_CTRL) & L2X0_CTRL_EN);
231
	__l2c_op_way(l2x0_base + L2X0_INV_WAY);
232
	cache_sync();
233
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
234 235 236 237
}

static void l2x0_inv_range(unsigned long start, unsigned long end)
{
238
	void __iomem *base = l2x0_base;
239
	unsigned long flags;
240

241
	raw_spin_lock_irqsave(&l2x0_lock, flags);
242 243
	if (start & (CACHE_LINE_SIZE - 1)) {
		start &= ~(CACHE_LINE_SIZE - 1);
244
		debug_writel(0x03);
245
		l2x0_flush_line(start);
246
		debug_writel(0x00);
247 248 249 250 251
		start += CACHE_LINE_SIZE;
	}

	if (end & (CACHE_LINE_SIZE - 1)) {
		end &= ~(CACHE_LINE_SIZE - 1);
252
		debug_writel(0x03);
253
		l2x0_flush_line(end);
254
		debug_writel(0x00);
255 256
	}

257 258 259 260
	while (start < end) {
		unsigned long blk_end = start + min(end - start, 4096UL);

		while (start < blk_end) {
261
			l2x0_inv_line(start);
262 263 264 265
			start += CACHE_LINE_SIZE;
		}

		if (blk_end < end) {
266 267
			raw_spin_unlock_irqrestore(&l2x0_lock, flags);
			raw_spin_lock_irqsave(&l2x0_lock, flags);
268 269
		}
	}
270
	cache_wait(base + L2X0_INV_LINE_PA, 1);
271
	cache_sync();
272
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
273 274 275 276
}

static void l2x0_clean_range(unsigned long start, unsigned long end)
{
277
	void __iomem *base = l2x0_base;
278
	unsigned long flags;
279

280 281 282 283 284
	if ((end - start) >= l2x0_size) {
		l2x0_clean_all();
		return;
	}

285
	raw_spin_lock_irqsave(&l2x0_lock, flags);
286
	start &= ~(CACHE_LINE_SIZE - 1);
287 288 289 290
	while (start < end) {
		unsigned long blk_end = start + min(end - start, 4096UL);

		while (start < blk_end) {
291
			l2x0_clean_line(start);
292 293 294 295
			start += CACHE_LINE_SIZE;
		}

		if (blk_end < end) {
296 297
			raw_spin_unlock_irqrestore(&l2x0_lock, flags);
			raw_spin_lock_irqsave(&l2x0_lock, flags);
298 299
		}
	}
300
	cache_wait(base + L2X0_CLEAN_LINE_PA, 1);
301
	cache_sync();
302
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
303 304 305 306
}

static void l2x0_flush_range(unsigned long start, unsigned long end)
{
307
	void __iomem *base = l2x0_base;
308
	unsigned long flags;
309

310 311 312 313 314
	if ((end - start) >= l2x0_size) {
		l2x0_flush_all();
		return;
	}

315
	raw_spin_lock_irqsave(&l2x0_lock, flags);
316
	start &= ~(CACHE_LINE_SIZE - 1);
317 318 319
	while (start < end) {
		unsigned long blk_end = start + min(end - start, 4096UL);

320
		debug_writel(0x03);
321
		while (start < blk_end) {
322
			l2x0_flush_line(start);
323 324
			start += CACHE_LINE_SIZE;
		}
325
		debug_writel(0x00);
326 327

		if (blk_end < end) {
328 329
			raw_spin_unlock_irqrestore(&l2x0_lock, flags);
			raw_spin_lock_irqsave(&l2x0_lock, flags);
330 331
		}
	}
332
	cache_wait(base + L2X0_CLEAN_INV_LINE_PA, 1);
333
	cache_sync();
334
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
335 336
}

337 338 339 340
static void l2x0_disable(void)
{
	unsigned long flags;

341
	raw_spin_lock_irqsave(&l2x0_lock, flags);
342 343
	__l2x0_flush_all();
	writel_relaxed(0, l2x0_base + L2X0_CTRL);
344
	dsb(st);
345
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
346 347
}

348
static void l2x0_enable(void __iomem *base, u32 aux, unsigned num_lock)
349
{
350
	unsigned id;
351

352 353 354 355 356
	id = readl_relaxed(base + L2X0_CACHE_ID) & L2X0_CACHE_ID_PART_MASK;
	if (id == L2X0_CACHE_ID_PART_L310)
		num_lock = 8;
	else
		num_lock = 1;
357

R
Russell King 已提交
358 359 360
	/* l2x0 controller is disabled */
	writel_relaxed(aux, base + L2X0_AUX_CTRL);

361
	/* Make sure that I&D is not locked down when starting */
362
	l2c_unlock(base, num_lock);
363

R
Russell King 已提交
364 365 366 367 368 369
	l2x0_inv_all();

	/* enable L2X0 */
	writel_relaxed(L2X0_CTRL_EN, base + L2X0_CTRL);
}

370 371
static void l2x0_resume(void)
{
372
	void __iomem *base = l2x0_base;
373

374 375
	if (!(readl_relaxed(base + L2X0_CTRL) & L2X0_CTRL_EN))
		l2x0_enable(base, l2x0_saved_regs.aux_ctrl, 0);
376 377
}

378
static const struct l2c_init_data l2x0_init_fns __initconst = {
R
Russell King 已提交
379
	.enable = l2x0_enable,
380 381 382 383 384 385 386
	.outer_cache = {
		.inv_range = l2x0_inv_range,
		.clean_range = l2x0_clean_range,
		.flush_range = l2x0_flush_range,
		.flush_all = l2x0_flush_all,
		.disable = l2x0_disable,
		.sync = l2x0_cache_sync,
387
		.resume = l2x0_resume,
388 389 390
	},
};

391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492
/*
 * L2C-210 specific code.
 *
 * The L2C-2x0 PA, set/way and sync operations are atomic, but we must
 * ensure that no background operation is running.  The way operations
 * are all background tasks.
 *
 * While a background operation is in progress, any new operation is
 * ignored (unspecified whether this causes an error.)  Thankfully, not
 * used on SMP.
 *
 * Never has a different sync register other than L2X0_CACHE_SYNC, but
 * we use sync_reg_offset here so we can share some of this with L2C-310.
 */
static void __l2c210_cache_sync(void __iomem *base)
{
	writel_relaxed(0, base + sync_reg_offset);
}

static void __l2c210_op_pa_range(void __iomem *reg, unsigned long start,
	unsigned long end)
{
	while (start < end) {
		writel_relaxed(start, reg);
		start += CACHE_LINE_SIZE;
	}
}

static void l2c210_inv_range(unsigned long start, unsigned long end)
{
	void __iomem *base = l2x0_base;

	if (start & (CACHE_LINE_SIZE - 1)) {
		start &= ~(CACHE_LINE_SIZE - 1);
		writel_relaxed(start, base + L2X0_CLEAN_INV_LINE_PA);
		start += CACHE_LINE_SIZE;
	}

	if (end & (CACHE_LINE_SIZE - 1)) {
		end &= ~(CACHE_LINE_SIZE - 1);
		writel_relaxed(end, base + L2X0_CLEAN_INV_LINE_PA);
	}

	__l2c210_op_pa_range(base + L2X0_INV_LINE_PA, start, end);
	__l2c210_cache_sync(base);
}

static void l2c210_clean_range(unsigned long start, unsigned long end)
{
	void __iomem *base = l2x0_base;

	start &= ~(CACHE_LINE_SIZE - 1);
	__l2c210_op_pa_range(base + L2X0_CLEAN_LINE_PA, start, end);
	__l2c210_cache_sync(base);
}

static void l2c210_flush_range(unsigned long start, unsigned long end)
{
	void __iomem *base = l2x0_base;

	start &= ~(CACHE_LINE_SIZE - 1);
	__l2c210_op_pa_range(base + L2X0_CLEAN_INV_LINE_PA, start, end);
	__l2c210_cache_sync(base);
}

static void l2c210_flush_all(void)
{
	void __iomem *base = l2x0_base;

	BUG_ON(!irqs_disabled());

	__l2c_op_way(base + L2X0_CLEAN_INV_WAY);
	__l2c210_cache_sync(base);
}

static void l2c210_sync(void)
{
	__l2c210_cache_sync(l2x0_base);
}

static void l2c210_resume(void)
{
	void __iomem *base = l2x0_base;

	if (!(readl_relaxed(base + L2X0_CTRL) & L2X0_CTRL_EN))
		l2c_enable(base, l2x0_saved_regs.aux_ctrl, 1);
}

static const struct l2c_init_data l2c210_data __initconst = {
	.num_lock = 1,
	.enable = l2c_enable,
	.outer_cache = {
		.inv_range = l2c210_inv_range,
		.clean_range = l2c210_clean_range,
		.flush_range = l2c210_flush_range,
		.flush_all = l2c210_flush_all,
		.disable = l2c_disable,
		.sync = l2c210_sync,
		.resume = l2c210_resume,
	},
};

493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634
/*
 * L2C-220 specific code.
 *
 * All operations are background operations: they have to be waited for.
 * Conflicting requests generate a slave error (which will cause an
 * imprecise abort.)  Never uses sync_reg_offset, so we hard-code the
 * sync register here.
 *
 * However, we can re-use the l2c210_resume call.
 */
static inline void __l2c220_cache_sync(void __iomem *base)
{
	writel_relaxed(0, base + L2X0_CACHE_SYNC);
	l2c_wait_mask(base + L2X0_CACHE_SYNC, 1);
}

static void l2c220_op_way(void __iomem *base, unsigned reg)
{
	unsigned long flags;

	raw_spin_lock_irqsave(&l2x0_lock, flags);
	__l2c_op_way(base + reg);
	__l2c220_cache_sync(base);
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
}

static unsigned long l2c220_op_pa_range(void __iomem *reg, unsigned long start,
	unsigned long end, unsigned long flags)
{
	raw_spinlock_t *lock = &l2x0_lock;

	while (start < end) {
		unsigned long blk_end = start + min(end - start, 4096UL);

		while (start < blk_end) {
			l2c_wait_mask(reg, 1);
			writel_relaxed(start, reg);
			start += CACHE_LINE_SIZE;
		}

		if (blk_end < end) {
			raw_spin_unlock_irqrestore(lock, flags);
			raw_spin_lock_irqsave(lock, flags);
		}
	}

	return flags;
}

static void l2c220_inv_range(unsigned long start, unsigned long end)
{
	void __iomem *base = l2x0_base;
	unsigned long flags;

	raw_spin_lock_irqsave(&l2x0_lock, flags);
	if ((start | end) & (CACHE_LINE_SIZE - 1)) {
		if (start & (CACHE_LINE_SIZE - 1)) {
			start &= ~(CACHE_LINE_SIZE - 1);
			writel_relaxed(start, base + L2X0_CLEAN_INV_LINE_PA);
			start += CACHE_LINE_SIZE;
		}

		if (end & (CACHE_LINE_SIZE - 1)) {
			end &= ~(CACHE_LINE_SIZE - 1);
			l2c_wait_mask(base + L2X0_CLEAN_INV_LINE_PA, 1);
			writel_relaxed(end, base + L2X0_CLEAN_INV_LINE_PA);
		}
	}

	flags = l2c220_op_pa_range(base + L2X0_INV_LINE_PA,
				   start, end, flags);
	l2c_wait_mask(base + L2X0_INV_LINE_PA, 1);
	__l2c220_cache_sync(base);
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
}

static void l2c220_clean_range(unsigned long start, unsigned long end)
{
	void __iomem *base = l2x0_base;
	unsigned long flags;

	start &= ~(CACHE_LINE_SIZE - 1);
	if ((end - start) >= l2x0_size) {
		l2c220_op_way(base, L2X0_CLEAN_WAY);
		return;
	}

	raw_spin_lock_irqsave(&l2x0_lock, flags);
	flags = l2c220_op_pa_range(base + L2X0_CLEAN_LINE_PA,
				   start, end, flags);
	l2c_wait_mask(base + L2X0_CLEAN_INV_LINE_PA, 1);
	__l2c220_cache_sync(base);
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
}

static void l2c220_flush_range(unsigned long start, unsigned long end)
{
	void __iomem *base = l2x0_base;
	unsigned long flags;

	start &= ~(CACHE_LINE_SIZE - 1);
	if ((end - start) >= l2x0_size) {
		l2c220_op_way(base, L2X0_CLEAN_INV_WAY);
		return;
	}

	raw_spin_lock_irqsave(&l2x0_lock, flags);
	flags = l2c220_op_pa_range(base + L2X0_CLEAN_INV_LINE_PA,
				   start, end, flags);
	l2c_wait_mask(base + L2X0_CLEAN_INV_LINE_PA, 1);
	__l2c220_cache_sync(base);
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
}

static void l2c220_flush_all(void)
{
	l2c220_op_way(l2x0_base, L2X0_CLEAN_INV_WAY);
}

static void l2c220_sync(void)
{
	unsigned long flags;

	raw_spin_lock_irqsave(&l2x0_lock, flags);
	__l2c220_cache_sync(l2x0_base);
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
}

static const struct l2c_init_data l2c220_data = {
	.num_lock = 1,
	.enable = l2c_enable,
	.outer_cache = {
		.inv_range = l2c220_inv_range,
		.clean_range = l2c220_clean_range,
		.flush_range = l2c220_flush_range,
		.flush_all = l2c220_flush_all,
		.disable = l2c_disable,
		.sync = l2c220_sync,
		.resume = l2c210_resume,
	},
};

635 636 637
/*
 * L2C-310 specific code.
 *
638 639 640 641 642 643 644 645 646 647 648 649
 * Very similar to L2C-210, the PA, set/way and sync operations are atomic,
 * and the way operations are all background tasks.  However, issuing an
 * operation while a background operation is in progress results in a
 * SLVERR response.  We can reuse:
 *
 *  __l2c210_cache_sync (using sync_reg_offset)
 *  l2c210_sync
 *  l2c210_inv_range (if 588369 is not applicable)
 *  l2c210_clean_range
 *  l2c210_flush_range (if 588369 is not applicable)
 *  l2c210_flush_all (if 727915 is not applicable)
 *
650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673
 * Errata:
 * 588369: PL310 R0P0->R1P0, fixed R2P0.
 *	Affects: all clean+invalidate operations
 *	clean and invalidate skips the invalidate step, so we need to issue
 *	separate operations.  We also require the above debug workaround
 *	enclosing this code fragment on affected parts.  On unaffected parts,
 *	we must not use this workaround without the debug register writes
 *	to avoid exposing a problem similar to 727915.
 *
 * 727915: PL310 R2P0->R3P0, fixed R3P1.
 *	Affects: clean+invalidate by way
 *	clean and invalidate by way runs in the background, and a store can
 *	hit the line between the clean operation and invalidate operation,
 *	resulting in the store being lost.
 *
 * 753970: PL310 R3P0, fixed R3P1.
 *	Affects: sync
 *	prevents merging writes after the sync operation, until another L2C
 *	operation is performed (or a number of other conditions.)
 *
 * 769419: PL310 R0P0->R3P1, fixed R3P2.
 *	Affects: store buffer
 *	store buffer is not automatically drained.
 */
674 675 676 677 678
static void l2c310_set_debug(unsigned long val)
{
	writel_relaxed(val, l2x0_base + L2X0_DEBUG_CTRL);
}

679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737
static void l2c310_inv_range_erratum(unsigned long start, unsigned long end)
{
	void __iomem *base = l2x0_base;

	if ((start | end) & (CACHE_LINE_SIZE - 1)) {
		unsigned long flags;

		/* Erratum 588369 for both clean+invalidate operations */
		raw_spin_lock_irqsave(&l2x0_lock, flags);
		l2c_set_debug(base, 0x03);

		if (start & (CACHE_LINE_SIZE - 1)) {
			start &= ~(CACHE_LINE_SIZE - 1);
			writel_relaxed(start, base + L2X0_CLEAN_LINE_PA);
			writel_relaxed(start, base + L2X0_INV_LINE_PA);
			start += CACHE_LINE_SIZE;
		}

		if (end & (CACHE_LINE_SIZE - 1)) {
			end &= ~(CACHE_LINE_SIZE - 1);
			writel_relaxed(end, base + L2X0_CLEAN_LINE_PA);
			writel_relaxed(end, base + L2X0_INV_LINE_PA);
		}

		l2c_set_debug(base, 0x00);
		raw_spin_unlock_irqrestore(&l2x0_lock, flags);
	}

	__l2c210_op_pa_range(base + L2X0_INV_LINE_PA, start, end);
	__l2c210_cache_sync(base);
}

static void l2c310_flush_range_erratum(unsigned long start, unsigned long end)
{
	raw_spinlock_t *lock = &l2x0_lock;
	unsigned long flags;
	void __iomem *base = l2x0_base;

	raw_spin_lock_irqsave(lock, flags);
	while (start < end) {
		unsigned long blk_end = start + min(end - start, 4096UL);

		l2c_set_debug(base, 0x03);
		while (start < blk_end) {
			writel_relaxed(start, base + L2X0_CLEAN_LINE_PA);
			writel_relaxed(start, base + L2X0_INV_LINE_PA);
			start += CACHE_LINE_SIZE;
		}
		l2c_set_debug(base, 0x00);

		if (blk_end < end) {
			raw_spin_unlock_irqrestore(lock, flags);
			raw_spin_lock_irqsave(lock, flags);
		}
	}
	raw_spin_unlock_irqrestore(lock, flags);
	__l2c210_cache_sync(base);
}

738 739 740 741 742 743 744 745 746 747 748 749 750
static void l2c310_flush_all_erratum(void)
{
	void __iomem *base = l2x0_base;
	unsigned long flags;

	raw_spin_lock_irqsave(&l2x0_lock, flags);
	l2c_set_debug(base, 0x03);
	__l2c_op_way(base + L2X0_CLEAN_INV_WAY);
	l2c_set_debug(base, 0x00);
	__l2c210_cache_sync(base);
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);
}

751
static void __init l2c310_save(void __iomem *base)
752
{
753
	unsigned revision;
754 755 756 757 758 759 760 761 762 763

	l2x0_saved_regs.tag_latency = readl_relaxed(base +
		L2X0_TAG_LATENCY_CTRL);
	l2x0_saved_regs.data_latency = readl_relaxed(base +
		L2X0_DATA_LATENCY_CTRL);
	l2x0_saved_regs.filter_end = readl_relaxed(base +
		L2X0_ADDR_FILTER_END);
	l2x0_saved_regs.filter_start = readl_relaxed(base +
		L2X0_ADDR_FILTER_START);

764 765 766 767 768
	revision = readl_relaxed(base + L2X0_CACHE_ID) &
			L2X0_CACHE_ID_RTL_MASK;

	/* From r2p0, there is Prefetch offset/control register */
	if (revision >= L310_CACHE_ID_RTL_R2P0)
769
		l2x0_saved_regs.prefetch_ctrl = readl_relaxed(base +
770 771 772 773 774 775
							L2X0_PREFETCH_CTRL);

	/* From r3p0, there is Power control register */
	if (revision >= L310_CACHE_ID_RTL_R3P0)
		l2x0_saved_regs.pwr_ctrl = readl_relaxed(base +
							L2X0_POWER_CTRL);
776 777
}

778
static void l2c310_resume(void)
779
{
780 781 782 783
	void __iomem *base = l2x0_base;

	if (!(readl_relaxed(base + L2X0_CTRL) & L2X0_CTRL_EN)) {
		unsigned revision;
784 785 786

		/* restore pl310 setup */
		writel_relaxed(l2x0_saved_regs.tag_latency,
787
			       base + L2X0_TAG_LATENCY_CTRL);
788
		writel_relaxed(l2x0_saved_regs.data_latency,
789
			       base + L2X0_DATA_LATENCY_CTRL);
790
		writel_relaxed(l2x0_saved_regs.filter_end,
791
			       base + L2X0_ADDR_FILTER_END);
792
		writel_relaxed(l2x0_saved_regs.filter_start,
793
			       base + L2X0_ADDR_FILTER_START);
794

795 796
		revision = readl_relaxed(base + L2X0_CACHE_ID) &
				L2X0_CACHE_ID_RTL_MASK;
797

798
		if (revision >= L310_CACHE_ID_RTL_R2P0)
799
			writel_relaxed(l2x0_saved_regs.prefetch_ctrl,
800 801 802 803
				       base + L2X0_PREFETCH_CTRL);
		if (revision >= L310_CACHE_ID_RTL_R3P0)
			writel_relaxed(l2x0_saved_regs.pwr_ctrl,
				       base + L2X0_POWER_CTRL);
804

805 806
		l2c_enable(base, l2x0_saved_regs.aux_ctrl, 8);
	}
807 808
}

809 810 811 812 813 814 815
static void __init l2c310_fixup(void __iomem *base, u32 cache_id,
	struct outer_cache_fns *fns)
{
	unsigned revision = cache_id & L2X0_CACHE_ID_RTL_MASK;
	const char *errata[4];
	unsigned n = 0;

816
	/* For compatibility */
817
	if (revision <= L310_CACHE_ID_RTL_R3P0)
818
		fns->set_debug = l2c310_set_debug;
819

820 821 822
	if (IS_ENABLED(CONFIG_PL310_ERRATA_588369) &&
	    revision < L310_CACHE_ID_RTL_R2P0 &&
	    /* For bcm compatibility */
823
	    fns->inv_range == l2c210_inv_range) {
824 825 826 827 828
		fns->inv_range = l2c310_inv_range_erratum;
		fns->flush_range = l2c310_flush_range_erratum;
		errata[n++] = "588369";
	}

829 830 831 832 833 834 835
	if (IS_ENABLED(CONFIG_PL310_ERRATA_727915) &&
	    revision >= L310_CACHE_ID_RTL_R2P0 &&
	    revision < L310_CACHE_ID_RTL_R3P1) {
		fns->flush_all = l2c310_flush_all_erratum;
		errata[n++] = "727915";
	}

836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858
	if (IS_ENABLED(CONFIG_PL310_ERRATA_753970) &&
	    revision == L310_CACHE_ID_RTL_R3P0) {
		sync_reg_offset = L2X0_DUMMY_REG;
		errata[n++] = "753970";
	}

	if (IS_ENABLED(CONFIG_PL310_ERRATA_769419))
		errata[n++] = "769419";

	if (n) {
		unsigned i;

		pr_info("L2C-310 errat%s", n > 1 ? "a" : "um");
		for (i = 0; i < n; i++)
			pr_cont(" %s", errata[i]);
		pr_cont(" enabled\n");
	}
}

static const struct l2c_init_data l2c310_init_fns __initconst = {
	.num_lock = 8,
	.enable = l2c_enable,
	.fixup = l2c310_fixup,
859
	.save = l2c310_save,
860
	.outer_cache = {
861 862 863 864 865 866 867
		.inv_range = l2c210_inv_range,
		.clean_range = l2c210_clean_range,
		.flush_range = l2c210_flush_range,
		.flush_all = l2c210_flush_all,
		.disable = l2c_disable,
		.sync = l2c210_sync,
		.set_debug = l2c310_set_debug,
868
		.resume = l2c310_resume,
869 870 871
	},
};

872 873
static void __init __l2c_init(const struct l2c_init_data *data,
	u32 aux_val, u32 aux_mask, u32 cache_id)
874
{
875
	struct outer_cache_fns fns;
876 877
	u32 aux;
	u32 way_size = 0;
878
	int ways;
879
	int way_size_shift = L2X0_WAY_SIZE_SHIFT;
880
	const char *type;
881

882 883 884 885 886 887 888
	/*
	 * It is strange to save the register state before initialisation,
	 * but hey, this is what the DT implementations decided to do.
	 */
	if (data->save)
		data->save(l2x0_base);

889
	aux = readl_relaxed(l2x0_base + L2X0_AUX_CTRL);
890

891 892 893
	aux &= aux_mask;
	aux |= aux_val;

894
	/* Determine the number of ways */
895
	switch (cache_id & L2X0_CACHE_ID_PART_MASK) {
896 897 898 899 900 901 902
	case L2X0_CACHE_ID_PART_L310:
		if (aux & (1 << 16))
			ways = 16;
		else
			ways = 8;
		type = "L310";
		break;
903

904 905 906 907
	case L2X0_CACHE_ID_PART_L210:
		ways = (aux >> 13) & 0xf;
		type = "L210";
		break;
908 909 910 911 912 913 914

	case AURORA_CACHE_ID:
		ways = (aux >> 13) & 0xf;
		ways = 2 << ((ways + 1) >> 2);
		way_size_shift = AURORA_WAY_SIZE_SHIFT;
		type = "Aurora";
		break;
915

916 917 918 919 920 921 922 923 924
	default:
		/* Assume unknown chips have 8 ways */
		ways = 8;
		type = "L2x0 series";
		break;
	}

	l2x0_way_mask = (1 << ways) - 1;

925 926 927 928
	/*
	 * L2 cache Size =  Way size * Number of ways
	 */
	way_size = (aux & L2X0_AUX_CTRL_WAY_SIZE_MASK) >> 17;
929 930
	way_size = 1 << (way_size + way_size_shift);

931 932
	l2x0_size = ways * way_size * SZ_1K;

933 934 935 936
	fns = data->outer_cache;
	if (data->fixup)
		data->fixup(l2x0_base, cache_id, &fns);

937
	/*
R
Russell King 已提交
938 939
	 * Check if l2x0 controller is already enabled.  If we are booting
	 * in non-secure mode accessing the below registers will fault.
940
	 */
R
Russell King 已提交
941 942
	if (!(readl_relaxed(l2x0_base + L2X0_CTRL) & L2X0_CTRL_EN))
		data->enable(l2x0_base, aux, data->num_lock);
943

944 945 946 947 948 949
	/* Re-read it in case some bits are reserved. */
	aux = readl_relaxed(l2x0_base + L2X0_AUX_CTRL);

	/* Save the value for resuming. */
	l2x0_saved_regs.aux_ctrl = aux;

950
	outer_cache = fns;
951

952 953 954 955
	pr_info("%s cache controller enabled, %d ways, %d kB\n",
		type, ways, l2x0_size >> 10);
	pr_info("%s: CACHE_ID 0x%08x, AUX_CTRL 0x%08x\n",
		type, cache_id, aux);
956
}
957

958 959
void __init l2x0_init(void __iomem *base, u32 aux_val, u32 aux_mask)
{
960
	const struct l2c_init_data *data;
961 962 963 964 965 966
	u32 cache_id;

	l2x0_base = base;

	cache_id = readl_relaxed(base + L2X0_CACHE_ID);

967 968 969 970 971
	switch (cache_id & L2X0_CACHE_ID_PART_MASK) {
	default:
		data = &l2x0_init_fns;
		break;

972 973 974 975
	case L2X0_CACHE_ID_PART_L210:
		data = &l2c210_data;
		break;

976 977 978 979
	case L2X0_CACHE_ID_PART_L220:
		data = &l2c220_data;
		break;

980 981 982 983 984 985
	case L2X0_CACHE_ID_PART_L310:
		data = &l2c310_init_fns;
		break;
	}

	__l2c_init(data, aux_val, aux_mask, cache_id);
986 987
}

988
#ifdef CONFIG_OF
989 990
static int l2_wt_override;

991 992 993 994
/* Aurora don't have the cache ID register available, so we have to
 * pass it though the device tree */
static u32 cache_id_part_number_from_dt;

995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028
static void __init l2x0_of_parse(const struct device_node *np,
				 u32 *aux_val, u32 *aux_mask)
{
	u32 data[2] = { 0, 0 };
	u32 tag = 0;
	u32 dirty = 0;
	u32 val = 0, mask = 0;

	of_property_read_u32(np, "arm,tag-latency", &tag);
	if (tag) {
		mask |= L2X0_AUX_CTRL_TAG_LATENCY_MASK;
		val |= (tag - 1) << L2X0_AUX_CTRL_TAG_LATENCY_SHIFT;
	}

	of_property_read_u32_array(np, "arm,data-latency",
				   data, ARRAY_SIZE(data));
	if (data[0] && data[1]) {
		mask |= L2X0_AUX_CTRL_DATA_RD_LATENCY_MASK |
			L2X0_AUX_CTRL_DATA_WR_LATENCY_MASK;
		val |= ((data[0] - 1) << L2X0_AUX_CTRL_DATA_RD_LATENCY_SHIFT) |
		       ((data[1] - 1) << L2X0_AUX_CTRL_DATA_WR_LATENCY_SHIFT);
	}

	of_property_read_u32(np, "arm,dirty-latency", &dirty);
	if (dirty) {
		mask |= L2X0_AUX_CTRL_DIRTY_LATENCY_MASK;
		val |= (dirty - 1) << L2X0_AUX_CTRL_DIRTY_LATENCY_SHIFT;
	}

	*aux_val &= ~mask;
	*aux_val |= val;
	*aux_mask &= ~mask;
}

1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043
static const struct l2c_init_data of_l2c210_data __initconst = {
	.num_lock = 1,
	.of_parse = l2x0_of_parse,
	.enable = l2c_enable,
	.outer_cache = {
		.inv_range   = l2c210_inv_range,
		.clean_range = l2c210_clean_range,
		.flush_range = l2c210_flush_range,
		.flush_all   = l2c210_flush_all,
		.disable     = l2c_disable,
		.sync        = l2c210_sync,
		.resume      = l2c210_resume,
	},
};

1044 1045
static const struct l2c_init_data of_l2c220_data __initconst = {
	.num_lock = 1,
1046
	.of_parse = l2x0_of_parse,
1047
	.enable = l2c_enable,
1048
	.outer_cache = {
1049 1050 1051 1052 1053 1054 1055
		.inv_range   = l2c220_inv_range,
		.clean_range = l2c220_clean_range,
		.flush_range = l2c220_flush_range,
		.flush_all   = l2c220_flush_all,
		.disable     = l2c_disable,
		.sync        = l2c220_sync,
		.resume      = l2c210_resume,
1056 1057 1058
	},
};

1059 1060
static void __init l2c310_of_parse(const struct device_node *np,
	u32 *aux_val, u32 *aux_mask)
1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092
{
	u32 data[3] = { 0, 0, 0 };
	u32 tag[3] = { 0, 0, 0 };
	u32 filter[2] = { 0, 0 };

	of_property_read_u32_array(np, "arm,tag-latency", tag, ARRAY_SIZE(tag));
	if (tag[0] && tag[1] && tag[2])
		writel_relaxed(
			((tag[0] - 1) << L2X0_LATENCY_CTRL_RD_SHIFT) |
			((tag[1] - 1) << L2X0_LATENCY_CTRL_WR_SHIFT) |
			((tag[2] - 1) << L2X0_LATENCY_CTRL_SETUP_SHIFT),
			l2x0_base + L2X0_TAG_LATENCY_CTRL);

	of_property_read_u32_array(np, "arm,data-latency",
				   data, ARRAY_SIZE(data));
	if (data[0] && data[1] && data[2])
		writel_relaxed(
			((data[0] - 1) << L2X0_LATENCY_CTRL_RD_SHIFT) |
			((data[1] - 1) << L2X0_LATENCY_CTRL_WR_SHIFT) |
			((data[2] - 1) << L2X0_LATENCY_CTRL_SETUP_SHIFT),
			l2x0_base + L2X0_DATA_LATENCY_CTRL);

	of_property_read_u32_array(np, "arm,filter-ranges",
				   filter, ARRAY_SIZE(filter));
	if (filter[1]) {
		writel_relaxed(ALIGN(filter[0] + filter[1], SZ_1M),
			       l2x0_base + L2X0_ADDR_FILTER_END);
		writel_relaxed((filter[0] & ~(SZ_1M - 1)) | L2X0_ADDR_FILTER_EN,
			       l2x0_base + L2X0_ADDR_FILTER_START);
	}
}

1093
static const struct l2c_init_data of_l2c310_data __initconst = {
R
Russell King 已提交
1094
	.num_lock = 8,
1095
	.of_parse = l2c310_of_parse,
R
Russell King 已提交
1096
	.enable = l2c_enable,
1097
	.fixup = l2c310_fixup,
1098
	.save  = l2c310_save,
1099
	.outer_cache = {
1100 1101 1102 1103 1104 1105 1106
		.inv_range   = l2c210_inv_range,
		.clean_range = l2c210_clean_range,
		.flush_range = l2c210_flush_range,
		.flush_all   = l2c210_flush_all,
		.disable     = l2c_disable,
		.sync        = l2c210_sync,
		.set_debug   = l2c310_set_debug,
1107
		.resume      = l2c310_resume,
1108 1109 1110
	},
};

1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144
/*
 * Note that the end addresses passed to Linux primitives are
 * noninclusive, while the hardware cache range operations use
 * inclusive start and end addresses.
 */
static unsigned long calc_range_end(unsigned long start, unsigned long end)
{
	/*
	 * Limit the number of cache lines processed at once,
	 * since cache range operations stall the CPU pipeline
	 * until completion.
	 */
	if (end > start + MAX_RANGE_SIZE)
		end = start + MAX_RANGE_SIZE;

	/*
	 * Cache range operations can't straddle a page boundary.
	 */
	if (end > PAGE_ALIGN(start+1))
		end = PAGE_ALIGN(start+1);

	return end;
}

/*
 * Make sure 'start' and 'end' reference the same page, as L2 is PIPT
 * and range operations only do a TLB lookup on the start address.
 */
static void aurora_pa_range(unsigned long start, unsigned long end,
			unsigned long offset)
{
	unsigned long flags;

	raw_spin_lock_irqsave(&l2x0_lock, flags);
1145 1146
	writel_relaxed(start, l2x0_base + AURORA_RANGE_BASE_ADDR_REG);
	writel_relaxed(end, l2x0_base + offset);
1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189 1190
	raw_spin_unlock_irqrestore(&l2x0_lock, flags);

	cache_sync();
}

static void aurora_inv_range(unsigned long start, unsigned long end)
{
	/*
	 * round start and end adresses up to cache line size
	 */
	start &= ~(CACHE_LINE_SIZE - 1);
	end = ALIGN(end, CACHE_LINE_SIZE);

	/*
	 * Invalidate all full cache lines between 'start' and 'end'.
	 */
	while (start < end) {
		unsigned long range_end = calc_range_end(start, end);
		aurora_pa_range(start, range_end - CACHE_LINE_SIZE,
				AURORA_INVAL_RANGE_REG);
		start = range_end;
	}
}

static void aurora_clean_range(unsigned long start, unsigned long end)
{
	/*
	 * If L2 is forced to WT, the L2 will always be clean and we
	 * don't need to do anything here.
	 */
	if (!l2_wt_override) {
		start &= ~(CACHE_LINE_SIZE - 1);
		end = ALIGN(end, CACHE_LINE_SIZE);
		while (start != end) {
			unsigned long range_end = calc_range_end(start, end);
			aurora_pa_range(start, range_end - CACHE_LINE_SIZE,
					AURORA_CLEAN_RANGE_REG);
			start = range_end;
		}
	}
}

static void aurora_flush_range(unsigned long start, unsigned long end)
{
1191 1192 1193 1194 1195 1196 1197 1198 1199
	start &= ~(CACHE_LINE_SIZE - 1);
	end = ALIGN(end, CACHE_LINE_SIZE);
	while (start != end) {
		unsigned long range_end = calc_range_end(start, end);
		/*
		 * If L2 is forced to WT, the L2 will always be clean and we
		 * just need to invalidate.
		 */
		if (l2_wt_override)
1200
			aurora_pa_range(start, range_end - CACHE_LINE_SIZE,
1201 1202 1203 1204 1205
							AURORA_INVAL_RANGE_REG);
		else
			aurora_pa_range(start, range_end - CACHE_LINE_SIZE,
							AURORA_FLUSH_RANGE_REG);
		start = range_end;
1206 1207 1208
	}
}

1209 1210 1211 1212 1213 1214 1215 1216
static void aurora_save(void __iomem *base)
{
	l2x0_saved_regs.ctrl = readl_relaxed(base + L2X0_CTRL);
	l2x0_saved_regs.aux_ctrl = readl_relaxed(base + L2X0_AUX_CTRL);
}

static void aurora_resume(void)
{
1217 1218 1219 1220 1221
	void __iomem *base = l2x0_base;

	if (!(readl(base + L2X0_CTRL) & L2X0_CTRL_EN)) {
		writel_relaxed(l2x0_saved_regs.aux_ctrl, base + L2X0_AUX_CTRL);
		writel_relaxed(l2x0_saved_regs.ctrl, base + L2X0_CTRL);
1222 1223 1224
	}
}

1225 1226 1227 1228 1229 1230
/*
 * For Aurora cache in no outer mode, enable via the CP15 coprocessor
 * broadcasting of cache commands to L2.
 */
static void __init aurora_enable_no_outer(void __iomem *base, u32 aux,
	unsigned num_lock)
1231
{
1232 1233 1234
	u32 u;

	asm volatile("mrc p15, 1, %0, c15, c2, 0" : "=r" (u));
1235
	u |= AURORA_CTRL_FW;		/* Set the FW bit */
1236 1237
	asm volatile("mcr p15, 1, %0, c15, c2, 0" : : "r" (u));

1238
	isb();
1239 1240

	l2c_enable(base, aux, num_lock);
1241 1242
}

1243 1244 1245 1246 1247 1248
static void __init aurora_fixup(void __iomem *base, u32 cache_id,
	struct outer_cache_fns *fns)
{
	sync_reg_offset = AURORA_SYNC_REG;
}

1249 1250 1251 1252 1253 1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271
static void __init aurora_of_parse(const struct device_node *np,
				u32 *aux_val, u32 *aux_mask)
{
	u32 val = AURORA_ACR_REPLACEMENT_TYPE_SEMIPLRU;
	u32 mask =  AURORA_ACR_REPLACEMENT_MASK;

	of_property_read_u32(np, "cache-id-part",
			&cache_id_part_number_from_dt);

	/* Determine and save the write policy */
	l2_wt_override = of_property_read_bool(np, "wt-override");

	if (l2_wt_override) {
		val |= AURORA_ACR_FORCE_WRITE_THRO_POLICY;
		mask |= AURORA_ACR_FORCE_WRITE_POLICY_MASK;
	}

	*aux_val &= ~mask;
	*aux_val |= val;
	*aux_mask &= ~mask;
}

static const struct l2c_init_data of_aurora_with_outer_data __initconst = {
R
Russell King 已提交
1272
	.num_lock = 4,
1273
	.of_parse = aurora_of_parse,
R
Russell King 已提交
1274
	.enable = l2c_enable,
1275
	.fixup = aurora_fixup,
1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288
	.save  = aurora_save,
	.outer_cache = {
		.inv_range   = aurora_inv_range,
		.clean_range = aurora_clean_range,
		.flush_range = aurora_flush_range,
		.flush_all   = l2x0_flush_all,
		.disable     = l2x0_disable,
		.sync        = l2x0_cache_sync,
		.resume      = aurora_resume,
	},
};

static const struct l2c_init_data of_aurora_no_outer_data __initconst = {
R
Russell King 已提交
1289
	.num_lock = 4,
1290
	.of_parse = aurora_of_parse,
1291
	.enable = aurora_enable_no_outer,
1292
	.fixup = aurora_fixup,
1293 1294 1295 1296 1297 1298
	.save  = aurora_save,
	.outer_cache = {
		.resume      = aurora_resume,
	},
};

1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431 1432 1433 1434 1435 1436 1437 1438 1439
/*
 * For certain Broadcom SoCs, depending on the address range, different offsets
 * need to be added to the address before passing it to L2 for
 * invalidation/clean/flush
 *
 * Section Address Range              Offset        EMI
 *   1     0x00000000 - 0x3FFFFFFF    0x80000000    VC
 *   2     0x40000000 - 0xBFFFFFFF    0x40000000    SYS
 *   3     0xC0000000 - 0xFFFFFFFF    0x80000000    VC
 *
 * When the start and end addresses have crossed two different sections, we
 * need to break the L2 operation into two, each within its own section.
 * For example, if we need to invalidate addresses starts at 0xBFFF0000 and
 * ends at 0xC0001000, we need do invalidate 1) 0xBFFF0000 - 0xBFFFFFFF and 2)
 * 0xC0000000 - 0xC0001000
 *
 * Note 1:
 * By breaking a single L2 operation into two, we may potentially suffer some
 * performance hit, but keep in mind the cross section case is very rare
 *
 * Note 2:
 * We do not need to handle the case when the start address is in
 * Section 1 and the end address is in Section 3, since it is not a valid use
 * case
 *
 * Note 3:
 * Section 1 in practical terms can no longer be used on rev A2. Because of
 * that the code does not need to handle section 1 at all.
 *
 */
#define BCM_SYS_EMI_START_ADDR        0x40000000UL
#define BCM_VC_EMI_SEC3_START_ADDR    0xC0000000UL

#define BCM_SYS_EMI_OFFSET            0x40000000UL
#define BCM_VC_EMI_OFFSET             0x80000000UL

static inline int bcm_addr_is_sys_emi(unsigned long addr)
{
	return (addr >= BCM_SYS_EMI_START_ADDR) &&
		(addr < BCM_VC_EMI_SEC3_START_ADDR);
}

static inline unsigned long bcm_l2_phys_addr(unsigned long addr)
{
	if (bcm_addr_is_sys_emi(addr))
		return addr + BCM_SYS_EMI_OFFSET;
	else
		return addr + BCM_VC_EMI_OFFSET;
}

static void bcm_inv_range(unsigned long start, unsigned long end)
{
	unsigned long new_start, new_end;

	BUG_ON(start < BCM_SYS_EMI_START_ADDR);

	if (unlikely(end <= start))
		return;

	new_start = bcm_l2_phys_addr(start);
	new_end = bcm_l2_phys_addr(end);

	/* normal case, no cross section between start and end */
	if (likely(bcm_addr_is_sys_emi(end) || !bcm_addr_is_sys_emi(start))) {
		l2x0_inv_range(new_start, new_end);
		return;
	}

	/* They cross sections, so it can only be a cross from section
	 * 2 to section 3
	 */
	l2x0_inv_range(new_start,
		bcm_l2_phys_addr(BCM_VC_EMI_SEC3_START_ADDR-1));
	l2x0_inv_range(bcm_l2_phys_addr(BCM_VC_EMI_SEC3_START_ADDR),
		new_end);
}

static void bcm_clean_range(unsigned long start, unsigned long end)
{
	unsigned long new_start, new_end;

	BUG_ON(start < BCM_SYS_EMI_START_ADDR);

	if (unlikely(end <= start))
		return;

	if ((end - start) >= l2x0_size) {
		l2x0_clean_all();
		return;
	}

	new_start = bcm_l2_phys_addr(start);
	new_end = bcm_l2_phys_addr(end);

	/* normal case, no cross section between start and end */
	if (likely(bcm_addr_is_sys_emi(end) || !bcm_addr_is_sys_emi(start))) {
		l2x0_clean_range(new_start, new_end);
		return;
	}

	/* They cross sections, so it can only be a cross from section
	 * 2 to section 3
	 */
	l2x0_clean_range(new_start,
		bcm_l2_phys_addr(BCM_VC_EMI_SEC3_START_ADDR-1));
	l2x0_clean_range(bcm_l2_phys_addr(BCM_VC_EMI_SEC3_START_ADDR),
		new_end);
}

static void bcm_flush_range(unsigned long start, unsigned long end)
{
	unsigned long new_start, new_end;

	BUG_ON(start < BCM_SYS_EMI_START_ADDR);

	if (unlikely(end <= start))
		return;

	if ((end - start) >= l2x0_size) {
		l2x0_flush_all();
		return;
	}

	new_start = bcm_l2_phys_addr(start);
	new_end = bcm_l2_phys_addr(end);

	/* normal case, no cross section between start and end */
	if (likely(bcm_addr_is_sys_emi(end) || !bcm_addr_is_sys_emi(start))) {
		l2x0_flush_range(new_start, new_end);
		return;
	}

	/* They cross sections, so it can only be a cross from section
	 * 2 to section 3
	 */
	l2x0_flush_range(new_start,
		bcm_l2_phys_addr(BCM_VC_EMI_SEC3_START_ADDR-1));
	l2x0_flush_range(bcm_l2_phys_addr(BCM_VC_EMI_SEC3_START_ADDR),
		new_end);
}

1440
static const struct l2c_init_data of_bcm_l2x0_data __initconst = {
R
Russell King 已提交
1441
	.num_lock = 8,
1442
	.of_parse = l2c310_of_parse,
R
Russell King 已提交
1443
	.enable = l2c_enable,
1444
	.fixup = l2c310_fixup,
1445
	.save  = l2c310_save,
1446 1447 1448 1449
	.outer_cache = {
		.inv_range   = bcm_inv_range,
		.clean_range = bcm_clean_range,
		.flush_range = bcm_flush_range,
1450 1451 1452
		.flush_all   = l2c210_flush_all,
		.disable     = l2c_disable,
		.sync        = l2c210_sync,
1453
		.resume      = l2c310_resume,
1454 1455
	},
};
1456

1457
static void __init tauros3_save(void __iomem *base)
1458 1459
{
	l2x0_saved_regs.aux2_ctrl =
1460
		readl_relaxed(base + TAUROS3_AUX2_CTRL);
1461
	l2x0_saved_regs.prefetch_ctrl =
1462
		readl_relaxed(base + L2X0_PREFETCH_CTRL);
1463 1464 1465 1466
}

static void tauros3_resume(void)
{
1467 1468 1469
	void __iomem *base = l2x0_base;

	if (!(readl_relaxed(base + L2X0_CTRL) & L2X0_CTRL_EN)) {
1470
		writel_relaxed(l2x0_saved_regs.aux2_ctrl,
1471
			       base + TAUROS3_AUX2_CTRL);
1472
		writel_relaxed(l2x0_saved_regs.prefetch_ctrl,
1473
			       base + L2X0_PREFETCH_CTRL);
1474

1475 1476
		l2c_enable(base, l2x0_saved_regs.aux_ctrl, 8);
	}
1477 1478
}

1479
static const struct l2c_init_data of_tauros3_data __initconst = {
R
Russell King 已提交
1480 1481
	.num_lock = 8,
	.enable = l2c_enable,
1482 1483 1484 1485 1486 1487 1488
	.save  = tauros3_save,
	/* Tauros3 broadcasts L1 cache operations to L2 */
	.outer_cache = {
		.resume      = tauros3_resume,
	},
};

1489
#define L2C_ID(name, fns) { .compatible = name, .data = (void *)&fns }
1490
static const struct of_device_id l2x0_ids[] __initconst = {
1491
	L2C_ID("arm,l210-cache", of_l2c210_data),
1492
	L2C_ID("arm,l220-cache", of_l2c220_data),
1493
	L2C_ID("arm,pl310-cache", of_l2c310_data),
1494 1495 1496 1497
	L2C_ID("brcm,bcm11351-a2-pl310-cache", of_bcm_l2x0_data),
	L2C_ID("marvell,aurora-outer-cache", of_aurora_with_outer_data),
	L2C_ID("marvell,aurora-system-cache", of_aurora_no_outer_data),
	L2C_ID("marvell,tauros3-cache", of_tauros3_data),
1498
	/* Deprecated IDs */
1499
	L2C_ID("bcm,bcm11351-a2-pl310-cache", of_bcm_l2x0_data),
1500 1501 1502
	{}
};

1503
int __init l2x0_of_init(u32 aux_val, u32 aux_mask)
1504
{
1505
	const struct l2c_init_data *data;
1506
	struct device_node *np;
1507
	struct resource res;
1508
	u32 cache_id;
1509 1510 1511 1512

	np = of_find_matching_node(NULL, l2x0_ids);
	if (!np)
		return -ENODEV;
1513 1514 1515 1516 1517

	if (of_address_to_resource(np, 0, &res))
		return -ENODEV;

	l2x0_base = ioremap(res.start, resource_size(&res));
1518 1519 1520
	if (!l2x0_base)
		return -ENOMEM;

1521 1522 1523 1524
	l2x0_saved_regs.phy_base = res.start;

	data = of_match_node(l2x0_ids, np)->data;

1525
	/* L2 configuration can only be changed if the cache is disabled */
1526
	if (!(readl_relaxed(l2x0_base + L2X0_CTRL) & L2X0_CTRL_EN))
1527 1528
		if (data->of_parse)
			data->of_parse(np, &aux_val, &aux_mask);
1529

1530 1531 1532 1533 1534 1535
	if (cache_id_part_number_from_dt)
		cache_id = cache_id_part_number_from_dt;
	else
		cache_id = readl_relaxed(l2x0_base + L2X0_CACHE_ID);

	__l2c_init(data, aux_val, aux_mask, cache_id);
1536

1537 1538 1539
	return 0;
}
#endif