Improve Wifly Interface
Fork of WiflyInterface by
Socket/TCPSocketServer.cpp@4:0bcec6272784, 2012-12-20 (annotated)
- Committer:
- samux
- Date:
- Thu Dec 20 15:08:58 2012 +0000
- Revision:
- 4:0bcec6272784
- Parent:
- 3:9aa05e19c62e
proper join after reboot - increase size flush
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
samux | 1:fb4494783863 | 1 | /* Copyright (C) 2012 mbed.org, MIT License |
samux | 1:fb4494783863 | 2 | * |
samux | 1:fb4494783863 | 3 | * Permission is hereby granted, free of charge, to any person obtaining a copy of this software |
samux | 1:fb4494783863 | 4 | * and associated documentation files (the "Software"), to deal in the Software without restriction, |
samux | 1:fb4494783863 | 5 | * including without limitation the rights to use, copy, modify, merge, publish, distribute, |
samux | 1:fb4494783863 | 6 | * sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is |
samux | 1:fb4494783863 | 7 | * furnished to do so, subject to the following conditions: |
samux | 1:fb4494783863 | 8 | * |
samux | 1:fb4494783863 | 9 | * The above copyright notice and this permission notice shall be included in all copies or |
samux | 1:fb4494783863 | 10 | * substantial portions of the Software. |
samux | 1:fb4494783863 | 11 | * |
samux | 1:fb4494783863 | 12 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING |
samux | 1:fb4494783863 | 13 | * BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND |
samux | 1:fb4494783863 | 14 | * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, |
samux | 1:fb4494783863 | 15 | * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
samux | 1:fb4494783863 | 16 | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. |
samux | 1:fb4494783863 | 17 | */ |
samux | 1:fb4494783863 | 18 | |
samux | 1:fb4494783863 | 19 | #include "TCPSocketServer.h" |
samux | 1:fb4494783863 | 20 | #include <string> |
samux | 1:fb4494783863 | 21 | |
samux | 1:fb4494783863 | 22 | TCPSocketServer::TCPSocketServer() {} |
samux | 1:fb4494783863 | 23 | |
samux | 1:fb4494783863 | 24 | // Server initialization |
samux | 1:fb4494783863 | 25 | int TCPSocketServer::bind(int port) { |
samux | 1:fb4494783863 | 26 | char cmd[20]; |
samux | 1:fb4494783863 | 27 | |
samux | 1:fb4494783863 | 28 | // set TCP protocol |
samux | 1:fb4494783863 | 29 | wifi->setProtocol(TCP); |
samux | 1:fb4494783863 | 30 | |
samux | 1:fb4494783863 | 31 | // set local port |
samux | 1:fb4494783863 | 32 | sprintf(cmd, "set i l %d\r", port); |
samux | 1:fb4494783863 | 33 | if (!wifi->sendCommand(cmd, "AOK")) |
samux | 1:fb4494783863 | 34 | return -1; |
samux | 3:9aa05e19c62e | 35 | |
samux | 3:9aa05e19c62e | 36 | // save |
samux | 3:9aa05e19c62e | 37 | if (!wifi->sendCommand("save\r", "Stor")) |
samux | 3:9aa05e19c62e | 38 | return -1; |
samux | 3:9aa05e19c62e | 39 | |
samux | 3:9aa05e19c62e | 40 | // reboot |
samux | 3:9aa05e19c62e | 41 | wifi->reboot(); |
samux | 3:9aa05e19c62e | 42 | |
samux | 3:9aa05e19c62e | 43 | // connect the network |
samux | 4:0bcec6272784 | 44 | if (wifi->isDHCP()) { |
samux | 4:0bcec6272784 | 45 | if (!wifi->sendCommand("join\r", "DHCP=ON", NULL, 10000)) |
samux | 4:0bcec6272784 | 46 | return -1; |
samux | 4:0bcec6272784 | 47 | } else { |
samux | 4:0bcec6272784 | 48 | if (!wifi->sendCommand("join\r", "Associated", NULL, 10000)) |
samux | 4:0bcec6272784 | 49 | return -1; |
samux | 4:0bcec6272784 | 50 | } |
samux | 1:fb4494783863 | 51 | |
samux | 3:9aa05e19c62e | 52 | // exit |
samux | 1:fb4494783863 | 53 | wifi->exit(); |
samux | 3:9aa05e19c62e | 54 | |
samux | 3:9aa05e19c62e | 55 | wait(0.2); |
samux | 3:9aa05e19c62e | 56 | wifi->flush(); |
samux | 1:fb4494783863 | 57 | return 0; |
samux | 1:fb4494783863 | 58 | } |
samux | 1:fb4494783863 | 59 | |
samux | 1:fb4494783863 | 60 | int TCPSocketServer::listen(int backlog) { |
samux | 1:fb4494783863 | 61 | if (backlog != 1) |
samux | 1:fb4494783863 | 62 | return -1; |
samux | 1:fb4494783863 | 63 | return 0; |
samux | 1:fb4494783863 | 64 | } |
samux | 1:fb4494783863 | 65 | |
samux | 1:fb4494783863 | 66 | |
samux | 1:fb4494783863 | 67 | int TCPSocketServer::accept(TCPSocketConnection& connection) { |
samux | 1:fb4494783863 | 68 | int nb_available = 0, pos = 0; |
samux | 1:fb4494783863 | 69 | char c; |
samux | 1:fb4494783863 | 70 | string str; |
samux | 1:fb4494783863 | 71 | bool o_find = false; |
samux | 1:fb4494783863 | 72 | while (1) { |
samux | 1:fb4494783863 | 73 | while(!wifi->readable()); |
samux | 1:fb4494783863 | 74 | nb_available = wifi->readable(); |
samux | 1:fb4494783863 | 75 | for (int i = 0; i < nb_available; i++) { |
samux | 1:fb4494783863 | 76 | c = wifi->getc(); |
samux | 1:fb4494783863 | 77 | if (c == '*') { |
samux | 1:fb4494783863 | 78 | o_find = true; |
samux | 1:fb4494783863 | 79 | } |
samux | 1:fb4494783863 | 80 | if (o_find && c != '\r' && c != '\n') { |
samux | 1:fb4494783863 | 81 | str += c; |
samux | 1:fb4494783863 | 82 | pos = str.find("*OPEN*"); |
samux | 1:fb4494783863 | 83 | if (pos != string::npos) { |
samux | 1:fb4494783863 | 84 | wifi->flush(); |
samux | 1:fb4494783863 | 85 | return 0; |
samux | 1:fb4494783863 | 86 | } |
samux | 1:fb4494783863 | 87 | } |
samux | 1:fb4494783863 | 88 | } |
samux | 1:fb4494783863 | 89 | } |
samux | 1:fb4494783863 | 90 | } |