Commit 28ce5ce63bf95d637d23460f8455d19064d6e378

Authored by aurel32
1 parent 186a7495

PowerPC: mac-io DB-DMA support

This patch adds powermac Descriptor-Based DMA.
It is used by mac-io based IDE, ethernet, sounds and serial devices.

Signed-off-by: Laurent Vivier <Laurent@lvivier.info>
Signed-off-by: Aurelien Jarno <aurelien@aurel32.net>

git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@6488 c046a42c-6fe2-441c-8c8c-71466251a162
hw/mac_dbdma.c
... ... @@ -3,6 +3,20 @@
3 3 *
4 4 * Copyright (c) 2005-2007 Fabrice Bellard
5 5 * Copyright (c) 2007 Jocelyn Mayer
  6 + * Copyright (c) 2009 Laurent Vivier
  7 + *
  8 + * some parts from linux-2.6.28, arch/powerpc/include/asm/dbdma.h
  9 + *
  10 + * Definitions for using the Apple Descriptor-Based DMA controller
  11 + * in Power Macintosh computers.
  12 + *
  13 + * Copyright (C) 1996 Paul Mackerras.
  14 + *
  15 + * some parts from mol 0.9.71
  16 + *
  17 + * Descriptor based DMA emulation
  18 + *
  19 + * Copyright (C) 1998-2004 Samuel Rydh (samuel@ibrium.se)
6 20 *
7 21 * Permission is hereby granted, free of charge, to any person obtaining a copy
8 22 * of this software and associated documentation files (the "Software"), to deal
... ... @@ -23,7 +37,8 @@
23 37 * THE SOFTWARE.
24 38 */
25 39 #include "hw.h"
26   -#include "ppc_mac.h"
  40 +#include "isa.h"
  41 +#include "mac_dbdma.h"
27 42  
28 43 /* debug DBDMA */
29 44 //#define DEBUG_DBDMA
... ... @@ -35,79 +50,830 @@ do { printf(&quot;DBDMA: &quot; fmt , ##args); } while (0)
35 50 #define DBDMA_DPRINTF(fmt, args...)
36 51 #endif
37 52  
38   -/* DBDMA: currently no op - should suffice right now */
  53 +/*
  54 + */
  55 +
  56 +/*
  57 + * DBDMA control/status registers. All little-endian.
  58 + */
39 59  
40   -static void dbdma_writeb (void *opaque,
41   - target_phys_addr_t addr, uint32_t value)
  60 +#define DBDMA_CONTROL 0x00
  61 +#define DBDMA_STATUS 0x01
  62 +#define DBDMA_CMDPTR_HI 0x02
  63 +#define DBDMA_CMDPTR_LO 0x03
  64 +#define DBDMA_INTR_SEL 0x04
  65 +#define DBDMA_BRANCH_SEL 0x05
  66 +#define DBDMA_WAIT_SEL 0x06
  67 +#define DBDMA_XFER_MODE 0x07
  68 +#define DBDMA_DATA2PTR_HI 0x08
  69 +#define DBDMA_DATA2PTR_LO 0x09
  70 +#define DBDMA_RES1 0x0A
  71 +#define DBDMA_ADDRESS_HI 0x0B
  72 +#define DBDMA_BRANCH_ADDR_HI 0x0C
  73 +#define DBDMA_RES2 0x0D
  74 +#define DBDMA_RES3 0x0E
  75 +#define DBDMA_RES4 0x0F
  76 +
  77 +#define DBDMA_REGS 16
  78 +#define DBDMA_SIZE (DBDMA_REGS * sizeof(uint32_t))
  79 +
  80 +#define DBDMA_CHANNEL_SHIFT 7
  81 +#define DBDMA_CHANNEL_SIZE (1 << DBDMA_CHANNEL_SHIFT)
  82 +
  83 +#define DBDMA_CHANNELS (0x1000 >> DBDMA_CHANNEL_SHIFT)
  84 +
  85 +/* Bits in control and status registers */
  86 +
  87 +#define RUN 0x8000
  88 +#define PAUSE 0x4000
  89 +#define FLUSH 0x2000
  90 +#define WAKE 0x1000
  91 +#define DEAD 0x0800
  92 +#define ACTIVE 0x0400
  93 +#define BT 0x0100
  94 +#define DEVSTAT 0x00ff
  95 +
  96 +/*
  97 + * DBDMA command structure. These fields are all little-endian!
  98 + */
  99 +
  100 +typedef struct dbdma_cmd {
  101 + uint16_t req_count; /* requested byte transfer count */
  102 + uint16_t command; /* command word (has bit-fields) */
  103 + uint32_t phy_addr; /* physical data address */
  104 + uint32_t cmd_dep; /* command-dependent field */
  105 + uint16_t res_count; /* residual count after completion */
  106 + uint16_t xfer_status; /* transfer status */
  107 +} dbdma_cmd;
  108 +
  109 +/* DBDMA command values in command field */
  110 +
  111 +#define COMMAND_MASK 0xf000
  112 +#define OUTPUT_MORE 0x0000 /* transfer memory data to stream */
  113 +#define OUTPUT_LAST 0x1000 /* ditto followed by end marker */
  114 +#define INPUT_MORE 0x2000 /* transfer stream data to memory */
  115 +#define INPUT_LAST 0x3000 /* ditto, expect end marker */
  116 +#define STORE_WORD 0x4000 /* write word (4 bytes) to device reg */
  117 +#define LOAD_WORD 0x5000 /* read word (4 bytes) from device reg */
  118 +#define DBDMA_NOP 0x6000 /* do nothing */
  119 +#define DBDMA_STOP 0x7000 /* suspend processing */
  120 +
  121 +/* Key values in command field */
  122 +
  123 +#define KEY_MASK 0x0700
  124 +#define KEY_STREAM0 0x0000 /* usual data stream */
  125 +#define KEY_STREAM1 0x0100 /* control/status stream */
  126 +#define KEY_STREAM2 0x0200 /* device-dependent stream */
  127 +#define KEY_STREAM3 0x0300 /* device-dependent stream */
  128 +#define KEY_STREAM4 0x0400 /* reserved */
  129 +#define KEY_REGS 0x0500 /* device register space */
  130 +#define KEY_SYSTEM 0x0600 /* system memory-mapped space */
  131 +#define KEY_DEVICE 0x0700 /* device memory-mapped space */
  132 +
  133 +/* Interrupt control values in command field */
  134 +
  135 +#define INTR_MASK 0x0030
  136 +#define INTR_NEVER 0x0000 /* don't interrupt */
  137 +#define INTR_IFSET 0x0010 /* intr if condition bit is 1 */
  138 +#define INTR_IFCLR 0x0020 /* intr if condition bit is 0 */
  139 +#define INTR_ALWAYS 0x0030 /* always interrupt */
  140 +
  141 +/* Branch control values in command field */
  142 +
  143 +#define BR_MASK 0x000c
  144 +#define BR_NEVER 0x0000 /* don't branch */
  145 +#define BR_IFSET 0x0004 /* branch if condition bit is 1 */
  146 +#define BR_IFCLR 0x0008 /* branch if condition bit is 0 */
  147 +#define BR_ALWAYS 0x000c /* always branch */
  148 +
  149 +/* Wait control values in command field */
  150 +
  151 +#define WAIT_MASK 0x0003
  152 +#define WAIT_NEVER 0x0000 /* don't wait */
  153 +#define WAIT_IFSET 0x0001 /* wait if condition bit is 1 */
  154 +#define WAIT_IFCLR 0x0002 /* wait if condition bit is 0 */
  155 +#define WAIT_ALWAYS 0x0003 /* always wait */
  156 +
  157 +typedef struct DBDMA_channel {
  158 + int channel;
  159 + uint32_t regs[DBDMA_REGS];
  160 + qemu_irq irq;
  161 + DBDMA_transfer io;
  162 + DBDMA_transfer_handler transfer_handler;
  163 + dbdma_cmd current;
  164 +} DBDMA_channel;
  165 +
  166 +#ifdef DEBUG_DBDMA
  167 +static void dump_dbdma_cmd(dbdma_cmd *cmd)
  168 +{
  169 + printf("dbdma_cmd %p\n", cmd);
  170 + printf(" req_count 0x%04x\n", le16_to_cpu(cmd->req_count));
  171 + printf(" command 0x%04x\n", le16_to_cpu(cmd->command));
  172 + printf(" phy_addr 0x%08x\n", le32_to_cpu(cmd->phy_addr));
  173 + printf(" cmd_dep 0x%08x\n", le32_to_cpu(cmd->cmd_dep));
  174 + printf(" res_count 0x%04x\n", le16_to_cpu(cmd->res_count));
  175 + printf(" xfer_status 0x%04x\n", le16_to_cpu(cmd->xfer_status));
  176 +}
  177 +#else
  178 +static void dump_dbdma_cmd(dbdma_cmd *cmd)
42 179 {
43   - DBDMA_DPRINTF("writeb 0x" TARGET_FMT_plx " <= 0x%08x\n", addr, value);
  180 +}
  181 +#endif
  182 +static void dbdma_cmdptr_load(DBDMA_channel *ch)
  183 +{
  184 + DBDMA_DPRINTF("dbdma_cmdptr_load 0x%08x\n",
  185 + be32_to_cpu(ch->regs[DBDMA_CMDPTR_LO]));
  186 + cpu_physical_memory_read(be32_to_cpu(ch->regs[DBDMA_CMDPTR_LO]),
  187 + (uint8_t*)&ch->current, sizeof(dbdma_cmd));
44 188 }
45 189  
46   -static void dbdma_writew (void *opaque,
47   - target_phys_addr_t addr, uint32_t value)
  190 +static void dbdma_cmdptr_save(DBDMA_channel *ch)
48 191 {
49   - DBDMA_DPRINTF("writew 0x" TARGET_FMT_plx " <= 0x%08x\n", addr, value);
  192 + DBDMA_DPRINTF("dbdma_cmdptr_save 0x%08x\n",
  193 + be32_to_cpu(ch->regs[DBDMA_CMDPTR_LO]));
  194 + DBDMA_DPRINTF("xfer_status 0x%08x res_count 0x%04x\n",
  195 + le16_to_cpu(ch->current.xfer_status),
  196 + le16_to_cpu(ch->current.res_count));
  197 + cpu_physical_memory_write(be32_to_cpu(ch->regs[DBDMA_CMDPTR_LO]),
  198 + (uint8_t*)&ch->current, sizeof(dbdma_cmd));
50 199 }
51 200  
52   -static void dbdma_writel (void *opaque,
53   - target_phys_addr_t addr, uint32_t value)
  201 +static void kill_channel(DBDMA_channel *ch)
54 202 {
55   - DBDMA_DPRINTF("writel 0x" TARGET_FMT_plx " <= 0x%08x\n", addr, value);
  203 + DBDMA_DPRINTF("kill_channel\n");
  204 +
  205 + ch->regs[DBDMA_STATUS] |= cpu_to_be32(DEAD);
  206 + ch->regs[DBDMA_STATUS] &= cpu_to_be32(~ACTIVE);
  207 +
  208 + qemu_irq_raise(ch->irq);
  209 +}
  210 +
  211 +static void conditional_interrupt(DBDMA_channel *ch)
  212 +{
  213 + dbdma_cmd *current = &ch->current;
  214 + uint16_t intr;
  215 + uint16_t sel_mask, sel_value;
  216 + uint32_t status;
  217 + int cond;
  218 +
  219 + DBDMA_DPRINTF("conditional_interrupt\n");
  220 +
  221 + intr = be16_to_cpu(current->command) & INTR_MASK;
  222 +
  223 + switch(intr) {
  224 + case INTR_NEVER: /* don't interrupt */
  225 + return;
  226 + case INTR_ALWAYS: /* always interrupt */
  227 + qemu_irq_raise(ch->irq);
  228 + return;
  229 + }
  230 +
  231 + status = be32_to_cpu(ch->regs[DBDMA_STATUS]) & DEVSTAT;
  232 +
  233 + sel_mask = (be32_to_cpu(ch->regs[DBDMA_INTR_SEL]) >> 16) & 0x0f;
  234 + sel_value = be32_to_cpu(ch->regs[DBDMA_INTR_SEL]) & 0x0f;
  235 +
  236 + cond = (status & sel_mask) == (sel_value & sel_mask);
  237 +
  238 + switch(intr) {
  239 + case INTR_IFSET: /* intr if condition bit is 1 */
  240 + if (cond)
  241 + qemu_irq_raise(ch->irq);
  242 + return;
  243 + case INTR_IFCLR: /* intr if condition bit is 0 */
  244 + if (!cond)
  245 + qemu_irq_raise(ch->irq);
  246 + return;
  247 + }
  248 +}
  249 +
  250 +static int conditional_wait(DBDMA_channel *ch)
  251 +{
  252 + dbdma_cmd *current = &ch->current;
  253 + uint16_t wait;
  254 + uint16_t sel_mask, sel_value;
  255 + uint32_t status;
  256 + int cond;
  257 +
  258 + DBDMA_DPRINTF("conditional_wait\n");
  259 +
  260 + wait = be16_to_cpu(current->command) & WAIT_MASK;
  261 +
  262 + switch(wait) {
  263 + case WAIT_NEVER: /* don't wait */
  264 + return 0;
  265 + case WAIT_ALWAYS: /* always wait */
  266 + return 1;
  267 + }
  268 +
  269 + status = be32_to_cpu(ch->regs[DBDMA_STATUS]) & DEVSTAT;
  270 +
  271 + sel_mask = (be32_to_cpu(ch->regs[DBDMA_WAIT_SEL]) >> 16) & 0x0f;
  272 + sel_value = be32_to_cpu(ch->regs[DBDMA_WAIT_SEL]) & 0x0f;
  273 +
  274 + cond = (status & sel_mask) == (sel_value & sel_mask);
  275 +
  276 + switch(wait) {
  277 + case WAIT_IFSET: /* wait if condition bit is 1 */
  278 + if (cond)
  279 + return 1;
  280 + return 0;
  281 + case WAIT_IFCLR: /* wait if condition bit is 0 */
  282 + if (!cond)
  283 + return 1;
  284 + return 0;
  285 + }
  286 + return 0;
  287 +}
  288 +
  289 +static void next(DBDMA_channel *ch)
  290 +{
  291 + uint32_t cp;
  292 +
  293 + ch->regs[DBDMA_STATUS] &= cpu_to_be32(~BT);
  294 +
  295 + cp = be32_to_cpu(ch->regs[DBDMA_CMDPTR_LO]);
  296 + ch->regs[DBDMA_CMDPTR_LO] = cpu_to_be32(cp + sizeof(dbdma_cmd));
  297 + dbdma_cmdptr_load(ch);
  298 +}
  299 +
  300 +static void branch(DBDMA_channel *ch)
  301 +{
  302 + dbdma_cmd *current = &ch->current;
  303 +
  304 + ch->regs[DBDMA_CMDPTR_LO] = current->cmd_dep;
  305 + ch->regs[DBDMA_STATUS] |= cpu_to_be32(BT);
  306 + dbdma_cmdptr_load(ch);
  307 +}
  308 +
  309 +static void conditional_branch(DBDMA_channel *ch)
  310 +{
  311 + dbdma_cmd *current = &ch->current;
  312 + uint16_t br;
  313 + uint16_t sel_mask, sel_value;
  314 + uint32_t status;
  315 + int cond;
  316 +
  317 + DBDMA_DPRINTF("conditional_branch\n");
  318 +
  319 + /* check if we must branch */
  320 +
  321 + br = be16_to_cpu(current->command) & BR_MASK;
  322 +
  323 + switch(br) {
  324 + case BR_NEVER: /* don't branch */
  325 + next(ch);
  326 + return;
  327 + case BR_ALWAYS: /* always branch */
  328 + branch(ch);
  329 + return;
  330 + }
  331 +
  332 + status = be32_to_cpu(ch->regs[DBDMA_STATUS]) & DEVSTAT;
  333 +
  334 + sel_mask = (be32_to_cpu(ch->regs[DBDMA_BRANCH_SEL]) >> 16) & 0x0f;
  335 + sel_value = be32_to_cpu(ch->regs[DBDMA_BRANCH_SEL]) & 0x0f;
  336 +
  337 + cond = (status & sel_mask) == (sel_value & sel_mask);
  338 +
  339 + switch(br) {
  340 + case BR_IFSET: /* branch if condition bit is 1 */
  341 + if (cond)
  342 + branch(ch);
  343 + else
  344 + next(ch);
  345 + return;
  346 + case BR_IFCLR: /* branch if condition bit is 0 */
  347 + if (!cond)
  348 + branch(ch);
  349 + else
  350 + next(ch);
  351 + return;
  352 + }
  353 +}
  354 +
  355 +static int dbdma_read_memory(DBDMA_transfer *io)
  356 +{
  357 + DBDMA_channel *ch = io->channel;
  358 + dbdma_cmd *current = &ch->current;
  359 +
  360 + DBDMA_DPRINTF("DBDMA_read_memory\n");
  361 +
  362 + cpu_physical_memory_read(le32_to_cpu(current->phy_addr) + io->buf_pos,
  363 + io->buf, io->buf_len);
  364 +
  365 + return io->buf_len;
  366 +}
  367 +
  368 +static int dbdma_write_memory(DBDMA_transfer *io)
  369 +{
  370 + DBDMA_channel *ch = io->channel;
  371 + dbdma_cmd *current = &ch->current;
  372 +
  373 + DBDMA_DPRINTF("DBDMA_write_memory\n");
  374 +
  375 + cpu_physical_memory_write(le32_to_cpu(current->phy_addr) + io->buf_pos,
  376 + io->buf, io->buf_len);
  377 +
  378 + return io->buf_len;
  379 +}
  380 +
  381 +static int start_output(DBDMA_channel *ch, int key, uint32_t addr,
  382 + uint16_t req_count, int is_last)
  383 +{
  384 + dbdma_cmd *current = &ch->current;
  385 + uint32_t n;
  386 +
  387 + DBDMA_DPRINTF("start_output\n");
  388 +
  389 + /* KEY_REGS, KEY_DEVICE and KEY_STREAM
  390 + * are not implemented in the mac-io chip
  391 + */
  392 +
  393 + DBDMA_DPRINTF("addr 0x%x key 0x%x\n", addr, key);
  394 + if (!addr || key > KEY_STREAM3) {
  395 + kill_channel(ch);
  396 + return 0;
  397 + }
  398 +
  399 + ch->io.buf = NULL;
  400 + ch->io.buf_pos = 0;
  401 + ch->io.buf_len = 0;
  402 + ch->io.len = req_count;
  403 + ch->io.is_last = is_last;
  404 + n = ch->transfer_handler(&ch->io, dbdma_read_memory);
  405 +
  406 + if (conditional_wait(ch))
  407 + return 1;
  408 +
  409 + current->xfer_status = cpu_to_le16(be32_to_cpu(ch->regs[DBDMA_STATUS]));
  410 + current->res_count = cpu_to_le16(0);
  411 + dbdma_cmdptr_save(ch);
  412 +
  413 + conditional_interrupt(ch);
  414 + conditional_branch(ch);
  415 +
  416 + return 1;
  417 +}
  418 +
  419 +static int start_input(DBDMA_channel *ch, int key, uint32_t addr,
  420 + uint16_t req_count, int is_last)
  421 +{
  422 + dbdma_cmd *current = &ch->current;
  423 + uint32_t n;
  424 +
  425 + DBDMA_DPRINTF("start_input\n");
  426 +
  427 + /* KEY_REGS, KEY_DEVICE and KEY_STREAM
  428 + * are not implemented in the mac-io chip
  429 + */
  430 +
  431 + if (!addr || key > KEY_STREAM3) {
  432 + kill_channel(ch);
  433 + return 0;
  434 + }
  435 +
  436 + ch->io.buf = NULL;
  437 + ch->io.buf_pos = 0;
  438 + ch->io.buf_len = 0;
  439 + ch->io.len = req_count;
  440 + ch->io.is_last = is_last;
  441 + n = ch->transfer_handler(&ch->io, dbdma_write_memory);
  442 +
  443 + if (conditional_wait(ch))
  444 + return 1;
  445 +
  446 + current->xfer_status = cpu_to_le16(be32_to_cpu(ch->regs[DBDMA_STATUS]));
  447 + current->res_count = cpu_to_le16(0);
  448 + dbdma_cmdptr_save(ch);
  449 +
  450 + conditional_interrupt(ch);
  451 + conditional_branch(ch);
  452 +
  453 + return 1;
  454 +}
  455 +
  456 +static int load_word(DBDMA_channel *ch, int key, uint32_t addr,
  457 + uint16_t len)
  458 +{
  459 + dbdma_cmd *current = &ch->current;
  460 + uint32_t val;
  461 +
  462 + DBDMA_DPRINTF("load_word\n");
  463 +
  464 + /* only implements KEY_SYSTEM */
  465 +
  466 + if (key != KEY_SYSTEM) {
  467 + printf("DBDMA: LOAD_WORD, unimplemented key %x\n", key);
  468 + kill_channel(ch);
  469 + return 0;
  470 + }
  471 +
  472 + cpu_physical_memory_read(addr, (uint8_t*)&val, len);
  473 +
  474 + if (len == 2)
  475 + val = (val << 16) | (current->cmd_dep & 0x0000ffff);
  476 + else if (len == 1)
  477 + val = (val << 24) | (current->cmd_dep & 0x00ffffff);
  478 +
  479 + current->cmd_dep = val;
  480 +
  481 + if (conditional_wait(ch))
  482 + return 1;
  483 +
  484 + current->xfer_status = cpu_to_le16(be32_to_cpu(ch->regs[DBDMA_STATUS]));
  485 + dbdma_cmdptr_save(ch);
  486 +
  487 + conditional_interrupt(ch);
  488 + next(ch);
  489 +
  490 + return 1;
  491 +}
  492 +
  493 +static int store_word(DBDMA_channel *ch, int key, uint32_t addr,
  494 + uint16_t len)
  495 +{
  496 + dbdma_cmd *current = &ch->current;
  497 + uint32_t val;
  498 +
  499 + DBDMA_DPRINTF("store_word\n");
  500 +
  501 + /* only implements KEY_SYSTEM */
  502 +
  503 + if (key != KEY_SYSTEM) {
  504 + printf("DBDMA: STORE_WORD, unimplemented key %x\n", key);
  505 + kill_channel(ch);
  506 + return 0;
  507 + }
  508 +
  509 + val = current->cmd_dep;
  510 + if (len == 2)
  511 + val >>= 16;
  512 + else if (len == 1)
  513 + val >>= 24;
  514 +
  515 + cpu_physical_memory_write(addr, (uint8_t*)&val, len);
  516 +
  517 + if (conditional_wait(ch))
  518 + return 1;
  519 +
  520 + current->xfer_status = cpu_to_le16(be32_to_cpu(ch->regs[DBDMA_STATUS]));
  521 + dbdma_cmdptr_save(ch);
  522 +
  523 + conditional_interrupt(ch);
  524 + next(ch);
  525 +
  526 + return 1;
  527 +}
  528 +
  529 +static int nop(DBDMA_channel *ch)
  530 +{
  531 + dbdma_cmd *current = &ch->current;
  532 +
  533 + if (conditional_wait(ch))
  534 + return 1;
  535 +
  536 + current->xfer_status = cpu_to_le16(be32_to_cpu(ch->regs[DBDMA_STATUS]));
  537 + dbdma_cmdptr_save(ch);
  538 +
  539 + conditional_interrupt(ch);
  540 + conditional_branch(ch);
  541 +
  542 + return 1;
56 543 }
57 544  
58   -static uint32_t dbdma_readb (void *opaque, target_phys_addr_t addr)
  545 +static int stop(DBDMA_channel *ch)
59 546 {
60   - DBDMA_DPRINTF("readb 0x" TARGET_FMT_plx " => 0\n", addr);
  547 + ch->regs[DBDMA_STATUS] &= cpu_to_be32(~(ACTIVE|DEAD));
  548 +
  549 + /* the stop command does not increment command pointer */
61 550  
62 551 return 0;
63 552 }
64 553  
65   -static uint32_t dbdma_readw (void *opaque, target_phys_addr_t addr)
  554 +static int channel_run(DBDMA_channel *ch)
66 555 {
67   - DBDMA_DPRINTF("readw 0x" TARGET_FMT_plx " => 0\n", addr);
  556 + dbdma_cmd *current = &ch->current;
  557 + uint16_t cmd, key;
  558 + uint16_t req_count;
  559 + uint32_t phy_addr;
  560 +
  561 + DBDMA_DPRINTF("channel_run\n");
  562 + dump_dbdma_cmd(current);
  563 +
  564 + /* clear WAKE flag at command fetch */
  565 +
  566 + ch->regs[DBDMA_STATUS] &= cpu_to_be32(~WAKE);
  567 +
  568 + cmd = le16_to_cpu(current->command) & COMMAND_MASK;
  569 +
  570 + switch (cmd) {
  571 + case DBDMA_NOP:
  572 + return nop(ch);
  573 +
  574 + case DBDMA_STOP:
  575 + return stop(ch);
  576 + }
  577 +
  578 + key = le16_to_cpu(current->command) & 0x0700;
  579 + req_count = le16_to_cpu(current->req_count);
  580 + phy_addr = le32_to_cpu(current->phy_addr);
  581 +
  582 + if (key == KEY_STREAM4) {
  583 + printf("command %x, invalid key 4\n", cmd);
  584 + kill_channel(ch);
  585 + return 0;
  586 + }
  587 +
  588 + switch (cmd) {
  589 + case OUTPUT_MORE:
  590 + return start_output(ch, key, phy_addr, req_count, 0);
  591 +
  592 + case OUTPUT_LAST:
  593 + return start_output(ch, key, phy_addr, req_count, 1);
  594 +
  595 + case INPUT_MORE:
  596 + return start_input(ch, key, phy_addr, req_count, 0);
  597 +
  598 + case INPUT_LAST:
  599 + return start_input(ch, key, phy_addr, req_count, 1);
  600 + }
  601 +
  602 + if (key < KEY_REGS) {
  603 + printf("command %x, invalid key %x\n", cmd, key);
  604 + key = KEY_SYSTEM;
  605 + }
  606 +
  607 + /* for LOAD_WORD and STORE_WORD, req_count is on 3 bits
  608 + * and BRANCH is invalid
  609 + */
  610 +
  611 + req_count = req_count & 0x0007;
  612 + if (req_count & 0x4) {
  613 + req_count = 4;
  614 + phy_addr &= ~3;
  615 + } else if (req_count & 0x2) {
  616 + req_count = 2;
  617 + phy_addr &= ~1;
  618 + } else
  619 + req_count = 1;
  620 +
  621 + switch (cmd) {
  622 + case LOAD_WORD:
  623 + return load_word(ch, key, phy_addr, req_count);
  624 +
  625 + case STORE_WORD:
  626 + return store_word(ch, key, phy_addr, req_count);
  627 + }
68 628  
69 629 return 0;
70 630 }
71 631  
  632 +static QEMUBH *dbdma_bh;
  633 +
  634 +static void DBDMA_run (DBDMA_channel *ch)
  635 +{
  636 + int channel;
  637 + int rearm = 0;
  638 +
  639 + for (channel = 0; channel < DBDMA_CHANNELS; channel++, ch++) {
  640 + uint32_t status = be32_to_cpu(ch->regs[DBDMA_STATUS]);
  641 + if ((status & RUN) && (status & ACTIVE)) {
  642 + if (status & FLUSH)
  643 + while (channel_run(ch));
  644 + else if (channel_run(ch))
  645 + rearm = 1;
  646 + }
  647 + ch->regs[DBDMA_STATUS] &= cpu_to_be32(~FLUSH);
  648 + }
  649 +
  650 + if (rearm)
  651 + qemu_bh_schedule_idle(dbdma_bh);
  652 +}
  653 +
  654 +static void DBDMA_run_bh(void *opaque)
  655 +{
  656 + DBDMA_channel *ch = opaque;
  657 +
  658 + DBDMA_DPRINTF("DBDMA_run_bh\n");
  659 +
  660 + DBDMA_run(ch);
  661 +}
  662 +
  663 +void DBDMA_register_channel(void *dbdma, int nchan, qemu_irq irq,
  664 + DBDMA_transfer_handler transfer_handler,
  665 + void *opaque)
  666 +{
  667 + DBDMA_channel *ch = ( DBDMA_channel *)dbdma + nchan;
  668 +
  669 + DBDMA_DPRINTF("DBDMA_register_channel 0x%x\n", nchan);
  670 +
  671 + ch->irq = irq;
  672 + ch->channel = nchan;
  673 + ch->transfer_handler = transfer_handler;
  674 + ch->io.opaque = opaque;
  675 + ch->io.channel = ch;
  676 +}
  677 +
  678 +void DBDMA_schedule(void)
  679 +{
  680 + CPUState *env = cpu_single_env;
  681 + if (env)
  682 + cpu_interrupt(env, CPU_INTERRUPT_EXIT);
  683 +}
  684 +
  685 +static void
  686 +dbdma_control_write(DBDMA_channel *ch)
  687 +{
  688 + uint16_t mask, value;
  689 + uint32_t status;
  690 +
  691 + mask = (be32_to_cpu(ch->regs[DBDMA_CONTROL]) >> 16) & 0xffff;
  692 + value = be32_to_cpu(ch->regs[DBDMA_CONTROL]) & 0xffff;
  693 +
  694 + value &= (RUN | PAUSE | FLUSH | WAKE | DEVSTAT);
  695 +
  696 + status = be32_to_cpu(ch->regs[DBDMA_STATUS]);
  697 +
  698 + status = (value & mask) | (status & ~mask);
  699 +
  700 + if (status & WAKE)
  701 + status |= ACTIVE;
  702 + if (status & RUN) {
  703 + status |= ACTIVE;
  704 + status &= ~DEAD;
  705 + }
  706 + if (status & PAUSE)
  707 + status &= ~ACTIVE;
  708 + if ((be32_to_cpu(ch->regs[DBDMA_STATUS]) & RUN) && !(status & RUN)) {
  709 + /* RUN is cleared */
  710 + status &= ~(ACTIVE|DEAD);
  711 + }
  712 +
  713 + DBDMA_DPRINTF(" status 0x%08x\n", status);
  714 +
  715 + ch->regs[DBDMA_STATUS] = cpu_to_be32(status);
  716 +
  717 + if (status & ACTIVE) {
  718 + qemu_bh_schedule_idle(dbdma_bh);
  719 + if (status & FLUSH)
  720 + DBDMA_schedule();
  721 + }
  722 +}
  723 +
  724 +static void dbdma_writel (void *opaque,
  725 + target_phys_addr_t addr, uint32_t value)
  726 +{
  727 + int channel = addr >> DBDMA_CHANNEL_SHIFT;
  728 + DBDMA_channel *ch = (DBDMA_channel *)opaque + channel;
  729 + int reg = (addr - (channel << DBDMA_CHANNEL_SHIFT)) >> 2;
  730 +
  731 + DBDMA_DPRINTF("writel 0x" TARGET_FMT_plx " <= 0x%08x\n", addr, value);
  732 + DBDMA_DPRINTF("channel 0x%x reg 0x%x\n",
  733 + (uint32_t)addr >> DBDMA_CHANNEL_SHIFT, reg);
  734 +
  735 + /* cmdptr cannot be modified if channel is RUN or ACTIVE */
  736 +
  737 + if (reg == DBDMA_CMDPTR_LO &&
  738 + (ch->regs[DBDMA_STATUS] & cpu_to_be32(RUN | ACTIVE)))
  739 + return;
  740 +
  741 + ch->regs[reg] = value;
  742 +
  743 + switch(reg) {
  744 + case DBDMA_CONTROL:
  745 + dbdma_control_write(ch);
  746 + break;
  747 + case DBDMA_CMDPTR_LO:
  748 + /* 16-byte aligned */
  749 + ch->regs[DBDMA_CMDPTR_LO] &= cpu_to_be32(~0xf);
  750 + dbdma_cmdptr_load(ch);
  751 + break;
  752 + case DBDMA_STATUS:
  753 + case DBDMA_INTR_SEL:
  754 + case DBDMA_BRANCH_SEL:
  755 + case DBDMA_WAIT_SEL:
  756 + /* nothing to do */
  757 + break;
  758 + case DBDMA_XFER_MODE:
  759 + case DBDMA_CMDPTR_HI:
  760 + case DBDMA_DATA2PTR_HI:
  761 + case DBDMA_DATA2PTR_LO:
  762 + case DBDMA_ADDRESS_HI:
  763 + case DBDMA_BRANCH_ADDR_HI:
  764 + case DBDMA_RES1:
  765 + case DBDMA_RES2:
  766 + case DBDMA_RES3:
  767 + case DBDMA_RES4:
  768 + /* unused */
  769 + break;
  770 + }
  771 +}
  772 +
72 773 static uint32_t dbdma_readl (void *opaque, target_phys_addr_t addr)
73 774 {
74   - DBDMA_DPRINTF("readl 0x" TARGET_FMT_plx " => 0\n", addr);
  775 + uint32_t value;
  776 + int channel = addr >> DBDMA_CHANNEL_SHIFT;
  777 + DBDMA_channel *ch = (DBDMA_channel *)opaque + channel;
  778 + int reg = (addr - (channel << DBDMA_CHANNEL_SHIFT)) >> 2;
75 779  
76   - return 0;
  780 + value = ch->regs[reg];
  781 +
  782 + DBDMA_DPRINTF("readl 0x" TARGET_FMT_plx " => 0x%08x\n", addr, value);
  783 + DBDMA_DPRINTF("channel 0x%x reg 0x%x\n",
  784 + (uint32_t)addr >> DBDMA_CHANNEL_SHIFT, reg);
  785 +
  786 + switch(reg) {
  787 + case DBDMA_CONTROL:
  788 + value = 0;
  789 + break;
  790 + case DBDMA_STATUS:
  791 + case DBDMA_CMDPTR_LO:
  792 + case DBDMA_INTR_SEL:
  793 + case DBDMA_BRANCH_SEL:
  794 + case DBDMA_WAIT_SEL:
  795 + /* nothing to do */
  796 + break;
  797 + case DBDMA_XFER_MODE:
  798 + case DBDMA_CMDPTR_HI:
  799 + case DBDMA_DATA2PTR_HI:
  800 + case DBDMA_DATA2PTR_LO:
  801 + case DBDMA_ADDRESS_HI:
  802 + case DBDMA_BRANCH_ADDR_HI:
  803 + /* unused */
  804 + value = 0;
  805 + break;
  806 + case DBDMA_RES1:
  807 + case DBDMA_RES2:
  808 + case DBDMA_RES3:
  809 + case DBDMA_RES4:
  810 + /* reserved */
  811 + break;
  812 + }
  813 +
  814 + return value;
77 815 }
78 816  
79 817 static CPUWriteMemoryFunc *dbdma_write[] = {
80   - &dbdma_writeb,
81   - &dbdma_writew,
82   - &dbdma_writel,
  818 + NULL,
  819 + NULL,
  820 + dbdma_writel,
83 821 };
84 822  
85 823 static CPUReadMemoryFunc *dbdma_read[] = {
86   - &dbdma_readb,
87   - &dbdma_readw,
88   - &dbdma_readl,
  824 + NULL,
  825 + NULL,
  826 + dbdma_readl,
89 827 };
90 828  
91 829 static void dbdma_save(QEMUFile *f, void *opaque)
92 830 {
  831 + DBDMA_channel *s = opaque;
  832 + unsigned int i, j;
  833 +
  834 + for (i = 0; i < DBDMA_CHANNELS; i++)
  835 + for (j = 0; j < DBDMA_REGS; j++)
  836 + qemu_put_be32s(f, &s[i].regs[j]);
93 837 }
94 838  
95 839 static int dbdma_load(QEMUFile *f, void *opaque, int version_id)
96 840 {
97   - if (version_id != 1)
  841 + DBDMA_channel *s = opaque;
  842 + unsigned int i, j;
  843 +
  844 + if (version_id != 2)
98 845 return -EINVAL;
99 846  
  847 + for (i = 0; i < DBDMA_CHANNELS; i++)
  848 + for (j = 0; j < DBDMA_REGS; j++)
  849 + qemu_get_be32s(f, &s[i].regs[j]);
  850 +
100 851 return 0;
101 852 }
102 853  
103 854 static void dbdma_reset(void *opaque)
104 855 {
  856 + DBDMA_channel *s = opaque;
  857 + int i;
  858 +
  859 + for (i = 0; i < DBDMA_CHANNELS; i++)
  860 + memset(s[i].regs, 0, DBDMA_SIZE);
105 861 }
106 862  
107   -void dbdma_init (int *dbdma_mem_index)
  863 +void* DBDMA_init (int *dbdma_mem_index)
108 864 {
109   - *dbdma_mem_index = cpu_register_io_memory(0, dbdma_read, dbdma_write, NULL);
110   - register_savevm("dbdma", -1, 1, dbdma_save, dbdma_load, NULL);
111   - qemu_register_reset(dbdma_reset, NULL);
112   - dbdma_reset(NULL);
  865 + DBDMA_channel *s;
  866 +
  867 + s = qemu_mallocz(sizeof(DBDMA_channel) * DBDMA_CHANNELS);
  868 + if (!s)
  869 + return NULL;
  870 +
  871 + *dbdma_mem_index = cpu_register_io_memory(0, dbdma_read, dbdma_write, s);
  872 + register_savevm("dbdma", -1, 1, dbdma_save, dbdma_load, s);
  873 + qemu_register_reset(dbdma_reset, s);
  874 + dbdma_reset(s);
  875 +
  876 + dbdma_bh = qemu_bh_new(DBDMA_run_bh, s);
  877 +
  878 + return s;
113 879 }
... ...
hw/mac_dbdma.h 0 โ†’ 100644
  1 +/*
  2 + * Copyright (c) 2009 Laurent Vivier
  3 + *
  4 + * Permission is hereby granted, free of charge, to any person obtaining a copy
  5 + * of this software and associated documentation files (the "Software"), to deal
  6 + * in the Software without restriction, including without limitation the rights
  7 + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  8 + * copies of the Software, and to permit persons to whom the Software is
  9 + * furnished to do so, subject to the following conditions:
  10 + *
  11 + * The above copyright notice and this permission notice shall be included in
  12 + * all copies or substantial portions of the Software.
  13 + *
  14 + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  15 + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  16 + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
  17 + * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  18 + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  19 + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  20 + * THE SOFTWARE.
  21 + */
  22 +
  23 +typedef struct {
  24 + void *opaque;
  25 + void *channel;
  26 + int len;
  27 + int is_last;
  28 + void *buf;
  29 + int buf_pos;
  30 + int buf_len;
  31 +} DBDMA_transfer;
  32 +
  33 +typedef int (*DBDMA_transfer_cb)(DBDMA_transfer *info);
  34 +typedef int (*DBDMA_transfer_handler)(DBDMA_transfer *info,
  35 + DBDMA_transfer_cb cb);
  36 +
  37 +void DBDMA_register_channel(void *dbdma, int nchan, qemu_irq irq,
  38 + DBDMA_transfer_handler transfer_handler,
  39 + void *opaque);
  40 +void DBDMA_schedule(void);
  41 +void* DBDMA_init (int *dbdma_mem_index);
... ...
hw/ppc_chrp.c
... ... @@ -25,6 +25,7 @@
25 25 #include "hw.h"
26 26 #include "ppc.h"
27 27 #include "ppc_mac.h"
  28 +#include "mac_dbdma.h"
28 29 #include "nvram.h"
29 30 #include "pc.h"
30 31 #include "pci.h"
... ... @@ -86,6 +87,7 @@ static void ppc_core99_init (ram_addr_t ram_size, int vga_ram_size,
86 87 int ppc_boot_device;
87 88 int index;
88 89 BlockDriverState *hd[MAX_IDE_BUS * MAX_IDE_DEVS];
  90 + void *dbdma;
89 91  
90 92 linux_boot = (kernel_filename != NULL);
91 93  
... ... @@ -280,6 +282,7 @@ static void ppc_core99_init (ram_addr_t ram_size, int vga_ram_size,
280 282 else
281 283 hd[i] = NULL;
282 284 }
  285 + dbdma = DBDMA_init(&dbdma_mem_index);
283 286 #if 1
284 287 ide_mem_index[0] = pmac_ide_init(&hd[0], pic[0x13]);
285 288 ide_mem_index[1] = pmac_ide_init(&hd[2], pic[0x14]);
... ... @@ -292,7 +295,6 @@ static void ppc_core99_init (ram_addr_t ram_size, int vga_ram_size,
292 295 adb_kbd_init(&adb_bus);
293 296 adb_mouse_init(&adb_bus);
294 297  
295   - dbdma_init(&dbdma_mem_index);
296 298  
297 299 macio_init(pci_bus, 0x0022, 0, pic_mem_index, dbdma_mem_index,
298 300 cuda_mem_index, NULL, 2, ide_mem_index, escc_mem_index);
... ...
hw/ppc_mac.h
... ... @@ -39,9 +39,6 @@
39 39  
40 40 #define ESCC_CLOCK 3686400
41 41  
42   -/* DBDMA */
43   -void dbdma_init (int *dbdma_mem_index);
44   -
45 42 /* Cuda */
46 43 void cuda_init (int *cuda_mem_index, qemu_irq irq);
47 44  
... ...
hw/ppc_oldworld.c
... ... @@ -25,6 +25,7 @@
25 25 #include "hw.h"
26 26 #include "ppc.h"
27 27 #include "ppc_mac.h"
  28 +#include "mac_dbdma.h"
28 29 #include "nvram.h"
29 30 #include "pc.h"
30 31 #include "sysemu.h"
... ... @@ -132,6 +133,7 @@ static void ppc_heathrow_init (ram_addr_t ram_size, int vga_ram_size,
132 133 BlockDriverState *hd[MAX_IDE_BUS * MAX_IDE_DEVS];
133 134 int index;
134 135 void *fw_cfg;
  136 + void *dbdma;
135 137  
136 138 linux_boot = (kernel_filename != NULL);
137 139  
... ... @@ -343,6 +345,9 @@ static void ppc_heathrow_init (ram_addr_t ram_size, int vga_ram_size,
343 345 hd[1] = NULL;
344 346 else
345 347 hd[1] = drives_table[index].bdrv;
  348 +
  349 + dbdma = DBDMA_init(&dbdma_mem_index);
  350 +
346 351 ide_mem_index[0] = -1;
347 352 ide_mem_index[1] = pmac_ide_init(hd, pic[0x0D]);
348 353  
... ... @@ -355,8 +360,6 @@ static void ppc_heathrow_init (ram_addr_t ram_size, int vga_ram_size,
355 360 nvr = macio_nvram_init(&nvram_mem_index, 0x2000);
356 361 pmac_format_nvram_partition(nvr, 0x2000);
357 362  
358   - dbdma_init(&dbdma_mem_index);
359   -
360 363 macio_init(pci_bus, 0x0010, 1, pic_mem_index, dbdma_mem_index,
361 364 cuda_mem_index, nvr, 2, ide_mem_index, escc_mem_index);
362 365  
... ...