hw/net/opencores_eth.c

   1 /*
   2  * OpenCores Ethernet MAC 10/100 + subset of
   3  * National Semiconductors DP83848C 10/100 PHY
   4  *
   5  * http://opencores.org/svnget,ethmac?file=%2Ftrunk%2F%2Fdoc%2Feth_speci.pdf
   6  * http://cache.national.com/ds/DP/DP83848C.pdf
   7  *
   8  * Copyright (c) 2011, Max Filippov, Open Source and Linux Lab.
   9  * All rights reserved.
  10  *
  11  * Redistribution and use in source and binary forms, with or without
  12  * modification, are permitted provided that the following conditions are met:
  13  *     * Redistributions of source code must retain the above copyright
  14  *       notice, this list of conditions and the following disclaimer.
  15  *     * Redistributions in binary form must reproduce the above copyright
  16  *       notice, this list of conditions and the following disclaimer in the
  17  *       documentation and/or other materials provided with the distribution.
  18  *     * Neither the name of the Open Source and Linux Lab nor the
  19  *       names of its contributors may be used to endorse or promote products
  20  *       derived from this software without specific prior written permission.
  21  *
  22  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
  23  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  25  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
  26  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
  27  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  28  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
  29  * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  30  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  31  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  32  */
  33
  34 #include "qemu/osdep.h"
  35 #include "hw/hw.h"
  36 #include "hw/net/mii.h"
  37 #include "hw/sysbus.h"
  38 #include "net/net.h"
  39 #include "net/eth.h"
  40 #include "sysemu/sysemu.h"
  41 #include "trace.h"
  42
  43 /* RECSMALL is not used because it breaks tap networking in linux:
  44  * incoming ARP responses are too short
  45  */
  46 #undef USE_RECSMALL
  47
  48 #define GET_FIELD(v, field) (((v) & (field)) >> (field ## _LBN))
  49 #define GET_REGBIT(s, reg, field) ((s)->regs[reg] & (reg ## _ ## field))
  50 #define GET_REGFIELD(s, reg, field) \
  51     GET_FIELD((s)->regs[reg], reg ## _ ## field)
  52
  53 #define SET_FIELD(v, field, data) \
  54     ((v) = (((v) & ~(field)) | (((data) << (field ## _LBN)) & (field))))
  55 #define SET_REGFIELD(s, reg, field, data) \
  56     SET_FIELD((s)->regs[reg], reg ## _ ## field, data)
  57
  58 /* PHY MII registers */
  59 enum {
  60     MII_REG_MAX = 16,
  61 };
  62
  63 typedef struct Mii {
  64     uint16_t regs[MII_REG_MAX];
  65     bool link_ok;
  66 } Mii;
  67
  68 static void mii_set_link(Mii *s, bool link_ok)
  69 {
  70     if (link_ok) {
  71         s->regs[MII_BMSR] |= MII_BMSR_LINK_ST;
  72         s->regs[MII_ANLPAR] |= MII_ANLPAR_TXFD | MII_ANLPAR_TX |
  73             MII_ANLPAR_10FD | MII_ANLPAR_10 | MII_ANLPAR_CSMACD;
  74     } else {
  75         s->regs[MII_BMSR] &= ~MII_BMSR_LINK_ST;
  76         s->regs[MII_ANLPAR] &= 0x01ff;
  77     }
  78     s->link_ok = link_ok;
  79 }
  80
  81 static void mii_reset(Mii *s)
  82 {
  83     memset(s->regs, 0, sizeof(s->regs));
  84     s->regs[MII_BMCR] = MII_BMCR_AUTOEN;
  85     s->regs[MII_BMSR] = MII_BMSR_100TX_FD | MII_BMSR_100TX_HD |
  86         MII_BMSR_10T_FD | MII_BMSR_10T_HD | MII_BMSR_MFPS |
  87         MII_BMSR_AN_COMP | MII_BMSR_AUTONEG;
  88     s->regs[MII_PHYID1] = 0x2000;
  89     s->regs[MII_PHYID2] = 0x5c90;
  90     s->regs[MII_ANAR] = MII_ANAR_TXFD | MII_ANAR_TX |
  91         MII_ANAR_10FD | MII_ANAR_10 | MII_ANAR_CSMACD;
  92     mii_set_link(s, s->link_ok);
  93 }
  94
  95 static void mii_ro(Mii *s, uint16_t v)
  96 {
  97 }
  98
  99 static void mii_write_bmcr(Mii *s, uint16_t v)
 100 {
 101     if (v & MII_BMCR_RESET) {
 102         mii_reset(s);
 103     } else {
 104         s->regs[MII_BMCR] = v;
 105     }
 106 }
 107
 108 static void mii_write_host(Mii *s, unsigned idx, uint16_t v)
 109 {
 110     static void (*reg_write[MII_REG_MAX])(Mii *s, uint16_t v) = {
 111         [MII_BMCR] = mii_write_bmcr,
 112         [MII_BMSR] = mii_ro,
 113         [MII_PHYID1] = mii_ro,
 114         [MII_PHYID2] = mii_ro,
 115     };
 116
 117     if (idx < MII_REG_MAX) {
 118         trace_open_eth_mii_write(idx, v);
 119         if (reg_write[idx]) {
 120             reg_write[idx](s, v);
 121         } else {
 122             s->regs[idx] = v;
 123         }
 124     }
 125 }
 126
 127 static uint16_t mii_read_host(Mii *s, unsigned idx)
 128 {
 129     trace_open_eth_mii_read(idx, s->regs[idx]);
 130     return s->regs[idx];
 131 }
 132
 133 /* OpenCores Ethernet registers */
 134 enum {
 135     MODER,
 136     INT_SOURCE,
 137     INT_MASK,
 138     IPGT,
 139     IPGR1,
 140     IPGR2,
 141     PACKETLEN,
 142     COLLCONF,
 143     TX_BD_NUM,
 144     CTRLMODER,
 145     MIIMODER,
 146     MIICOMMAND,
 147     MIIADDRESS,
 148     MIITX_DATA,
 149     MIIRX_DATA,
 150     MIISTATUS,
 151     MAC_ADDR0,
 152     MAC_ADDR1,
 153     HASH0,
 154     HASH1,
 155     TXCTRL,
 156     REG_MAX,
 157 };
 158
 159 enum {
 160     MODER_RECSMALL = 0x10000,
 161     MODER_PAD = 0x8000,
 162     MODER_HUGEN = 0x4000,
 163     MODER_RST = 0x800,
 164     MODER_LOOPBCK = 0x80,
 165     MODER_PRO = 0x20,
 166     MODER_IAM = 0x10,
 167     MODER_BRO = 0x8,
 168     MODER_TXEN = 0x2,
 169     MODER_RXEN = 0x1,
 170 };
 171
 172 enum {
 173     INT_SOURCE_BUSY = 0x10,
 174     INT_SOURCE_RXB = 0x4,
 175     INT_SOURCE_TXB = 0x1,
 176 };
 177
 178 enum {
 179     PACKETLEN_MINFL = 0xffff0000,
 180     PACKETLEN_MINFL_LBN = 16,
 181     PACKETLEN_MAXFL = 0xffff,
 182     PACKETLEN_MAXFL_LBN = 0,
 183 };
 184
 185 enum {
 186     MIICOMMAND_WCTRLDATA = 0x4,
 187     MIICOMMAND_RSTAT = 0x2,
 188     MIICOMMAND_SCANSTAT = 0x1,
 189 };
 190
 191 enum {
 192     MIIADDRESS_RGAD = 0x1f00,
 193     MIIADDRESS_RGAD_LBN = 8,
 194     MIIADDRESS_FIAD = 0x1f,
 195     MIIADDRESS_FIAD_LBN = 0,
 196 };
 197
 198 enum {
 199     MIITX_DATA_CTRLDATA = 0xffff,
 200     MIITX_DATA_CTRLDATA_LBN = 0,
 201 };
 202
 203 enum {
 204     MIIRX_DATA_PRSD = 0xffff,
 205     MIIRX_DATA_PRSD_LBN = 0,
 206 };
 207
 208 enum {
 209     MIISTATUS_LINKFAIL = 0x1,
 210     MIISTATUS_LINKFAIL_LBN = 0,
 211 };
 212
 213 enum {
 214     MAC_ADDR0_BYTE2 = 0xff000000,
 215     MAC_ADDR0_BYTE2_LBN = 24,
 216     MAC_ADDR0_BYTE3 = 0xff0000,
 217     MAC_ADDR0_BYTE3_LBN = 16,
 218     MAC_ADDR0_BYTE4 = 0xff00,
 219     MAC_ADDR0_BYTE4_LBN = 8,
 220     MAC_ADDR0_BYTE5 = 0xff,
 221     MAC_ADDR0_BYTE5_LBN = 0,
 222 };
 223
 224 enum {
 225     MAC_ADDR1_BYTE0 = 0xff00,
 226     MAC_ADDR1_BYTE0_LBN = 8,
 227     MAC_ADDR1_BYTE1 = 0xff,
 228     MAC_ADDR1_BYTE1_LBN = 0,
 229 };
 230
 231 enum {
 232     TXD_LEN = 0xffff0000,
 233     TXD_LEN_LBN = 16,
 234     TXD_RD = 0x8000,
 235     TXD_IRQ = 0x4000,
 236     TXD_WR = 0x2000,
 237     TXD_PAD = 0x1000,
 238     TXD_CRC = 0x800,
 239     TXD_UR = 0x100,
 240     TXD_RTRY = 0xf0,
 241     TXD_RTRY_LBN = 4,
 242     TXD_RL = 0x8,
 243     TXD_LC = 0x4,
 244     TXD_DF = 0x2,
 245     TXD_CS = 0x1,
 246 };
 247
 248 enum {
 249     RXD_LEN = 0xffff0000,
 250     RXD_LEN_LBN = 16,
 251     RXD_E = 0x8000,
 252     RXD_IRQ = 0x4000,
 253     RXD_WRAP = 0x2000,
 254     RXD_CF = 0x100,
 255     RXD_M = 0x80,
 256     RXD_OR = 0x40,
 257     RXD_IS = 0x20,
 258     RXD_DN = 0x10,
 259     RXD_TL = 0x8,
 260     RXD_SF = 0x4,
 261     RXD_CRC = 0x2,
 262     RXD_LC = 0x1,
 263 };
 264
 265 typedef struct desc {
 266     uint32_t len_flags;
 267     uint32_t buf_ptr;
 268 } desc;
 269
 270 #define DEFAULT_PHY 1
 271
 272 #define TYPE_OPEN_ETH "open_eth"
 273 #define OPEN_ETH(obj) OBJECT_CHECK(OpenEthState, (obj), TYPE_OPEN_ETH)
 274
 275 typedef struct OpenEthState {
 276     SysBusDevice parent_obj;
 277
 278     NICState *nic;
 279     NICConf conf;
 280     MemoryRegion reg_io;
 281     MemoryRegion desc_io;
 282     qemu_irq irq;
 283
 284     Mii mii;
 285     uint32_t regs[REG_MAX];
 286     unsigned tx_desc;
 287     unsigned rx_desc;
 288     desc desc[128];
 289 } OpenEthState;
 290
 291 static desc *rx_desc(OpenEthState *s)
 292 {
 293     return s->desc + s->rx_desc;
 294 }
 295
 296 static desc *tx_desc(OpenEthState *s)
 297 {
 298     return s->desc + s->tx_desc;
 299 }
 300
 301 static void open_eth_update_irq(OpenEthState *s,
 302         uint32_t old, uint32_t new)
 303 {
 304     if (!old != !new) {
 305         trace_open_eth_update_irq(new);
 306         qemu_set_irq(s->irq, new);
 307     }
 308 }
 309
 310 static void open_eth_int_source_write(OpenEthState *s,
 311         uint32_t val)
 312 {
 313     uint32_t old_val = s->regs[INT_SOURCE];
 314
 315     s->regs[INT_SOURCE] = val;
 316     open_eth_update_irq(s, old_val & s->regs[INT_MASK],
 317             s->regs[INT_SOURCE] & s->regs[INT_MASK]);
 318 }
 319
 320 static void open_eth_set_link_status(NetClientState *nc)
 321 {
 322     OpenEthState *s = qemu_get_nic_opaque(nc);
 323
 324     if (GET_REGBIT(s, MIICOMMAND, SCANSTAT)) {
 325         SET_REGFIELD(s, MIISTATUS, LINKFAIL, nc->link_down);
 326     }
 327     mii_set_link(&s->mii, !nc->link_down);
 328 }
 329
 330 static void open_eth_reset(void *opaque)
 331 {
 332     OpenEthState *s = opaque;
 333
 334     memset(s->regs, 0, sizeof(s->regs));
 335     s->regs[MODER] = 0xa000;
 336     s->regs[IPGT] = 0x12;
 337     s->regs[IPGR1] = 0xc;
 338     s->regs[IPGR2] = 0x12;
 339     s->regs[PACKETLEN] = 0x400600;
 340     s->regs[COLLCONF] = 0xf003f;
 341     s->regs[TX_BD_NUM] = 0x40;
 342     s->regs[MIIMODER] = 0x64;
 343
 344     s->tx_desc = 0;
 345     s->rx_desc = 0x40;
 346
 347     mii_reset(&s->mii);
 348     open_eth_set_link_status(qemu_get_queue(s->nic));
 349 }
 350
 351 static int open_eth_can_receive(NetClientState *nc)
 352 {
 353     OpenEthState *s = qemu_get_nic_opaque(nc);
 354
 355     return GET_REGBIT(s, MODER, RXEN) &&
 356         (s->regs[TX_BD_NUM] < 0x80);
 357 }
 358
 359 static ssize_t open_eth_receive(NetClientState *nc,
 360         const uint8_t *buf, size_t size)
 361 {
 362     OpenEthState *s = qemu_get_nic_opaque(nc);
 363     size_t maxfl = GET_REGFIELD(s, PACKETLEN, MAXFL);
 364     size_t minfl = GET_REGFIELD(s, PACKETLEN, MINFL);
 365     size_t fcsl = 4;
 366     bool miss = true;
 367
 368     trace_open_eth_receive((unsigned)size);
 369
 370     if (size >= 6) {
 371         static const uint8_t bcast_addr[] = {
 372             0xff, 0xff, 0xff, 0xff, 0xff, 0xff
 373         };
 374         if (memcmp(buf, bcast_addr, sizeof(bcast_addr)) == 0) {
 375             miss = GET_REGBIT(s, MODER, BRO);
 376         } else if ((buf[0] & 0x1) || GET_REGBIT(s, MODER, IAM)) {
 377             unsigned mcast_idx = net_crc32(buf, ETH_ALEN) >> 26;
 378             miss = !(s->regs[HASH0 + mcast_idx / 32] &
 379                     (1 << (mcast_idx % 32)));
 380             trace_open_eth_receive_mcast(
 381                     mcast_idx, s->regs[HASH0], s->regs[HASH1]);
 382         } else {
 383             miss = GET_REGFIELD(s, MAC_ADDR1, BYTE0) != buf[0] ||
 384                 GET_REGFIELD(s, MAC_ADDR1, BYTE1) != buf[1] ||
 385                 GET_REGFIELD(s, MAC_ADDR0, BYTE2) != buf[2] ||
 386                 GET_REGFIELD(s, MAC_ADDR0, BYTE3) != buf[3] ||
 387                 GET_REGFIELD(s, MAC_ADDR0, BYTE4) != buf[4] ||
 388                 GET_REGFIELD(s, MAC_ADDR0, BYTE5) != buf[5];
 389         }
 390     }
 391
 392     if (miss && !GET_REGBIT(s, MODER, PRO)) {
 393         trace_open_eth_receive_reject();
 394         return size;
 395     }
 396
 397 #ifdef USE_RECSMALL
 398     if (GET_REGBIT(s, MODER, RECSMALL) || size >= minfl) {
 399 #else
 400     {
 401 #endif
 402         static const uint8_t zero[64] = {0};
 403         desc *desc = rx_desc(s);
 404         size_t copy_size = GET_REGBIT(s, MODER, HUGEN) ? 65536 : maxfl;
 405
 406         if (!(desc->len_flags & RXD_E)) {
 407             open_eth_int_source_write(s,
 408                     s->regs[INT_SOURCE] | INT_SOURCE_BUSY);
 409             return size;
 410         }
 411
 412         desc->len_flags &= ~(RXD_CF | RXD_M | RXD_OR |
 413                 RXD_IS | RXD_DN | RXD_TL | RXD_SF | RXD_CRC | RXD_LC);
 414
 415         if (copy_size > size) {
 416             copy_size = size;
 417         } else {
 418             fcsl = 0;
 419         }
 420         if (miss) {
 421             desc->len_flags |= RXD_M;
 422         }
 423         if (GET_REGBIT(s, MODER, HUGEN) && size > maxfl) {
 424             desc->len_flags |= RXD_TL;
 425         }
 426 #ifdef USE_RECSMALL
 427         if (size < minfl) {
 428             desc->len_flags |= RXD_SF;
 429         }
 430 #endif
 431
 432         cpu_physical_memory_write(desc->buf_ptr, buf, copy_size);
 433
 434         if (GET_REGBIT(s, MODER, PAD) && copy_size < minfl) {
 435             if (minfl - copy_size > fcsl) {
 436                 fcsl = 0;
 437             } else {
 438                 fcsl -= minfl - copy_size;
 439             }
 440             while (copy_size < minfl) {
 441                 size_t zero_sz = minfl - copy_size < sizeof(zero) ?
 442                     minfl - copy_size : sizeof(zero);
 443
 444                 cpu_physical_memory_write(desc->buf_ptr + copy_size,
 445                         zero, zero_sz);
 446                 copy_size += zero_sz;
 447             }
 448         }
 449
 450         /* There's no FCS in the frames handed to us by the QEMU, zero fill it.
 451          * Don't do it if the frame is cut at the MAXFL or padded with 4 or
 452          * more bytes to the MINFL.
 453          */
 454         cpu_physical_memory_write(desc->buf_ptr + copy_size, zero, fcsl);
 455         copy_size += fcsl;
 456
 457         SET_FIELD(desc->len_flags, RXD_LEN, copy_size);
 458
 459         if ((desc->len_flags & RXD_WRAP) || s->rx_desc == 0x7f) {
 460             s->rx_desc = s->regs[TX_BD_NUM];
 461         } else {
 462             ++s->rx_desc;
 463         }
 464         desc->len_flags &= ~RXD_E;
 465
 466         trace_open_eth_receive_desc(desc->buf_ptr, desc->len_flags);
 467
 468         if (desc->len_flags & RXD_IRQ) {
 469             open_eth_int_source_write(s,
 470                     s->regs[INT_SOURCE] | INT_SOURCE_RXB);
 471         }
 472     }
 473     return size;
 474 }
 475
 476 static NetClientInfo net_open_eth_info = {
 477     .type = NET_CLIENT_DRIVER_NIC,
 478     .size = sizeof(NICState),
 479     .can_receive = open_eth_can_receive,
 480     .receive = open_eth_receive,
 481     .link_status_changed = open_eth_set_link_status,
 482 };
 483
 484 static void open_eth_start_xmit(OpenEthState *s, desc *tx)
 485 {
 486     uint8_t *buf = NULL;
 487     uint8_t buffer[0x600];
 488     unsigned len = GET_FIELD(tx->len_flags, TXD_LEN);
 489     unsigned tx_len = len;
 490
 491     if ((tx->len_flags & TXD_PAD) &&
 492             tx_len < GET_REGFIELD(s, PACKETLEN, MINFL)) {
 493         tx_len = GET_REGFIELD(s, PACKETLEN, MINFL);
 494     }
 495     if (!GET_REGBIT(s, MODER, HUGEN) &&
 496             tx_len > GET_REGFIELD(s, PACKETLEN, MAXFL)) {
 497         tx_len = GET_REGFIELD(s, PACKETLEN, MAXFL);
 498     }
 499
 500     trace_open_eth_start_xmit(tx->buf_ptr, len, tx_len);
 501
 502     if (tx_len > sizeof(buffer)) {
 503         buf = g_new(uint8_t, tx_len);
 504     } else {
 505         buf = buffer;
 506     }
 507     if (len > tx_len) {
 508         len = tx_len;
 509     }
 510     cpu_physical_memory_read(tx->buf_ptr, buf, len);
 511     if (tx_len > len) {
 512         memset(buf + len, 0, tx_len - len);
 513     }
 514     qemu_send_packet(qemu_get_queue(s->nic), buf, tx_len);
 515     if (tx_len > sizeof(buffer)) {
 516         g_free(buf);
 517     }
 518
 519     if (tx->len_flags & TXD_WR) {
 520         s->tx_desc = 0;
 521     } else {
 522         ++s->tx_desc;
 523         if (s->tx_desc >= s->regs[TX_BD_NUM]) {
 524             s->tx_desc = 0;
 525         }
 526     }
 527     tx->len_flags &= ~(TXD_RD | TXD_UR |
 528             TXD_RTRY | TXD_RL | TXD_LC | TXD_DF | TXD_CS);
 529     if (tx->len_flags & TXD_IRQ) {
 530         open_eth_int_source_write(s, s->regs[INT_SOURCE] | INT_SOURCE_TXB);
 531     }
 532
 533 }
 534
 535 static void open_eth_check_start_xmit(OpenEthState *s)
 536 {
 537     desc *tx = tx_desc(s);
 538     if (GET_REGBIT(s, MODER, TXEN) && s->regs[TX_BD_NUM] > 0 &&
 539             (tx->len_flags & TXD_RD) &&
 540             GET_FIELD(tx->len_flags, TXD_LEN) > 4) {
 541         open_eth_start_xmit(s, tx);
 542     }
 543 }
 544
 545 static uint64_t open_eth_reg_read(void *opaque,
 546         hwaddr addr, unsigned int size)
 547 {
 548     static uint32_t (*reg_read[REG_MAX])(OpenEthState *s) = {
 549     };
 550     OpenEthState *s = opaque;
 551     unsigned idx = addr / 4;
 552     uint64_t v = 0;
 553
 554     if (idx < REG_MAX) {
 555         if (reg_read[idx]) {
 556             v = reg_read[idx](s);
 557         } else {
 558             v = s->regs[idx];
 559         }
 560     }
 561     trace_open_eth_reg_read((uint32_t)addr, (uint32_t)v);
 562     return v;
 563 }
 564
 565 static void open_eth_notify_can_receive(OpenEthState *s)
 566 {
 567     NetClientState *nc = qemu_get_queue(s->nic);
 568
 569     if (open_eth_can_receive(nc)) {
 570         qemu_flush_queued_packets(nc);
 571     }
 572 }
 573
 574 static void open_eth_ro(OpenEthState *s, uint32_t val)
 575 {
 576 }
 577
 578 static void open_eth_moder_host_write(OpenEthState *s, uint32_t val)
 579 {
 580     uint32_t set = val & ~s->regs[MODER];
 581
 582     if (set & MODER_RST) {
 583         open_eth_reset(s);
 584     }
 585
 586     s->regs[MODER] = val;
 587
 588     if (set & MODER_RXEN) {
 589         s->rx_desc = s->regs[TX_BD_NUM];
 590         open_eth_notify_can_receive(s);
 591     }
 592     if (set & MODER_TXEN) {
 593         s->tx_desc = 0;
 594         open_eth_check_start_xmit(s);
 595     }
 596 }
 597
 598 static void open_eth_int_source_host_write(OpenEthState *s, uint32_t val)
 599 {
 600     uint32_t old = s->regs[INT_SOURCE];
 601
 602     s->regs[INT_SOURCE] &= ~val;
 603     open_eth_update_irq(s, old & s->regs[INT_MASK],
 604             s->regs[INT_SOURCE] & s->regs[INT_MASK]);
 605 }
 606
 607 static void open_eth_int_mask_host_write(OpenEthState *s, uint32_t val)
 608 {
 609     uint32_t old = s->regs[INT_MASK];
 610
 611     s->regs[INT_MASK] = val;
 612     open_eth_update_irq(s, s->regs[INT_SOURCE] & old,
 613             s->regs[INT_SOURCE] & s->regs[INT_MASK]);
 614 }
 615
 616 static void open_eth_tx_bd_num_host_write(OpenEthState *s, uint32_t val)
 617 {
 618     if (val < 0x80) {
 619         bool enable = s->regs[TX_BD_NUM] == 0x80;
 620
 621         s->regs[TX_BD_NUM] = val;
 622         if (enable) {
 623             open_eth_notify_can_receive(s);
 624         }
 625     }
 626 }
 627
 628 static void open_eth_mii_command_host_write(OpenEthState *s, uint32_t val)
 629 {
 630     unsigned fiad = GET_REGFIELD(s, MIIADDRESS, FIAD);
 631     unsigned rgad = GET_REGFIELD(s, MIIADDRESS, RGAD);
 632
 633     if (val & MIICOMMAND_WCTRLDATA) {
 634         if (fiad == DEFAULT_PHY) {
 635             mii_write_host(&s->mii, rgad,
 636                     GET_REGFIELD(s, MIITX_DATA, CTRLDATA));
 637         }
 638     }
 639     if (val & MIICOMMAND_RSTAT) {
 640         if (fiad == DEFAULT_PHY) {
 641             SET_REGFIELD(s, MIIRX_DATA, PRSD,
 642                     mii_read_host(&s->mii, rgad));
 643         } else {
 644             s->regs[MIIRX_DATA] = 0xffff;
 645         }
 646         SET_REGFIELD(s, MIISTATUS, LINKFAIL, qemu_get_queue(s->nic)->link_down);
 647     }
 648 }
 649
 650 static void open_eth_mii_tx_host_write(OpenEthState *s, uint32_t val)
 651 {
 652     SET_REGFIELD(s, MIITX_DATA, CTRLDATA, val);
 653     if (GET_REGFIELD(s, MIIADDRESS, FIAD) == DEFAULT_PHY) {
 654         mii_write_host(&s->mii, GET_REGFIELD(s, MIIADDRESS, RGAD),
 655                 GET_REGFIELD(s, MIITX_DATA, CTRLDATA));
 656     }
 657 }
 658
 659 static void open_eth_reg_write(void *opaque,
 660         hwaddr addr, uint64_t val, unsigned int size)
 661 {
 662     static void (*reg_write[REG_MAX])(OpenEthState *s, uint32_t val) = {
 663         [MODER] = open_eth_moder_host_write,
 664         [INT_SOURCE] = open_eth_int_source_host_write,
 665         [INT_MASK] = open_eth_int_mask_host_write,
 666         [TX_BD_NUM] = open_eth_tx_bd_num_host_write,
 667         [MIICOMMAND] = open_eth_mii_command_host_write,
 668         [MIITX_DATA] = open_eth_mii_tx_host_write,
 669         [MIISTATUS] = open_eth_ro,
 670     };
 671     OpenEthState *s = opaque;
 672     unsigned idx = addr / 4;
 673
 674     if (idx < REG_MAX) {
 675         trace_open_eth_reg_write((uint32_t)addr, (uint32_t)val);
 676         if (reg_write[idx]) {
 677             reg_write[idx](s, val);
 678         } else {
 679             s->regs[idx] = val;
 680         }
 681     }
 682 }
 683
 684 static uint64_t open_eth_desc_read(void *opaque,
 685         hwaddr addr, unsigned int size)
 686 {
 687     OpenEthState *s = opaque;
 688     uint64_t v = 0;
 689
 690     addr &= 0x3ff;
 691     memcpy(&v, (uint8_t *)s->desc + addr, size);
 692     trace_open_eth_desc_read((uint32_t)addr, (uint32_t)v);
 693     return v;
 694 }
 695
 696 static void open_eth_desc_write(void *opaque,
 697         hwaddr addr, uint64_t val, unsigned int size)
 698 {
 699     OpenEthState *s = opaque;
 700
 701     addr &= 0x3ff;
 702     trace_open_eth_desc_write((uint32_t)addr, (uint32_t)val);
 703     memcpy((uint8_t *)s->desc + addr, &val, size);
 704     open_eth_check_start_xmit(s);
 705 }
 706
 707
 708 static const MemoryRegionOps open_eth_reg_ops = {
 709     .read = open_eth_reg_read,
 710     .write = open_eth_reg_write,
 711 };
 712
 713 static const MemoryRegionOps open_eth_desc_ops = {
 714     .read = open_eth_desc_read,
 715     .write = open_eth_desc_write,
 716 };
 717
 718 static int sysbus_open_eth_init(SysBusDevice *sbd)
 719 {
 720     DeviceState *dev = DEVICE(sbd);
 721     OpenEthState *s = OPEN_ETH(dev);
 722
 723     memory_region_init_io(&s->reg_io, OBJECT(dev), &open_eth_reg_ops, s,
 724             "open_eth.regs", 0x54);
 725     sysbus_init_mmio(sbd, &s->reg_io);
 726
 727     memory_region_init_io(&s->desc_io, OBJECT(dev), &open_eth_desc_ops, s,
 728             "open_eth.desc", 0x400);
 729     sysbus_init_mmio(sbd, &s->desc_io);
 730
 731     sysbus_init_irq(sbd, &s->irq);
 732
 733     s->nic = qemu_new_nic(&net_open_eth_info, &s->conf,
 734                           object_get_typename(OBJECT(s)), dev->id, s);
 735     return 0;
 736 }
 737
 738 static void qdev_open_eth_reset(DeviceState *dev)
 739 {
 740     OpenEthState *d = OPEN_ETH(dev);
 741
 742     open_eth_reset(d);
 743 }
 744
 745 static Property open_eth_properties[] = {
 746     DEFINE_NIC_PROPERTIES(OpenEthState, conf),
 747     DEFINE_PROP_END_OF_LIST(),
 748 };
 749
 750 static void open_eth_class_init(ObjectClass *klass, void *data)
 751 {
 752     DeviceClass *dc = DEVICE_CLASS(klass);
 753     SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
 754
 755     k->init = sysbus_open_eth_init;
 756     set_bit(DEVICE_CATEGORY_NETWORK, dc->categories);
 757     dc->desc = "Opencores 10/100 Mbit Ethernet";
 758     dc->reset = qdev_open_eth_reset;
 759     dc->props = open_eth_properties;
 760 }
 761
 762 static const TypeInfo open_eth_info = {
 763     .name          = TYPE_OPEN_ETH,
 764     .parent        = TYPE_SYS_BUS_DEVICE,
 765     .instance_size = sizeof(OpenEthState),
 766     .class_init    = open_eth_class_init,
 767 };
 768
 769 static void open_eth_register_types(void)
 770 {
 771     type_register_static(&open_eth_info);
 772 }
 773
 774 type_init(open_eth_register_types)