Revised to prevent DHCPClient::discover from hanging.

Fork of WIZ820ioInterface by ban4jp -

Socket/TCPSocketServer.cpp

Committer:
rraab
Date:
2014-08-15
Revision:
9:c1722862c13b
Parent:
8:6ff41cd782f5

File content as of revision 9:c1722862c13b:

/* Copyright (C) 2012 mbed.org, MIT License
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy of this software
 * and associated documentation files (the "Software"), to deal in the Software without restriction,
 * including without limitation the rights to use, copy, modify, merge, publish, distribute,
 * sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in all copies or
 * substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING
 * BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,
 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 */

#include "TCPSocketServer.h"

TCPSocketServer::TCPSocketServer() {}

// Server initialization
int TCPSocketServer::bind(int port) {
    _port = port;
    
    if (_sock_fd < 0) {
        _sock_fd = eth->new_socket();
        if (_sock_fd < 0) {
            return -1;
        }
    }
    
    return bind_socket();
}

int TCPSocketServer::bind_socket() {
    // set TCP protocol
    eth->setProtocol(_sock_fd, TCP);
    // set local port
    eth->sreg<uint16_t>(_sock_fd, Sn_PORT, _port);
    // connect the network
    eth->scmd(_sock_fd, OPEN);
    return 0;
}

int TCPSocketServer::listen(int backlog) {
    if (_sock_fd < 0) {
        return -1;
    }
    if (backlog != 1) {
        return -1;
    }
    eth->scmd(_sock_fd, LISTEN);
    return 0;
}


int TCPSocketServer::accept(TCPSocketConnection& connection) {
    if (_sock_fd < 0) {
        return -1;
    }
    int next_sock_fd;
    Timer t;
    t.reset();
    t.start();
    while(1) {
        if (t.read_ms() > _timeout && _blocking == false) {
            return -1;
        }
        if (eth->sreg<uint8_t>(_sock_fd, Sn_SR) == SOCK_ESTABLISHED) {
            next_sock_fd = eth->new_socket();
            if (next_sock_fd < 0) {
                continue;
            }
            break;
        }
    }
    uint32_t ip = eth->sreg<uint32_t>(_sock_fd, Sn_DIPR);
    char host[16];
    snprintf(host, sizeof(host), "%d.%d.%d.%d", (ip>>24)&0xff, (ip>>16)&0xff, (ip>>8)&0xff, ip&0xff);
    uint16_t port = eth->sreg<uint16_t>(_sock_fd, Sn_DPORT);
    connection._sock_fd = _sock_fd;
    connection.set_address(host, port);
    
    _sock_fd = next_sock_fd;
    bind_socket();
    eth->scmd(_sock_fd, LISTEN);
    
    return 0;
}