Diff: w5100.cpp

Revision:

0:f7caac9b804e

Child:

3:79dc3337d9da

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/w5100.cpp	Tue Mar 18 17:00:22 2014 +0000
@@ -0,0 +1,279 @@
+/*
+ * Copyright (c) 2010 by Cristian Maglie <c.maglie@bug.st>
+ *
+ * This file is free software; you can redistribute it and/or modify
+ * it under the terms of either the GNU General Public License version 2
+ * or the GNU Lesser General Public License version 2.1, both as
+ * published by the Free Software Foundation.
+ */
+
+#include <stdio.h>
+#include <string.h>
+#include "w5100.h"
+
+#ifndef MBED
+#include <avr/interrupt.h>
+#endif //MBED
+
+// W5100 controller instance
+W5100Class W5100;
+
+#define TX_RX_MAX_BUF_SIZE 2048
+#define TX_BUF 0x1100
+#define RX_BUF (TX_BUF + TX_RX_MAX_BUF_SIZE)
+
+#ifdef W5200
+#define TXBUF_BASE 0x8000
+#define RXBUF_BASE 0xC000
+#else
+#define TXBUF_BASE 0x4000
+#define RXBUF_BASE 0x6000
+#endif
+
+#ifdef MBED
+SPI spi(SPI_MOSI, SPI_MISO, SPI_SCK);
+
+DigitalOut _cs(D10);
+DigitalOut _reset(D4);  // aktuell nicht benutzt, da sonst nichts mehr geht...
+
+inline void delay(int n)
+{
+    wait_ms(n);
+}
+inline static void initSS()
+{
+    _cs = 1;
+}
+inline static void setSS()
+{
+    _cs = 0;
+}
+inline static void resetSS()
+{
+    _cs = 1;
+}
+
+void W5100Class::hardware_reset()
+{
+    _reset = 1;
+    _reset = 0;
+    wait_us(2);
+    _reset = 1;
+    wait_ms(150);
+}
+#endif //MBED
+
+void W5100Class::init(void)
+{
+    resetSS();
+    spi.format(8,0);
+    spi.frequency(1000000);
+    writeMR(1<<RST);
+
+#ifdef W5200
+    for (int i=0; i<MAX_SOCK_NUM; i++) {
+        write((0x4000 + i * 0x100 + 0x001F), 2);
+        write((0x4000 + i * 0x100 + 0x001E), 2);
+    }
+#else
+    writeTMSR(0x55);
+    writeRMSR(0x55);
+#endif
+
+    for (int i=0; i<MAX_SOCK_NUM; i++) {
+        SBASE[i] = TXBUF_BASE + SSIZE * i;
+        RBASE[i] = RXBUF_BASE + RSIZE * i;
+    }
+}
+
+uint16_t W5100Class::getTXFreeSize(SOCKET s)
+{
+    uint16_t val=0, val1=0;
+    do {
+        val1 = readSnTX_FSR(s);
+        if (val1 != 0)
+            val = readSnTX_FSR(s);
+    } while (val != val1);
+    return val;
+}
+
+uint16_t W5100Class::getRXReceivedSize(SOCKET s)
+{
+    uint16_t val=0,val1=0;
+    do {
+        val1 = readSnRX_RSR(s);
+        if (val1 != 0)
+            val = readSnRX_RSR(s);
+    } while (val != val1);
+    return val;
+}
+
+
+void W5100Class::send_data_processing(SOCKET s, const uint8_t *data, uint16_t len)
+{
+    // This is same as having no offset in a call to send_data_processing_offset
+    send_data_processing_offset(s, 0, data, len);
+}
+
+void W5100Class::send_data_processing_offset(SOCKET s, uint16_t data_offset, const uint8_t *data, uint16_t len)
+{
+    uint16_t ptr = readSnTX_WR(s);
+    ptr += data_offset;
+    uint16_t offset = ptr & SMASK;
+    uint16_t dstAddr = offset + SBASE[s];
+
+    if (offset + len > SSIZE) {
+        // Wrap around circular buffer
+        uint16_t size = SSIZE - offset;
+        write(dstAddr, data, size);
+        write(SBASE[s], data + size, len - size);
+    } else {
+        write(dstAddr, data, len);
+    }
+
+    ptr += len;
+    writeSnTX_WR(s, ptr);
+}
+
+
+void W5100Class::recv_data_processing(SOCKET s, uint8_t *data, uint16_t len, uint8_t peek)
+{
+    uint16_t ptr;
+    ptr = readSnRX_RD(s);
+    read_data(s, (uint8_t *)ptr, data, len);
+    if (!peek) {
+        ptr += len;
+        writeSnRX_RD(s, ptr);
+    }
+}
+
+void W5100Class::read_data(SOCKET s, volatile uint8_t *src, volatile uint8_t *dst, uint16_t len)
+{
+    uint16_t size;
+    uint16_t src_mask;
+    uint16_t src_ptr;
+
+#ifdef MBED
+    src_mask = (int)src & RMASK;
+#else
+    src_mask = (uint16_t)src & RMASK;
+#endif //MBED
+    src_ptr = RBASE[s] + src_mask;
+
+    if( (src_mask + len) > RSIZE ) {
+        size = RSIZE - src_mask;
+        read(src_ptr, (uint8_t *)dst, size);
+        dst += size;
+        read(RBASE[s], (uint8_t *) dst, len - size);
+    } else
+        read(src_ptr, (uint8_t *) dst, len);
+}
+
+
+uint8_t W5100Class::write(uint16_t _addr, uint8_t _data)
+{
+    setSS();
+
+#ifdef W5200
+    spi.write(_addr >> 8);
+    spi.write(_addr & 0xFF);
+    spi.write(0x80);
+    spi.write(0x01);
+#else
+    spi.write(0xF0);
+    spi.write(_addr >> 8);
+    spi.write(_addr & 0xFF);
+#endif
+    spi.write(_data);
+    resetSS();
+    return 1;
+}
+
+uint16_t W5100Class::write(uint16_t _addr, const uint8_t *_buf, uint16_t _len)
+{
+
+#ifdef W5200
+    setSS();
+    spi.write(_addr >> 8);
+    spi.write(_addr & 0xFF);
+    spi.write((0x80 | ((_len & 0x7F00) >> 8)));
+    spi.write(_len & 0x00FF);
+
+    for (uint16_t i=0; i<_len; i++) {
+        spi.write(_buf[i]);
+
+    }
+    resetSS();
+#else
+
+    for (uint16_t i=0; i<_len; i++) {
+        setSS();
+        spi.write(0xF0);
+        spi.write(_addr >> 8);
+        spi.write(_addr & 0xFF);
+        _addr++;
+        spi.write(_buf[i]);
+        resetSS();
+    }
+#endif
+
+    return _len;
+}
+
+uint8_t W5100Class::read(uint16_t _addr)
+{
+    setSS();
+#ifdef W5200
+    spi.write(_addr >> 8);
+    spi.write(_addr & 0xFF);
+    spi.write(0x00);
+    spi.write(0x01);
+#else
+    spi.write(0x0F);
+    spi.write(_addr >> 8);
+    spi.write(_addr & 0xFF);
+#endif
+
+    uint8_t _data = spi.write(0);
+    resetSS();
+    return _data;
+}
+
+uint16_t W5100Class::read(uint16_t _addr, uint8_t *_buf, uint16_t _len)
+{
+#ifdef W5200
+    setSS();
+    spi.write(_addr >> 8);
+    spi.write(_addr & 0xFF);
+    spi.write((0x00 | ((_len & 0x7F00) >> 8)));
+    spi.write(_len & 0x00FF);
+
+    for (uint16_t i=0; i<_len; i++) {
+        _buf[i] = spi.write(0);
+
+    }
+    resetSS();
+
+#else
+
+    for (uint16_t i=0; i<_len; i++) {
+        setSS();
+        spi.write(0x0F);
+        spi.write(_addr >> 8);
+        spi.write(_addr & 0xFF);
+        _addr++;
+        _buf[i] = spi.write(0);
+        resetSS();
+    }
+#endif
+    return _len;
+}
+
+void W5100Class::execCmdSn(SOCKET s, SockCMD _cmd)
+{
+    // Send command to socket
+    writeSnCR(s, _cmd);
+    
+    // Wait for command to complete
+    while (readSnCR(s));
+}