| /* | 
 |  * Copyright 2010 Tilera Corporation. All Rights Reserved. | 
 |  * | 
 |  *   This program is free software; you can redistribute it and/or | 
 |  *   modify it under the terms of the GNU General Public License | 
 |  *   as published by the Free Software Foundation, version 2. | 
 |  * | 
 |  *   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, GOOD TITLE or | 
 |  *   NON INFRINGEMENT.  See the GNU General Public License for | 
 |  *   more details. | 
 |  */ | 
 |  | 
 | #include <asm/page.h> | 
 | #include <asm/cacheflush.h> | 
 | #include <arch/icache.h> | 
 |  | 
 |  | 
 | void __flush_icache_range(unsigned long start, unsigned long end) | 
 | { | 
 | 	invalidate_icache((const void *)start, end - start, PAGE_SIZE); | 
 | } | 
 |  | 
 |  | 
 | /* Force a load instruction to issue. */ | 
 | static inline void force_load(char *p) | 
 | { | 
 | 	*(volatile char *)p; | 
 | } | 
 |  | 
 | /* | 
 |  * Flush and invalidate a VA range that is homed remotely on a single | 
 |  * core (if "!hfh") or homed via hash-for-home (if "hfh"), waiting | 
 |  * until the memory controller holds the flushed values. | 
 |  */ | 
 | void finv_buffer_remote(void *buffer, size_t size, int hfh) | 
 | { | 
 | 	char *p, *base; | 
 | 	size_t step_size, load_count; | 
 | 	const unsigned long STRIPE_WIDTH = 8192; | 
 |  | 
 | 	/* | 
 | 	 * Flush and invalidate the buffer out of the local L1/L2 | 
 | 	 * and request the home cache to flush and invalidate as well. | 
 | 	 */ | 
 | 	__finv_buffer(buffer, size); | 
 |  | 
 | 	/* | 
 | 	 * Wait for the home cache to acknowledge that it has processed | 
 | 	 * all the flush-and-invalidate requests.  This does not mean | 
 | 	 * that the flushed data has reached the memory controller yet, | 
 | 	 * but it does mean the home cache is processing the flushes. | 
 | 	 */ | 
 | 	__insn_mf(); | 
 |  | 
 | 	/* | 
 | 	 * Issue a load to the last cache line, which can't complete | 
 | 	 * until all the previously-issued flushes to the same memory | 
 | 	 * controller have also completed.  If we weren't striping | 
 | 	 * memory, that one load would be sufficient, but since we may | 
 | 	 * be, we also need to back up to the last load issued to | 
 | 	 * another memory controller, which would be the point where | 
 | 	 * we crossed an 8KB boundary (the granularity of striping | 
 | 	 * across memory controllers).  Keep backing up and doing this | 
 | 	 * until we are before the beginning of the buffer, or have | 
 | 	 * hit all the controllers. | 
 | 	 * | 
 | 	 * If we are flushing a hash-for-home buffer, it's even worse. | 
 | 	 * Each line may be homed on a different tile, and each tile | 
 | 	 * may have up to four lines that are on different | 
 | 	 * controllers.  So as we walk backwards, we have to touch | 
 | 	 * enough cache lines to satisfy these constraints.  In | 
 | 	 * practice this ends up being close enough to "load from | 
 | 	 * every cache line on a full memory stripe on each | 
 | 	 * controller" that we simply do that, to simplify the logic. | 
 | 	 * | 
 | 	 * FIXME: See bug 9535 for some issues with this code. | 
 | 	 */ | 
 | 	if (hfh) { | 
 | 		step_size = L2_CACHE_BYTES; | 
 | 		load_count = (STRIPE_WIDTH / L2_CACHE_BYTES) * | 
 | 			      (1 << CHIP_LOG_NUM_MSHIMS()); | 
 | 	} else { | 
 | 		step_size = STRIPE_WIDTH; | 
 | 		load_count = (1 << CHIP_LOG_NUM_MSHIMS()); | 
 | 	} | 
 |  | 
 | 	/* Load the last byte of the buffer. */ | 
 | 	p = (char *)buffer + size - 1; | 
 | 	force_load(p); | 
 |  | 
 | 	/* Bump down to the end of the previous stripe or cache line. */ | 
 | 	p -= step_size; | 
 | 	p = (char *)((unsigned long)p | (step_size - 1)); | 
 |  | 
 | 	/* Figure out how far back we need to go. */ | 
 | 	base = p - (step_size * (load_count - 2)); | 
 | 	if ((long)base < (long)buffer) | 
 | 		base = buffer; | 
 |  | 
 | 	/* | 
 | 	 * Fire all the loads we need.  The MAF only has eight entries | 
 | 	 * so we can have at most eight outstanding loads, so we | 
 | 	 * unroll by that amount. | 
 | 	 */ | 
 | #pragma unroll 8 | 
 | 	for (; p >= base; p -= step_size) | 
 | 		force_load(p); | 
 |  | 
 | 	/* | 
 | 	 * Repeat, but with inv's instead of loads, to get rid of the | 
 | 	 * data we just loaded into our own cache and the old home L3. | 
 | 	 * No need to unroll since inv's don't target a register. | 
 | 	 */ | 
 | 	p = (char *)buffer + size - 1; | 
 | 	__insn_inv(p); | 
 | 	p -= step_size; | 
 | 	p = (char *)((unsigned long)p | (step_size - 1)); | 
 | 	for (; p >= base; p -= step_size) | 
 | 		__insn_inv(p); | 
 |  | 
 | 	/* Wait for the load+inv's (and thus finvs) to have completed. */ | 
 | 	__insn_mf(); | 
 | } |