KDDI Fx0 hackathon / Mbed 2 deprecated MurataTypeYD_Websocket_Sample_full

Websocket_Sample for MurataTypeYD

Dependencies:   mbed picojson

SNICInterface_mod/Socket/TCPSocketConnection.cpp@1:b5ac0f971f43, 2015-03-12 (annotated)

Committer:
komoritan
Date:
Thu Mar 12 12:15:46 2015 +0000
Revision:
1:b5ac0f971f43
Parent:
0:14bd24b5a77f 
Fixed

Who changed what in which revision?

UserRevisionLine numberNew contents of line
komoritan 0:14bd24b5a77f 1 /* Copyright (C) 2012 mbed.org, MIT License
komoritan 0:14bd24b5a77f 2 *
komoritan 0:14bd24b5a77f 3 * Permission is hereby granted, free of charge, to any person obtaining a copy of this software
komoritan 0:14bd24b5a77f 4 * and associated documentation files (the "Software"), to deal in the Software without restriction,
komoritan 0:14bd24b5a77f 5 * including without limitation the rights to use, copy, modify, merge, publish, distribute,
komoritan 0:14bd24b5a77f 6 * sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is
komoritan 0:14bd24b5a77f 7 * furnished to do so, subject to the following conditions:
komoritan 0:14bd24b5a77f 8 *
komoritan 0:14bd24b5a77f 9 * The above copyright notice and this permission notice shall be included in all copies or
komoritan 0:14bd24b5a77f 10 * substantial portions of the Software.
komoritan 0:14bd24b5a77f 11 *
komoritan 0:14bd24b5a77f 12 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING
komoritan 0:14bd24b5a77f 13 * BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
komoritan 0:14bd24b5a77f 14 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,
komoritan 0:14bd24b5a77f 15 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
komoritan 0:14bd24b5a77f 16 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
komoritan 0:14bd24b5a77f 17 */
komoritan 0:14bd24b5a77f 18 /* Copyright (C) 2014 Murata Manufacturing Co.,Ltd., MIT License
komoritan 0:14bd24b5a77f 19 * port to the muRata, SWITCH SCIENCE Wi-FI module TypeYD SNIC-UART.
komoritan 0:14bd24b5a77f 20 */
komoritan 0:14bd24b5a77f 21 #include "TCPSocketConnection.h"
komoritan 0:14bd24b5a77f 22 #include <cstring>
komoritan 0:14bd24b5a77f 23
komoritan 0:14bd24b5a77f 24 TCPSocketConnection::TCPSocketConnection()
komoritan 0:14bd24b5a77f 25 {
komoritan 0:14bd24b5a77f 26 }
komoritan 0:14bd24b5a77f 27
komoritan 0:14bd24b5a77f 28 TCPSocketConnection::~TCPSocketConnection()
komoritan 0:14bd24b5a77f 29 {
komoritan 0:14bd24b5a77f 30 }
komoritan 0:14bd24b5a77f 31
komoritan 0:14bd24b5a77f 32 int TCPSocketConnection::connect( const char *host_p, unsigned short port)
komoritan 0:14bd24b5a77f 33 {
komoritan 0:14bd24b5a77f 34 int ret;
komoritan 0:14bd24b5a77f 35 C_SNIC_Core *snic_core_p = C_SNIC_Core::getInstance();
komoritan 0:14bd24b5a77f 36 C_SNIC_UartCommandManager *uartCmdMgr_p = snic_core_p->getUartCommand();
komoritan 0:14bd24b5a77f 37
komoritan 0:14bd24b5a77f 38 FUNC_IN();
komoritan 0:14bd24b5a77f 39 // Socket create
komoritan 0:14bd24b5a77f 40 ret = createSocket();
komoritan 0:14bd24b5a77f 41 if( ret != 0 )
komoritan 0:14bd24b5a77f 42 {
komoritan 0:14bd24b5a77f 43 DEBUG_PRINT("createSocket error : %d\r\n", ret);
komoritan 0:14bd24b5a77f 44 FUNC_OUT();
komoritan 0:14bd24b5a77f 45 return -1;
komoritan 0:14bd24b5a77f 46 }
komoritan 0:14bd24b5a77f 47
komoritan 0:14bd24b5a77f 48 int ip_addr = resolveHostName( host_p );
komoritan 0:14bd24b5a77f 49 //lcd_printf("connect to [%s](%08x)\r\n", host_p, ip_addr);
komoritan 0:14bd24b5a77f 50 if( ( ip_addr == 0) || (ip_addr == -1) )
komoritan 0:14bd24b5a77f 51 {
komoritan 0:14bd24b5a77f 52 DEBUG_PRINT("connect resolveHostName failed\r\n");
komoritan 0:14bd24b5a77f 53 FUNC_OUT();
komoritan 0:14bd24b5a77f 54 return -1;
komoritan 0:14bd24b5a77f 55 }
komoritan 0:14bd24b5a77f 56
komoritan 0:14bd24b5a77f 57 // Get buffer for response payload from MemoryPool
komoritan 0:14bd24b5a77f 58 tagMEMPOOL_BLOCK_T *payload_buf_p = snic_core_p->allocCmdBuf();
komoritan 0:14bd24b5a77f 59 if( payload_buf_p == NULL )
komoritan 0:14bd24b5a77f 60 {
komoritan 0:14bd24b5a77f 61 DEBUG_PRINT("connect payload_buf_p NULL\r\n");
komoritan 0:14bd24b5a77f 62 FUNC_OUT();
komoritan 0:14bd24b5a77f 63 return -1;
komoritan 0:14bd24b5a77f 64 }
komoritan 0:14bd24b5a77f 65
komoritan 0:14bd24b5a77f 66 // IP address convert to number from strings.
komoritan 0:14bd24b5a77f 67 // unsigned int ip_addr = addrToInteger(ip_addr_p);
komoritan 0:14bd24b5a77f 68
komoritan 0:14bd24b5a77f 69 //
komoritan 0:14bd24b5a77f 70 C_SNIC_Core::tagSNIC_TCP_CONNECT_TO_SERVER_REQ_T req;
komoritan 0:14bd24b5a77f 71 // Make request
komoritan 0:14bd24b5a77f 72 req.cmd_sid = UART_CMD_SID_SNIC_TCP_CONNECT_TO_SERVER_REQ;
komoritan 0:14bd24b5a77f 73 req.seq = mUartRequestSeq++;
komoritan 0:14bd24b5a77f 74 req.socket_id = mSocketID;
komoritan 0:14bd24b5a77f 75
komoritan 0:14bd24b5a77f 76 // set ip addr ( byte order )
komoritan 0:14bd24b5a77f 77 C_SNIC_UartMsgUtil::convertIntToByteAdday( ip_addr, (char *)req.remote_addr );
komoritan 0:14bd24b5a77f 78 req.remote_port[0] = ( (port & 0xFF00) >> 8 );
komoritan 0:14bd24b5a77f 79 req.remote_port[1] = (port & 0xFF);
komoritan 0:14bd24b5a77f 80 req.recv_bufsize[0] = ( (SNIC_UART_RECVBUF_SIZE & 0xFF00) >> 8 );
komoritan 0:14bd24b5a77f 81 req.recv_bufsize[1] = (SNIC_UART_RECVBUF_SIZE & 0xFF);
komoritan 0:14bd24b5a77f 82 req.timeout = 60;
komoritan 0:14bd24b5a77f 83
komoritan 0:14bd24b5a77f 84 unsigned char *command_array_p = snic_core_p->getCommandBuf();
komoritan 0:14bd24b5a77f 85 unsigned int command_len;
komoritan 0:14bd24b5a77f 86 // Preparation of command
komoritan 0:14bd24b5a77f 87 command_len = snic_core_p->preparationSendCommand( UART_CMD_ID_SNIC, req.cmd_sid, (unsigned char *)&req
komoritan 0:14bd24b5a77f 88 , sizeof(C_SNIC_Core::tagSNIC_TCP_CONNECT_TO_SERVER_REQ_T), payload_buf_p->buf, command_array_p );
komoritan 0:14bd24b5a77f 89
komoritan 0:14bd24b5a77f 90 uartCmdMgr_p->setCommandSID( UART_CMD_SID_SNIC_TCP_CONNECTION_STATUS_IND );
komoritan 0:14bd24b5a77f 91
komoritan 0:14bd24b5a77f 92 // Send uart command request
komoritan 0:14bd24b5a77f 93 snic_core_p->sendUart( command_len, command_array_p );
komoritan 0:14bd24b5a77f 94
komoritan 0:14bd24b5a77f 95 // Wait UART response
komoritan 0:14bd24b5a77f 96 ret = uartCmdMgr_p->wait();
komoritan 0:14bd24b5a77f 97 if( ret != 0 )
komoritan 0:14bd24b5a77f 98 {
komoritan 0:14bd24b5a77f 99 DEBUG_PRINT( "connect failed\r\n" );
komoritan 0:14bd24b5a77f 100 snic_core_p->freeCmdBuf( payload_buf_p );
komoritan 0:14bd24b5a77f 101 FUNC_OUT();
komoritan 0:14bd24b5a77f 102 return -1;
komoritan 0:14bd24b5a77f 103 }
komoritan 0:14bd24b5a77f 104
komoritan 0:14bd24b5a77f 105 if( uartCmdMgr_p->getCommandStatus() != UART_CMD_RES_SNIC_CONNECTION_UP )
komoritan 0:14bd24b5a77f 106 {
komoritan 0:14bd24b5a77f 107 DEBUG_PRINT("connect status:%02x\r\n", uartCmdMgr_p->getCommandStatus());
komoritan 0:14bd24b5a77f 108 snic_core_p->freeCmdBuf( payload_buf_p );
komoritan 0:14bd24b5a77f 109 FUNC_OUT();
komoritan 0:14bd24b5a77f 110 return -1;
komoritan 0:14bd24b5a77f 111 }
komoritan 0:14bd24b5a77f 112
komoritan 0:14bd24b5a77f 113 snic_core_p->freeCmdBuf( payload_buf_p );
komoritan 0:14bd24b5a77f 114
komoritan 0:14bd24b5a77f 115 // Initialize connection information
komoritan 0:14bd24b5a77f 116 C_SNIC_Core::tagCONNECT_INFO_T *con_info_p = snic_core_p->getConnectInfo( mSocketID );
komoritan 0:14bd24b5a77f 117 if( con_info_p->recvbuf_p == NULL )
komoritan 0:14bd24b5a77f 118 {
komoritan 0:14bd24b5a77f 119 DEBUG_PRINT( "create recv buffer[socket:%d]\r\n", mSocketID);
komoritan 0:14bd24b5a77f 120 con_info_p->recvbuf_p = new CircBuffer<char>(SNIC_UART_RECVBUF_SIZE);
komoritan 0:14bd24b5a77f 121 }
komoritan 0:14bd24b5a77f 122 con_info_p->is_connected = true;
komoritan 0:14bd24b5a77f 123 con_info_p->is_received = false;
komoritan 0:14bd24b5a77f 124 FUNC_OUT();
komoritan 0:14bd24b5a77f 125 return 0;
komoritan 0:14bd24b5a77f 126 }
komoritan 0:14bd24b5a77f 127
komoritan 0:14bd24b5a77f 128 bool TCPSocketConnection::is_connected(void)
komoritan 0:14bd24b5a77f 129 {
komoritan 0:14bd24b5a77f 130 C_SNIC_Core *snic_core_p = C_SNIC_Core::getInstance();
komoritan 0:14bd24b5a77f 131 C_SNIC_Core::tagCONNECT_INFO_T *con_info_p = snic_core_p->getConnectInfo( mSocketID );
komoritan 0:14bd24b5a77f 132 return con_info_p->is_connected;
komoritan 0:14bd24b5a77f 133 }
komoritan 0:14bd24b5a77f 134
komoritan 0:14bd24b5a77f 135 int TCPSocketConnection::send(char* data_p, int length)
komoritan 0:14bd24b5a77f 136 {
komoritan 0:14bd24b5a77f 137 C_SNIC_Core *snic_core_p = C_SNIC_Core::getInstance();
komoritan 0:14bd24b5a77f 138 C_SNIC_UartCommandManager *uartCmdMgr_p = snic_core_p->getUartCommand();
komoritan 0:14bd24b5a77f 139
komoritan 0:14bd24b5a77f 140 FUNC_IN();
komoritan 0:14bd24b5a77f 141 // Get buffer for response payload from MemoryPool
komoritan 0:14bd24b5a77f 142 tagMEMPOOL_BLOCK_T *payload_buf_p = snic_core_p->allocCmdBuf();
komoritan 0:14bd24b5a77f 143 if( payload_buf_p == NULL )
komoritan 0:14bd24b5a77f 144 {
komoritan 0:14bd24b5a77f 145 DEBUG_PRINT("connect payload_buf_p NULL\r\n");
komoritan 0:14bd24b5a77f 146 FUNC_OUT();
komoritan 0:14bd24b5a77f 147 return -1;
komoritan 0:14bd24b5a77f 148 }
komoritan 0:14bd24b5a77f 149
komoritan 0:14bd24b5a77f 150 C_SNIC_Core::tagSNIC_TCP_SEND_FROM_SOCKET_REQ_T req;
komoritan 0:14bd24b5a77f 151 // Make request
komoritan 0:14bd24b5a77f 152 req.cmd_sid = UART_CMD_SID_SNIC_SEND_FROM_SOCKET_REQ;
komoritan 0:14bd24b5a77f 153 req.seq = mUartRequestSeq++;
komoritan 0:14bd24b5a77f 154 req.socket_id = mSocketID;
komoritan 0:14bd24b5a77f 155 req.option = 0;
komoritan 0:14bd24b5a77f 156 req.payload_len[0]= ( (length & 0xFF00) >> 8 );
komoritan 0:14bd24b5a77f 157 req.payload_len[1]= (length & 0xFF);
komoritan 0:14bd24b5a77f 158
komoritan 0:14bd24b5a77f 159 int req_size = sizeof(C_SNIC_Core::tagSNIC_TCP_SEND_FROM_SOCKET_REQ_T);
komoritan 0:14bd24b5a77f 160 char *send_buf_p = getSocketSendBuf();
komoritan 0:14bd24b5a77f 161 memcpy( send_buf_p, &req, req_size );
komoritan 0:14bd24b5a77f 162 memcpy( &send_buf_p[req_size], data_p, length );
komoritan 0:14bd24b5a77f 163
komoritan 0:14bd24b5a77f 164 unsigned char *command_array_p = snic_core_p->getCommandBuf();
komoritan 0:14bd24b5a77f 165 unsigned int command_len;
komoritan 0:14bd24b5a77f 166 // Preparation of command
komoritan 0:14bd24b5a77f 167 command_len = snic_core_p->preparationSendCommand( UART_CMD_ID_SNIC, req.cmd_sid, (unsigned char *)send_buf_p
komoritan 0:14bd24b5a77f 168 , req_size + length, payload_buf_p->buf, command_array_p );
komoritan 0:14bd24b5a77f 169
komoritan 0:14bd24b5a77f 170 // Send uart command request
komoritan 0:14bd24b5a77f 171 snic_core_p->sendUart( command_len, command_array_p );
komoritan 0:14bd24b5a77f 172
komoritan 0:14bd24b5a77f 173 // Wait UART response
komoritan 0:14bd24b5a77f 174 int ret = uartCmdMgr_p->wait();
komoritan 0:14bd24b5a77f 175 if( ret != 0 )
komoritan 0:14bd24b5a77f 176 {
komoritan 0:14bd24b5a77f 177 DEBUG_PRINT( "send failed\r\n" );
komoritan 0:14bd24b5a77f 178 snic_core_p->freeCmdBuf( payload_buf_p );
komoritan 0:14bd24b5a77f 179 FUNC_OUT();
komoritan 0:14bd24b5a77f 180 return -1;
komoritan 0:14bd24b5a77f 181 }
komoritan 0:14bd24b5a77f 182
komoritan 0:14bd24b5a77f 183 if( uartCmdMgr_p->getCommandStatus() != UART_CMD_RES_SNIC_SUCCESS )
komoritan 0:14bd24b5a77f 184 {
komoritan 0:14bd24b5a77f 185 DEBUG_PRINT("send status:%02x\r\n", uartCmdMgr_p->getCommandStatus());
komoritan 0:14bd24b5a77f 186 snic_core_p->freeCmdBuf( payload_buf_p );
komoritan 0:14bd24b5a77f 187 FUNC_OUT();
komoritan 0:14bd24b5a77f 188 return -1;
komoritan 0:14bd24b5a77f 189 }
komoritan 0:14bd24b5a77f 190 snic_core_p->freeCmdBuf( payload_buf_p );
komoritan 0:14bd24b5a77f 191
komoritan 0:14bd24b5a77f 192 // SNIC_SEND_FROM_SOCKET_REQ
komoritan 0:14bd24b5a77f 193 FUNC_OUT();
komoritan 0:14bd24b5a77f 194 return length;
komoritan 0:14bd24b5a77f 195 }
komoritan 0:14bd24b5a77f 196
komoritan 0:14bd24b5a77f 197 int TCPSocketConnection::send_all(char *data_p, int length)
komoritan 0:14bd24b5a77f 198 {
komoritan 0:14bd24b5a77f 199 return send( data_p, length );
komoritan 0:14bd24b5a77f 200 }
komoritan 0:14bd24b5a77f 201
komoritan 0:14bd24b5a77f 202 int TCPSocketConnection::receive(char* data_p, int length)
komoritan 0:14bd24b5a77f 203 {
komoritan 0:14bd24b5a77f 204 int i = 0;
komoritan 0:14bd24b5a77f 205
komoritan 0:14bd24b5a77f 206 FUNC_IN();
komoritan 0:14bd24b5a77f 207 if( (data_p == NULL) || (length < 1) )
komoritan 0:14bd24b5a77f 208 {
komoritan 0:14bd24b5a77f 209 DEBUG_PRINT("TCPSocketConnection::receive parameter error\r\n");
komoritan 0:14bd24b5a77f 210 FUNC_OUT();
komoritan 0:14bd24b5a77f 211 return -1;
komoritan 0:14bd24b5a77f 212 }
komoritan 0:14bd24b5a77f 213
komoritan 0:14bd24b5a77f 214 C_SNIC_Core *snic_core_p = C_SNIC_Core::getInstance();
komoritan 0:14bd24b5a77f 215 // Initialize connection information
komoritan 0:14bd24b5a77f 216 C_SNIC_Core::tagCONNECT_INFO_T *con_info_p = snic_core_p->getConnectInfo( mSocketID );
komoritan 0:14bd24b5a77f 217 if( con_info_p->recvbuf_p == NULL )
komoritan 0:14bd24b5a77f 218 {
komoritan 0:14bd24b5a77f 219 DEBUG_PRINT("TCPSocketConnection::receive Conncection info error\r\n");
komoritan 0:14bd24b5a77f 220 FUNC_OUT();
komoritan 0:14bd24b5a77f 221 return -1;
komoritan 0:14bd24b5a77f 222 }
komoritan 0:14bd24b5a77f 223
komoritan 0:14bd24b5a77f 224 // Check connection
komoritan 0:14bd24b5a77f 225 if( con_info_p->is_connected == false )
komoritan 0:14bd24b5a77f 226 {
komoritan 0:14bd24b5a77f 227 DEBUG_PRINT(" Socket id \"%d\" is not connected\r\n", mSocketID);
komoritan 0:14bd24b5a77f 228 FUNC_OUT();
komoritan 0:14bd24b5a77f 229 return -1;
komoritan 0:14bd24b5a77f 230 }
komoritan 0:14bd24b5a77f 231 con_info_p->is_receive_complete = true;
komoritan 0:14bd24b5a77f 232 // KTEC ADD S
komoritan 0:14bd24b5a77f 233 // データの受信処理が間に合わないケースが存在するため、追加
komoritan 0:14bd24b5a77f 234 wait(0.1);
komoritan 0:14bd24b5a77f 235 // KTEC ADD E
komoritan 0:14bd24b5a77f 236 if( con_info_p->is_received == false )
komoritan 0:14bd24b5a77f 237 {
komoritan 0:14bd24b5a77f 238 // Try receive
komoritan 0:14bd24b5a77f 239 Thread::yield();
komoritan 0:14bd24b5a77f 240
komoritan 0:14bd24b5a77f 241 if( con_info_p->is_received == false )
komoritan 0:14bd24b5a77f 242 {
komoritan 0:14bd24b5a77f 243 // No data received.
komoritan 0:14bd24b5a77f 244 FUNC_OUT();
komoritan 0:14bd24b5a77f 245 return 0;
komoritan 0:14bd24b5a77f 246 }
komoritan 0:14bd24b5a77f 247 }
komoritan 0:14bd24b5a77f 248 // Get packet data from buffer for receive.
komoritan 0:14bd24b5a77f 249 for (i = 0; i < length; i ++)
komoritan 0:14bd24b5a77f 250 {
komoritan 0:14bd24b5a77f 251 if (con_info_p->recvbuf_p->dequeue(&data_p[i]) == false)
komoritan 0:14bd24b5a77f 252 {
komoritan 0:14bd24b5a77f 253 break;
komoritan 0:14bd24b5a77f 254 }
komoritan 0:14bd24b5a77f 255 }
komoritan 0:14bd24b5a77f 256
komoritan 0:14bd24b5a77f 257 if( con_info_p->recvbuf_p->isEmpty() )
komoritan 0:14bd24b5a77f 258 {
komoritan 0:14bd24b5a77f 259 con_info_p->mutex.lock();
komoritan 0:14bd24b5a77f 260 con_info_p->is_received = false;
komoritan 0:14bd24b5a77f 261 con_info_p->mutex.unlock();
komoritan 0:14bd24b5a77f 262 }
komoritan 0:14bd24b5a77f 263
komoritan 0:14bd24b5a77f 264 FUNC_OUT();
komoritan 0:14bd24b5a77f 265 return i;
komoritan 0:14bd24b5a77f 266 }
komoritan 0:14bd24b5a77f 267
komoritan 0:14bd24b5a77f 268 int TCPSocketConnection::receive_all(char* data_p, int length)
komoritan 0:14bd24b5a77f 269 {
komoritan 0:14bd24b5a77f 270 return receive( data_p, length );
komoritan 0:14bd24b5a77f 271 }
komoritan 0:14bd24b5a77f 272
komoritan 0:14bd24b5a77f 273 void TCPSocketConnection::setAcceptSocket( int socket_id )
komoritan 0:14bd24b5a77f 274 {
komoritan 0:14bd24b5a77f 275 FUNC_IN();
komoritan 0:14bd24b5a77f 276 mSocketID = socket_id;
komoritan 0:14bd24b5a77f 277 }