848 lines
26 KiB
C
848 lines
26 KiB
C
/*
|
|
* IEEE 1394 for Linux
|
|
*
|
|
* CSR implementation, iso/bus manager implementation.
|
|
*
|
|
* Copyright (C) 1999 Andreas E. Bombe
|
|
* 2002 Manfred Weihs <weihs@ict.tuwien.ac.at>
|
|
*
|
|
* This code is licensed under the GPL. See the file COPYING in the root
|
|
* directory of the kernel sources for details.
|
|
*
|
|
*
|
|
* Contributions:
|
|
*
|
|
* Manfred Weihs <weihs@ict.tuwien.ac.at>
|
|
* configuration ROM manipulation
|
|
*
|
|
*/
|
|
|
|
#include <linux/jiffies.h>
|
|
#include <linux/kernel.h>
|
|
#include <linux/module.h>
|
|
#include <linux/moduleparam.h>
|
|
#include <linux/param.h>
|
|
#include <linux/spinlock.h>
|
|
#include <linux/string.h>
|
|
|
|
#include "csr1212.h"
|
|
#include "ieee1394_types.h"
|
|
#include "hosts.h"
|
|
#include "ieee1394.h"
|
|
#include "highlevel.h"
|
|
#include "ieee1394_core.h"
|
|
|
|
/* Module Parameters */
|
|
/* this module parameter can be used to disable mapping of the FCP registers */
|
|
|
|
static int fcp = 1;
|
|
module_param(fcp, int, 0444);
|
|
MODULE_PARM_DESC(fcp, "Map FCP registers (default = 1, disable = 0).");
|
|
|
|
static struct csr1212_keyval *node_cap = NULL;
|
|
|
|
static void add_host(struct hpsb_host *host);
|
|
static void remove_host(struct hpsb_host *host);
|
|
static void host_reset(struct hpsb_host *host);
|
|
static int read_maps(struct hpsb_host *host, int nodeid, quadlet_t *buffer,
|
|
u64 addr, size_t length, u16 fl);
|
|
static int write_fcp(struct hpsb_host *host, int nodeid, int dest,
|
|
quadlet_t *data, u64 addr, size_t length, u16 flags);
|
|
static int read_regs(struct hpsb_host *host, int nodeid, quadlet_t *buf,
|
|
u64 addr, size_t length, u16 flags);
|
|
static int write_regs(struct hpsb_host *host, int nodeid, int destid,
|
|
quadlet_t *data, u64 addr, size_t length, u16 flags);
|
|
static int lock_regs(struct hpsb_host *host, int nodeid, quadlet_t *store,
|
|
u64 addr, quadlet_t data, quadlet_t arg, int extcode, u16 fl);
|
|
static int lock64_regs(struct hpsb_host *host, int nodeid, octlet_t * store,
|
|
u64 addr, octlet_t data, octlet_t arg, int extcode, u16 fl);
|
|
static int read_config_rom(struct hpsb_host *host, int nodeid, quadlet_t *buffer,
|
|
u64 addr, size_t length, u16 fl);
|
|
static u64 allocate_addr_range(u64 size, u32 alignment, void *__host);
|
|
static void release_addr_range(u64 addr, void *__host);
|
|
|
|
static struct hpsb_highlevel csr_highlevel = {
|
|
.name = "standard registers",
|
|
.add_host = add_host,
|
|
.remove_host = remove_host,
|
|
.host_reset = host_reset,
|
|
};
|
|
|
|
static struct hpsb_address_ops map_ops = {
|
|
.read = read_maps,
|
|
};
|
|
|
|
static struct hpsb_address_ops fcp_ops = {
|
|
.write = write_fcp,
|
|
};
|
|
|
|
static struct hpsb_address_ops reg_ops = {
|
|
.read = read_regs,
|
|
.write = write_regs,
|
|
.lock = lock_regs,
|
|
.lock64 = lock64_regs,
|
|
};
|
|
|
|
static struct hpsb_address_ops config_rom_ops = {
|
|
.read = read_config_rom,
|
|
};
|
|
|
|
struct csr1212_bus_ops csr_bus_ops = {
|
|
.allocate_addr_range = allocate_addr_range,
|
|
.release_addr = release_addr_range,
|
|
};
|
|
|
|
|
|
static u16 csr_crc16(unsigned *data, int length)
|
|
{
|
|
int check=0, i;
|
|
int shift, sum, next=0;
|
|
|
|
for (i = length; i; i--) {
|
|
for (next = check, shift = 28; shift >= 0; shift -= 4 ) {
|
|
sum = ((next >> 12) ^ (be32_to_cpu(*data) >> shift)) & 0xf;
|
|
next = (next << 4) ^ (sum << 12) ^ (sum << 5) ^ (sum);
|
|
}
|
|
check = next & 0xffff;
|
|
data++;
|
|
}
|
|
|
|
return check;
|
|
}
|
|
|
|
static void host_reset(struct hpsb_host *host)
|
|
{
|
|
host->csr.state &= 0x300;
|
|
|
|
host->csr.bus_manager_id = 0x3f;
|
|
host->csr.bandwidth_available = 4915;
|
|
host->csr.channels_available_hi = 0xfffffffe; /* pre-alloc ch 31 per 1394a-2000 */
|
|
host->csr.channels_available_lo = ~0;
|
|
host->csr.broadcast_channel = 0x80000000 | 31;
|
|
|
|
if (host->is_irm) {
|
|
if (host->driver->hw_csr_reg) {
|
|
host->driver->hw_csr_reg(host, 2, 0xfffffffe, ~0);
|
|
}
|
|
}
|
|
|
|
host->csr.node_ids = host->node_id << 16;
|
|
|
|
if (!host->is_root) {
|
|
/* clear cmstr bit */
|
|
host->csr.state &= ~0x100;
|
|
}
|
|
|
|
host->csr.topology_map[1] =
|
|
cpu_to_be32(be32_to_cpu(host->csr.topology_map[1]) + 1);
|
|
host->csr.topology_map[2] = cpu_to_be32(host->node_count << 16
|
|
| host->selfid_count);
|
|
host->csr.topology_map[0] =
|
|
cpu_to_be32((host->selfid_count + 2) << 16
|
|
| csr_crc16(host->csr.topology_map + 1,
|
|
host->selfid_count + 2));
|
|
|
|
host->csr.speed_map[1] =
|
|
cpu_to_be32(be32_to_cpu(host->csr.speed_map[1]) + 1);
|
|
host->csr.speed_map[0] = cpu_to_be32(0x3f1 << 16
|
|
| csr_crc16(host->csr.speed_map+1,
|
|
0x3f1));
|
|
}
|
|
|
|
/*
|
|
* HI == seconds (bits 0:2)
|
|
* LO == fractions of a second in units of 125usec (bits 19:31)
|
|
*
|
|
* Convert SPLIT_TIMEOUT to jiffies.
|
|
* The default and minimum as per 1394a-2000 clause 8.3.2.2.6 is 100ms.
|
|
*/
|
|
static inline void calculate_expire(struct csr_control *csr)
|
|
{
|
|
unsigned long usecs =
|
|
(csr->split_timeout_hi & 0x07) * USEC_PER_SEC +
|
|
(csr->split_timeout_lo >> 19) * 125L;
|
|
|
|
csr->expire = usecs_to_jiffies(usecs > 100000L ? usecs : 100000L);
|
|
|
|
HPSB_VERBOSE("CSR: setting expire to %lu, HZ=%u", csr->expire, HZ);
|
|
}
|
|
|
|
|
|
static void add_host(struct hpsb_host *host)
|
|
{
|
|
struct csr1212_keyval *root;
|
|
quadlet_t bus_info[CSR_BUS_INFO_SIZE];
|
|
|
|
hpsb_register_addrspace(&csr_highlevel, host, ®_ops,
|
|
CSR_REGISTER_BASE,
|
|
CSR_REGISTER_BASE + CSR_CONFIG_ROM);
|
|
hpsb_register_addrspace(&csr_highlevel, host, &config_rom_ops,
|
|
CSR_REGISTER_BASE + CSR_CONFIG_ROM,
|
|
CSR_REGISTER_BASE + CSR_CONFIG_ROM_END);
|
|
if (fcp) {
|
|
hpsb_register_addrspace(&csr_highlevel, host, &fcp_ops,
|
|
CSR_REGISTER_BASE + CSR_FCP_COMMAND,
|
|
CSR_REGISTER_BASE + CSR_FCP_END);
|
|
}
|
|
hpsb_register_addrspace(&csr_highlevel, host, &map_ops,
|
|
CSR_REGISTER_BASE + CSR_TOPOLOGY_MAP,
|
|
CSR_REGISTER_BASE + CSR_TOPOLOGY_MAP_END);
|
|
hpsb_register_addrspace(&csr_highlevel, host, &map_ops,
|
|
CSR_REGISTER_BASE + CSR_SPEED_MAP,
|
|
CSR_REGISTER_BASE + CSR_SPEED_MAP_END);
|
|
|
|
spin_lock_init(&host->csr.lock);
|
|
|
|
host->csr.state = 0;
|
|
host->csr.node_ids = 0;
|
|
host->csr.split_timeout_hi = 0;
|
|
host->csr.split_timeout_lo = 800 << 19;
|
|
calculate_expire(&host->csr);
|
|
host->csr.cycle_time = 0;
|
|
host->csr.bus_time = 0;
|
|
host->csr.bus_manager_id = 0x3f;
|
|
host->csr.bandwidth_available = 4915;
|
|
host->csr.channels_available_hi = 0xfffffffe; /* pre-alloc ch 31 per 1394a-2000 */
|
|
host->csr.channels_available_lo = ~0;
|
|
host->csr.broadcast_channel = 0x80000000 | 31;
|
|
|
|
if (host->is_irm) {
|
|
if (host->driver->hw_csr_reg) {
|
|
host->driver->hw_csr_reg(host, 2, 0xfffffffe, ~0);
|
|
}
|
|
}
|
|
|
|
if (host->csr.max_rec >= 9)
|
|
host->csr.max_rom = 2;
|
|
else if (host->csr.max_rec >= 5)
|
|
host->csr.max_rom = 1;
|
|
else
|
|
host->csr.max_rom = 0;
|
|
|
|
host->csr.generation = 2;
|
|
|
|
bus_info[1] = __constant_cpu_to_be32(0x31333934);
|
|
bus_info[2] = cpu_to_be32((hpsb_disable_irm ? 0 : 1 << CSR_IRMC_SHIFT) |
|
|
(1 << CSR_CMC_SHIFT) |
|
|
(1 << CSR_ISC_SHIFT) |
|
|
(0 << CSR_BMC_SHIFT) |
|
|
(0 << CSR_PMC_SHIFT) |
|
|
(host->csr.cyc_clk_acc << CSR_CYC_CLK_ACC_SHIFT) |
|
|
(host->csr.max_rec << CSR_MAX_REC_SHIFT) |
|
|
(host->csr.max_rom << CSR_MAX_ROM_SHIFT) |
|
|
(host->csr.generation << CSR_GENERATION_SHIFT) |
|
|
host->csr.lnk_spd);
|
|
|
|
bus_info[3] = cpu_to_be32(host->csr.guid_hi);
|
|
bus_info[4] = cpu_to_be32(host->csr.guid_lo);
|
|
|
|
/* The hardware copy of the bus info block will be set later when a
|
|
* bus reset is issued. */
|
|
|
|
csr1212_init_local_csr(host->csr.rom, bus_info, host->csr.max_rom);
|
|
|
|
root = host->csr.rom->root_kv;
|
|
|
|
if(csr1212_attach_keyval_to_directory(root, node_cap) != CSR1212_SUCCESS) {
|
|
HPSB_ERR("Failed to attach Node Capabilities to root directory");
|
|
}
|
|
|
|
host->update_config_rom = 1;
|
|
}
|
|
|
|
static void remove_host(struct hpsb_host *host)
|
|
{
|
|
quadlet_t bus_info[CSR_BUS_INFO_SIZE];
|
|
|
|
bus_info[1] = __constant_cpu_to_be32(0x31333934);
|
|
bus_info[2] = cpu_to_be32((0 << CSR_IRMC_SHIFT) |
|
|
(0 << CSR_CMC_SHIFT) |
|
|
(0 << CSR_ISC_SHIFT) |
|
|
(0 << CSR_BMC_SHIFT) |
|
|
(0 << CSR_PMC_SHIFT) |
|
|
(host->csr.cyc_clk_acc << CSR_CYC_CLK_ACC_SHIFT) |
|
|
(host->csr.max_rec << CSR_MAX_REC_SHIFT) |
|
|
(0 << CSR_MAX_ROM_SHIFT) |
|
|
(0 << CSR_GENERATION_SHIFT) |
|
|
host->csr.lnk_spd);
|
|
|
|
bus_info[3] = cpu_to_be32(host->csr.guid_hi);
|
|
bus_info[4] = cpu_to_be32(host->csr.guid_lo);
|
|
|
|
csr1212_detach_keyval_from_directory(host->csr.rom->root_kv, node_cap);
|
|
|
|
csr1212_init_local_csr(host->csr.rom, bus_info, 0);
|
|
host->update_config_rom = 1;
|
|
}
|
|
|
|
|
|
int hpsb_update_config_rom(struct hpsb_host *host, const quadlet_t *new_rom,
|
|
size_t buffersize, unsigned char rom_version)
|
|
{
|
|
unsigned long flags;
|
|
int ret;
|
|
|
|
HPSB_NOTICE("hpsb_update_config_rom() is deprecated");
|
|
|
|
spin_lock_irqsave(&host->csr.lock, flags);
|
|
if (rom_version != host->csr.generation)
|
|
ret = -1;
|
|
else if (buffersize > host->csr.rom->cache_head->size)
|
|
ret = -2;
|
|
else {
|
|
/* Just overwrite the generated ConfigROM image with new data,
|
|
* it can be regenerated later. */
|
|
memcpy(host->csr.rom->cache_head->data, new_rom, buffersize);
|
|
host->csr.rom->cache_head->len = buffersize;
|
|
|
|
if (host->driver->set_hw_config_rom)
|
|
host->driver->set_hw_config_rom(host, host->csr.rom->bus_info_data);
|
|
/* Increment the generation number to keep some sort of sync
|
|
* with the newer ConfigROM manipulation method. */
|
|
host->csr.generation++;
|
|
if (host->csr.generation > 0xf || host->csr.generation < 2)
|
|
host->csr.generation = 2;
|
|
ret=0;
|
|
}
|
|
spin_unlock_irqrestore(&host->csr.lock, flags);
|
|
return ret;
|
|
}
|
|
|
|
|
|
/* Read topology / speed maps and configuration ROM */
|
|
static int read_maps(struct hpsb_host *host, int nodeid, quadlet_t *buffer,
|
|
u64 addr, size_t length, u16 fl)
|
|
{
|
|
unsigned long flags;
|
|
int csraddr = addr - CSR_REGISTER_BASE;
|
|
const char *src;
|
|
|
|
spin_lock_irqsave(&host->csr.lock, flags);
|
|
|
|
if (csraddr < CSR_SPEED_MAP) {
|
|
src = ((char *)host->csr.topology_map) + csraddr
|
|
- CSR_TOPOLOGY_MAP;
|
|
} else {
|
|
src = ((char *)host->csr.speed_map) + csraddr - CSR_SPEED_MAP;
|
|
}
|
|
|
|
memcpy(buffer, src, length);
|
|
spin_unlock_irqrestore(&host->csr.lock, flags);
|
|
return RCODE_COMPLETE;
|
|
}
|
|
|
|
|
|
#define out if (--length == 0) break
|
|
|
|
static int read_regs(struct hpsb_host *host, int nodeid, quadlet_t *buf,
|
|
u64 addr, size_t length, u16 flags)
|
|
{
|
|
int csraddr = addr - CSR_REGISTER_BASE;
|
|
int oldcycle;
|
|
quadlet_t ret;
|
|
|
|
if ((csraddr | length) & 0x3)
|
|
return RCODE_TYPE_ERROR;
|
|
|
|
length /= 4;
|
|
|
|
switch (csraddr) {
|
|
case CSR_STATE_CLEAR:
|
|
*(buf++) = cpu_to_be32(host->csr.state);
|
|
out;
|
|
case CSR_STATE_SET:
|
|
*(buf++) = cpu_to_be32(host->csr.state);
|
|
out;
|
|
case CSR_NODE_IDS:
|
|
*(buf++) = cpu_to_be32(host->csr.node_ids);
|
|
out;
|
|
|
|
case CSR_RESET_START:
|
|
return RCODE_TYPE_ERROR;
|
|
|
|
/* address gap - handled by default below */
|
|
|
|
case CSR_SPLIT_TIMEOUT_HI:
|
|
*(buf++) = cpu_to_be32(host->csr.split_timeout_hi);
|
|
out;
|
|
case CSR_SPLIT_TIMEOUT_LO:
|
|
*(buf++) = cpu_to_be32(host->csr.split_timeout_lo);
|
|
out;
|
|
|
|
/* address gap */
|
|
return RCODE_ADDRESS_ERROR;
|
|
|
|
case CSR_CYCLE_TIME:
|
|
oldcycle = host->csr.cycle_time;
|
|
host->csr.cycle_time =
|
|
host->driver->devctl(host, GET_CYCLE_COUNTER, 0);
|
|
|
|
if (oldcycle > host->csr.cycle_time) {
|
|
/* cycle time wrapped around */
|
|
host->csr.bus_time += 1 << 7;
|
|
}
|
|
*(buf++) = cpu_to_be32(host->csr.cycle_time);
|
|
out;
|
|
case CSR_BUS_TIME:
|
|
oldcycle = host->csr.cycle_time;
|
|
host->csr.cycle_time =
|
|
host->driver->devctl(host, GET_CYCLE_COUNTER, 0);
|
|
|
|
if (oldcycle > host->csr.cycle_time) {
|
|
/* cycle time wrapped around */
|
|
host->csr.bus_time += (1 << 7);
|
|
}
|
|
*(buf++) = cpu_to_be32(host->csr.bus_time
|
|
| (host->csr.cycle_time >> 25));
|
|
out;
|
|
|
|
/* address gap */
|
|
return RCODE_ADDRESS_ERROR;
|
|
|
|
case CSR_BUSY_TIMEOUT:
|
|
/* not yet implemented */
|
|
return RCODE_ADDRESS_ERROR;
|
|
|
|
case CSR_BUS_MANAGER_ID:
|
|
if (host->driver->hw_csr_reg)
|
|
ret = host->driver->hw_csr_reg(host, 0, 0, 0);
|
|
else
|
|
ret = host->csr.bus_manager_id;
|
|
|
|
*(buf++) = cpu_to_be32(ret);
|
|
out;
|
|
case CSR_BANDWIDTH_AVAILABLE:
|
|
if (host->driver->hw_csr_reg)
|
|
ret = host->driver->hw_csr_reg(host, 1, 0, 0);
|
|
else
|
|
ret = host->csr.bandwidth_available;
|
|
|
|
*(buf++) = cpu_to_be32(ret);
|
|
out;
|
|
case CSR_CHANNELS_AVAILABLE_HI:
|
|
if (host->driver->hw_csr_reg)
|
|
ret = host->driver->hw_csr_reg(host, 2, 0, 0);
|
|
else
|
|
ret = host->csr.channels_available_hi;
|
|
|
|
*(buf++) = cpu_to_be32(ret);
|
|
out;
|
|
case CSR_CHANNELS_AVAILABLE_LO:
|
|
if (host->driver->hw_csr_reg)
|
|
ret = host->driver->hw_csr_reg(host, 3, 0, 0);
|
|
else
|
|
ret = host->csr.channels_available_lo;
|
|
|
|
*(buf++) = cpu_to_be32(ret);
|
|
out;
|
|
|
|
case CSR_BROADCAST_CHANNEL:
|
|
*(buf++) = cpu_to_be32(host->csr.broadcast_channel);
|
|
out;
|
|
|
|
/* address gap to end - fall through to default */
|
|
default:
|
|
return RCODE_ADDRESS_ERROR;
|
|
}
|
|
|
|
return RCODE_COMPLETE;
|
|
}
|
|
|
|
static int write_regs(struct hpsb_host *host, int nodeid, int destid,
|
|
quadlet_t *data, u64 addr, size_t length, u16 flags)
|
|
{
|
|
int csraddr = addr - CSR_REGISTER_BASE;
|
|
|
|
if ((csraddr | length) & 0x3)
|
|
return RCODE_TYPE_ERROR;
|
|
|
|
length /= 4;
|
|
|
|
switch (csraddr) {
|
|
case CSR_STATE_CLEAR:
|
|
/* FIXME FIXME FIXME */
|
|
printk("doh, someone wants to mess with state clear\n");
|
|
out;
|
|
case CSR_STATE_SET:
|
|
printk("doh, someone wants to mess with state set\n");
|
|
out;
|
|
|
|
case CSR_NODE_IDS:
|
|
host->csr.node_ids &= NODE_MASK << 16;
|
|
host->csr.node_ids |= be32_to_cpu(*(data++)) & (BUS_MASK << 16);
|
|
host->node_id = host->csr.node_ids >> 16;
|
|
host->driver->devctl(host, SET_BUS_ID, host->node_id >> 6);
|
|
out;
|
|
|
|
case CSR_RESET_START:
|
|
/* FIXME - perform command reset */
|
|
out;
|
|
|
|
/* address gap */
|
|
return RCODE_ADDRESS_ERROR;
|
|
|
|
case CSR_SPLIT_TIMEOUT_HI:
|
|
host->csr.split_timeout_hi =
|
|
be32_to_cpu(*(data++)) & 0x00000007;
|
|
calculate_expire(&host->csr);
|
|
out;
|
|
case CSR_SPLIT_TIMEOUT_LO:
|
|
host->csr.split_timeout_lo =
|
|
be32_to_cpu(*(data++)) & 0xfff80000;
|
|
calculate_expire(&host->csr);
|
|
out;
|
|
|
|
/* address gap */
|
|
return RCODE_ADDRESS_ERROR;
|
|
|
|
case CSR_CYCLE_TIME:
|
|
/* should only be set by cycle start packet, automatically */
|
|
host->csr.cycle_time = be32_to_cpu(*data);
|
|
host->driver->devctl(host, SET_CYCLE_COUNTER,
|
|
be32_to_cpu(*(data++)));
|
|
out;
|
|
case CSR_BUS_TIME:
|
|
host->csr.bus_time = be32_to_cpu(*(data++)) & 0xffffff80;
|
|
out;
|
|
|
|
/* address gap */
|
|
return RCODE_ADDRESS_ERROR;
|
|
|
|
case CSR_BUSY_TIMEOUT:
|
|
/* not yet implemented */
|
|
return RCODE_ADDRESS_ERROR;
|
|
|
|
case CSR_BUS_MANAGER_ID:
|
|
case CSR_BANDWIDTH_AVAILABLE:
|
|
case CSR_CHANNELS_AVAILABLE_HI:
|
|
case CSR_CHANNELS_AVAILABLE_LO:
|
|
/* these are not writable, only lockable */
|
|
return RCODE_TYPE_ERROR;
|
|
|
|
case CSR_BROADCAST_CHANNEL:
|
|
/* only the valid bit can be written */
|
|
host->csr.broadcast_channel = (host->csr.broadcast_channel & ~0x40000000)
|
|
| (be32_to_cpu(*data) & 0x40000000);
|
|
out;
|
|
|
|
/* address gap to end - fall through */
|
|
default:
|
|
return RCODE_ADDRESS_ERROR;
|
|
}
|
|
|
|
return RCODE_COMPLETE;
|
|
}
|
|
|
|
#undef out
|
|
|
|
|
|
static int lock_regs(struct hpsb_host *host, int nodeid, quadlet_t *store,
|
|
u64 addr, quadlet_t data, quadlet_t arg, int extcode, u16 fl)
|
|
{
|
|
int csraddr = addr - CSR_REGISTER_BASE;
|
|
unsigned long flags;
|
|
quadlet_t *regptr = NULL;
|
|
|
|
if (csraddr & 0x3)
|
|
return RCODE_TYPE_ERROR;
|
|
|
|
if (csraddr < CSR_BUS_MANAGER_ID || csraddr > CSR_CHANNELS_AVAILABLE_LO
|
|
|| extcode != EXTCODE_COMPARE_SWAP)
|
|
goto unsupported_lockreq;
|
|
|
|
data = be32_to_cpu(data);
|
|
arg = be32_to_cpu(arg);
|
|
|
|
/* Is somebody releasing the broadcast_channel on us? */
|
|
if (csraddr == CSR_CHANNELS_AVAILABLE_HI && (data & 0x1)) {
|
|
/* Note: this is may not be the right way to handle
|
|
* the problem, so we should look into the proper way
|
|
* eventually. */
|
|
HPSB_WARN("Node [" NODE_BUS_FMT "] wants to release "
|
|
"broadcast channel 31. Ignoring.",
|
|
NODE_BUS_ARGS(host, nodeid));
|
|
|
|
data &= ~0x1; /* keep broadcast channel allocated */
|
|
}
|
|
|
|
if (host->driver->hw_csr_reg) {
|
|
quadlet_t old;
|
|
|
|
old = host->driver->
|
|
hw_csr_reg(host, (csraddr - CSR_BUS_MANAGER_ID) >> 2,
|
|
data, arg);
|
|
|
|
*store = cpu_to_be32(old);
|
|
return RCODE_COMPLETE;
|
|
}
|
|
|
|
spin_lock_irqsave(&host->csr.lock, flags);
|
|
|
|
switch (csraddr) {
|
|
case CSR_BUS_MANAGER_ID:
|
|
regptr = &host->csr.bus_manager_id;
|
|
*store = cpu_to_be32(*regptr);
|
|
if (*regptr == arg)
|
|
*regptr = data;
|
|
break;
|
|
|
|
case CSR_BANDWIDTH_AVAILABLE:
|
|
{
|
|
quadlet_t bandwidth;
|
|
quadlet_t old;
|
|
quadlet_t new;
|
|
|
|
regptr = &host->csr.bandwidth_available;
|
|
old = *regptr;
|
|
|
|
/* bandwidth available algorithm adapted from IEEE 1394a-2000 spec */
|
|
if (arg > 0x1fff) {
|
|
*store = cpu_to_be32(old); /* change nothing */
|
|
break;
|
|
}
|
|
data &= 0x1fff;
|
|
if (arg >= data) {
|
|
/* allocate bandwidth */
|
|
bandwidth = arg - data;
|
|
if (old >= bandwidth) {
|
|
new = old - bandwidth;
|
|
*store = cpu_to_be32(arg);
|
|
*regptr = new;
|
|
} else {
|
|
*store = cpu_to_be32(old);
|
|
}
|
|
} else {
|
|
/* deallocate bandwidth */
|
|
bandwidth = data - arg;
|
|
if (old + bandwidth < 0x2000) {
|
|
new = old + bandwidth;
|
|
*store = cpu_to_be32(arg);
|
|
*regptr = new;
|
|
} else {
|
|
*store = cpu_to_be32(old);
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
|
|
case CSR_CHANNELS_AVAILABLE_HI:
|
|
{
|
|
/* Lock algorithm for CHANNELS_AVAILABLE as recommended by 1394a-2000 */
|
|
quadlet_t affected_channels = arg ^ data;
|
|
|
|
regptr = &host->csr.channels_available_hi;
|
|
|
|
if ((arg & affected_channels) == (*regptr & affected_channels)) {
|
|
*regptr ^= affected_channels;
|
|
*store = cpu_to_be32(arg);
|
|
} else {
|
|
*store = cpu_to_be32(*regptr);
|
|
}
|
|
|
|
break;
|
|
}
|
|
|
|
case CSR_CHANNELS_AVAILABLE_LO:
|
|
{
|
|
/* Lock algorithm for CHANNELS_AVAILABLE as recommended by 1394a-2000 */
|
|
quadlet_t affected_channels = arg ^ data;
|
|
|
|
regptr = &host->csr.channels_available_lo;
|
|
|
|
if ((arg & affected_channels) == (*regptr & affected_channels)) {
|
|
*regptr ^= affected_channels;
|
|
*store = cpu_to_be32(arg);
|
|
} else {
|
|
*store = cpu_to_be32(*regptr);
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
spin_unlock_irqrestore(&host->csr.lock, flags);
|
|
|
|
return RCODE_COMPLETE;
|
|
|
|
unsupported_lockreq:
|
|
switch (csraddr) {
|
|
case CSR_STATE_CLEAR:
|
|
case CSR_STATE_SET:
|
|
case CSR_RESET_START:
|
|
case CSR_NODE_IDS:
|
|
case CSR_SPLIT_TIMEOUT_HI:
|
|
case CSR_SPLIT_TIMEOUT_LO:
|
|
case CSR_CYCLE_TIME:
|
|
case CSR_BUS_TIME:
|
|
case CSR_BROADCAST_CHANNEL:
|
|
return RCODE_TYPE_ERROR;
|
|
|
|
case CSR_BUSY_TIMEOUT:
|
|
/* not yet implemented - fall through */
|
|
default:
|
|
return RCODE_ADDRESS_ERROR;
|
|
}
|
|
}
|
|
|
|
static int lock64_regs(struct hpsb_host *host, int nodeid, octlet_t * store,
|
|
u64 addr, octlet_t data, octlet_t arg, int extcode, u16 fl)
|
|
{
|
|
int csraddr = addr - CSR_REGISTER_BASE;
|
|
unsigned long flags;
|
|
|
|
data = be64_to_cpu(data);
|
|
arg = be64_to_cpu(arg);
|
|
|
|
if (csraddr & 0x3)
|
|
return RCODE_TYPE_ERROR;
|
|
|
|
if (csraddr != CSR_CHANNELS_AVAILABLE
|
|
|| extcode != EXTCODE_COMPARE_SWAP)
|
|
goto unsupported_lock64req;
|
|
|
|
/* Is somebody releasing the broadcast_channel on us? */
|
|
if (csraddr == CSR_CHANNELS_AVAILABLE_HI && (data & 0x100000000ULL)) {
|
|
/* Note: this is may not be the right way to handle
|
|
* the problem, so we should look into the proper way
|
|
* eventually. */
|
|
HPSB_WARN("Node [" NODE_BUS_FMT "] wants to release "
|
|
"broadcast channel 31. Ignoring.",
|
|
NODE_BUS_ARGS(host, nodeid));
|
|
|
|
data &= ~0x100000000ULL; /* keep broadcast channel allocated */
|
|
}
|
|
|
|
if (host->driver->hw_csr_reg) {
|
|
quadlet_t data_hi, data_lo;
|
|
quadlet_t arg_hi, arg_lo;
|
|
quadlet_t old_hi, old_lo;
|
|
|
|
data_hi = data >> 32;
|
|
data_lo = data & 0xFFFFFFFF;
|
|
arg_hi = arg >> 32;
|
|
arg_lo = arg & 0xFFFFFFFF;
|
|
|
|
old_hi = host->driver->hw_csr_reg(host, (csraddr - CSR_BUS_MANAGER_ID) >> 2,
|
|
data_hi, arg_hi);
|
|
|
|
old_lo = host->driver->hw_csr_reg(host, ((csraddr + 4) - CSR_BUS_MANAGER_ID) >> 2,
|
|
data_lo, arg_lo);
|
|
|
|
*store = cpu_to_be64(((octlet_t)old_hi << 32) | old_lo);
|
|
} else {
|
|
octlet_t old;
|
|
octlet_t affected_channels = arg ^ data;
|
|
|
|
spin_lock_irqsave(&host->csr.lock, flags);
|
|
|
|
old = ((octlet_t)host->csr.channels_available_hi << 32) | host->csr.channels_available_lo;
|
|
|
|
if ((arg & affected_channels) == (old & affected_channels)) {
|
|
host->csr.channels_available_hi ^= (affected_channels >> 32);
|
|
host->csr.channels_available_lo ^= (affected_channels & 0xffffffff);
|
|
*store = cpu_to_be64(arg);
|
|
} else {
|
|
*store = cpu_to_be64(old);
|
|
}
|
|
|
|
spin_unlock_irqrestore(&host->csr.lock, flags);
|
|
}
|
|
|
|
/* Is somebody erroneously releasing the broadcast_channel on us? */
|
|
if (host->csr.channels_available_hi & 0x1)
|
|
host->csr.channels_available_hi &= ~0x1;
|
|
|
|
return RCODE_COMPLETE;
|
|
|
|
unsupported_lock64req:
|
|
switch (csraddr) {
|
|
case CSR_STATE_CLEAR:
|
|
case CSR_STATE_SET:
|
|
case CSR_RESET_START:
|
|
case CSR_NODE_IDS:
|
|
case CSR_SPLIT_TIMEOUT_HI:
|
|
case CSR_SPLIT_TIMEOUT_LO:
|
|
case CSR_CYCLE_TIME:
|
|
case CSR_BUS_TIME:
|
|
case CSR_BUS_MANAGER_ID:
|
|
case CSR_BROADCAST_CHANNEL:
|
|
case CSR_BUSY_TIMEOUT:
|
|
case CSR_BANDWIDTH_AVAILABLE:
|
|
return RCODE_TYPE_ERROR;
|
|
|
|
default:
|
|
return RCODE_ADDRESS_ERROR;
|
|
}
|
|
}
|
|
|
|
static int write_fcp(struct hpsb_host *host, int nodeid, int dest,
|
|
quadlet_t *data, u64 addr, size_t length, u16 flags)
|
|
{
|
|
int csraddr = addr - CSR_REGISTER_BASE;
|
|
|
|
if (length > 512)
|
|
return RCODE_TYPE_ERROR;
|
|
|
|
switch (csraddr) {
|
|
case CSR_FCP_COMMAND:
|
|
highlevel_fcp_request(host, nodeid, 0, (u8 *)data, length);
|
|
break;
|
|
case CSR_FCP_RESPONSE:
|
|
highlevel_fcp_request(host, nodeid, 1, (u8 *)data, length);
|
|
break;
|
|
default:
|
|
return RCODE_TYPE_ERROR;
|
|
}
|
|
|
|
return RCODE_COMPLETE;
|
|
}
|
|
|
|
static int read_config_rom(struct hpsb_host *host, int nodeid, quadlet_t *buffer,
|
|
u64 addr, size_t length, u16 fl)
|
|
{
|
|
u32 offset = addr - CSR1212_REGISTER_SPACE_BASE;
|
|
|
|
if (csr1212_read(host->csr.rom, offset, buffer, length) == CSR1212_SUCCESS)
|
|
return RCODE_COMPLETE;
|
|
else
|
|
return RCODE_ADDRESS_ERROR;
|
|
}
|
|
|
|
static u64 allocate_addr_range(u64 size, u32 alignment, void *__host)
|
|
{
|
|
struct hpsb_host *host = (struct hpsb_host*)__host;
|
|
|
|
return hpsb_allocate_and_register_addrspace(&csr_highlevel,
|
|
host,
|
|
&config_rom_ops,
|
|
size, alignment,
|
|
CSR1212_UNITS_SPACE_BASE,
|
|
CSR1212_UNITS_SPACE_END);
|
|
}
|
|
|
|
static void release_addr_range(u64 addr, void *__host)
|
|
{
|
|
struct hpsb_host *host = (struct hpsb_host*)__host;
|
|
hpsb_unregister_addrspace(&csr_highlevel, host, addr);
|
|
}
|
|
|
|
|
|
int init_csr(void)
|
|
{
|
|
node_cap = csr1212_new_immediate(CSR1212_KV_ID_NODE_CAPABILITIES, 0x0083c0);
|
|
if (!node_cap) {
|
|
HPSB_ERR("Failed to allocate memory for Node Capabilties ConfigROM entry!");
|
|
return -ENOMEM;
|
|
}
|
|
|
|
hpsb_register_highlevel(&csr_highlevel);
|
|
|
|
return 0;
|
|
}
|
|
|
|
void cleanup_csr(void)
|
|
{
|
|
if (node_cap)
|
|
csr1212_release_keyval(node_cap);
|
|
hpsb_unregister_highlevel(&csr_highlevel);
|
|
}
|