Reinhard Arlt | c2e49f7 | 2009-07-25 06:19:12 +0200 | [diff] [blame] | 1 | /* |
| 2 | * caddy.c -- esd VME8349 support for "missing" access modes in TSI148. |
| 3 | * Copyright (c) 2009 esd gmbh. |
| 4 | * |
| 5 | * Reinhard Arlt <reinhard.arlt@esd-electronics.com> |
| 6 | * |
Wolfgang Denk | 1a45966 | 2013-07-08 09:37:19 +0200 | [diff] [blame] | 7 | * SPDX-License-Identifier: GPL-2.0+ |
Reinhard Arlt | c2e49f7 | 2009-07-25 06:19:12 +0200 | [diff] [blame] | 8 | */ |
| 9 | |
| 10 | #include <common.h> |
| 11 | #include <ioports.h> |
| 12 | #include <mpc83xx.h> |
| 13 | #include <asm/mpc8349_pci.h> |
| 14 | #include <pci.h> |
| 15 | #include <asm/mmu.h> |
| 16 | #include <asm/io.h> |
| 17 | |
| 18 | #include "caddy.h" |
| 19 | |
| 20 | static struct caddy_interface *caddy_interface; |
| 21 | |
| 22 | void generate_answer(struct caddy_cmd *cmd, uint32_t status, uint32_t *result) |
| 23 | { |
| 24 | struct caddy_answer *answer; |
| 25 | uint32_t ptr; |
| 26 | |
| 27 | answer = &caddy_interface->answer[caddy_interface->answer_in]; |
| 28 | memset((void *)answer, 0, sizeof(struct caddy_answer)); |
| 29 | answer->answer = cmd->cmd; |
| 30 | answer->issue = cmd->issue; |
| 31 | answer->status = status; |
| 32 | memcpy(answer->par, result, 5 * sizeof(result[0])); |
| 33 | ptr = caddy_interface->answer_in + 1; |
| 34 | ptr = ptr & (ANSWER_SIZE - 1); |
| 35 | if (ptr != caddy_interface->answer_out) |
| 36 | caddy_interface->answer_in = ptr; |
| 37 | } |
| 38 | |
Wolfgang Denk | 54841ab | 2010-06-28 22:00:46 +0200 | [diff] [blame] | 39 | int do_caddy(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) |
Reinhard Arlt | c2e49f7 | 2009-07-25 06:19:12 +0200 | [diff] [blame] | 40 | { |
| 41 | unsigned long base_addr; |
| 42 | uint32_t ptr; |
| 43 | struct caddy_cmd *caddy_cmd; |
| 44 | uint32_t result[5]; |
| 45 | uint16_t data16; |
| 46 | uint8_t data8; |
| 47 | uint32_t status; |
| 48 | pci_dev_t dev; |
| 49 | void *pci_ptr; |
| 50 | |
| 51 | if (argc < 2) { |
| 52 | puts("Missing parameter\n"); |
| 53 | return 1; |
| 54 | } |
| 55 | |
| 56 | base_addr = simple_strtoul(argv[1], NULL, 16); |
| 57 | caddy_interface = (struct caddy_interface *) base_addr; |
| 58 | |
| 59 | memset((void *)caddy_interface, 0, sizeof(struct caddy_interface)); |
| 60 | memcpy((void *)&caddy_interface->magic[0], &CADDY_MAGIC, 16); |
| 61 | |
| 62 | while (ctrlc() == 0) { |
| 63 | if (caddy_interface->cmd_in != caddy_interface->cmd_out) { |
| 64 | memset(result, 0, 5 * sizeof(result[0])); |
| 65 | status = 0; |
| 66 | caddy_cmd = &caddy_interface->cmd[caddy_interface->cmd_out]; |
| 67 | pci_ptr = (void *)CONFIG_SYS_PCI1_IO_PHYS + |
| 68 | (caddy_cmd->addr & 0x001fffff); |
| 69 | |
| 70 | switch (caddy_cmd->cmd) { |
| 71 | case CADDY_CMD_IO_READ_8: |
| 72 | result[0] = in_8(pci_ptr); |
| 73 | break; |
| 74 | |
| 75 | case CADDY_CMD_IO_READ_16: |
| 76 | result[0] = in_be16(pci_ptr); |
| 77 | break; |
| 78 | |
| 79 | case CADDY_CMD_IO_READ_32: |
| 80 | result[0] = in_be32(pci_ptr); |
| 81 | break; |
| 82 | |
| 83 | case CADDY_CMD_IO_WRITE_8: |
| 84 | data8 = caddy_cmd->par[0] & 0x000000ff; |
| 85 | out_8(pci_ptr, data8); |
| 86 | break; |
| 87 | |
| 88 | case CADDY_CMD_IO_WRITE_16: |
| 89 | data16 = caddy_cmd->par[0] & 0x0000ffff; |
| 90 | out_be16(pci_ptr, data16); |
| 91 | break; |
| 92 | |
| 93 | case CADDY_CMD_IO_WRITE_32: |
| 94 | out_be32(pci_ptr, caddy_cmd->par[0]); |
| 95 | break; |
| 96 | |
| 97 | case CADDY_CMD_CONFIG_READ_8: |
| 98 | dev = PCI_BDF(caddy_cmd->par[0], |
| 99 | caddy_cmd->par[1], |
| 100 | caddy_cmd->par[2]); |
| 101 | status = pci_read_config_byte(dev, |
| 102 | caddy_cmd->addr, |
| 103 | &data8); |
| 104 | result[0] = data8; |
| 105 | break; |
| 106 | |
| 107 | case CADDY_CMD_CONFIG_READ_16: |
| 108 | dev = PCI_BDF(caddy_cmd->par[0], |
| 109 | caddy_cmd->par[1], |
| 110 | caddy_cmd->par[2]); |
| 111 | status = pci_read_config_word(dev, |
| 112 | caddy_cmd->addr, |
| 113 | &data16); |
| 114 | result[0] = data16; |
| 115 | break; |
| 116 | |
| 117 | case CADDY_CMD_CONFIG_READ_32: |
| 118 | dev = PCI_BDF(caddy_cmd->par[0], |
| 119 | caddy_cmd->par[1], |
| 120 | caddy_cmd->par[2]); |
| 121 | status = pci_read_config_dword(dev, |
| 122 | caddy_cmd->addr, |
| 123 | &result[0]); |
| 124 | break; |
| 125 | |
| 126 | case CADDY_CMD_CONFIG_WRITE_8: |
| 127 | dev = PCI_BDF(caddy_cmd->par[0], |
| 128 | caddy_cmd->par[1], |
| 129 | caddy_cmd->par[2]); |
| 130 | data8 = caddy_cmd->par[3] & 0x000000ff; |
| 131 | status = pci_write_config_byte(dev, |
| 132 | caddy_cmd->addr, |
| 133 | data8); |
| 134 | break; |
| 135 | |
| 136 | case CADDY_CMD_CONFIG_WRITE_16: |
| 137 | dev = PCI_BDF(caddy_cmd->par[0], |
| 138 | caddy_cmd->par[1], |
| 139 | caddy_cmd->par[2]); |
| 140 | data16 = caddy_cmd->par[3] & 0x0000ffff; |
| 141 | status = pci_write_config_word(dev, |
| 142 | caddy_cmd->addr, |
| 143 | data16); |
| 144 | break; |
| 145 | |
| 146 | case CADDY_CMD_CONFIG_WRITE_32: |
| 147 | dev = PCI_BDF(caddy_cmd->par[0], |
| 148 | caddy_cmd->par[1], |
| 149 | caddy_cmd->par[2]); |
| 150 | status = pci_write_config_dword(dev, |
| 151 | caddy_cmd->addr, |
| 152 | caddy_cmd->par[3]); |
| 153 | break; |
| 154 | |
| 155 | default: |
| 156 | status = 0xffffffff; |
| 157 | break; |
| 158 | } |
| 159 | |
| 160 | generate_answer(caddy_cmd, status, &result[0]); |
| 161 | |
| 162 | ptr = caddy_interface->cmd_out + 1; |
| 163 | ptr = ptr & (CMD_SIZE - 1); |
| 164 | caddy_interface->cmd_out = ptr; |
| 165 | } |
| 166 | |
| 167 | caddy_interface->heartbeat++; |
| 168 | } |
| 169 | |
| 170 | return 0; |
| 171 | } |
| 172 | |
| 173 | U_BOOT_CMD( |
| 174 | caddy, 2, 0, do_caddy, |
| 175 | "Start Caddy server.", |
| 176 | "Start Caddy server with Data structure a given addr\n" |
| 177 | ); |