cuda.c 20.8 KB
Newer Older
B
bellard 已提交
1
/*
J
j_mayer 已提交
2
 * QEMU PowerMac CUDA device support
3
 *
J
j_mayer 已提交
4 5
 * Copyright (c) 2004-2007 Fabrice Bellard
 * Copyright (c) 2007 Jocelyn Mayer
6
 *
B
bellard 已提交
7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 */
25 26
#include "hw/hw.h"
#include "hw/ppc/mac.h"
P
Paolo Bonzini 已提交
27
#include "hw/input/adb.h"
28
#include "qemu/timer.h"
29
#include "sysemu/sysemu.h"
B
bellard 已提交
30

B
bellard 已提交
31 32
/* XXX: implement all timer modes */

B
blueswir1 已提交
33
/* debug CUDA */
B
bellard 已提交
34
//#define DEBUG_CUDA
B
blueswir1 已提交
35 36

/* debug CUDA packets */
B
bellard 已提交
37 38
//#define DEBUG_CUDA_PACKET

B
blueswir1 已提交
39
#ifdef DEBUG_CUDA
40 41
#define CUDA_DPRINTF(fmt, ...)                                  \
    do { printf("CUDA: " fmt , ## __VA_ARGS__); } while (0)
B
blueswir1 已提交
42
#else
43
#define CUDA_DPRINTF(fmt, ...)
B
blueswir1 已提交
44 45
#endif

B
bellard 已提交
46 47 48 49 50 51 52 53 54 55 56 57 58 59 60
/* Bits in B data register: all active low */
#define TREQ		0x08		/* Transfer request (input) */
#define TACK		0x10		/* Transfer acknowledge (output) */
#define TIP		0x20		/* Transfer in progress (output) */

/* Bits in ACR */
#define SR_CTRL		0x1c		/* Shift register control bits */
#define SR_EXT		0x0c		/* Shift on external clock */
#define SR_OUT		0x10		/* Shift out if 1 */

/* Bits in IFR and IER */
#define IER_SET		0x80		/* set bits in IER */
#define IER_CLR		0		/* clear bits in IER */
#define SR_INT		0x04		/* Shift register full/empty */
#define T1_INT          0x40            /* Timer 1 interrupt */
B
bellard 已提交
61
#define T2_INT          0x20            /* Timer 2 interrupt */
B
bellard 已提交
62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105

/* Bits in ACR */
#define T1MODE          0xc0            /* Timer 1 mode */
#define T1MODE_CONT     0x40            /*  continuous interrupts */

/* commands (1st byte) */
#define ADB_PACKET	0
#define CUDA_PACKET	1
#define ERROR_PACKET	2
#define TIMER_PACKET	3
#define POWER_PACKET	4
#define MACIIC_PACKET	5
#define PMU_PACKET	6


/* CUDA commands (2nd byte) */
#define CUDA_WARM_START			0x0
#define CUDA_AUTOPOLL			0x1
#define CUDA_GET_6805_ADDR		0x2
#define CUDA_GET_TIME			0x3
#define CUDA_GET_PRAM			0x7
#define CUDA_SET_6805_ADDR		0x8
#define CUDA_SET_TIME			0x9
#define CUDA_POWERDOWN			0xa
#define CUDA_POWERUP_TIME		0xb
#define CUDA_SET_PRAM			0xc
#define CUDA_MS_RESET			0xd
#define CUDA_SEND_DFAC			0xe
#define CUDA_BATTERY_SWAP_SENSE		0x10
#define CUDA_RESET_SYSTEM		0x11
#define CUDA_SET_IPL			0x12
#define CUDA_FILE_SERVER_FLAG		0x13
#define CUDA_SET_AUTO_RATE		0x14
#define CUDA_GET_AUTO_RATE		0x16
#define CUDA_SET_DEVICE_LIST		0x19
#define CUDA_GET_DEVICE_LIST		0x1a
#define CUDA_SET_ONE_SECOND_MODE	0x1b
#define CUDA_SET_POWER_MESSAGES		0x21
#define CUDA_GET_SET_IIC		0x22
#define CUDA_WAKEUP			0x23
#define CUDA_TIMER_TICKLE		0x24
#define CUDA_COMBINED_FORMAT_IIC	0x25

#define CUDA_TIMER_FREQ (4700000 / 6)
B
bellard 已提交
106
#define CUDA_ADB_POLL_FREQ 50
B
bellard 已提交
107

108 109 110
/* CUDA returns time_t's offset from Jan 1, 1904, not 1970 */
#define RTC_OFFSET                      2082844800

B
bellard 已提交
111
static void cuda_update(CUDAState *s);
112
static void cuda_receive_packet_from_host(CUDAState *s,
B
bellard 已提交
113
                                          const uint8_t *data, int len);
114
static void cuda_timer_update(CUDAState *s, CUDATimer *ti,
B
bellard 已提交
115
                              int64_t current_time);
B
bellard 已提交
116 117 118

static void cuda_update_irq(CUDAState *s)
{
B
bellard 已提交
119
    if (s->ifr & s->ier & (SR_INT | T1_INT)) {
P
pbrook 已提交
120
        qemu_irq_raise(s->irq);
B
bellard 已提交
121
    } else {
P
pbrook 已提交
122
        qemu_irq_lower(s->irq);
B
bellard 已提交
123 124 125
    }
}

126 127 128 129 130 131
static uint64_t get_tb(uint64_t freq)
{
    return muldiv64(qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL),
                    freq, get_ticks_per_sec());
}

B
bellard 已提交
132 133 134 135
static unsigned int get_counter(CUDATimer *s)
{
    int64_t d;
    unsigned int counter;
136 137 138 139 140
    uint64_t tb_diff;

    /* Reverse of the tb calculation algorithm that Mac OS X uses on bootup. */
    tb_diff = get_tb(s->frequency) - s->load_time;
    d = (tb_diff * 0xBF401675E5DULL) / (s->frequency << 24);
B
bellard 已提交
141

B
bellard 已提交
142 143 144 145 146 147
    if (s->index == 0) {
        /* the timer goes down from latch to -1 (period of latch + 2) */
        if (d <= (s->counter_value + 1)) {
            counter = (s->counter_value - d) & 0xffff;
        } else {
            counter = (d - (s->counter_value + 1)) % (s->latch + 2);
148
            counter = (s->latch - counter) & 0xffff;
B
bellard 已提交
149
        }
B
bellard 已提交
150
    } else {
B
bellard 已提交
151
        counter = (s->counter_value - d) & 0xffff;
B
bellard 已提交
152 153 154 155
    }
    return counter;
}

B
bellard 已提交
156
static void set_counter(CUDAState *s, CUDATimer *ti, unsigned int val)
B
bellard 已提交
157
{
B
blueswir1 已提交
158
    CUDA_DPRINTF("T%d.counter=%d\n", 1 + (ti->timer == NULL), val);
159
    ti->load_time = get_tb(s->frequency);
B
bellard 已提交
160 161
    ti->counter_value = val;
    cuda_timer_update(s, ti, ti->load_time);
B
bellard 已提交
162 163 164 165
}

static int64_t get_next_irq_time(CUDATimer *s, int64_t current_time)
{
B
bellard 已提交
166 167 168
    int64_t d, next_time;
    unsigned int counter;

B
bellard 已提交
169
    /* current counter value */
170
    d = muldiv64(current_time - s->load_time,
171
                 CUDA_TIMER_FREQ, get_ticks_per_sec());
B
bellard 已提交
172 173 174 175 176
    /* the timer goes down from latch to -1 (period of latch + 2) */
    if (d <= (s->counter_value + 1)) {
        counter = (s->counter_value - d) & 0xffff;
    } else {
        counter = (d - (s->counter_value + 1)) % (s->latch + 2);
177
        counter = (s->latch - counter) & 0xffff;
B
bellard 已提交
178
    }
179

B
bellard 已提交
180 181 182 183 184 185 186
    /* Note: we consider the irq is raised on 0 */
    if (counter == 0xffff) {
        next_time = d + s->latch + 1;
    } else if (counter == 0) {
        next_time = d + s->latch + 2;
    } else {
        next_time = d + counter;
B
bellard 已提交
187
    }
B
blueswir1 已提交
188 189
    CUDA_DPRINTF("latch=%d counter=%" PRId64 " delta_next=%" PRId64 "\n",
                 s->latch, d, next_time - d);
190
    next_time = muldiv64(next_time, get_ticks_per_sec(), CUDA_TIMER_FREQ) +
B
bellard 已提交
191 192 193 194 195 196
        s->load_time;
    if (next_time <= current_time)
        next_time = current_time + 1;
    return next_time;
}

197
static void cuda_timer_update(CUDAState *s, CUDATimer *ti,
B
bellard 已提交
198 199 200 201 202
                              int64_t current_time)
{
    if (!ti->timer)
        return;
    if ((s->acr & T1MODE) != T1MODE_CONT) {
203
        timer_del(ti->timer);
B
bellard 已提交
204 205
    } else {
        ti->next_irq_time = get_next_irq_time(ti, current_time);
206
        timer_mod(ti->timer, ti->next_irq_time);
B
bellard 已提交
207 208 209
    }
}

B
bellard 已提交
210 211 212 213 214
static void cuda_timer1(void *opaque)
{
    CUDAState *s = opaque;
    CUDATimer *ti = &s->timers[0];

B
bellard 已提交
215
    cuda_timer_update(s, ti, ti->next_irq_time);
B
bellard 已提交
216 217 218 219
    s->ifr |= T1_INT;
    cuda_update_irq(s);
}

A
Avi Kivity 已提交
220
static uint32_t cuda_readb(void *opaque, hwaddr addr)
B
bellard 已提交
221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251
{
    CUDAState *s = opaque;
    uint32_t val;

    addr = (addr >> 9) & 0xf;
    switch(addr) {
    case 0:
        val = s->b;
        break;
    case 1:
        val = s->a;
        break;
    case 2:
        val = s->dirb;
        break;
    case 3:
        val = s->dira;
        break;
    case 4:
        val = get_counter(&s->timers[0]) & 0xff;
        s->ifr &= ~T1_INT;
        cuda_update_irq(s);
        break;
    case 5:
        val = get_counter(&s->timers[0]) >> 8;
        cuda_update_irq(s);
        break;
    case 6:
        val = s->timers[0].latch & 0xff;
        break;
    case 7:
B
bellard 已提交
252
        /* XXX: check this */
B
bellard 已提交
253 254 255 256
        val = (s->timers[0].latch >> 8) & 0xff;
        break;
    case 8:
        val = get_counter(&s->timers[1]) & 0xff;
B
bellard 已提交
257
        s->ifr &= ~T2_INT;
B
bellard 已提交
258 259 260 261 262
        break;
    case 9:
        val = get_counter(&s->timers[1]) >> 8;
        break;
    case 10:
B
bellard 已提交
263 264 265
        val = s->sr;
        s->ifr &= ~SR_INT;
        cuda_update_irq(s);
B
bellard 已提交
266 267 268 269 270 271 272 273 274
        break;
    case 11:
        val = s->acr;
        break;
    case 12:
        val = s->pcr;
        break;
    case 13:
        val = s->ifr;
275
        if (s->ifr & s->ier)
B
bellard 已提交
276
            val |= 0x80;
B
bellard 已提交
277 278
        break;
    case 14:
B
bellard 已提交
279
        val = s->ier | 0x80;
B
bellard 已提交
280 281 282 283 284 285
        break;
    default:
    case 15:
        val = s->anh;
        break;
    }
286
    if (addr != 13 || val != 0) {
B
blueswir1 已提交
287
        CUDA_DPRINTF("read: reg=0x%x val=%02x\n", (int)addr, val);
288 289
    }

B
bellard 已提交
290 291 292
    return val;
}

A
Avi Kivity 已提交
293
static void cuda_writeb(void *opaque, hwaddr addr, uint32_t val)
B
bellard 已提交
294 295
{
    CUDAState *s = opaque;
296

B
bellard 已提交
297
    addr = (addr >> 9) & 0xf;
B
blueswir1 已提交
298
    CUDA_DPRINTF("write: reg=0x%x val=%02x\n", (int)addr, val);
B
bellard 已提交
299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314

    switch(addr) {
    case 0:
        s->b = val;
        cuda_update(s);
        break;
    case 1:
        s->a = val;
        break;
    case 2:
        s->dirb = val;
        break;
    case 3:
        s->dira = val;
        break;
    case 4:
B
bellard 已提交
315
        s->timers[0].latch = (s->timers[0].latch & 0xff00) | val;
316
        cuda_timer_update(s, &s->timers[0], qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL));
B
bellard 已提交
317 318
        break;
    case 5:
B
bellard 已提交
319 320 321
        s->timers[0].latch = (s->timers[0].latch & 0xff) | (val << 8);
        s->ifr &= ~T1_INT;
        set_counter(s, &s->timers[0], s->timers[0].latch);
B
bellard 已提交
322 323 324
        break;
    case 6:
        s->timers[0].latch = (s->timers[0].latch & 0xff00) | val;
325
        cuda_timer_update(s, &s->timers[0], qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL));
B
bellard 已提交
326 327 328
        break;
    case 7:
        s->timers[0].latch = (s->timers[0].latch & 0xff) | (val << 8);
B
bellard 已提交
329
        s->ifr &= ~T1_INT;
330
        cuda_timer_update(s, &s->timers[0], qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL));
B
bellard 已提交
331 332
        break;
    case 8:
B
bellard 已提交
333
        s->timers[1].latch = val;
B
bellard 已提交
334
        set_counter(s, &s->timers[1], val);
B
bellard 已提交
335 336
        break;
    case 9:
B
bellard 已提交
337
        set_counter(s, &s->timers[1], (val << 8) | s->timers[1].latch);
B
bellard 已提交
338 339 340 341 342 343
        break;
    case 10:
        s->sr = val;
        break;
    case 11:
        s->acr = val;
344
        cuda_timer_update(s, &s->timers[0], qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL));
B
bellard 已提交
345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374
        cuda_update(s);
        break;
    case 12:
        s->pcr = val;
        break;
    case 13:
        /* reset bits */
        s->ifr &= ~val;
        cuda_update_irq(s);
        break;
    case 14:
        if (val & IER_SET) {
            /* set bits */
            s->ier |= val & 0x7f;
        } else {
            /* reset bits */
            s->ier &= ~val;
        }
        cuda_update_irq(s);
        break;
    default:
    case 15:
        s->anh = val;
        break;
    }
}

/* NOTE: TIP and TREQ are negated */
static void cuda_update(CUDAState *s)
{
B
bellard 已提交
375 376 377 378 379
    int packet_received, len;

    packet_received = 0;
    if (!(s->b & TIP)) {
        /* transfer requested from host */
B
bellard 已提交
380

B
bellard 已提交
381 382 383 384
        if (s->acr & SR_OUT) {
            /* data output */
            if ((s->b & (TACK | TIP)) != (s->last_b & (TACK | TIP))) {
                if (s->data_out_index < sizeof(s->data_out)) {
B
blueswir1 已提交
385
                    CUDA_DPRINTF("send: %02x\n", s->sr);
B
bellard 已提交
386 387 388 389 390 391 392 393 394 395
                    s->data_out[s->data_out_index++] = s->sr;
                    s->ifr |= SR_INT;
                    cuda_update_irq(s);
                }
            }
        } else {
            if (s->data_in_index < s->data_in_size) {
                /* data input */
                if ((s->b & (TACK | TIP)) != (s->last_b & (TACK | TIP))) {
                    s->sr = s->data_in[s->data_in_index++];
B
blueswir1 已提交
396
                    CUDA_DPRINTF("recv: %02x\n", s->sr);
B
bellard 已提交
397 398 399 400 401 402 403
                    /* indicate end of transfer */
                    if (s->data_in_index >= s->data_in_size) {
                        s->b = (s->b | TREQ);
                    }
                    s->ifr |= SR_INT;
                    cuda_update_irq(s);
                }
B
bellard 已提交
404
            }
B
bellard 已提交
405 406 407 408 409 410 411 412 413
        }
    } else {
        /* no transfer requested: handle sync case */
        if ((s->last_b & TIP) && (s->b & TACK) != (s->last_b & TACK)) {
            /* update TREQ state each time TACK change state */
            if (s->b & TACK)
                s->b = (s->b | TREQ);
            else
                s->b = (s->b & ~TREQ);
B
bellard 已提交
414 415
            s->ifr |= SR_INT;
            cuda_update_irq(s);
B
bellard 已提交
416 417
        } else {
            if (!(s->last_b & TIP)) {
T
ths 已提交
418
                /* handle end of host to cuda transfer */
B
bellard 已提交
419
                packet_received = (s->data_out_index > 0);
T
ths 已提交
420
                /* always an IRQ at the end of transfer */
B
bellard 已提交
421 422 423 424 425 426 427
                s->ifr |= SR_INT;
                cuda_update_irq(s);
            }
            /* signal if there is data to read */
            if (s->data_in_index < s->data_in_size) {
                s->b = (s->b & ~TREQ);
            }
B
bellard 已提交
428 429 430 431 432
        }
    }

    s->last_acr = s->acr;
    s->last_b = s->b;
B
bellard 已提交
433 434 435 436 437 438 439 440

    /* NOTE: cuda_receive_packet_from_host() can call cuda_update()
       recursively */
    if (packet_received) {
        len = s->data_out_index;
        s->data_out_index = 0;
        cuda_receive_packet_from_host(s, s->data_out, len);
    }
B
bellard 已提交
441 442
}

443
static void cuda_send_packet_to_host(CUDAState *s,
B
bellard 已提交
444 445
                                     const uint8_t *data, int len)
{
B
bellard 已提交
446 447 448 449 450 451 452 453 454
#ifdef DEBUG_CUDA_PACKET
    {
        int i;
        printf("cuda_send_packet_to_host:\n");
        for(i = 0; i < len; i++)
            printf(" %02x", data[i]);
        printf("\n");
    }
#endif
B
bellard 已提交
455 456 457 458 459 460 461 462
    memcpy(s->data_in, data, len);
    s->data_in_size = len;
    s->data_in_index = 0;
    cuda_update(s);
    s->ifr |= SR_INT;
    cuda_update_irq(s);
}

B
bellard 已提交
463
static void cuda_adb_poll(void *opaque)
B
bellard 已提交
464 465 466 467 468
{
    CUDAState *s = opaque;
    uint8_t obuf[ADB_MAX_OUT_LEN + 2];
    int olen;

469
    olen = adb_poll(&s->adb_bus, obuf + 2);
B
bellard 已提交
470 471 472 473 474
    if (olen > 0) {
        obuf[0] = ADB_PACKET;
        obuf[1] = 0x40; /* polled data */
        cuda_send_packet_to_host(s, obuf, olen + 2);
    }
475 476
    timer_mod(s->adb_poll_timer,
                   qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) +
477
                   (get_ticks_per_sec() / CUDA_ADB_POLL_FREQ));
B
bellard 已提交
478 479
}

480
static void cuda_receive_packet(CUDAState *s,
B
bellard 已提交
481 482 483
                                const uint8_t *data, int len)
{
    uint8_t obuf[16];
A
aurel32 已提交
484 485
    int autopoll;
    uint32_t ti;
B
bellard 已提交
486 487 488

    switch(data[0]) {
    case CUDA_AUTOPOLL:
B
bellard 已提交
489 490 491 492
        autopoll = (data[1] != 0);
        if (autopoll != s->autopoll) {
            s->autopoll = autopoll;
            if (autopoll) {
493 494
                timer_mod(s->adb_poll_timer,
                               qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) +
495
                               (get_ticks_per_sec() / CUDA_ADB_POLL_FREQ));
B
bellard 已提交
496
            } else {
497
                timer_del(s->adb_poll_timer);
B
bellard 已提交
498 499
            }
        }
B
bellard 已提交
500 501 502 503
        obuf[0] = CUDA_PACKET;
        obuf[1] = data[1];
        cuda_send_packet_to_host(s, obuf, 2);
        break;
504
    case CUDA_SET_TIME:
A
aurel32 已提交
505
        ti = (((uint32_t)data[1]) << 24) + (((uint32_t)data[2]) << 16) + (((uint32_t)data[3]) << 8) + data[4];
506
        s->tick_offset = ti - (qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) / get_ticks_per_sec());
A
aurel32 已提交
507 508 509 510 511 512
        obuf[0] = CUDA_PACKET;
        obuf[1] = 0;
        obuf[2] = 0;
        cuda_send_packet_to_host(s, obuf, 3);
        break;
    case CUDA_GET_TIME:
513
        ti = s->tick_offset + (qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) / get_ticks_per_sec());
B
bellard 已提交
514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530
        obuf[0] = CUDA_PACKET;
        obuf[1] = 0;
        obuf[2] = 0;
        obuf[3] = ti >> 24;
        obuf[4] = ti >> 16;
        obuf[5] = ti >> 8;
        obuf[6] = ti;
        cuda_send_packet_to_host(s, obuf, 7);
        break;
    case CUDA_FILE_SERVER_FLAG:
    case CUDA_SET_DEVICE_LIST:
    case CUDA_SET_AUTO_RATE:
    case CUDA_SET_POWER_MESSAGES:
        obuf[0] = CUDA_PACKET;
        obuf[1] = 0;
        cuda_send_packet_to_host(s, obuf, 2);
        break;
531 532 533 534
    case CUDA_POWERDOWN:
        obuf[0] = CUDA_PACKET;
        obuf[1] = 0;
        cuda_send_packet_to_host(s, obuf, 2);
A
aurel32 已提交
535 536
        qemu_system_shutdown_request();
        break;
537 538 539 540 541 542
    case CUDA_RESET_SYSTEM:
        obuf[0] = CUDA_PACKET;
        obuf[1] = 0;
        cuda_send_packet_to_host(s, obuf, 2);
        qemu_system_reset_request();
        break;
B
bellard 已提交
543 544 545 546 547
    default:
        break;
    }
}

548
static void cuda_receive_packet_from_host(CUDAState *s,
B
bellard 已提交
549 550
                                          const uint8_t *data, int len)
{
B
bellard 已提交
551 552 553
#ifdef DEBUG_CUDA_PACKET
    {
        int i;
554
        printf("cuda_receive_packet_from_host:\n");
B
bellard 已提交
555 556 557 558 559
        for(i = 0; i < len; i++)
            printf(" %02x", data[i]);
        printf("\n");
    }
#endif
B
bellard 已提交
560 561
    switch(data[0]) {
    case ADB_PACKET:
B
bellard 已提交
562 563 564
        {
            uint8_t obuf[ADB_MAX_OUT_LEN + 2];
            int olen;
565
            olen = adb_request(&s->adb_bus, obuf + 2, data + 1, len - 1);
B
bellard 已提交
566
            if (olen > 0) {
B
bellard 已提交
567 568 569
                obuf[0] = ADB_PACKET;
                obuf[1] = 0x00;
            } else {
B
bellard 已提交
570
                /* error */
B
bellard 已提交
571
                obuf[0] = ADB_PACKET;
B
bellard 已提交
572 573
                obuf[1] = -olen;
                olen = 0;
B
bellard 已提交
574 575 576
            }
            cuda_send_packet_to_host(s, obuf, olen + 2);
        }
B
bellard 已提交
577 578 579 580 581 582 583
        break;
    case CUDA_PACKET:
        cuda_receive_packet(s, data + 1, len - 1);
        break;
    }
}

A
Avi Kivity 已提交
584
static void cuda_writew (void *opaque, hwaddr addr, uint32_t value)
B
bellard 已提交
585 586 587
{
}

A
Avi Kivity 已提交
588
static void cuda_writel (void *opaque, hwaddr addr, uint32_t value)
B
bellard 已提交
589 590 591
{
}

A
Avi Kivity 已提交
592
static uint32_t cuda_readw (void *opaque, hwaddr addr)
B
bellard 已提交
593 594 595 596
{
    return 0;
}

A
Avi Kivity 已提交
597
static uint32_t cuda_readl (void *opaque, hwaddr addr)
B
bellard 已提交
598 599 600 601
{
    return 0;
}

602
static const MemoryRegionOps cuda_ops = {
603 604 605 606 607 608 609 610 611 612 613 614 615
    .old_mmio = {
        .write = {
            cuda_writeb,
            cuda_writew,
            cuda_writel,
        },
        .read = {
            cuda_readb,
            cuda_readw,
            cuda_readl,
        },
    },
    .endianness = DEVICE_NATIVE_ENDIAN,
B
bellard 已提交
616 617
};

J
Juan Quintela 已提交
618
static bool cuda_timer_exist(void *opaque, int version_id)
B
blueswir1 已提交
619
{
J
Juan Quintela 已提交
620
    CUDATimer *s = opaque;
B
blueswir1 已提交
621

J
Juan Quintela 已提交
622
    return s->timer != NULL;
B
blueswir1 已提交
623 624
}

J
Juan Quintela 已提交
625 626 627 628
static const VMStateDescription vmstate_cuda_timer = {
    .name = "cuda_timer",
    .version_id = 0,
    .minimum_version_id = 0,
629
    .fields = (VMStateField[]) {
J
Juan Quintela 已提交
630 631 632 633 634 635 636 637
        VMSTATE_UINT16(latch, CUDATimer),
        VMSTATE_UINT16(counter_value, CUDATimer),
        VMSTATE_INT64(load_time, CUDATimer),
        VMSTATE_INT64(next_irq_time, CUDATimer),
        VMSTATE_TIMER_TEST(timer, CUDATimer, cuda_timer_exist),
        VMSTATE_END_OF_LIST()
    }
};
B
blueswir1 已提交
638

J
Juan Quintela 已提交
639 640 641 642
static const VMStateDescription vmstate_cuda = {
    .name = "cuda",
    .version_id = 1,
    .minimum_version_id = 1,
643
    .fields = (VMStateField[]) {
J
Juan Quintela 已提交
644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665
        VMSTATE_UINT8(a, CUDAState),
        VMSTATE_UINT8(b, CUDAState),
        VMSTATE_UINT8(dira, CUDAState),
        VMSTATE_UINT8(dirb, CUDAState),
        VMSTATE_UINT8(sr, CUDAState),
        VMSTATE_UINT8(acr, CUDAState),
        VMSTATE_UINT8(pcr, CUDAState),
        VMSTATE_UINT8(ifr, CUDAState),
        VMSTATE_UINT8(ier, CUDAState),
        VMSTATE_UINT8(anh, CUDAState),
        VMSTATE_INT32(data_in_size, CUDAState),
        VMSTATE_INT32(data_in_index, CUDAState),
        VMSTATE_INT32(data_out_index, CUDAState),
        VMSTATE_UINT8(autopoll, CUDAState),
        VMSTATE_BUFFER(data_in, CUDAState),
        VMSTATE_BUFFER(data_out, CUDAState),
        VMSTATE_UINT32(tick_offset, CUDAState),
        VMSTATE_STRUCT_ARRAY(timers, CUDAState, 2, 1,
                             vmstate_cuda_timer, CUDATimer),
        VMSTATE_END_OF_LIST()
    }
};
B
blueswir1 已提交
666

A
Andreas Färber 已提交
667
static void cuda_reset(DeviceState *dev)
B
blueswir1 已提交
668
{
A
Andreas Färber 已提交
669
    CUDAState *s = CUDA(dev);
B
blueswir1 已提交
670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693

    s->b = 0;
    s->a = 0;
    s->dirb = 0;
    s->dira = 0;
    s->sr = 0;
    s->acr = 0;
    s->pcr = 0;
    s->ifr = 0;
    s->ier = 0;
    //    s->ier = T1_INT | SR_INT;
    s->anh = 0;
    s->data_in_size = 0;
    s->data_in_index = 0;
    s->data_out_index = 0;
    s->autopoll = 0;

    s->timers[0].latch = 0xffff;
    set_counter(s, &s->timers[0], 0xffff);

    s->timers[1].latch = 0;
    set_counter(s, &s->timers[1], 0xffff);
}

A
Andreas Färber 已提交
694
static void cuda_realizefn(DeviceState *dev, Error **errp)
B
bellard 已提交
695
{
A
Andreas Färber 已提交
696
    CUDAState *s = CUDA(dev);
A
aurel32 已提交
697
    struct tm tm;
B
bellard 已提交
698

699
    s->timers[0].timer = timer_new_ns(QEMU_CLOCK_VIRTUAL, cuda_timer1, s);
700 701
    s->timers[0].frequency = s->frequency;
    s->timers[1].frequency = s->frequency;
B
bellard 已提交
702

A
aurel32 已提交
703 704
    qemu_get_timedate(&tm, 0);
    s->tick_offset = (uint32_t)mktimegm(&tm) + RTC_OFFSET;
A
aurel32 已提交
705

706
    s->adb_poll_timer = timer_new_ns(QEMU_CLOCK_VIRTUAL, cuda_adb_poll, s);
A
Andreas Färber 已提交
707 708 709 710 711 712 713 714
}

static void cuda_initfn(Object *obj)
{
    SysBusDevice *d = SYS_BUS_DEVICE(obj);
    CUDAState *s = CUDA(obj);
    int i;

715
    memory_region_init_io(&s->mem, NULL, &cuda_ops, s, "cuda", 0x2000);
A
Andreas Färber 已提交
716 717 718 719 720 721
    sysbus_init_mmio(d, &s->mem);
    sysbus_init_irq(d, &s->irq);

    for (i = 0; i < ARRAY_SIZE(s->timers); i++) {
        s->timers[i].index = i;
    }
A
Andreas Färber 已提交
722

723 724
    qbus_create_inplace(&s->adb_bus, sizeof(s->adb_bus), TYPE_ADB_BUS,
                        DEVICE(obj), "adb.0");
A
Andreas Färber 已提交
725 726
}

727 728 729 730 731
static Property cuda_properties[] = {
    DEFINE_PROP_UINT64("frequency", CUDAState, frequency, 0),
    DEFINE_PROP_END_OF_LIST()
};

A
Andreas Färber 已提交
732 733 734
static void cuda_class_init(ObjectClass *oc, void *data)
{
    DeviceClass *dc = DEVICE_CLASS(oc);
735

A
Andreas Färber 已提交
736 737 738
    dc->realize = cuda_realizefn;
    dc->reset = cuda_reset;
    dc->vmsd = &vmstate_cuda;
739
    dc->props = cuda_properties;
B
bellard 已提交
740
}
A
Andreas Färber 已提交
741 742 743 744 745 746 747 748 749 750 751 752 753 754 755

static const TypeInfo cuda_type_info = {
    .name = TYPE_CUDA,
    .parent = TYPE_SYS_BUS_DEVICE,
    .instance_size = sizeof(CUDAState),
    .instance_init = cuda_initfn,
    .class_init = cuda_class_init,
};

static void cuda_register_types(void)
{
    type_register_static(&cuda_type_info);
}

type_init(cuda_register_types)