qemu/hw/dma/etraxfs_dma.c
<<
>>
Prefs
   1/*
   2 * QEMU ETRAX DMA Controller.
   3 *
   4 * Copyright (c) 2008 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#include "qemu/osdep.h"
  25#include "hw/hw.h"
  26#include "exec/address-spaces.h"
  27#include "qemu-common.h"
  28#include "sysemu/sysemu.h"
  29
  30#include "hw/cris/etraxfs_dma.h"
  31
  32#define D(x)
  33
  34#define RW_DATA           (0x0 / 4)
  35#define RW_SAVED_DATA     (0x58 / 4)
  36#define RW_SAVED_DATA_BUF (0x5c / 4)
  37#define RW_GROUP          (0x60 / 4)
  38#define RW_GROUP_DOWN     (0x7c / 4)
  39#define RW_CMD            (0x80 / 4)
  40#define RW_CFG            (0x84 / 4)
  41#define RW_STAT           (0x88 / 4)
  42#define RW_INTR_MASK      (0x8c / 4)
  43#define RW_ACK_INTR       (0x90 / 4)
  44#define R_INTR            (0x94 / 4)
  45#define R_MASKED_INTR     (0x98 / 4)
  46#define RW_STREAM_CMD     (0x9c / 4)
  47
  48#define DMA_REG_MAX       (0x100 / 4)
  49
  50/* descriptors */
  51
  52// ------------------------------------------------------------ dma_descr_group
  53typedef struct dma_descr_group {
  54  uint32_t                      next;
  55  unsigned                      eol        : 1;
  56  unsigned                      tol        : 1;
  57  unsigned                      bol        : 1;
  58  unsigned                                 : 1;
  59  unsigned                      intr       : 1;
  60  unsigned                                 : 2;
  61  unsigned                      en         : 1;
  62  unsigned                                 : 7;
  63  unsigned                      dis        : 1;
  64  unsigned                      md         : 16;
  65  struct dma_descr_group       *up;
  66  union {
  67    struct dma_descr_context   *context;
  68    struct dma_descr_group     *group;
  69  }                             down;
  70} dma_descr_group;
  71
  72// ---------------------------------------------------------- dma_descr_context
  73typedef struct dma_descr_context {
  74  uint32_t                      next;
  75  unsigned                      eol        : 1;
  76  unsigned                                 : 3;
  77  unsigned                      intr       : 1;
  78  unsigned                                 : 1;
  79  unsigned                      store_mode : 1;
  80  unsigned                      en         : 1;
  81  unsigned                                 : 7;
  82  unsigned                      dis        : 1;
  83  unsigned                      md0        : 16;
  84  unsigned                      md1;
  85  unsigned                      md2;
  86  unsigned                      md3;
  87  unsigned                      md4;
  88  uint32_t                      saved_data;
  89  uint32_t                      saved_data_buf;
  90} dma_descr_context;
  91
  92// ------------------------------------------------------------- dma_descr_data
  93typedef struct dma_descr_data {
  94  uint32_t                      next;
  95  uint32_t                      buf;
  96  unsigned                      eol        : 1;
  97  unsigned                                 : 2;
  98  unsigned                      out_eop    : 1;
  99  unsigned                      intr       : 1;
 100  unsigned                      wait       : 1;
 101  unsigned                                 : 2;
 102  unsigned                                 : 3;
 103  unsigned                      in_eop     : 1;
 104  unsigned                                 : 4;
 105  unsigned                      md         : 16;
 106  uint32_t                      after;
 107} dma_descr_data;
 108
 109/* Constants */
 110enum {
 111  regk_dma_ack_pkt                         = 0x00000100,
 112  regk_dma_anytime                         = 0x00000001,
 113  regk_dma_array                           = 0x00000008,
 114  regk_dma_burst                           = 0x00000020,
 115  regk_dma_client                          = 0x00000002,
 116  regk_dma_copy_next                       = 0x00000010,
 117  regk_dma_copy_up                         = 0x00000020,
 118  regk_dma_data_at_eol                     = 0x00000001,
 119  regk_dma_dis_c                           = 0x00000010,
 120  regk_dma_dis_g                           = 0x00000020,
 121  regk_dma_idle                            = 0x00000001,
 122  regk_dma_intern                          = 0x00000004,
 123  regk_dma_load_c                          = 0x00000200,
 124  regk_dma_load_c_n                        = 0x00000280,
 125  regk_dma_load_c_next                     = 0x00000240,
 126  regk_dma_load_d                          = 0x00000140,
 127  regk_dma_load_g                          = 0x00000300,
 128  regk_dma_load_g_down                     = 0x000003c0,
 129  regk_dma_load_g_next                     = 0x00000340,
 130  regk_dma_load_g_up                       = 0x00000380,
 131  regk_dma_next_en                         = 0x00000010,
 132  regk_dma_next_pkt                        = 0x00000010,
 133  regk_dma_no                              = 0x00000000,
 134  regk_dma_only_at_wait                    = 0x00000000,
 135  regk_dma_restore                         = 0x00000020,
 136  regk_dma_rst                             = 0x00000001,
 137  regk_dma_running                         = 0x00000004,
 138  regk_dma_rw_cfg_default                  = 0x00000000,
 139  regk_dma_rw_cmd_default                  = 0x00000000,
 140  regk_dma_rw_intr_mask_default            = 0x00000000,
 141  regk_dma_rw_stat_default                 = 0x00000101,
 142  regk_dma_rw_stream_cmd_default           = 0x00000000,
 143  regk_dma_save_down                       = 0x00000020,
 144  regk_dma_save_up                         = 0x00000020,
 145  regk_dma_set_reg                         = 0x00000050,
 146  regk_dma_set_w_size1                     = 0x00000190,
 147  regk_dma_set_w_size2                     = 0x000001a0,
 148  regk_dma_set_w_size4                     = 0x000001c0,
 149  regk_dma_stopped                         = 0x00000002,
 150  regk_dma_store_c                         = 0x00000002,
 151  regk_dma_store_descr                     = 0x00000000,
 152  regk_dma_store_g                         = 0x00000004,
 153  regk_dma_store_md                        = 0x00000001,
 154  regk_dma_sw                              = 0x00000008,
 155  regk_dma_update_down                     = 0x00000020,
 156  regk_dma_yes                             = 0x00000001
 157};
 158
 159enum dma_ch_state
 160{
 161        RST = 1,
 162        STOPPED = 2,
 163        RUNNING = 4
 164};
 165
 166struct fs_dma_channel
 167{
 168        qemu_irq irq;
 169        struct etraxfs_dma_client *client;
 170
 171        /* Internal status.  */
 172        int stream_cmd_src;
 173        enum dma_ch_state state;
 174
 175        unsigned int input : 1;
 176        unsigned int eol : 1;
 177
 178        struct dma_descr_group current_g;
 179        struct dma_descr_context current_c;
 180        struct dma_descr_data current_d;
 181
 182        /* Control registers.  */
 183        uint32_t regs[DMA_REG_MAX];
 184};
 185
 186struct fs_dma_ctrl
 187{
 188        MemoryRegion mmio;
 189        int nr_channels;
 190        struct fs_dma_channel *channels;
 191
 192        QEMUBH *bh;
 193};
 194
 195static void DMA_run(void *opaque);
 196static int channel_out_run(struct fs_dma_ctrl *ctrl, int c);
 197
 198static inline uint32_t channel_reg(struct fs_dma_ctrl *ctrl, int c, int reg)
 199{
 200        return ctrl->channels[c].regs[reg];
 201}
 202
 203static inline int channel_stopped(struct fs_dma_ctrl *ctrl, int c)
 204{
 205        return channel_reg(ctrl, c, RW_CFG) & 2;
 206}
 207
 208static inline int channel_en(struct fs_dma_ctrl *ctrl, int c)
 209{
 210        return (channel_reg(ctrl, c, RW_CFG) & 1)
 211                && ctrl->channels[c].client;
 212}
 213
 214static inline int fs_channel(hwaddr addr)
 215{
 216        /* Every channel has a 0x2000 ctrl register map.  */
 217        return addr >> 13;
 218}
 219
 220#ifdef USE_THIS_DEAD_CODE
 221static void channel_load_g(struct fs_dma_ctrl *ctrl, int c)
 222{
 223        hwaddr addr = channel_reg(ctrl, c, RW_GROUP);
 224
 225        /* Load and decode. FIXME: handle endianness.  */
 226        cpu_physical_memory_read (addr, 
 227                                  (void *) &ctrl->channels[c].current_g, 
 228                                  sizeof ctrl->channels[c].current_g);
 229}
 230
 231static void dump_c(int ch, struct dma_descr_context *c)
 232{
 233        printf("%s ch=%d\n", __func__, ch);
 234        printf("next=%x\n", c->next);
 235        printf("saved_data=%x\n", c->saved_data);
 236        printf("saved_data_buf=%x\n", c->saved_data_buf);
 237        printf("eol=%x\n", (uint32_t) c->eol);
 238}
 239
 240static void dump_d(int ch, struct dma_descr_data *d)
 241{
 242        printf("%s ch=%d\n", __func__, ch);
 243        printf("next=%x\n", d->next);
 244        printf("buf=%x\n", d->buf);
 245        printf("after=%x\n", d->after);
 246        printf("intr=%x\n", (uint32_t) d->intr);
 247        printf("out_eop=%x\n", (uint32_t) d->out_eop);
 248        printf("in_eop=%x\n", (uint32_t) d->in_eop);
 249        printf("eol=%x\n", (uint32_t) d->eol);
 250}
 251#endif
 252
 253static void channel_load_c(struct fs_dma_ctrl *ctrl, int c)
 254{
 255        hwaddr addr = channel_reg(ctrl, c, RW_GROUP_DOWN);
 256
 257        /* Load and decode. FIXME: handle endianness.  */
 258        cpu_physical_memory_read (addr, 
 259                                  (void *) &ctrl->channels[c].current_c, 
 260                                  sizeof ctrl->channels[c].current_c);
 261
 262        D(dump_c(c, &ctrl->channels[c].current_c));
 263        /* I guess this should update the current pos.  */
 264        ctrl->channels[c].regs[RW_SAVED_DATA] =
 265                (uint32_t)(unsigned long)ctrl->channels[c].current_c.saved_data;
 266        ctrl->channels[c].regs[RW_SAVED_DATA_BUF] =
 267                (uint32_t)(unsigned long)ctrl->channels[c].current_c.saved_data_buf;
 268}
 269
 270static void channel_load_d(struct fs_dma_ctrl *ctrl, int c)
 271{
 272        hwaddr addr = channel_reg(ctrl, c, RW_SAVED_DATA);
 273
 274        /* Load and decode. FIXME: handle endianness.  */
 275        D(printf("%s ch=%d addr=" TARGET_FMT_plx "\n", __func__, c, addr));
 276        cpu_physical_memory_read (addr,
 277                                  (void *) &ctrl->channels[c].current_d, 
 278                                  sizeof ctrl->channels[c].current_d);
 279
 280        D(dump_d(c, &ctrl->channels[c].current_d));
 281        ctrl->channels[c].regs[RW_DATA] = addr;
 282}
 283
 284static void channel_store_c(struct fs_dma_ctrl *ctrl, int c)
 285{
 286        hwaddr addr = channel_reg(ctrl, c, RW_GROUP_DOWN);
 287
 288        /* Encode and store. FIXME: handle endianness.  */
 289        D(printf("%s ch=%d addr=" TARGET_FMT_plx "\n", __func__, c, addr));
 290        D(dump_d(c, &ctrl->channels[c].current_d));
 291        cpu_physical_memory_write (addr,
 292                                  (void *) &ctrl->channels[c].current_c,
 293                                  sizeof ctrl->channels[c].current_c);
 294}
 295
 296static void channel_store_d(struct fs_dma_ctrl *ctrl, int c)
 297{
 298        hwaddr addr = channel_reg(ctrl, c, RW_SAVED_DATA);
 299
 300        /* Encode and store. FIXME: handle endianness.  */
 301        D(printf("%s ch=%d addr=" TARGET_FMT_plx "\n", __func__, c, addr));
 302        cpu_physical_memory_write (addr,
 303                                  (void *) &ctrl->channels[c].current_d, 
 304                                  sizeof ctrl->channels[c].current_d);
 305}
 306
 307static inline void channel_stop(struct fs_dma_ctrl *ctrl, int c)
 308{
 309        /* FIXME:  */
 310}
 311
 312static inline void channel_start(struct fs_dma_ctrl *ctrl, int c)
 313{
 314        if (ctrl->channels[c].client)
 315        {
 316                ctrl->channels[c].eol = 0;
 317                ctrl->channels[c].state = RUNNING;
 318                if (!ctrl->channels[c].input)
 319                        channel_out_run(ctrl, c);
 320        } else
 321                printf("WARNING: starting DMA ch %d with no client\n", c);
 322
 323        qemu_bh_schedule_idle(ctrl->bh);
 324}
 325
 326static void channel_continue(struct fs_dma_ctrl *ctrl, int c)
 327{
 328        if (!channel_en(ctrl, c) 
 329            || channel_stopped(ctrl, c)
 330            || ctrl->channels[c].state != RUNNING
 331            /* Only reload the current data descriptor if it has eol set.  */
 332            || !ctrl->channels[c].current_d.eol) {
 333                D(printf("continue failed ch=%d state=%d stopped=%d en=%d eol=%d\n", 
 334                         c, ctrl->channels[c].state,
 335                         channel_stopped(ctrl, c),
 336                         channel_en(ctrl,c),
 337                         ctrl->channels[c].eol));
 338                D(dump_d(c, &ctrl->channels[c].current_d));
 339                return;
 340        }
 341
 342        /* Reload the current descriptor.  */
 343        channel_load_d(ctrl, c);
 344
 345        /* If the current descriptor cleared the eol flag and we had already
 346           reached eol state, do the continue.  */
 347        if (!ctrl->channels[c].current_d.eol && ctrl->channels[c].eol) {
 348                D(printf("continue %d ok %x\n", c,
 349                         ctrl->channels[c].current_d.next));
 350                ctrl->channels[c].regs[RW_SAVED_DATA] =
 351                        (uint32_t)(unsigned long)ctrl->channels[c].current_d.next;
 352                channel_load_d(ctrl, c);
 353                ctrl->channels[c].regs[RW_SAVED_DATA_BUF] =
 354                        (uint32_t)(unsigned long)ctrl->channels[c].current_d.buf;
 355
 356                channel_start(ctrl, c);
 357        }
 358        ctrl->channels[c].regs[RW_SAVED_DATA_BUF] =
 359                (uint32_t)(unsigned long)ctrl->channels[c].current_d.buf;
 360}
 361
 362static void channel_stream_cmd(struct fs_dma_ctrl *ctrl, int c, uint32_t v)
 363{
 364        unsigned int cmd = v & ((1 << 10) - 1);
 365
 366        D(printf("%s ch=%d cmd=%x\n",
 367                 __func__, c, cmd));
 368        if (cmd & regk_dma_load_d) {
 369                channel_load_d(ctrl, c);
 370                if (cmd & regk_dma_burst)
 371                        channel_start(ctrl, c);
 372        }
 373
 374        if (cmd & regk_dma_load_c) {
 375                channel_load_c(ctrl, c);
 376        }
 377}
 378
 379static void channel_update_irq(struct fs_dma_ctrl *ctrl, int c)
 380{
 381        D(printf("%s %d\n", __func__, c));
 382        ctrl->channels[c].regs[R_INTR] &=
 383                ~(ctrl->channels[c].regs[RW_ACK_INTR]);
 384
 385        ctrl->channels[c].regs[R_MASKED_INTR] =
 386                ctrl->channels[c].regs[R_INTR]
 387                & ctrl->channels[c].regs[RW_INTR_MASK];
 388
 389        D(printf("%s: chan=%d masked_intr=%x\n", __func__, 
 390                 c,
 391                 ctrl->channels[c].regs[R_MASKED_INTR]));
 392
 393        qemu_set_irq(ctrl->channels[c].irq,
 394                     !!ctrl->channels[c].regs[R_MASKED_INTR]);
 395}
 396
 397static int channel_out_run(struct fs_dma_ctrl *ctrl, int c)
 398{
 399        uint32_t len;
 400        uint32_t saved_data_buf;
 401        unsigned char buf[2 * 1024];
 402
 403        struct dma_context_metadata meta;
 404        bool send_context = true;
 405
 406        if (ctrl->channels[c].eol)
 407                return 0;
 408
 409        do {
 410                bool out_eop;
 411                D(printf("ch=%d buf=%x after=%x\n",
 412                         c,
 413                         (uint32_t)ctrl->channels[c].current_d.buf,
 414                         (uint32_t)ctrl->channels[c].current_d.after));
 415
 416                if (send_context) {
 417                        if (ctrl->channels[c].client->client.metadata_push) {
 418                                meta.metadata = ctrl->channels[c].current_d.md;
 419                                ctrl->channels[c].client->client.metadata_push(
 420                                        ctrl->channels[c].client->client.opaque,
 421                                        &meta);
 422                        }
 423                        send_context = false;
 424                }
 425
 426                channel_load_d(ctrl, c);
 427                saved_data_buf = channel_reg(ctrl, c, RW_SAVED_DATA_BUF);
 428                len = (uint32_t)(unsigned long)
 429                        ctrl->channels[c].current_d.after;
 430                len -= saved_data_buf;
 431
 432                if (len > sizeof buf)
 433                        len = sizeof buf;
 434                cpu_physical_memory_read (saved_data_buf, buf, len);
 435
 436                out_eop = ((saved_data_buf + len) ==
 437                           ctrl->channels[c].current_d.after) &&
 438                        ctrl->channels[c].current_d.out_eop;
 439
 440                D(printf("channel %d pushes %x %u bytes eop=%u\n", c,
 441                         saved_data_buf, len, out_eop));
 442
 443                if (ctrl->channels[c].client->client.push) {
 444                        if (len > 0) {
 445                                ctrl->channels[c].client->client.push(
 446                                        ctrl->channels[c].client->client.opaque,
 447                                        buf, len, out_eop);
 448                        }
 449                } else {
 450                        printf("WARNING: DMA ch%d dataloss,"
 451                               " no attached client.\n", c);
 452                }
 453
 454                saved_data_buf += len;
 455
 456                if (saved_data_buf == (uint32_t)(unsigned long)
 457                                ctrl->channels[c].current_d.after) {
 458                        /* Done. Step to next.  */
 459                        if (ctrl->channels[c].current_d.out_eop) {
 460                                send_context = true;
 461                        }
 462                        if (ctrl->channels[c].current_d.intr) {
 463                                /* data intr.  */
 464                                D(printf("signal intr %d eol=%d\n",
 465                                        len, ctrl->channels[c].current_d.eol));
 466                                ctrl->channels[c].regs[R_INTR] |= (1 << 2);
 467                                channel_update_irq(ctrl, c);
 468                        }
 469                        channel_store_d(ctrl, c);
 470                        if (ctrl->channels[c].current_d.eol) {
 471                                D(printf("channel %d EOL\n", c));
 472                                ctrl->channels[c].eol = 1;
 473
 474                                /* Mark the context as disabled.  */
 475                                ctrl->channels[c].current_c.dis = 1;
 476                                channel_store_c(ctrl, c);
 477
 478                                channel_stop(ctrl, c);
 479                        } else {
 480                                ctrl->channels[c].regs[RW_SAVED_DATA] =
 481                                        (uint32_t)(unsigned long)ctrl->
 482                                                channels[c].current_d.next;
 483                                /* Load new descriptor.  */
 484                                channel_load_d(ctrl, c);
 485                                saved_data_buf = (uint32_t)(unsigned long)
 486                                        ctrl->channels[c].current_d.buf;
 487                        }
 488
 489                        ctrl->channels[c].regs[RW_SAVED_DATA_BUF] =
 490                                                        saved_data_buf;
 491                        D(dump_d(c, &ctrl->channels[c].current_d));
 492                }
 493                ctrl->channels[c].regs[RW_SAVED_DATA_BUF] = saved_data_buf;
 494        } while (!ctrl->channels[c].eol);
 495        return 1;
 496}
 497
 498static int channel_in_process(struct fs_dma_ctrl *ctrl, int c, 
 499                              unsigned char *buf, int buflen, int eop)
 500{
 501        uint32_t len;
 502        uint32_t saved_data_buf;
 503
 504        if (ctrl->channels[c].eol == 1)
 505                return 0;
 506
 507        channel_load_d(ctrl, c);
 508        saved_data_buf = channel_reg(ctrl, c, RW_SAVED_DATA_BUF);
 509        len = (uint32_t)(unsigned long)ctrl->channels[c].current_d.after;
 510        len -= saved_data_buf;
 511        
 512        if (len > buflen)
 513                len = buflen;
 514
 515        cpu_physical_memory_write (saved_data_buf, buf, len);
 516        saved_data_buf += len;
 517
 518        if (saved_data_buf ==
 519            (uint32_t)(unsigned long)ctrl->channels[c].current_d.after
 520            || eop) {
 521                uint32_t r_intr = ctrl->channels[c].regs[R_INTR];
 522
 523                D(printf("in dscr end len=%d\n", 
 524                         ctrl->channels[c].current_d.after
 525                         - ctrl->channels[c].current_d.buf));
 526                ctrl->channels[c].current_d.after = saved_data_buf;
 527
 528                /* Done. Step to next.  */
 529                if (ctrl->channels[c].current_d.intr) {
 530                        /* TODO: signal eop to the client.  */
 531                        /* data intr.  */
 532                        ctrl->channels[c].regs[R_INTR] |= 3;
 533                }
 534                if (eop) {
 535                        ctrl->channels[c].current_d.in_eop = 1;
 536                        ctrl->channels[c].regs[R_INTR] |= 8;
 537                }
 538                if (r_intr != ctrl->channels[c].regs[R_INTR])
 539                        channel_update_irq(ctrl, c);
 540
 541                channel_store_d(ctrl, c);
 542                D(dump_d(c, &ctrl->channels[c].current_d));
 543
 544                if (ctrl->channels[c].current_d.eol) {
 545                        D(printf("channel %d EOL\n", c));
 546                        ctrl->channels[c].eol = 1;
 547
 548                        /* Mark the context as disabled.  */
 549                        ctrl->channels[c].current_c.dis = 1;
 550                        channel_store_c(ctrl, c);
 551
 552                        channel_stop(ctrl, c);
 553                } else {
 554                        ctrl->channels[c].regs[RW_SAVED_DATA] =
 555                                (uint32_t)(unsigned long)ctrl->
 556                                        channels[c].current_d.next;
 557                        /* Load new descriptor.  */
 558                        channel_load_d(ctrl, c);
 559                        saved_data_buf = (uint32_t)(unsigned long)
 560                                ctrl->channels[c].current_d.buf;
 561                }
 562        }
 563
 564        ctrl->channels[c].regs[RW_SAVED_DATA_BUF] = saved_data_buf;
 565        return len;
 566}
 567
 568static inline int channel_in_run(struct fs_dma_ctrl *ctrl, int c)
 569{
 570        if (ctrl->channels[c].client->client.pull) {
 571                ctrl->channels[c].client->client.pull(
 572                        ctrl->channels[c].client->client.opaque);
 573                return 1;
 574        } else
 575                return 0;
 576}
 577
 578static uint32_t dma_rinvalid (void *opaque, hwaddr addr)
 579{
 580        hw_error("Unsupported short raccess. reg=" TARGET_FMT_plx "\n", addr);
 581        return 0;
 582}
 583
 584static uint64_t
 585dma_read(void *opaque, hwaddr addr, unsigned int size)
 586{
 587        struct fs_dma_ctrl *ctrl = opaque;
 588        int c;
 589        uint32_t r = 0;
 590
 591        if (size != 4) {
 592                dma_rinvalid(opaque, addr);
 593        }
 594
 595        /* Make addr relative to this channel and bounded to nr regs.  */
 596        c = fs_channel(addr);
 597        addr &= 0xff;
 598        addr >>= 2;
 599        switch (addr)
 600        {
 601                case RW_STAT:
 602                        r = ctrl->channels[c].state & 7;
 603                        r |= ctrl->channels[c].eol << 5;
 604                        r |= ctrl->channels[c].stream_cmd_src << 8;
 605                        break;
 606
 607                default:
 608                        r = ctrl->channels[c].regs[addr];
 609                        D(printf ("%s c=%d addr=" TARGET_FMT_plx "\n",
 610                                  __func__, c, addr));
 611                        break;
 612        }
 613        return r;
 614}
 615
 616static void
 617dma_winvalid (void *opaque, hwaddr addr, uint32_t value)
 618{
 619        hw_error("Unsupported short waccess. reg=" TARGET_FMT_plx "\n", addr);
 620}
 621
 622static void
 623dma_update_state(struct fs_dma_ctrl *ctrl, int c)
 624{
 625        if (ctrl->channels[c].regs[RW_CFG] & 2)
 626                ctrl->channels[c].state = STOPPED;
 627        if (!(ctrl->channels[c].regs[RW_CFG] & 1))
 628                ctrl->channels[c].state = RST;
 629}
 630
 631static void
 632dma_write(void *opaque, hwaddr addr,
 633          uint64_t val64, unsigned int size)
 634{
 635        struct fs_dma_ctrl *ctrl = opaque;
 636        uint32_t value = val64;
 637        int c;
 638
 639        if (size != 4) {
 640                dma_winvalid(opaque, addr, value);
 641        }
 642
 643        /* Make addr relative to this channel and bounded to nr regs.  */
 644        c = fs_channel(addr);
 645        addr &= 0xff;
 646        addr >>= 2;
 647        switch (addr)
 648        {
 649                case RW_DATA:
 650                        ctrl->channels[c].regs[addr] = value;
 651                        break;
 652
 653                case RW_CFG:
 654                        ctrl->channels[c].regs[addr] = value;
 655                        dma_update_state(ctrl, c);
 656                        break;
 657                case RW_CMD:
 658                        /* continue.  */
 659                        if (value & ~1)
 660                                printf("Invalid store to ch=%d RW_CMD %x\n",
 661                                       c, value);
 662                        ctrl->channels[c].regs[addr] = value;
 663                        channel_continue(ctrl, c);
 664                        break;
 665
 666                case RW_SAVED_DATA:
 667                case RW_SAVED_DATA_BUF:
 668                case RW_GROUP:
 669                case RW_GROUP_DOWN:
 670                        ctrl->channels[c].regs[addr] = value;
 671                        break;
 672
 673                case RW_ACK_INTR:
 674                case RW_INTR_MASK:
 675                        ctrl->channels[c].regs[addr] = value;
 676                        channel_update_irq(ctrl, c);
 677                        if (addr == RW_ACK_INTR)
 678                                ctrl->channels[c].regs[RW_ACK_INTR] = 0;
 679                        break;
 680
 681                case RW_STREAM_CMD:
 682                        if (value & ~1023)
 683                                printf("Invalid store to ch=%d "
 684                                       "RW_STREAMCMD %x\n",
 685                                       c, value);
 686                        ctrl->channels[c].regs[addr] = value;
 687                        D(printf("stream_cmd ch=%d\n", c));
 688                        channel_stream_cmd(ctrl, c, value);
 689                        break;
 690
 691                default:
 692                        D(printf ("%s c=%d " TARGET_FMT_plx "\n",
 693                                __func__, c, addr));
 694                        break;
 695        }
 696}
 697
 698static const MemoryRegionOps dma_ops = {
 699        .read = dma_read,
 700        .write = dma_write,
 701        .endianness = DEVICE_NATIVE_ENDIAN,
 702        .valid = {
 703                .min_access_size = 1,
 704                .max_access_size = 4
 705        }
 706};
 707
 708static int etraxfs_dmac_run(void *opaque)
 709{
 710        struct fs_dma_ctrl *ctrl = opaque;
 711        int i;
 712        int p = 0;
 713
 714        for (i = 0; 
 715             i < ctrl->nr_channels;
 716             i++)
 717        {
 718                if (ctrl->channels[i].state == RUNNING)
 719                {
 720                        if (ctrl->channels[i].input) {
 721                                p += channel_in_run(ctrl, i);
 722                        } else {
 723                                p += channel_out_run(ctrl, i);
 724                        }
 725                }
 726        }
 727        return p;
 728}
 729
 730int etraxfs_dmac_input(struct etraxfs_dma_client *client, 
 731                       void *buf, int len, int eop)
 732{
 733        return channel_in_process(client->ctrl, client->channel, 
 734                                  buf, len, eop);
 735}
 736
 737/* Connect an IRQ line with a channel.  */
 738void etraxfs_dmac_connect(void *opaque, int c, qemu_irq *line, int input)
 739{
 740        struct fs_dma_ctrl *ctrl = opaque;
 741        ctrl->channels[c].irq = *line;
 742        ctrl->channels[c].input = input;
 743}
 744
 745void etraxfs_dmac_connect_client(void *opaque, int c, 
 746                                 struct etraxfs_dma_client *cl)
 747{
 748        struct fs_dma_ctrl *ctrl = opaque;
 749        cl->ctrl = ctrl;
 750        cl->channel = c;
 751        ctrl->channels[c].client = cl;
 752}
 753
 754
 755static void DMA_run(void *opaque)
 756{
 757    struct fs_dma_ctrl *etraxfs_dmac = opaque;
 758    int p = 1;
 759
 760    if (runstate_is_running())
 761        p = etraxfs_dmac_run(etraxfs_dmac);
 762
 763    if (p)
 764        qemu_bh_schedule_idle(etraxfs_dmac->bh);
 765}
 766
 767void *etraxfs_dmac_init(hwaddr base, int nr_channels)
 768{
 769        struct fs_dma_ctrl *ctrl = NULL;
 770
 771        ctrl = g_malloc0(sizeof *ctrl);
 772
 773        ctrl->bh = qemu_bh_new(DMA_run, ctrl);
 774
 775        ctrl->nr_channels = nr_channels;
 776        ctrl->channels = g_malloc0(sizeof ctrl->channels[0] * nr_channels);
 777
 778        memory_region_init_io(&ctrl->mmio, NULL, &dma_ops, ctrl, "etraxfs-dma",
 779                              nr_channels * 0x2000);
 780        memory_region_add_subregion(get_system_memory(), base, &ctrl->mmio);
 781
 782        return ctrl;
 783}
 784