keuzeproject

Dependencies:   mbed HTTPServer RemoteIR mbed-rtos SDFileSystem EthernetInterface mbed-rpc

Committer:
MyEmbed
Date:
Thu Jan 24 12:31:51 2019 +0000
Revision:
17:492d9d9f0c49
Parent:
16:2d23297857bc
keuzeproject

Who changed what in which revision?

UserRevisionLine numberNew contents of line
donatien 0:5630d7e58a0b 1 #include "mbed.h"
sammacjunkie 4:36e0aa194b45 2 #include "EthernetInterface.h"
donatien 0:5630d7e58a0b 3 #include "HTTPServer.h"
sammacjunkie 4:36e0aa194b45 4 #include "FsHandler.h"
sammacjunkie 4:36e0aa194b45 5 #include "RpcHandler.h"
sammacjunkie 4:36e0aa194b45 6 #include "rtos.h"
sammacjunkie 16:2d23297857bc 7 #include <string>
donatien 0:5630d7e58a0b 8
sammacjunkie 6:70a0af38edcc 9 DigitalOut led1(LED1);
sammacjunkie 14:2b63c0f795cb 10 DigitalOut led2(LED2);
sammacjunkie 6:70a0af38edcc 11
sammacjunkie 4:36e0aa194b45 12 //Start IR
sammacjunkie 4:36e0aa194b45 13 #include "ReceiverIR.h"
sammacjunkie 4:36e0aa194b45 14 #include "TransmitterIR.h"
sammacjunkie 4:36e0aa194b45 15 #include "IR.h"
sammacjunkie 4:36e0aa194b45 16 //END IR
sarvagyavaish 3:a3b4d032f48f 17
sarvagyavaish 12:20ba5378ede2 18
sarvagyavaish 3:a3b4d032f48f 19 // Start DB
sarvagyavaish 3:a3b4d032f48f 20 #include <stdio.h>
sarvagyavaish 3:a3b4d032f48f 21 #include <stdlib.h>
sarvagyavaish 3:a3b4d032f48f 22 #include "SDFileSystem.h"
sarvagyavaish 3:a3b4d032f48f 23 #include "db.h"
sarvagyavaish 3:a3b4d032f48f 24 // End DB
sarvagyavaish 3:a3b4d032f48f 25
sarvagyavaish 12:20ba5378ede2 26
sarvagyavaish 3:a3b4d032f48f 27 // Start RPC
sarvagyavaish 3:a3b4d032f48f 28 #include "RPCVariable.h"
sammacjunkie 4:36e0aa194b45 29 int Request = 0;
sarvagyavaish 3:a3b4d032f48f 30 int Learn = 0;
sammacjunkie 7:7b3f53b5e737 31 char Learn_name0;
sammacjunkie 7:7b3f53b5e737 32 char Learn_name1;
sammacjunkie 7:7b3f53b5e737 33 char Learn_name2;
sammacjunkie 7:7b3f53b5e737 34 char Learn_name3;
sammacjunkie 7:7b3f53b5e737 35 char Learn_name4;
sammacjunkie 7:7b3f53b5e737 36 char Learn_name5;
sammacjunkie 7:7b3f53b5e737 37 char Learn_name6;
sammacjunkie 7:7b3f53b5e737 38 char Learn_name7;
sammacjunkie 7:7b3f53b5e737 39 char Learn_name8;
sammacjunkie 7:7b3f53b5e737 40 char Learn_name9;
sarvagyavaish 12:20ba5378ede2 41
sarvagyavaish 3:a3b4d032f48f 42 //Make these variables accessible over RPC by attaching them to an RPCVariable
sammacjunkie 4:36e0aa194b45 43 RPCVariable<int> RPCRequest(&Request, "Request");
sammacjunkie 4:36e0aa194b45 44 RPCVariable<int> RPCLearn(&Learn, "Learn");
sammacjunkie 7:7b3f53b5e737 45 RPCVariable<char> RPCLearner0(&Learn_name0, "Learn_name0");
sammacjunkie 7:7b3f53b5e737 46 RPCVariable<char> RPCLearner1(&Learn_name1, "Learn_name1");
sammacjunkie 7:7b3f53b5e737 47 RPCVariable<char> RPCLearner2(&Learn_name2, "Learn_name2");
sammacjunkie 7:7b3f53b5e737 48 RPCVariable<char> RPCLearner3(&Learn_name3, "Learn_name3");
sammacjunkie 7:7b3f53b5e737 49 RPCVariable<char> RPCLearner4(&Learn_name4, "Learn_name4");
sammacjunkie 7:7b3f53b5e737 50 RPCVariable<char> RPCLearner5(&Learn_name5, "Learn_name5");
sammacjunkie 7:7b3f53b5e737 51 RPCVariable<char> RPCLearner6(&Learn_name6, "Learn_name6");
sammacjunkie 7:7b3f53b5e737 52 RPCVariable<char> RPCLearner7(&Learn_name7, "Learn_name7");
sammacjunkie 7:7b3f53b5e737 53 RPCVariable<char> RPCLearner8(&Learn_name8, "Learn_name8");
sammacjunkie 7:7b3f53b5e737 54 RPCVariable<char> RPCLearner9(&Learn_name9, "Learn_name9");
sarvagyavaish 12:20ba5378ede2 55 // End RPC
sammacjunkie 7:7b3f53b5e737 56
sammacjunkie 7:7b3f53b5e737 57
sammacjunkie 4:36e0aa194b45 58 Serial pc(USBTX, USBRX, "pc");
sarvagyavaish 3:a3b4d032f48f 59
sammacjunkie 4:36e0aa194b45 60 // Instantiate a HTTPServer to handle incoming requests
sammacjunkie 4:36e0aa194b45 61 HTTPServer svr;
sammacjunkie 4:36e0aa194b45 62 // Instantiate a local file system handler named 'local' which will be used later to access files on the mbed.
sammacjunkie 4:36e0aa194b45 63 LocalFileSystem local("local");
donatien 0:5630d7e58a0b 64
sammacjunkie 4:36e0aa194b45 65 SDFileSystem sd(p5, p6, p7, p8, "sd"); // the pinout on the mbed
donatien 0:5630d7e58a0b 66
sarvagyavaish 3:a3b4d032f48f 67 int main()
sarvagyavaish 3:a3b4d032f48f 68 {
sammacjunkie 4:36e0aa194b45 69
sammacjunkie 4:36e0aa194b45 70 printf("Setting up Apache...\n \r");
sammacjunkie 4:36e0aa194b45 71
sammacjunkie 4:36e0aa194b45 72 HTTPFsRequestHandler::mount("/local/", "/");
sammacjunkie 13:12749822ba56 73 HTTPFsRequestHandler::mount("/sd/", "/sd/");
sammacjunkie 4:36e0aa194b45 74 svr.addHandler<HTTPFsRequestHandler>("/");
sammacjunkie 4:36e0aa194b45 75 svr.addHandler<HTTPRpcRequestHandler>("/rpc");
sammacjunkie 4:36e0aa194b45 76
sammacjunkie 4:36e0aa194b45 77 EthernetInterface eth;
sammacjunkie 4:36e0aa194b45 78 eth.init(); //Use DHCP
sammacjunkie 13:12749822ba56 79 eth.connect();
sammacjunkie 4:36e0aa194b45 80
sammacjunkie 4:36e0aa194b45 81 // Now start the server on port 80.
sammacjunkie 4:36e0aa194b45 82 if (!svr.start(80, &eth)) {
sammacjunkie 4:36e0aa194b45 83 error("Server not starting !");
sammacjunkie 4:36e0aa194b45 84 exit(0);
sarvagyavaish 3:a3b4d032f48f 85 }
sarvagyavaish 3:a3b4d032f48f 86
sammacjunkie 4:36e0aa194b45 87 printf("IP: %s\n \r", eth.getIPAddress());
sammacjunkie 4:36e0aa194b45 88 printf("Setup OK\n \r");
sammacjunkie 4:36e0aa194b45 89
sammacjunkie 4:36e0aa194b45 90
sarvagyavaish 3:a3b4d032f48f 91
sarvagyavaish 3:a3b4d032f48f 92
sarvagyavaish 3:a3b4d032f48f 93 // DB Init
sarvagyavaish 3:a3b4d032f48f 94 mkdir("/sd/SmartRemote", 0777);
sarvagyavaish 3:a3b4d032f48f 95
sarvagyavaish 12:20ba5378ede2 96 char tuple_code[128];
sarvagyavaish 12:20ba5378ede2 97 char tuple_name[128];
sarvagyavaish 12:20ba5378ede2 98 char tuple_bitlength[128];
sammacjunkie 14:2b63c0f795cb 99 char tuple_format[128];
sammacjunkie 13:12749822ba56 100 char temp[20];
sarvagyavaish 15:c8074f5f241a 101 int n;
sarvagyavaish 3:a3b4d032f48f 102 //End DB init
sarvagyavaish 3:a3b4d032f48f 103
sarvagyavaish 3:a3b4d032f48f 104
sammacjunkie 4:36e0aa194b45 105 //IR Init
sammacjunkie 4:36e0aa194b45 106 uint8_t buf1[32];
sammacjunkie 4:36e0aa194b45 107 uint8_t buf2[32];
sammacjunkie 4:36e0aa194b45 108 int bitlength1;
sammacjunkie 4:36e0aa194b45 109 int bitlength2;
sammacjunkie 16:2d23297857bc 110 char tempstr[3];
sammacjunkie 4:36e0aa194b45 111 RemoteIR::Format format;
sammacjunkie 4:36e0aa194b45 112 memset(buf1, 0x00, sizeof(buf1));
sammacjunkie 4:36e0aa194b45 113 memset(buf2, 0x00, sizeof(buf2));
sammacjunkie 4:36e0aa194b45 114 //END IR Init
sammacjunkie 4:36e0aa194b45 115
sammacjunkie 4:36e0aa194b45 116 printf("Listening...\n \r");
sammacjunkie 4:36e0aa194b45 117
sarvagyavaish 3:a3b4d032f48f 118
sarvagyavaish 3:a3b4d032f48f 119 Timer tm;
sarvagyavaish 3:a3b4d032f48f 120 tm.start();
sarvagyavaish 3:a3b4d032f48f 121 //Listen indefinitely
sarvagyavaish 3:a3b4d032f48f 122 while(true) {
sammacjunkie 4:36e0aa194b45 123 svr.poll();
sarvagyavaish 3:a3b4d032f48f 124 if(tm.read()>.5) {
sarvagyavaish 3:a3b4d032f48f 125 tm.start();
sarvagyavaish 3:a3b4d032f48f 126 }
sammacjunkie 6:70a0af38edcc 127 if (Learn) {
sarvagyavaish 12:20ba5378ede2 128 // Debug LED
sammacjunkie 6:70a0af38edcc 129 led1 = 1;
sammacjunkie 13:12749822ba56 130
sarvagyavaish 12:20ba5378ede2 131 // Receive the code
sammacjunkie 6:70a0af38edcc 132 {
sammacjunkie 6:70a0af38edcc 133 bitlength1 = receive(&format, buf1, sizeof(buf1));
sammacjunkie 6:70a0af38edcc 134 if (bitlength1 < 0) {
sammacjunkie 6:70a0af38edcc 135 continue;
sammacjunkie 6:70a0af38edcc 136 }
sammacjunkie 6:70a0af38edcc 137 display_status("RECV", bitlength1);
sammacjunkie 6:70a0af38edcc 138 display_data(buf1, bitlength1);
sammacjunkie 6:70a0af38edcc 139 //display_format(format);
sammacjunkie 6:70a0af38edcc 140 }
sarvagyavaish 12:20ba5378ede2 141 // Reset
sammacjunkie 6:70a0af38edcc 142 led1 = 0;
sammacjunkie 6:70a0af38edcc 143 Learn = 0;
sammacjunkie 13:12749822ba56 144
sammacjunkie 13:12749822ba56 145
sammacjunkie 13:12749822ba56 146
sammacjunkie 13:12749822ba56 147 // Set up the variables
sammacjunkie 13:12749822ba56 148 sprintf(tuple_name, "%c%c%c%c%c%c%c%c%c%c", Learn_name0,Learn_name1,Learn_name2,Learn_name3,Learn_name4,Learn_name5,Learn_name6,Learn_name7,Learn_name8,Learn_name9);
sammacjunkie 13:12749822ba56 149 //sprintf(tuple_code, "%X", buf1);
sammacjunkie 13:12749822ba56 150 sprintf(tuple_bitlength, "%d", bitlength1);
sammacjunkie 13:12749822ba56 151 sprintf(tuple_format, "%d", format);
sammacjunkie 13:12749822ba56 152 for (int i = 0; i < 10; i++) {
sammacjunkie 13:12749822ba56 153 if (tuple_name[i] == '~') tuple_name[i] = ' ';
sammacjunkie 13:12749822ba56 154 }
sammacjunkie 14:2b63c0f795cb 155
sammacjunkie 13:12749822ba56 156 const int n = bitlength1 / 8 + (((bitlength1 % 8) != 0) ? 1 : 0);
sammacjunkie 13:12749822ba56 157 strcpy(tuple_code, "");
sammacjunkie 13:12749822ba56 158 for (int i = 0; i < n; i++) {
sammacjunkie 13:12749822ba56 159 sprintf(temp, "%02X", buf1[i]);
sammacjunkie 14:2b63c0f795cb 160 strcat(tuple_code, temp);
sammacjunkie 13:12749822ba56 161 }
sammacjunkie 13:12749822ba56 162
sammacjunkie 13:12749822ba56 163 // Insert into DB
sammacjunkie 13:12749822ba56 164 db_insert_tuple(tuple_name, tuple_code, tuple_bitlength, tuple_format);
sammacjunkie 13:12749822ba56 165
sammacjunkie 6:70a0af38edcc 166 }
sammacjunkie 6:70a0af38edcc 167
sammacjunkie 14:2b63c0f795cb 168 if ( Request != 0) {
sammacjunkie 14:2b63c0f795cb 169 led2 = 1;
sammacjunkie 14:2b63c0f795cb 170 db_find_tuple(Request, tuple_name, tuple_code, tuple_bitlength, tuple_format);
sarvagyavaish 15:c8074f5f241a 171
sarvagyavaish 15:c8074f5f241a 172 n = atoi(tuple_bitlength) / 8 + (((atoi(tuple_bitlength) % 8) != 0) ? 1 : 0);
sarvagyavaish 15:c8074f5f241a 173 memset(buf1, 0x00, sizeof(buf1));
sammacjunkie 16:2d23297857bc 174 int j = 0 ;
sammacjunkie 16:2d23297857bc 175 for (int i = 0; i < 2*n; i+=2) {
sammacjunkie 16:2d23297857bc 176
sarvagyavaish 15:c8074f5f241a 177 // printf("%02X", buf[i]);
sarvagyavaish 15:c8074f5f241a 178 // buf1[i] = (uint8_t)(atoi( tuple_code.substr(i, 2) ));
sammacjunkie 16:2d23297857bc 179 sprintf(tempstr,"%c%c", tuple_code[i],tuple_code[i+1] );
sammacjunkie 16:2d23297857bc 180 printf("%s - ", tempstr);
sammacjunkie 16:2d23297857bc 181 printf("%02X\n", (uint8_t)strtol(tempstr,NULL,16) );
sammacjunkie 16:2d23297857bc 182 buf1[j] = (uint8_t)strtol(tempstr,NULL,16);
sammacjunkie 16:2d23297857bc 183 j++;
sarvagyavaish 15:c8074f5f241a 184 }
sammacjunkie 16:2d23297857bc 185 display_data(buf1,atoi(tuple_bitlength));
sarvagyavaish 15:c8074f5f241a 186
sammacjunkie 14:2b63c0f795cb 187 {
sammacjunkie 14:2b63c0f795cb 188 RemoteIR::Format f = static_cast<RemoteIR::Format>(atoi(tuple_format));
sammacjunkie 16:2d23297857bc 189 bitlength1 = transmit(f, buf1, atoi(tuple_bitlength));
sammacjunkie 14:2b63c0f795cb 190 if (bitlength1 < 0) {
sammacjunkie 14:2b63c0f795cb 191 continue;
sammacjunkie 14:2b63c0f795cb 192 }
sammacjunkie 14:2b63c0f795cb 193 display_status("TRAN", bitlength1);
sammacjunkie 14:2b63c0f795cb 194 //display_data(buf1, bitlength1);
sammacjunkie 14:2b63c0f795cb 195 //display_format(format);
sammacjunkie 14:2b63c0f795cb 196 }
sammacjunkie 14:2b63c0f795cb 197 led2 = 0;
sammacjunkie 14:2b63c0f795cb 198 Request = 0;
sammacjunkie 14:2b63c0f795cb 199
sammacjunkie 14:2b63c0f795cb 200 }
sammacjunkie 14:2b63c0f795cb 201
donatien 0:5630d7e58a0b 202 }
sarvagyavaish 3:a3b4d032f48f 203
sarvagyavaish 3:a3b4d032f48f 204 return 0;
donatien 0:5630d7e58a0b 205 }
sammacjunkie 4:36e0aa194b45 206