hw/tosa.c

   1 /* vim:set shiftwidth=4 ts=4 et: */
   2 /*
   3  * PXA255 Sharp Zaurus SL-6000 PDA platform
   4  *
   5  * Copyright (c) 2008 Dmitry Baryshkov
   6  *
   7  * Code based on spitz platform by Andrzej Zaborowski <balrog@zabor.org>
   8  * This code is licensed under the GNU GPL v2.
   9  */
  10
  11 #include "hw.h"
  12 #include "pxa.h"
  13 #include "arm-misc.h"
  14 #include "sysemu.h"
  15 #include "devices.h"
  16 #include "sharpsl.h"
  17 #include "pcmcia.h"
  18 #include "block.h"
  19 #include "boards.h"
  20 #include "i2c.h"
  21
  22 #define TOSA_RAM    0x04000000
  23 #define TOSA_ROM        0x00800000
  24
  25 #define TOSA_GPIO_nSD_DETECT    (9)
  26 #define TOSA_GPIO_ON_RESET              (19)
  27 #define TOSA_GPIO_CF_IRQ                (21)    /* CF slot0 Ready */
  28 #define TOSA_GPIO_CF_CD                 (13)
  29 #define TOSA_GPIO_TC6393XB_INT  (15)
  30 #define TOSA_GPIO_JC_CF_IRQ             (36)    /* CF slot1 Ready */
  31
  32 #define TOSA_SCOOP_GPIO_BASE    1
  33 #define TOSA_GPIO_IR_POWERDWN   (TOSA_SCOOP_GPIO_BASE + 2)
  34 #define TOSA_GPIO_SD_WP                 (TOSA_SCOOP_GPIO_BASE + 3)
  35 #define TOSA_GPIO_PWR_ON                (TOSA_SCOOP_GPIO_BASE + 4)
  36
  37 #define TOSA_SCOOP_JC_GPIO_BASE         1
  38 #define TOSA_GPIO_BT_LED                (TOSA_SCOOP_JC_GPIO_BASE + 0)
  39 #define TOSA_GPIO_NOTE_LED              (TOSA_SCOOP_JC_GPIO_BASE + 1)
  40 #define TOSA_GPIO_CHRG_ERR_LED          (TOSA_SCOOP_JC_GPIO_BASE + 2)
  41 #define TOSA_GPIO_TC6393XB_L3V_ON       (TOSA_SCOOP_JC_GPIO_BASE + 5)
  42 #define TOSA_GPIO_WLAN_LED              (TOSA_SCOOP_JC_GPIO_BASE + 7)
  43
  44 #define DAC_BASE        0x4e
  45 #define DAC_CH1         0
  46 #define DAC_CH2         1
  47
  48 static void tosa_microdrive_attach(struct pxa2xx_state_s *cpu)
  49 {
  50     struct pcmcia_card_s *md;
  51     int index;
  52     BlockDriverState *bs;
  53
  54     index = drive_get_index(IF_IDE, 0, 0);
  55     if (index == -1)
  56         return;
  57     bs = drives_table[index].bdrv;
  58     if (bdrv_is_inserted(bs) && !bdrv_is_removable(bs)) {
  59         md = dscm1xxxx_init(bs);
  60         pxa2xx_pcmcia_attach(cpu->pcmcia[0], md);
  61     }
  62 }
  63
  64 static void tosa_out_switch(void *opaque, int line, int level)
  65 {
  66     switch (line) {
  67         case 0:
  68             fprintf(stderr, "blue LED %s.\n", level ? "on" : "off");
  69             break;
  70         case 1:
  71             fprintf(stderr, "green LED %s.\n", level ? "on" : "off");
  72             break;
  73         case 2:
  74             fprintf(stderr, "amber LED %s.\n", level ? "on" : "off");
  75             break;
  76         case 3:
  77             fprintf(stderr, "wlan LED %s.\n", level ? "on" : "off");
  78             break;
  79         default:
  80             fprintf(stderr, "Uhandled out event: %d = %d\n", line, level);
  81             break;
  82     }
  83 }
  84
  85
  86 static void tosa_gpio_setup(struct pxa2xx_state_s *cpu,
  87                 struct scoop_info_s *scp0,
  88                 struct scoop_info_s *scp1,
  89                 struct tc6393xb_s *tmio)
  90 {
  91     qemu_irq *outsignals = qemu_allocate_irqs(tosa_out_switch, cpu, 4);
  92     /* MMC/SD host */
  93     pxa2xx_mmci_handlers(cpu->mmc,
  94                     scoop_gpio_in_get(scp0)[TOSA_GPIO_SD_WP],
  95                     qemu_irq_invert(pxa2xx_gpio_in_get(cpu->gpio)[TOSA_GPIO_nSD_DETECT]));
  96
  97     /* Handle reset */
  98     pxa2xx_gpio_out_set(cpu->gpio, TOSA_GPIO_ON_RESET, cpu->reset);
  99
 100     /* PCMCIA signals: card's IRQ and Card-Detect */
 101     pxa2xx_pcmcia_set_irq_cb(cpu->pcmcia[0],
 102                         pxa2xx_gpio_in_get(cpu->gpio)[TOSA_GPIO_CF_IRQ],
 103                         pxa2xx_gpio_in_get(cpu->gpio)[TOSA_GPIO_CF_CD]);
 104
 105     pxa2xx_pcmcia_set_irq_cb(cpu->pcmcia[1],
 106                         pxa2xx_gpio_in_get(cpu->gpio)[TOSA_GPIO_JC_CF_IRQ],
 107                         NULL);
 108
 109     scoop_gpio_out_set(scp1, TOSA_GPIO_BT_LED, outsignals[0]);
 110     scoop_gpio_out_set(scp1, TOSA_GPIO_NOTE_LED, outsignals[1]);
 111     scoop_gpio_out_set(scp1, TOSA_GPIO_CHRG_ERR_LED, outsignals[2]);
 112     scoop_gpio_out_set(scp1, TOSA_GPIO_WLAN_LED, outsignals[3]);
 113
 114     scoop_gpio_out_set(scp1, TOSA_GPIO_TC6393XB_L3V_ON, tc6393xb_l3v_get(tmio));
 115 }
 116
 117 static uint32_t tosa_ssp_read(void *opaque)
 118 {
 119     return 0;
 120 }
 121
 122 static void tosa_ssp_write(void *opaque, uint32_t value)
 123 {
 124     fprintf(stderr, "TG: %d %02x\n", value >> 5, value & 0x1f);
 125 }
 126
 127 struct tosa_dac_i2c {
 128     i2c_slave i2c;
 129     int len;
 130     char buf[3];
 131 };
 132
 133 static int tosa_dac_send(i2c_slave *i2c, uint8_t data)
 134 {
 135     struct tosa_dac_i2c *s = (struct tosa_dac_i2c *)i2c;
 136     s->buf[s->len] = data;
 137     if (s->len ++ > 2) {
 138 #ifdef VERBOSE
 139         fprintf(stderr, "%s: message too long (%i bytes)\n", __FUNCTION__, s->len);
 140 #endif
 141         return 1;
 142     }
 143
 144     if (s->len == 2) {
 145         fprintf(stderr, "dac: channel %d value 0x%02x\n",
 146                 s->buf[0], s->buf[1]);
 147     }
 148
 149     return 0;
 150 }
 151
 152 static void tosa_dac_event(i2c_slave *i2c, enum i2c_event event)
 153 {
 154     struct tosa_dac_i2c *s = (struct tosa_dac_i2c *)i2c;
 155     s->len = 0;
 156     switch (event) {
 157     case I2C_START_SEND:
 158         break;
 159     case I2C_START_RECV:
 160         printf("%s: recv not supported!!!\n", __FUNCTION__);
 161         break;
 162     case I2C_FINISH:
 163 #ifdef VERBOSE
 164         if (s->len < 2)
 165             printf("%s: message too short (%i bytes)\n", __FUNCTION__, s->len);
 166         if (s->len > 2)
 167             printf("%s: message too long\n", __FUNCTION__);
 168 #endif
 169         break;
 170     default:
 171         break;
 172     }
 173 }
 174
 175 int tosa_dac_recv(i2c_slave *s)
 176 {
 177     printf("%s: recv not supported!!!\n", __FUNCTION__);
 178     return -1;
 179 }
 180
 181 static void tosa_tg_init(struct pxa2xx_state_s *cpu)
 182 {
 183     struct i2c_bus *bus = pxa2xx_i2c_bus(cpu->i2c[0]);
 184     struct i2c_slave *dac = i2c_slave_init(bus, 0, sizeof(struct tosa_dac_i2c));
 185     dac->send = tosa_dac_send;
 186     dac->event = tosa_dac_event;
 187     dac->recv = tosa_dac_recv;
 188     i2c_set_slave_address(dac, DAC_BASE);
 189     pxa2xx_ssp_attach(cpu->ssp[1], tosa_ssp_read,
 190                     tosa_ssp_write, cpu);
 191 }
 192
 193
 194 static struct arm_boot_info tosa_binfo = {
 195     .loader_start = PXA2XX_SDRAM_BASE,
 196     .ram_size = 0x04000000,
 197 };
 198
 199 static void tosa_init(ram_addr_t ram_size, int vga_ram_size,
 200                 const char *boot_device,
 201                 const char *kernel_filename, const char *kernel_cmdline,
 202                 const char *initrd_filename, const char *cpu_model)
 203 {
 204     struct pxa2xx_state_s *cpu;
 205     struct tc6393xb_s *tmio;
 206     struct scoop_info_s *scp0, *scp1;
 207
 208     if (ram_size < (TOSA_RAM + TOSA_ROM + PXA2XX_INTERNAL_SIZE + TC6393XB_RAM)) {
 209         fprintf(stderr, "This platform requires %i bytes of memory\n",
 210                 TOSA_RAM + TOSA_ROM + PXA2XX_INTERNAL_SIZE);
 211         exit(1);
 212     }
 213
 214     if (!cpu_model)
 215         cpu_model = "pxa255";
 216
 217     cpu = pxa255_init(tosa_binfo.ram_size);
 218
 219     cpu_register_physical_memory(0, TOSA_ROM,
 220                     qemu_ram_alloc(TOSA_ROM) | IO_MEM_ROM);
 221
 222     tmio = tc6393xb_init(0x10000000,
 223             pxa2xx_gpio_in_get(cpu->gpio)[TOSA_GPIO_TC6393XB_INT]);
 224
 225     scp0 = scoop_init(cpu, 0, 0x08800000);
 226     scp1 = scoop_init(cpu, 1, 0x14800040);
 227
 228     tosa_gpio_setup(cpu, scp0, scp1, tmio);
 229
 230     tosa_microdrive_attach(cpu);
 231
 232     tosa_tg_init(cpu);
 233
 234     /* Setup initial (reset) machine state */
 235     cpu->env->regs[15] = tosa_binfo.loader_start;
 236
 237     tosa_binfo.kernel_filename = kernel_filename;
 238     tosa_binfo.kernel_cmdline = kernel_cmdline;
 239     tosa_binfo.initrd_filename = initrd_filename;
 240     tosa_binfo.board_id = 0x208;
 241     arm_load_kernel(cpu->env, &tosa_binfo);
 242     sl_bootparam_write(SL_PXA_PARAM_BASE - PXA2XX_SDRAM_BASE);
 243 }
 244
 245 QEMUMachine tosapda_machine = {
 246     .name = "tosa",
 247     .desc = "Tosa PDA (PXA255)",
 248     .init = tosa_init,
 249     .ram_require = TOSA_RAM + TOSA_ROM + PXA2XX_INTERNAL_SIZE + RAMSIZE_FIXED + TC6393XB_RAM,
 250 };