Bongjun Hur / W5500Interface

W5500 driver for mbed OS 5

Dependents:   http-webserver-example mbed-os-example-sockets

Fork of W5500Interface by Sergei G

WIZnet/W5500.cpp@11:5118c2bff025, 2018-08-13 (annotated)

Committer:
Bongjun
Date:
Mon Aug 13 08:11:02 2018 +0000
Revision:
11:5118c2bff025
Parent:
8:c71c66d43703
Child:
17:60f75e78f35d
added DNS functions and gethostbyname()

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Bongjun 6:e2ab76b2be07 1 // modified 08/08/2018 by Bongjun Hur
dgriffin65 0:77e050d1fb12 2
dgriffin65 0:77e050d1fb12 3 #include "mbed.h"
dgriffin65 0:77e050d1fb12 4 #include "mbed_debug.h"
dgriffin65 0:77e050d1fb12 5 #include "wiznet.h"
dgriffin65 0:77e050d1fb12 6
dgriffin65 0:77e050d1fb12 7 #ifdef USE_W5500
dgriffin65 0:77e050d1fb12 8
dgriffin65 0:77e050d1fb12 9 //Debug is disabled by default
Bongjun 8:c71c66d43703 10 #define w5500_DBG 0
Bongjun 8:c71c66d43703 11
Bongjun 8:c71c66d43703 12 #if w5500_DBG
dgriffin65 0:77e050d1fb12 13 #define DBG(...) do{debug("%p %d %s ", this,__LINE__,__PRETTY_FUNCTION__); debug(__VA_ARGS__); } while(0);
dgriffin65 0:77e050d1fb12 14 //#define DBG(x, ...) debug("[W5500:DBG]"x"\r\n", ##__VA_ARGS__);
dgriffin65 0:77e050d1fb12 15 #define WARN(x, ...) debug("[W5500:WARN]"x"\r\n", ##__VA_ARGS__);
dgriffin65 0:77e050d1fb12 16 #define ERR(x, ...) debug("[W5500:ERR]"x"\r\n", ##__VA_ARGS__);
Bongjun 8:c71c66d43703 17 #define INFO(x, ...) debug("[W5500:INFO]"x"\r\n", ##__VA_ARGS__);
dgriffin65 0:77e050d1fb12 18 #else
dgriffin65 0:77e050d1fb12 19 #define DBG(x, ...)
dgriffin65 0:77e050d1fb12 20 #define WARN(x, ...)
dgriffin65 0:77e050d1fb12 21 #define ERR(x, ...)
dgriffin65 0:77e050d1fb12 22 #define INFO(x, ...)
dgriffin65 0:77e050d1fb12 23 #endif
dgriffin65 0:77e050d1fb12 24
sgnezdov 3:61ff27ed8355 25 #define DBG_SPI 0
dgriffin65 0:77e050d1fb12 26
Bongjun 8:c71c66d43703 27 #if !defined(MBED_CONF_W5500_SPI_SPEED)
Bongjun 8:c71c66d43703 28 #define MBED_CONF_W5500_SPI_SPEED 100000
Bongjun 8:c71c66d43703 29 #endif
Bongjun 8:c71c66d43703 30
Bongjun 8:c71c66d43703 31
dgriffin65 0:77e050d1fb12 32 WIZnet_Chip* WIZnet_Chip::inst;
dgriffin65 0:77e050d1fb12 33
dgriffin65 0:77e050d1fb12 34 WIZnet_Chip::WIZnet_Chip(PinName mosi, PinName miso, PinName sclk, PinName _cs, PinName _reset):
dgriffin65 0:77e050d1fb12 35 cs(_cs), reset_pin(_reset)
dgriffin65 0:77e050d1fb12 36 {
dgriffin65 0:77e050d1fb12 37 spi = new SPI(mosi, miso, sclk);
Bongjun 8:c71c66d43703 38 DBG("SPI interface init...\n");
Bongjun 8:c71c66d43703 39 spi->format(32, 0);
Bongjun 8:c71c66d43703 40 spi->frequency(MBED_CONF_W5500_SPI_SPEED);
dgriffin65 0:77e050d1fb12 41 cs = 1;
dgriffin65 0:77e050d1fb12 42 reset_pin = 1;
dgriffin65 0:77e050d1fb12 43 inst = this;
dgriffin65 0:77e050d1fb12 44 dhcp = false;
dgriffin65 0:77e050d1fb12 45 }
dgriffin65 0:77e050d1fb12 46
Bongjun 8:c71c66d43703 47 /*
dgriffin65 0:77e050d1fb12 48 WIZnet_Chip::WIZnet_Chip(SPI* spi, PinName _cs, PinName _reset):
dgriffin65 0:77e050d1fb12 49 cs(_cs), reset_pin(_reset)
dgriffin65 0:77e050d1fb12 50 {
dgriffin65 0:77e050d1fb12 51 this->spi = spi;
dgriffin65 0:77e050d1fb12 52 cs = 1;
dgriffin65 0:77e050d1fb12 53 reset_pin = 1;
dgriffin65 0:77e050d1fb12 54 inst = this;
dgriffin65 0:77e050d1fb12 55 dhcp = false;
dgriffin65 0:77e050d1fb12 56 }
Bongjun 8:c71c66d43703 57 */
Bongjun 8:c71c66d43703 58
Bongjun 8:c71c66d43703 59 WIZnet_Chip::~WIZnet_Chip()
Bongjun 8:c71c66d43703 60 {
Bongjun 8:c71c66d43703 61 delete spi;
Bongjun 8:c71c66d43703 62 }
dgriffin65 0:77e050d1fb12 63
dgriffin65 0:77e050d1fb12 64 bool WIZnet_Chip::setmac()
dgriffin65 0:77e050d1fb12 65 {
sgnezdov 2:06b6f9f7c071 66 reg_wr_mac(SHAR, mac);
dgriffin65 0:77e050d1fb12 67 return true;
dgriffin65 0:77e050d1fb12 68 }
dgriffin65 0:77e050d1fb12 69
dgriffin65 0:77e050d1fb12 70 // Set the IP
dgriffin65 0:77e050d1fb12 71 bool WIZnet_Chip::setip()
dgriffin65 0:77e050d1fb12 72 {
dgriffin65 0:77e050d1fb12 73 reg_wr<uint32_t>(SIPR, ip);
dgriffin65 0:77e050d1fb12 74 reg_wr<uint32_t>(GAR, gateway);
dgriffin65 0:77e050d1fb12 75 reg_wr<uint32_t>(SUBR, netmask);
dgriffin65 0:77e050d1fb12 76 return true;
dgriffin65 0:77e050d1fb12 77 }
dgriffin65 0:77e050d1fb12 78
dgriffin65 0:77e050d1fb12 79 bool WIZnet_Chip::setProtocol(int socket, Protocol p)
dgriffin65 0:77e050d1fb12 80 {
dgriffin65 0:77e050d1fb12 81 if (socket < 0) {
dgriffin65 0:77e050d1fb12 82 return false;
dgriffin65 0:77e050d1fb12 83 }
dgriffin65 0:77e050d1fb12 84 sreg<uint8_t>(socket, Sn_MR, p);
dgriffin65 0:77e050d1fb12 85 return true;
dgriffin65 0:77e050d1fb12 86 }
dgriffin65 0:77e050d1fb12 87
Bongjun 6:e2ab76b2be07 88 bool WIZnet_Chip::setLocalPort(int socket, uint16_t port)
Bongjun 6:e2ab76b2be07 89 {
Bongjun 6:e2ab76b2be07 90 if (socket < 0) {
Bongjun 6:e2ab76b2be07 91 return false;
Bongjun 6:e2ab76b2be07 92 }
Bongjun 6:e2ab76b2be07 93 sreg<uint16_t>(socket, Sn_PORT, port);
Bongjun 6:e2ab76b2be07 94 return true;
Bongjun 6:e2ab76b2be07 95 }
Bongjun 6:e2ab76b2be07 96
dgriffin65 0:77e050d1fb12 97 bool WIZnet_Chip::connect(int socket, const char * host, int port, int timeout_ms)
dgriffin65 0:77e050d1fb12 98 {
dgriffin65 0:77e050d1fb12 99 if (socket < 0) {
dgriffin65 0:77e050d1fb12 100 return false;
dgriffin65 0:77e050d1fb12 101 }
dgriffin65 0:77e050d1fb12 102 sreg<uint8_t>(socket, Sn_MR, TCP);
dgriffin65 0:77e050d1fb12 103 scmd(socket, OPEN);
dgriffin65 0:77e050d1fb12 104 sreg_ip(socket, Sn_DIPR, host);
dgriffin65 0:77e050d1fb12 105 sreg<uint16_t>(socket, Sn_DPORT, port);
dgriffin65 0:77e050d1fb12 106 sreg<uint16_t>(socket, Sn_PORT, new_port());
dgriffin65 0:77e050d1fb12 107 scmd(socket, CONNECT);
dgriffin65 0:77e050d1fb12 108 Timer t;
dgriffin65 0:77e050d1fb12 109 t.reset();
dgriffin65 0:77e050d1fb12 110 t.start();
dgriffin65 0:77e050d1fb12 111 while(!is_connected(socket)) {
Bongjun 11:5118c2bff025 112 if ((timeout_ms) && (t.read_ms() > timeout_ms)) {
dgriffin65 0:77e050d1fb12 113 return false;
dgriffin65 0:77e050d1fb12 114 }
dgriffin65 0:77e050d1fb12 115 }
dgriffin65 0:77e050d1fb12 116 return true;
dgriffin65 0:77e050d1fb12 117 }
dgriffin65 0:77e050d1fb12 118
dgriffin65 0:77e050d1fb12 119 bool WIZnet_Chip::gethostbyname(const char* host, uint32_t* ip)
dgriffin65 0:77e050d1fb12 120 {
dgriffin65 0:77e050d1fb12 121 #if 0
dgriffin65 0:77e050d1fb12 122 uint32_t addr = str_to_ip(host);
dgriffin65 0:77e050d1fb12 123 char buf[17];
dgriffin65 0:77e050d1fb12 124 snprintf(buf, sizeof(buf), "%d.%d.%d.%d", (addr>>24)&0xff, (addr>>16)&0xff, (addr>>8)&0xff, addr&0xff);
dgriffin65 0:77e050d1fb12 125 if (strcmp(buf, host) == 0) {
dgriffin65 0:77e050d1fb12 126 *ip = addr;
dgriffin65 0:77e050d1fb12 127 return true;
dgriffin65 0:77e050d1fb12 128 }
dgriffin65 0:77e050d1fb12 129 DNSClient client;
dgriffin65 0:77e050d1fb12 130 if(client.lookup(host)) {
dgriffin65 0:77e050d1fb12 131 *ip = client.ip;
dgriffin65 0:77e050d1fb12 132 return true;
dgriffin65 0:77e050d1fb12 133 }
dgriffin65 0:77e050d1fb12 134 #endif
dgriffin65 0:77e050d1fb12 135 return false;
dgriffin65 0:77e050d1fb12 136 }
dgriffin65 0:77e050d1fb12 137
dgriffin65 0:77e050d1fb12 138 bool WIZnet_Chip::disconnect()
dgriffin65 0:77e050d1fb12 139 {
dgriffin65 0:77e050d1fb12 140 return true;
dgriffin65 0:77e050d1fb12 141 }
dgriffin65 0:77e050d1fb12 142
dgriffin65 0:77e050d1fb12 143 bool WIZnet_Chip::is_connected(int socket)
dgriffin65 0:77e050d1fb12 144 {
dgriffin65 0:77e050d1fb12 145 uint8_t tmpSn_SR;
dgriffin65 0:77e050d1fb12 146 tmpSn_SR = sreg<uint8_t>(socket, Sn_SR);
dgriffin65 0:77e050d1fb12 147 // packet sending is possible, when state is SOCK_CLOSE_WAIT.
dgriffin65 0:77e050d1fb12 148 if ((tmpSn_SR == SOCK_ESTABLISHED) || (tmpSn_SR == SOCK_CLOSE_WAIT)) {
dgriffin65 0:77e050d1fb12 149 return true;
dgriffin65 0:77e050d1fb12 150 }
dgriffin65 0:77e050d1fb12 151 return false;
dgriffin65 0:77e050d1fb12 152 }
dgriffin65 0:77e050d1fb12 153
dgriffin65 0:77e050d1fb12 154 // Reset the chip & set the buffer
dgriffin65 0:77e050d1fb12 155 void WIZnet_Chip::reset()
dgriffin65 0:77e050d1fb12 156 {
Bongjun 6:e2ab76b2be07 157 // reset_pin = 1;
dgriffin65 0:77e050d1fb12 158 reset_pin = 0;
dgriffin65 0:77e050d1fb12 159 wait_us(500); // 500us (w5500)
dgriffin65 0:77e050d1fb12 160 reset_pin = 1;
dgriffin65 0:77e050d1fb12 161 wait_ms(400); // 400ms (w5500)
dgriffin65 0:77e050d1fb12 162
dgriffin65 0:77e050d1fb12 163 #if defined(USE_WIZ550IO_MAC)
dgriffin65 0:77e050d1fb12 164 //reg_rd_mac(SHAR, mac); // read the MAC address inside the module
dgriffin65 0:77e050d1fb12 165 #endif
dgriffin65 0:77e050d1fb12 166 //reg_wr_mac(SHAR, mac);
Bongjun 8:c71c66d43703 167
dgriffin65 0:77e050d1fb12 168 // set RX and TX buffer size
dgriffin65 0:77e050d1fb12 169 for (int socket = 0; socket < MAX_SOCK_NUM; socket++) {
dgriffin65 0:77e050d1fb12 170 sreg<uint8_t>(socket, Sn_RXBUF_SIZE, 2);
dgriffin65 0:77e050d1fb12 171 sreg<uint8_t>(socket, Sn_TXBUF_SIZE, 2);
dgriffin65 0:77e050d1fb12 172 }
sgnezdov 2:06b6f9f7c071 173
sgnezdov 2:06b6f9f7c071 174 reg_rd_mac(SHAR, mac); // read the MAC address inside the module
dgriffin65 0:77e050d1fb12 175 }
dgriffin65 0:77e050d1fb12 176
dgriffin65 0:77e050d1fb12 177
dgriffin65 0:77e050d1fb12 178 bool WIZnet_Chip::close(int socket)
dgriffin65 0:77e050d1fb12 179 {
dgriffin65 0:77e050d1fb12 180 if (socket < 0) {
dgriffin65 0:77e050d1fb12 181 return false;
dgriffin65 0:77e050d1fb12 182 }
dgriffin65 0:77e050d1fb12 183 // if not connected, return
dgriffin65 0:77e050d1fb12 184 if (sreg<uint8_t>(socket, Sn_SR) == SOCK_CLOSED) {
dgriffin65 0:77e050d1fb12 185 return true;
dgriffin65 0:77e050d1fb12 186 }
dgriffin65 0:77e050d1fb12 187 if (sreg<uint8_t>(socket, Sn_MR) == TCP) {
dgriffin65 0:77e050d1fb12 188 scmd(socket, DISCON);
dgriffin65 0:77e050d1fb12 189 }
dgriffin65 0:77e050d1fb12 190 scmd(socket, CLOSE);
dgriffin65 0:77e050d1fb12 191 sreg<uint8_t>(socket, Sn_IR, 0xff);
dgriffin65 0:77e050d1fb12 192 return true;
dgriffin65 0:77e050d1fb12 193 }
dgriffin65 0:77e050d1fb12 194
sgnezdov 4:80e302a610fd 195 bool WIZnet_Chip::is_closed(int socket)
sgnezdov 4:80e302a610fd 196 {
sgnezdov 4:80e302a610fd 197 if (sreg<uint8_t>(socket, Sn_SR) == SOCK_CLOSED) {
sgnezdov 4:80e302a610fd 198 return true;
sgnezdov 4:80e302a610fd 199 }
sgnezdov 4:80e302a610fd 200 return false;
sgnezdov 4:80e302a610fd 201 }
sgnezdov 4:80e302a610fd 202
dgriffin65 0:77e050d1fb12 203 int WIZnet_Chip::wait_readable(int socket, int wait_time_ms, int req_size)
dgriffin65 0:77e050d1fb12 204 {
dgriffin65 0:77e050d1fb12 205 if (socket < 0) {
dgriffin65 0:77e050d1fb12 206 return -1;
dgriffin65 0:77e050d1fb12 207 }
dgriffin65 0:77e050d1fb12 208
dgriffin65 0:77e050d1fb12 209 Timer t;
dgriffin65 0:77e050d1fb12 210 t.reset();
dgriffin65 0:77e050d1fb12 211 t.start();
dgriffin65 0:77e050d1fb12 212 while(1) {
dgriffin65 0:77e050d1fb12 213 //int size = sreg<uint16_t>(socket, Sn_RX_RSR);
dgriffin65 0:77e050d1fb12 214 int size1, size2;
dgriffin65 0:77e050d1fb12 215 // during the reading Sn_RX_RSR, it has the possible change of this register.
dgriffin65 0:77e050d1fb12 216 // so read twice and get same value then use size information.
dgriffin65 1:2dee44ea52a9 217 while (1) {
dgriffin65 0:77e050d1fb12 218 size1 = sreg<uint16_t>(socket, Sn_RX_RSR);
dgriffin65 0:77e050d1fb12 219 size2 = sreg<uint16_t>(socket, Sn_RX_RSR);
dgriffin65 1:2dee44ea52a9 220
dgriffin65 1:2dee44ea52a9 221 if (size1 == size2) {
dgriffin65 1:2dee44ea52a9 222 break;
dgriffin65 1:2dee44ea52a9 223 }
dgriffin65 0:77e050d1fb12 224
dgriffin65 0:77e050d1fb12 225 if (wait_time_ms != (-1) && t.read_ms() > wait_time_ms) {
dgriffin65 0:77e050d1fb12 226 return NSAPI_ERROR_WOULD_BLOCK;
dgriffin65 0:77e050d1fb12 227 }
dgriffin65 1:2dee44ea52a9 228
dgriffin65 1:2dee44ea52a9 229 if (!is_connected(socket)) {
dgriffin65 1:2dee44ea52a9 230 return -1;
dgriffin65 1:2dee44ea52a9 231 }
dgriffin65 1:2dee44ea52a9 232 }
dgriffin65 0:77e050d1fb12 233
dgriffin65 0:77e050d1fb12 234 if (size1 > req_size) {
dgriffin65 0:77e050d1fb12 235 return size1;
dgriffin65 0:77e050d1fb12 236 }
dgriffin65 0:77e050d1fb12 237 if (wait_time_ms != (-1) && t.read_ms() > wait_time_ms) {
dgriffin65 0:77e050d1fb12 238 break;
dgriffin65 0:77e050d1fb12 239 }
dgriffin65 0:77e050d1fb12 240 }
dgriffin65 0:77e050d1fb12 241 return NSAPI_ERROR_WOULD_BLOCK;
dgriffin65 0:77e050d1fb12 242 }
dgriffin65 0:77e050d1fb12 243
dgriffin65 0:77e050d1fb12 244 int WIZnet_Chip::wait_writeable(int socket, int wait_time_ms, int req_size)
dgriffin65 0:77e050d1fb12 245 {
dgriffin65 0:77e050d1fb12 246 if (socket < 0) {
dgriffin65 0:77e050d1fb12 247 return -1;
dgriffin65 0:77e050d1fb12 248 }
dgriffin65 0:77e050d1fb12 249 Timer t;
dgriffin65 0:77e050d1fb12 250 t.reset();
dgriffin65 0:77e050d1fb12 251 t.start();
Bongjun 6:e2ab76b2be07 252 t.start();
Bongjun 6:e2ab76b2be07 253
dgriffin65 0:77e050d1fb12 254 while(1) {
dgriffin65 0:77e050d1fb12 255 //int size = sreg<uint16_t>(socket, Sn_TX_FSR);
dgriffin65 0:77e050d1fb12 256 int size1, size2;
dgriffin65 0:77e050d1fb12 257 // during the reading Sn_TX_FSR, it has the possible change of this register.
dgriffin65 0:77e050d1fb12 258 // so read twice and get same value then use size information.
dgriffin65 0:77e050d1fb12 259 do {
dgriffin65 0:77e050d1fb12 260 size1 = sreg<uint16_t>(socket, Sn_TX_FSR);
dgriffin65 0:77e050d1fb12 261 size2 = sreg<uint16_t>(socket, Sn_TX_FSR);
Bongjun 6:e2ab76b2be07 262 DBG("The time taken was %d %d %f seconds\n", wait_time_ms, t.read_ms(), t.read());
Bongjun 6:e2ab76b2be07 263
dgriffin65 0:77e050d1fb12 264 if (wait_time_ms != (-1) && t.read_ms() > wait_time_ms) {
Bongjun 6:e2ab76b2be07 265
dgriffin65 0:77e050d1fb12 266 return NSAPI_ERROR_WOULD_BLOCK;
dgriffin65 0:77e050d1fb12 267 }
dgriffin65 0:77e050d1fb12 268 } while (size1 != size2);
dgriffin65 0:77e050d1fb12 269 if (size1 > req_size) {
dgriffin65 0:77e050d1fb12 270 return size1;
dgriffin65 0:77e050d1fb12 271 }
dgriffin65 0:77e050d1fb12 272 if (wait_time_ms != (-1) && t.read_ms() > wait_time_ms) {
dgriffin65 0:77e050d1fb12 273 break;
dgriffin65 0:77e050d1fb12 274 }
dgriffin65 0:77e050d1fb12 275 }
dgriffin65 0:77e050d1fb12 276 return NSAPI_ERROR_WOULD_BLOCK;
dgriffin65 0:77e050d1fb12 277 }
dgriffin65 0:77e050d1fb12 278
dgriffin65 0:77e050d1fb12 279 int WIZnet_Chip::send(int socket, const char * str, int len)
dgriffin65 0:77e050d1fb12 280 {
dgriffin65 0:77e050d1fb12 281 if (socket < 0) {
dgriffin65 0:77e050d1fb12 282 return -1;
dgriffin65 0:77e050d1fb12 283 }
dgriffin65 0:77e050d1fb12 284 uint16_t ptr = sreg<uint16_t>(socket, Sn_TX_WR);
dgriffin65 0:77e050d1fb12 285 uint8_t cntl_byte = (0x14 + (socket << 5));
dgriffin65 0:77e050d1fb12 286 spi_write(ptr, cntl_byte, (uint8_t*)str, len);
dgriffin65 0:77e050d1fb12 287 sreg<uint16_t>(socket, Sn_TX_WR, ptr + len);
dgriffin65 0:77e050d1fb12 288 scmd(socket, SEND);
dgriffin65 0:77e050d1fb12 289 uint8_t tmp_Sn_IR;
dgriffin65 0:77e050d1fb12 290 while (( (tmp_Sn_IR = sreg<uint8_t>(socket, Sn_IR)) & INT_SEND_OK) != INT_SEND_OK) {
dgriffin65 0:77e050d1fb12 291 // @Jul.10, 2014 fix contant name, and udp sendto function.
dgriffin65 0:77e050d1fb12 292 switch (sreg<uint8_t>(socket, Sn_SR)) {
dgriffin65 0:77e050d1fb12 293 case SOCK_CLOSED :
dgriffin65 0:77e050d1fb12 294 close(socket);
dgriffin65 0:77e050d1fb12 295 return 0;
dgriffin65 0:77e050d1fb12 296 //break;
dgriffin65 0:77e050d1fb12 297 case SOCK_UDP :
dgriffin65 0:77e050d1fb12 298 // ARP timeout is possible.
dgriffin65 0:77e050d1fb12 299 if ((tmp_Sn_IR & INT_TIMEOUT) == INT_TIMEOUT) {
dgriffin65 0:77e050d1fb12 300 sreg<uint8_t>(socket, Sn_IR, INT_TIMEOUT);
dgriffin65 0:77e050d1fb12 301 return 0;
dgriffin65 0:77e050d1fb12 302 }
dgriffin65 0:77e050d1fb12 303 break;
dgriffin65 0:77e050d1fb12 304 default :
dgriffin65 0:77e050d1fb12 305 break;
dgriffin65 0:77e050d1fb12 306 }
dgriffin65 0:77e050d1fb12 307 }
dgriffin65 0:77e050d1fb12 308 sreg<uint8_t>(socket, Sn_IR, INT_SEND_OK);
dgriffin65 0:77e050d1fb12 309
dgriffin65 0:77e050d1fb12 310 return len;
dgriffin65 0:77e050d1fb12 311 }
dgriffin65 0:77e050d1fb12 312
dgriffin65 0:77e050d1fb12 313 int WIZnet_Chip::recv(int socket, char* buf, int len)
dgriffin65 0:77e050d1fb12 314 {
dgriffin65 0:77e050d1fb12 315 if (socket < 0) {
dgriffin65 0:77e050d1fb12 316 return -1;
dgriffin65 0:77e050d1fb12 317 }
dgriffin65 0:77e050d1fb12 318 uint16_t ptr = sreg<uint16_t>(socket, Sn_RX_RD);
dgriffin65 0:77e050d1fb12 319 uint8_t cntl_byte = (0x18 + (socket << 5));
dgriffin65 0:77e050d1fb12 320 spi_read(ptr, cntl_byte, (uint8_t*)buf, len);
dgriffin65 0:77e050d1fb12 321 sreg<uint16_t>(socket, Sn_RX_RD, ptr + len);
dgriffin65 0:77e050d1fb12 322 scmd(socket, RECV);
dgriffin65 0:77e050d1fb12 323 return len;
dgriffin65 0:77e050d1fb12 324 }
dgriffin65 0:77e050d1fb12 325
dgriffin65 0:77e050d1fb12 326 int WIZnet_Chip::new_socket()
dgriffin65 0:77e050d1fb12 327 {
dgriffin65 0:77e050d1fb12 328 for(int s = 0; s < MAX_SOCK_NUM; s++) {
dgriffin65 0:77e050d1fb12 329 if (sreg<uint8_t>(s, Sn_SR) == SOCK_CLOSED) {
dgriffin65 0:77e050d1fb12 330 return s;
dgriffin65 0:77e050d1fb12 331 }
dgriffin65 0:77e050d1fb12 332 }
dgriffin65 0:77e050d1fb12 333 return -1;
dgriffin65 0:77e050d1fb12 334 }
dgriffin65 0:77e050d1fb12 335
dgriffin65 0:77e050d1fb12 336 uint16_t WIZnet_Chip::new_port()
dgriffin65 0:77e050d1fb12 337 {
dgriffin65 0:77e050d1fb12 338 uint16_t port = rand();
dgriffin65 0:77e050d1fb12 339 port |= 49152;
dgriffin65 0:77e050d1fb12 340 return port;
dgriffin65 0:77e050d1fb12 341 }
dgriffin65 0:77e050d1fb12 342
dgriffin65 0:77e050d1fb12 343 void WIZnet_Chip::scmd(int socket, Command cmd)
dgriffin65 0:77e050d1fb12 344 {
dgriffin65 0:77e050d1fb12 345 sreg<uint8_t>(socket, Sn_CR, cmd);
dgriffin65 0:77e050d1fb12 346 while(sreg<uint8_t>(socket, Sn_CR));
dgriffin65 0:77e050d1fb12 347 }
dgriffin65 0:77e050d1fb12 348
dgriffin65 0:77e050d1fb12 349 void WIZnet_Chip::spi_write(uint16_t addr, uint8_t cb, const uint8_t *buf, uint16_t len)
dgriffin65 0:77e050d1fb12 350 {
dgriffin65 1:2dee44ea52a9 351 spi->lock();
dgriffin65 0:77e050d1fb12 352 cs = 0;
dgriffin65 0:77e050d1fb12 353 spi->write(addr >> 8);
dgriffin65 0:77e050d1fb12 354 spi->write(addr & 0xff);
dgriffin65 0:77e050d1fb12 355 spi->write(cb);
dgriffin65 0:77e050d1fb12 356 for(int i = 0; i < len; i++) {
dgriffin65 0:77e050d1fb12 357 spi->write(buf[i]);
dgriffin65 0:77e050d1fb12 358 }
dgriffin65 0:77e050d1fb12 359 cs = 1;
dgriffin65 0:77e050d1fb12 360
dgriffin65 0:77e050d1fb12 361 #if DBG_SPI
dgriffin65 0:77e050d1fb12 362 debug("[SPI]W %04x(%02x %d)", addr, cb, len);
dgriffin65 0:77e050d1fb12 363 for(int i = 0; i < len; i++) {
dgriffin65 0:77e050d1fb12 364 debug(" %02x", buf[i]);
sgnezdov 3:61ff27ed8355 365 if (i > 16) {
sgnezdov 3:61ff27ed8355 366 debug(" ...");
sgnezdov 3:61ff27ed8355 367 break;
dgriffin65 0:77e050d1fb12 368 }
dgriffin65 0:77e050d1fb12 369 }
dgriffin65 0:77e050d1fb12 370 debug("\r\n");
dgriffin65 0:77e050d1fb12 371 #endif
dgriffin65 1:2dee44ea52a9 372 spi->unlock();
dgriffin65 1:2dee44ea52a9 373
dgriffin65 0:77e050d1fb12 374 }
dgriffin65 0:77e050d1fb12 375
dgriffin65 0:77e050d1fb12 376 void WIZnet_Chip::spi_read(uint16_t addr, uint8_t cb, uint8_t *buf, uint16_t len)
dgriffin65 0:77e050d1fb12 377 {
dgriffin65 1:2dee44ea52a9 378 spi->lock();
dgriffin65 0:77e050d1fb12 379 cs = 0;
dgriffin65 0:77e050d1fb12 380 spi->write(addr >> 8);
dgriffin65 0:77e050d1fb12 381 spi->write(addr & 0xff);
dgriffin65 0:77e050d1fb12 382 spi->write(cb);
dgriffin65 0:77e050d1fb12 383 for(int i = 0; i < len; i++) {
dgriffin65 0:77e050d1fb12 384 buf[i] = spi->write(0);
dgriffin65 0:77e050d1fb12 385 }
dgriffin65 0:77e050d1fb12 386 cs = 1;
dgriffin65 0:77e050d1fb12 387
dgriffin65 0:77e050d1fb12 388 #if DBG_SPI
dgriffin65 0:77e050d1fb12 389 debug("[SPI]R %04x(%02x %d)", addr, cb, len);
dgriffin65 0:77e050d1fb12 390 for(int i = 0; i < len; i++) {
dgriffin65 0:77e050d1fb12 391 debug(" %02x", buf[i]);
sgnezdov 3:61ff27ed8355 392 if (i > 16) {
sgnezdov 3:61ff27ed8355 393 debug(" ...");
sgnezdov 3:61ff27ed8355 394 break;
dgriffin65 0:77e050d1fb12 395 }
dgriffin65 0:77e050d1fb12 396 }
dgriffin65 0:77e050d1fb12 397 debug("\r\n");
dgriffin65 0:77e050d1fb12 398 if ((addr&0xf0ff)==0x4026 || (addr&0xf0ff)==0x4003) {
dgriffin65 0:77e050d1fb12 399 wait_ms(200);
dgriffin65 0:77e050d1fb12 400 }
dgriffin65 0:77e050d1fb12 401 #endif
dgriffin65 1:2dee44ea52a9 402 spi->unlock();
dgriffin65 0:77e050d1fb12 403 }
dgriffin65 0:77e050d1fb12 404
dgriffin65 0:77e050d1fb12 405 uint32_t str_to_ip(const char* str)
dgriffin65 0:77e050d1fb12 406 {
dgriffin65 0:77e050d1fb12 407 uint32_t ip = 0;
dgriffin65 0:77e050d1fb12 408 char* p = (char*)str;
dgriffin65 0:77e050d1fb12 409 for(int i = 0; i < 4; i++) {
dgriffin65 0:77e050d1fb12 410 ip |= atoi(p);
dgriffin65 0:77e050d1fb12 411 p = strchr(p, '.');
dgriffin65 0:77e050d1fb12 412 if (p == NULL) {
dgriffin65 0:77e050d1fb12 413 break;
dgriffin65 0:77e050d1fb12 414 }
dgriffin65 0:77e050d1fb12 415 ip <<= 8;
dgriffin65 0:77e050d1fb12 416 p++;
dgriffin65 0:77e050d1fb12 417 }
dgriffin65 0:77e050d1fb12 418 return ip;
dgriffin65 0:77e050d1fb12 419 }
dgriffin65 0:77e050d1fb12 420
dgriffin65 0:77e050d1fb12 421 void printfBytes(char* str, uint8_t* buf, int len)
dgriffin65 0:77e050d1fb12 422 {
dgriffin65 0:77e050d1fb12 423 printf("%s %d:", str, len);
dgriffin65 0:77e050d1fb12 424 for(int i = 0; i < len; i++) {
dgriffin65 0:77e050d1fb12 425 printf(" %02x", buf[i]);
dgriffin65 0:77e050d1fb12 426 }
dgriffin65 0:77e050d1fb12 427 printf("\n");
dgriffin65 0:77e050d1fb12 428 }
dgriffin65 0:77e050d1fb12 429
dgriffin65 0:77e050d1fb12 430 void printHex(uint8_t* buf, int len)
dgriffin65 0:77e050d1fb12 431 {
dgriffin65 0:77e050d1fb12 432 for(int i = 0; i < len; i++) {
dgriffin65 0:77e050d1fb12 433 if ((i%16) == 0) {
dgriffin65 0:77e050d1fb12 434 printf("%p", buf+i);
dgriffin65 0:77e050d1fb12 435 }
dgriffin65 0:77e050d1fb12 436 printf(" %02x", buf[i]);
dgriffin65 0:77e050d1fb12 437 if ((i%16) == 15) {
dgriffin65 0:77e050d1fb12 438 printf("\n");
dgriffin65 0:77e050d1fb12 439 }
dgriffin65 0:77e050d1fb12 440 }
dgriffin65 0:77e050d1fb12 441 printf("\n");
dgriffin65 0:77e050d1fb12 442 }
dgriffin65 0:77e050d1fb12 443
dgriffin65 0:77e050d1fb12 444 void debug_hex(uint8_t* buf, int len)
dgriffin65 0:77e050d1fb12 445 {
dgriffin65 0:77e050d1fb12 446 for(int i = 0; i < len; i++) {
dgriffin65 0:77e050d1fb12 447 if ((i%16) == 0) {
dgriffin65 0:77e050d1fb12 448 debug("%p", buf+i);
dgriffin65 0:77e050d1fb12 449 }
dgriffin65 0:77e050d1fb12 450 debug(" %02x", buf[i]);
dgriffin65 0:77e050d1fb12 451 if ((i%16) == 15) {
dgriffin65 0:77e050d1fb12 452 debug("\n");
dgriffin65 0:77e050d1fb12 453 }
dgriffin65 0:77e050d1fb12 454 }
dgriffin65 0:77e050d1fb12 455 debug("\n");
dgriffin65 0:77e050d1fb12 456 }
dgriffin65 0:77e050d1fb12 457
dgriffin65 0:77e050d1fb12 458 #endif