~ubuntu-branches/ubuntu/saucy/qemu/saucy-proposed

« back to all changes in this revision

Viewing changes to hw/axis_dev88.c

  • Committer: Package Import Robot
  • Author(s): Serge Hallyn
  • Date: 2013-05-28 08:18:30 UTC
  • mfrom: (1.8.2) (10.1.37 sid)
  • Revision ID: package-import@ubuntu.com-20130528081830-87xl2z9fq516a814
Tags: 1.5.0+dfsg-2ubuntu1
* Merge 1.5.0+dfs-2 from debian unstable.  Remaining changes:
  - debian/control
    * update maintainer
    * remove libiscsi, usb-redir, vde, vnc-jpeg, and libssh2-1-dev
      from build-deps
    * enable rbd
    * add qemu-system and qemu-common B/R to qemu-keymaps
    * add D:udev, R:qemu, R:qemu-common and B:qemu-common to
      qemu-system-common
    * qemu-system-arm, qemu-system-ppc, qemu-system-sparc:
      - add qemu-kvm to Provides
      - add qemu-common, qemu-kvm, kvm to B/R
      - remove openbios-sparc from qemu-system-sparc D
    * qemu-system-x86:
      - add qemu-common to Breaks/Replaces.
      - add cpu-checker to Recommends.
    * qemu-user: add B/R:qemu-kvm
    * qemu-kvm:
      - add armhf armel powerpc sparc to Architecture
      - C/R/P: qemu-kvm-spice
    * add qemu-common package
    * drop qemu-slof which is not packaged in ubuntu
  - add qemu-system-common.links for tap ifup/down scripts and OVMF link.
  - qemu-system-x86.links:
    * remove pxe rom links which are in kvm-ipxe
    * add symlink for kvm.1 manpage
  - debian/rules
    * add kvm-spice symlink to qemu-kvm
    * call dh_installmodules for qemu-system-x86
    * update dh_installinit to install upstart script
    * run dh_installman (Closes: #709241) (cherrypicked from 1.5.0+dfsg-2)
  - Add qemu-utils.links for kvm-* symlinks.
  - Add qemu-system-x86.qemu-kvm.upstart and .default
  - Add qemu-system-x86.modprobe to set nesting=1
  - Add qemu-system-common.preinst to add kvm group
  - qemu-system-common.postinst: remove bad group acl if there, then have
    udev relabel /dev/kvm.
  - Dropped patches:
    * 0001-fix-wrong-output-with-info-chardev-for-tcp-socket.patch
  - Kept patches:
    * expose_vms_qemu64cpu.patch - updated
    * gridcentric patch - updated
    * linaro arm patches from qemu-linaro rebasing branch

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/*
2
 
 * QEMU model for the AXIS devboard 88.
3
 
 *
4
 
 * Copyright (c) 2009 Edgar E. Iglesias, Axis Communications AB.
5
 
 *
6
 
 * Permission is hereby granted, free of charge, to any person obtaining a copy
7
 
 * of this software and associated documentation files (the "Software"), to deal
8
 
 * in the Software without restriction, including without limitation the rights
9
 
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10
 
 * copies of the Software, and to permit persons to whom the Software is
11
 
 * furnished to do so, subject to the following conditions:
12
 
 *
13
 
 * The above copyright notice and this permission notice shall be included in
14
 
 * all copies or substantial portions of the Software.
15
 
 *
16
 
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17
 
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18
 
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19
 
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20
 
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21
 
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22
 
 * THE SOFTWARE.
23
 
 */
24
 
 
25
 
#include "sysbus.h"
26
 
#include "net/net.h"
27
 
#include "flash.h"
28
 
#include "boards.h"
29
 
#include "etraxfs.h"
30
 
#include "loader.h"
31
 
#include "elf.h"
32
 
#include "cris-boot.h"
33
 
#include "sysemu/blockdev.h"
34
 
#include "exec/address-spaces.h"
35
 
 
36
 
#define D(x)
37
 
#define DNAND(x)
38
 
 
39
 
struct nand_state_t
40
 
{
41
 
    DeviceState *nand;
42
 
    MemoryRegion iomem;
43
 
    unsigned int rdy:1;
44
 
    unsigned int ale:1;
45
 
    unsigned int cle:1;
46
 
    unsigned int ce:1;
47
 
};
48
 
 
49
 
static struct nand_state_t nand_state;
50
 
static uint64_t nand_read(void *opaque, hwaddr addr, unsigned size)
51
 
{
52
 
    struct nand_state_t *s = opaque;
53
 
    uint32_t r;
54
 
    int rdy;
55
 
 
56
 
    r = nand_getio(s->nand);
57
 
    nand_getpins(s->nand, &rdy);
58
 
    s->rdy = rdy;
59
 
 
60
 
    DNAND(printf("%s addr=%x r=%x\n", __func__, addr, r));
61
 
    return r;
62
 
}
63
 
 
64
 
static void
65
 
nand_write(void *opaque, hwaddr addr, uint64_t value,
66
 
           unsigned size)
67
 
{
68
 
    struct nand_state_t *s = opaque;
69
 
    int rdy;
70
 
 
71
 
    DNAND(printf("%s addr=%x v=%x\n", __func__, addr, (unsigned)value));
72
 
    nand_setpins(s->nand, s->cle, s->ale, s->ce, 1, 0);
73
 
    nand_setio(s->nand, value);
74
 
    nand_getpins(s->nand, &rdy);
75
 
    s->rdy = rdy;
76
 
}
77
 
 
78
 
static const MemoryRegionOps nand_ops = {
79
 
    .read = nand_read,
80
 
    .write = nand_write,
81
 
    .endianness = DEVICE_NATIVE_ENDIAN,
82
 
};
83
 
 
84
 
struct tempsensor_t
85
 
{
86
 
    unsigned int shiftreg;
87
 
    unsigned int count;
88
 
    enum {
89
 
        ST_OUT, ST_IN, ST_Z
90
 
    } state;
91
 
 
92
 
    uint16_t regs[3];
93
 
};
94
 
 
95
 
static void tempsensor_clkedge(struct tempsensor_t *s,
96
 
                               unsigned int clk, unsigned int data_in)
97
 
{
98
 
    D(printf("%s clk=%d state=%d sr=%x\n", __func__,
99
 
             clk, s->state, s->shiftreg));
100
 
    if (s->count == 0) {
101
 
        s->count = 16;
102
 
        s->state = ST_OUT;
103
 
    }
104
 
    switch (s->state) {
105
 
        case ST_OUT:
106
 
            /* Output reg is clocked at negedge.  */
107
 
            if (!clk) {
108
 
                s->count--;
109
 
                s->shiftreg <<= 1;
110
 
                if (s->count == 0) {
111
 
                    s->shiftreg = 0;
112
 
                    s->state = ST_IN;
113
 
                    s->count = 16;
114
 
                }
115
 
            }
116
 
            break;
117
 
        case ST_Z:
118
 
            if (clk) {
119
 
                s->count--;
120
 
                if (s->count == 0) {
121
 
                    s->shiftreg = 0;
122
 
                    s->state = ST_OUT;
123
 
                    s->count = 16;
124
 
                }
125
 
            }
126
 
            break;
127
 
        case ST_IN:
128
 
            /* Indata is sampled at posedge.  */
129
 
            if (clk) {
130
 
                s->count--;
131
 
                s->shiftreg <<= 1;
132
 
                s->shiftreg |= data_in & 1;
133
 
                if (s->count == 0) {
134
 
                    D(printf("%s cfgreg=%x\n", __func__, s->shiftreg));
135
 
                    s->regs[0] = s->shiftreg;
136
 
                    s->state = ST_OUT;
137
 
                    s->count = 16;
138
 
 
139
 
                    if ((s->regs[0] & 0xff) == 0) {
140
 
                        /* 25 degrees celcius.  */
141
 
                        s->shiftreg = 0x0b9f;
142
 
                    } else if ((s->regs[0] & 0xff) == 0xff) {
143
 
                        /* Sensor ID, 0x8100 LM70.  */
144
 
                        s->shiftreg = 0x8100;
145
 
                    } else
146
 
                        printf("Invalid tempsens state %x\n", s->regs[0]);
147
 
                }
148
 
            }
149
 
            break;
150
 
    }
151
 
}
152
 
 
153
 
 
154
 
#define RW_PA_DOUT    0x00
155
 
#define R_PA_DIN      0x01
156
 
#define RW_PA_OE      0x02
157
 
#define RW_PD_DOUT    0x10
158
 
#define R_PD_DIN      0x11
159
 
#define RW_PD_OE      0x12
160
 
 
161
 
static struct gpio_state_t
162
 
{
163
 
    MemoryRegion iomem;
164
 
    struct nand_state_t *nand;
165
 
    struct tempsensor_t tempsensor;
166
 
    uint32_t regs[0x5c / 4];
167
 
} gpio_state;
168
 
 
169
 
static uint64_t gpio_read(void *opaque, hwaddr addr, unsigned size)
170
 
{
171
 
    struct gpio_state_t *s = opaque;
172
 
    uint32_t r = 0;
173
 
 
174
 
    addr >>= 2;
175
 
    switch (addr)
176
 
    {
177
 
        case R_PA_DIN:
178
 
            r = s->regs[RW_PA_DOUT] & s->regs[RW_PA_OE];
179
 
 
180
 
            /* Encode pins from the nand.  */
181
 
            r |= s->nand->rdy << 7;
182
 
            break;
183
 
        case R_PD_DIN:
184
 
            r = s->regs[RW_PD_DOUT] & s->regs[RW_PD_OE];
185
 
 
186
 
            /* Encode temp sensor pins.  */
187
 
            r |= (!!(s->tempsensor.shiftreg & 0x10000)) << 4;
188
 
            break;
189
 
 
190
 
        default:
191
 
            r = s->regs[addr];
192
 
            break;
193
 
    }
194
 
    return r;
195
 
    D(printf("%s %x=%x\n", __func__, addr, r));
196
 
}
197
 
 
198
 
static void gpio_write(void *opaque, hwaddr addr, uint64_t value,
199
 
                       unsigned size)
200
 
{
201
 
    struct gpio_state_t *s = opaque;
202
 
    D(printf("%s %x=%x\n", __func__, addr, (unsigned)value));
203
 
 
204
 
    addr >>= 2;
205
 
    switch (addr)
206
 
    {
207
 
        case RW_PA_DOUT:
208
 
            /* Decode nand pins.  */
209
 
            s->nand->ale = !!(value & (1 << 6));
210
 
            s->nand->cle = !!(value & (1 << 5));
211
 
            s->nand->ce  = !!(value & (1 << 4));
212
 
 
213
 
            s->regs[addr] = value;
214
 
            break;
215
 
 
216
 
        case RW_PD_DOUT:
217
 
            /* Temp sensor clk.  */
218
 
            if ((s->regs[addr] ^ value) & 2)
219
 
                tempsensor_clkedge(&s->tempsensor, !!(value & 2),
220
 
                                   !!(value & 16));
221
 
            s->regs[addr] = value;
222
 
            break;
223
 
 
224
 
        default:
225
 
            s->regs[addr] = value;
226
 
            break;
227
 
    }
228
 
}
229
 
 
230
 
static const MemoryRegionOps gpio_ops = {
231
 
    .read = gpio_read,
232
 
    .write = gpio_write,
233
 
    .endianness = DEVICE_NATIVE_ENDIAN,
234
 
    .valid = {
235
 
        .min_access_size = 4,
236
 
        .max_access_size = 4,
237
 
    },
238
 
};
239
 
 
240
 
#define INTMEM_SIZE (128 * 1024)
241
 
 
242
 
static struct cris_load_info li;
243
 
 
244
 
static
245
 
void axisdev88_init(QEMUMachineInitArgs *args)
246
 
{
247
 
    ram_addr_t ram_size = args->ram_size;
248
 
    const char *cpu_model = args->cpu_model;
249
 
    const char *kernel_filename = args->kernel_filename;
250
 
    const char *kernel_cmdline = args->kernel_cmdline;
251
 
    CRISCPU *cpu;
252
 
    CPUCRISState *env;
253
 
    DeviceState *dev;
254
 
    SysBusDevice *s;
255
 
    DriveInfo *nand;
256
 
    qemu_irq irq[30], nmi[2], *cpu_irq;
257
 
    void *etraxfs_dmac;
258
 
    struct etraxfs_dma_client *dma_eth;
259
 
    int i;
260
 
    MemoryRegion *address_space_mem = get_system_memory();
261
 
    MemoryRegion *phys_ram = g_new(MemoryRegion, 1);
262
 
    MemoryRegion *phys_intmem = g_new(MemoryRegion, 1);
263
 
 
264
 
    /* init CPUs */
265
 
    if (cpu_model == NULL) {
266
 
        cpu_model = "crisv32";
267
 
    }
268
 
    cpu = cpu_cris_init(cpu_model);
269
 
    env = &cpu->env;
270
 
 
271
 
    /* allocate RAM */
272
 
    memory_region_init_ram(phys_ram, "axisdev88.ram", ram_size);
273
 
    vmstate_register_ram_global(phys_ram);
274
 
    memory_region_add_subregion(address_space_mem, 0x40000000, phys_ram);
275
 
 
276
 
    /* The ETRAX-FS has 128Kb on chip ram, the docs refer to it as the 
277
 
       internal memory.  */
278
 
    memory_region_init_ram(phys_intmem, "axisdev88.chipram", INTMEM_SIZE);
279
 
    vmstate_register_ram_global(phys_intmem);
280
 
    memory_region_add_subregion(address_space_mem, 0x38000000, phys_intmem);
281
 
 
282
 
      /* Attach a NAND flash to CS1.  */
283
 
    nand = drive_get(IF_MTD, 0, 0);
284
 
    nand_state.nand = nand_init(nand ? nand->bdrv : NULL,
285
 
                                NAND_MFR_STMICRO, 0x39);
286
 
    memory_region_init_io(&nand_state.iomem, &nand_ops, &nand_state,
287
 
                          "nand", 0x05000000);
288
 
    memory_region_add_subregion(address_space_mem, 0x10000000,
289
 
                                &nand_state.iomem);
290
 
 
291
 
    gpio_state.nand = &nand_state;
292
 
    memory_region_init_io(&gpio_state.iomem, &gpio_ops, &gpio_state,
293
 
                          "gpio", 0x5c);
294
 
    memory_region_add_subregion(address_space_mem, 0x3001a000,
295
 
                                &gpio_state.iomem);
296
 
 
297
 
 
298
 
    cpu_irq = cris_pic_init_cpu(env);
299
 
    dev = qdev_create(NULL, "etraxfs,pic");
300
 
    /* FIXME: Is there a proper way to signal vectors to the CPU core?  */
301
 
    qdev_prop_set_ptr(dev, "interrupt_vector", &env->interrupt_vector);
302
 
    qdev_init_nofail(dev);
303
 
    s = SYS_BUS_DEVICE(dev);
304
 
    sysbus_mmio_map(s, 0, 0x3001c000);
305
 
    sysbus_connect_irq(s, 0, cpu_irq[0]);
306
 
    sysbus_connect_irq(s, 1, cpu_irq[1]);
307
 
    for (i = 0; i < 30; i++) {
308
 
        irq[i] = qdev_get_gpio_in(dev, i);
309
 
    }
310
 
    nmi[0] = qdev_get_gpio_in(dev, 30);
311
 
    nmi[1] = qdev_get_gpio_in(dev, 31);
312
 
 
313
 
    etraxfs_dmac = etraxfs_dmac_init(0x30000000, 10);
314
 
    for (i = 0; i < 10; i++) {
315
 
        /* On ETRAX, odd numbered channels are inputs.  */
316
 
        etraxfs_dmac_connect(etraxfs_dmac, i, irq + 7 + i, i & 1);
317
 
    }
318
 
 
319
 
    /* Add the two ethernet blocks.  */
320
 
    dma_eth = g_malloc0(sizeof dma_eth[0] * 4); /* Allocate 4 channels.  */
321
 
    etraxfs_eth_init(&nd_table[0], 0x30034000, 1, &dma_eth[0], &dma_eth[1]);
322
 
    if (nb_nics > 1) {
323
 
        etraxfs_eth_init(&nd_table[1], 0x30036000, 2, &dma_eth[2], &dma_eth[3]);
324
 
    }
325
 
 
326
 
    /* The DMA Connector block is missing, hardwire things for now.  */
327
 
    etraxfs_dmac_connect_client(etraxfs_dmac, 0, &dma_eth[0]);
328
 
    etraxfs_dmac_connect_client(etraxfs_dmac, 1, &dma_eth[1]);
329
 
    if (nb_nics > 1) {
330
 
        etraxfs_dmac_connect_client(etraxfs_dmac, 6, &dma_eth[2]);
331
 
        etraxfs_dmac_connect_client(etraxfs_dmac, 7, &dma_eth[3]);
332
 
    }
333
 
 
334
 
    /* 2 timers.  */
335
 
    sysbus_create_varargs("etraxfs,timer", 0x3001e000, irq[0x1b], nmi[1], NULL);
336
 
    sysbus_create_varargs("etraxfs,timer", 0x3005e000, irq[0x1b], nmi[1], NULL);
337
 
 
338
 
    for (i = 0; i < 4; i++) {
339
 
        sysbus_create_simple("etraxfs,serial", 0x30026000 + i * 0x2000,
340
 
                             irq[0x14 + i]);
341
 
    }
342
 
 
343
 
    if (!kernel_filename) {
344
 
        fprintf(stderr, "Kernel image must be specified\n");
345
 
        exit(1);
346
 
    }
347
 
 
348
 
    li.image_filename = kernel_filename;
349
 
    li.cmdline = kernel_cmdline;
350
 
    cris_load_image(cpu, &li);
351
 
}
352
 
 
353
 
static QEMUMachine axisdev88_machine = {
354
 
    .name = "axis-dev88",
355
 
    .desc = "AXIS devboard 88",
356
 
    .init = axisdev88_init,
357
 
    .is_default = 1,
358
 
    DEFAULT_MACHINE_OPTIONS,
359
 
};
360
 
 
361
 
static void axisdev88_machine_init(void)
362
 
{
363
 
    qemu_register_machine(&axisdev88_machine);
364
 
}
365
 
 
366
 
machine_init(axisdev88_machine_init);