3 #define DEBUG_MIPSNET_SEND
4 #define DEBUG_MIPSNET_RECEIVE
5 //#define DEBUG_MIPSNET_DATA
6 #define DEBUG_MIPSNET_IRQ
8 /* MIPSnet register offsets */
10 #define MIPSNET_DEV_ID 0x00
11 # define MIPSNET_DEV_ID_STRING "MIPSNET0"
12 #define MIPSNET_BUSY 0x08
13 #define MIPSNET_RX_DATA_COUNT 0x0c
14 #define MIPSNET_TX_DATA_COUNT 0x10
15 #define MIPSNET_INT_CTL 0x14
16 # define MIPSNET_INTCTL_TXDONE 0x00000001
17 # define MIPSNET_INTCTL_RXDONE 0x00000002
18 # define MIPSNET_INTCTL_TESTBIT 0x80000000
19 #define MIPSNET_INTERRUPT_INFO 0x18
20 #define MIPSNET_RX_DATA_BUFFER 0x1c
21 #define MIPSNET_TX_DATA_BUFFER 0x20
23 #define MAX_ETH_FRAME_SIZE 1514
25 typedef struct MIPSnetState
{
32 uint8_t rx_buffer
[MAX_ETH_FRAME_SIZE
];
33 uint8_t tx_buffer
[MAX_ETH_FRAME_SIZE
];
39 static void mipsnet_reset(MIPSnetState
*s
)
47 memset(s
->rx_buffer
, 0, MAX_ETH_FRAME_SIZE
);
48 memset(s
->tx_buffer
, 0, MAX_ETH_FRAME_SIZE
);
51 static void mipsnet_update_irq(MIPSnetState
*s
)
53 int isr
= !!s
->intctl
;
54 #ifdef DEBUG_MIPSNET_IRQ
55 printf("mipsnet: Set IRQ to %d (%02x)\n", isr
, s
->intctl
);
57 qemu_set_irq(s
->irq
, isr
);
60 static int mipsnet_buffer_full(MIPSnetState
*s
)
62 if (s
->rx_count
>= MAX_ETH_FRAME_SIZE
)
67 static int mipsnet_can_receive(void *opaque
)
69 MIPSnetState
*s
= opaque
;
73 return !mipsnet_buffer_full(s
);
76 static void mipsnet_receive(void *opaque
, const uint8_t *buf
, int size
)
78 MIPSnetState
*s
= opaque
;
80 #ifdef DEBUG_MIPSNET_RECEIVE
81 printf("mipsnet: receiving len=%d\n", size
);
83 if (!mipsnet_can_receive(opaque
))
88 /* Just accept everything. */
90 /* Write packet data. */
91 memcpy(s
->rx_buffer
, buf
, size
);
96 /* Now we can signal we have received something. */
97 s
->intctl
|= MIPSNET_INTCTL_RXDONE
;
98 mipsnet_update_irq(s
);
101 static uint32_t mipsnet_ioport_read(void *opaque
, uint32_t addr
)
103 MIPSnetState
*s
= opaque
;
105 const char *devid
= MIPSNET_DEV_ID_STRING
;
110 ret
= *((uint32_t *)&devid
);
112 case MIPSNET_DEV_ID
+ 4:
113 ret
= *((uint32_t *)(&devid
+ 4));
118 case MIPSNET_RX_DATA_COUNT
:
121 case MIPSNET_TX_DATA_COUNT
:
124 case MIPSNET_INT_CTL
:
126 s
->intctl
&= ~MIPSNET_INTCTL_TESTBIT
;
128 case MIPSNET_INTERRUPT_INFO
:
129 /* XXX: This seems to be a per-VPE interrupt number. */
132 case MIPSNET_RX_DATA_BUFFER
:
135 ret
= s
->rx_buffer
[s
->rx_read
++];
139 case MIPSNET_TX_DATA_BUFFER
:
143 #ifdef DEBUG_MIPSNET_DATA
144 printf("mipsnet: read addr=0x%02x val=0x%02x\n", addr
, ret
);
149 static void mipsnet_ioport_write(void *opaque
, uint32_t addr
, uint32_t val
)
151 MIPSnetState
*s
= opaque
;
154 #ifdef DEBUG_MIPSNET_DATA
155 printf("mipsnet: write addr=0x%02x val=0x%02x\n", addr
, val
);
158 case MIPSNET_TX_DATA_COUNT
:
159 s
->tx_count
= (val
<= MAX_ETH_FRAME_SIZE
) ? val
: 0;
162 case MIPSNET_INT_CTL
:
163 if (val
& MIPSNET_INTCTL_TXDONE
) {
164 s
->intctl
&= ~MIPSNET_INTCTL_TXDONE
;
165 } else if (val
& MIPSNET_INTCTL_RXDONE
) {
166 s
->intctl
&= ~MIPSNET_INTCTL_RXDONE
;
167 } else if (val
& MIPSNET_INTCTL_TESTBIT
) {
169 s
->intctl
|= MIPSNET_INTCTL_TESTBIT
;
171 /* ACK testbit interrupt, flag was cleared on read. */
173 s
->busy
= !!s
->intctl
;
174 mipsnet_update_irq(s
);
176 case MIPSNET_TX_DATA_BUFFER
:
177 s
->tx_buffer
[s
->tx_written
++] = val
;
178 if (s
->tx_written
== s
->tx_count
) {
180 #ifdef DEBUG_MIPSNET_SEND
181 printf("mipsnet: sending len=%d\n", s
->tx_count
);
183 qemu_send_packet(s
->vc
, s
->tx_buffer
, s
->tx_count
);
184 s
->tx_count
= s
->tx_written
= 0;
185 s
->intctl
|= MIPSNET_INTCTL_TXDONE
;
187 mipsnet_update_irq(s
);
190 /* Read-only registers */
193 case MIPSNET_RX_DATA_COUNT
:
194 case MIPSNET_INTERRUPT_INFO
:
195 case MIPSNET_RX_DATA_BUFFER
:
201 static void mipsnet_save(QEMUFile
*f
, void *opaque
)
203 MIPSnetState
*s
= opaque
;
205 qemu_put_be32s(f
, &s
->busy
);
206 qemu_put_be32s(f
, &s
->rx_count
);
207 qemu_put_be32s(f
, &s
->rx_read
);
208 qemu_put_be32s(f
, &s
->tx_count
);
209 qemu_put_be32s(f
, &s
->tx_written
);
210 qemu_put_be32s(f
, &s
->intctl
);
211 qemu_put_buffer(f
, s
->rx_buffer
, MAX_ETH_FRAME_SIZE
);
212 qemu_put_buffer(f
, s
->tx_buffer
, MAX_ETH_FRAME_SIZE
);
215 static int mipsnet_load(QEMUFile
*f
, void *opaque
, int version_id
)
217 MIPSnetState
*s
= opaque
;
222 qemu_get_be32s(f
, &s
->busy
);
223 qemu_get_be32s(f
, &s
->rx_count
);
224 qemu_get_be32s(f
, &s
->rx_read
);
225 qemu_get_be32s(f
, &s
->tx_count
);
226 qemu_get_be32s(f
, &s
->tx_written
);
227 qemu_get_be32s(f
, &s
->intctl
);
228 qemu_get_buffer(f
, s
->rx_buffer
, MAX_ETH_FRAME_SIZE
);
229 qemu_get_buffer(f
, s
->tx_buffer
, MAX_ETH_FRAME_SIZE
);
234 void mipsnet_init (int base
, qemu_irq irq
, NICInfo
*nd
)
238 s
= qemu_mallocz(sizeof(MIPSnetState
));
242 register_ioport_write(base
, 36, 1, mipsnet_ioport_write
, s
);
243 register_ioport_read(base
, 36, 1, mipsnet_ioport_read
, s
);
244 register_ioport_write(base
, 36, 2, mipsnet_ioport_write
, s
);
245 register_ioport_read(base
, 36, 2, mipsnet_ioport_read
, s
);
246 register_ioport_write(base
, 36, 4, mipsnet_ioport_write
, s
);
247 register_ioport_read(base
, 36, 4, mipsnet_ioport_read
, s
);
251 if (nd
&& nd
->vlan
) {
252 s
->vc
= qemu_new_vlan_client(nd
->vlan
, mipsnet_receive
,
253 mipsnet_can_receive
, s
);
258 snprintf(s
->vc
->info_str
, sizeof(s
->vc
->info_str
),
259 "mipsnet macaddr=%02x:%02x:%02x:%02x:%02x:%02x",
268 register_savevm("mipsnet", 0, 0, mipsnet_save
, mipsnet_load
, s
);