Core Base Classes for the Light Endpoints

Dependencies:   BufferedSerial

Dependents:   mbed_mqtt_endpoint_ublox_ethernet mbed_mqtt_endpoint_ublox_cellular mbed_nsp_endpoint_ublox_cellular mbed_nsp_endpoint_ublox_ethernet ... more

Committer:
ansond
Date:
Mon Mar 03 22:27:08 2014 +0000
Revision:
70:055ebf51f6ad
Parent:
68:e6431dfe2f30
Child:
71:90bf61bc3727
updates

Who changed what in which revision?

UserRevisionLine numberNew contents of line
ansond 0:4c9bfcb3e759 1 /* Copyright C2013 Doug Anson, MIT License
ansond 0:4c9bfcb3e759 2 *
ansond 0:4c9bfcb3e759 3 * Permission is hereby granted, free of charge, to any person obtaining a copy of this software
ansond 0:4c9bfcb3e759 4 * and associated documentation files the "Software", to deal in the Software without restriction,
ansond 0:4c9bfcb3e759 5 * including without limitation the rights to use, copy, modify, merge, publish, distribute,
ansond 0:4c9bfcb3e759 6 * sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is
ansond 0:4c9bfcb3e759 7 * furnished to do so, subject to the following conditions:
ansond 0:4c9bfcb3e759 8 *
ansond 0:4c9bfcb3e759 9 * The above copyright notice and this permission notice shall be included in all copies or
ansond 0:4c9bfcb3e759 10 * substantial portions of the Software.
ansond 0:4c9bfcb3e759 11 *
ansond 0:4c9bfcb3e759 12 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING
ansond 0:4c9bfcb3e759 13 * BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
ansond 0:4c9bfcb3e759 14 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,
ansond 0:4c9bfcb3e759 15 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
ansond 0:4c9bfcb3e759 16 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
ansond 0:4c9bfcb3e759 17 */
ansond 0:4c9bfcb3e759 18
ansond 0:4c9bfcb3e759 19 #include "ErrorHandler.h"
ansond 0:4c9bfcb3e759 20
ansond 66:3361be4bfd38 21 // Memory statistics macro
ansond 66:3361be4bfd38 22 #define MEM_STATS(x) \
ansond 64:7e494186e2ec 23 int s##x=0;\
ansond 64:7e494186e2ec 24 int *h##x = new int [1];\
ansond 66:3361be4bfd38 25 this->m_pc->printf("\r\nMEMORY: stack: 0x%08x heap: 0x%08x avail: %d bytes\r\n", &s##x, h##x, &s##x-h##x);\
ansond 64:7e494186e2ec 26 if (h##x > &s##x)\
ansond 64:7e494186e2ec 27 error("collision\n");\
ansond 64:7e494186e2ec 28 delete [] h##x;\
ansond 64:7e494186e2ec 29 __nop()
ansond 64:7e494186e2ec 30
ansond 18:bc165829bb88 31 // Annunciations
ansond 0:4c9bfcb3e759 32 DigitalOut led1(LED1);
ansond 0:4c9bfcb3e759 33 DigitalOut led2(LED2);
ansond 0:4c9bfcb3e759 34 DigitalOut led3(LED3);
ansond 0:4c9bfcb3e759 35 DigitalOut led4(LED4);
ansond 0:4c9bfcb3e759 36
ansond 0:4c9bfcb3e759 37 // Multi-color LED support
ansond 0:4c9bfcb3e759 38 PwmOut r (p23);
ansond 0:4c9bfcb3e759 39 PwmOut g (p24);
ansond 0:4c9bfcb3e759 40 PwmOut b (p25);
ansond 0:4c9bfcb3e759 41
ansond 0:4c9bfcb3e759 42 // close down connections
ansond 20:f2dbbd852e08 43 extern void closedown(int code);
ansond 0:4c9bfcb3e759 44
ansond 0:4c9bfcb3e759 45 // default constructor
ansond 68:e6431dfe2f30 46 ErrorHandler::ErrorHandler(Serial *pc,C12832_LCD *lcd) {
ansond 0:4c9bfcb3e759 47 this->m_pc = pc;
ansond 0:4c9bfcb3e759 48 this->m_lcd = lcd;
ansond 26:791d22d43cb4 49 memset(this->m_message,0,MAX_LOG_MESSAGE+1);
ansond 0:4c9bfcb3e759 50 this->resetLEDs();
ansond 70:055ebf51f6ad 51 this->m_mutex = NULL;
ansond 70:055ebf51f6ad 52 this->m_close_mutex = NULL;
ansond 70:055ebf51f6ad 53 this->m_led_mutex = NULL;
ansond 70:055ebf51f6ad 54 #ifdef EH_USE_MUTEXES
ansond 61:6012d61573ea 55 this->m_mutex = new Mutex();
ansond 70:055ebf51f6ad 56 this->m_close_mutex = new Mutex();
ansond 61:6012d61573ea 57 this->m_led_mutex = new Mutex();
ansond 70:055ebf51f6ad 58 #endif
ansond 70:055ebf51f6ad 59 this->releaseMutexes();
ansond 0:4c9bfcb3e759 60 }
ansond 0:4c9bfcb3e759 61
ansond 0:4c9bfcb3e759 62 // default destructor
ansond 0:4c9bfcb3e759 63 ErrorHandler::~ErrorHandler() {
ansond 70:055ebf51f6ad 64 this->releaseMutexes();
ansond 70:055ebf51f6ad 65 if (this->m_mutex != NULL) delete this->m_mutex;
ansond 70:055ebf51f6ad 66 if (this->m_close_mutex != NULL) delete this->m_close_mutex;
ansond 70:055ebf51f6ad 67 if (this->m_led_mutex != NULL) delete this->m_led_mutex;
ansond 70:055ebf51f6ad 68 }
ansond 70:055ebf51f6ad 69
ansond 70:055ebf51f6ad 70 // release all mutexes
ansond 70:055ebf51f6ad 71 void ErrorHandler::releaseMutexes() {
ansond 70:055ebf51f6ad 72 if (this->m_mutex != NULL) this->m_mutex->unlock();
ansond 70:055ebf51f6ad 73 if (this->m_close_mutex != NULL) this->m_close_mutex->unlock();
ansond 70:055ebf51f6ad 74 if (this->m_led_mutex != NULL) this->m_led_mutex->unlock();
ansond 0:4c9bfcb3e759 75 }
ansond 0:4c9bfcb3e759 76
ansond 0:4c9bfcb3e759 77 // log information
ansond 0:4c9bfcb3e759 78 void ErrorHandler::log(const char *format, ...) {
ansond 70:055ebf51f6ad 79 if (this->m_mutex != NULL) this->m_mutex->lock();
ansond 26:791d22d43cb4 80 memset(this->m_message,0,MAX_LOG_MESSAGE+1);
ansond 0:4c9bfcb3e759 81 va_list args;
ansond 0:4c9bfcb3e759 82 va_start(args, format);
ansond 0:4c9bfcb3e759 83 vsprintf(this->m_message, format, args);
ansond 0:4c9bfcb3e759 84 va_end(args);
ansond 0:4c9bfcb3e759 85 this->m_pc->printf(this->m_message);
ansond 64:7e494186e2ec 86 #ifdef ENABLE_MEMORY_DEBUG
ansond 66:3361be4bfd38 87 MEM_STATS(0);
ansond 64:7e494186e2ec 88 #endif
ansond 0:4c9bfcb3e759 89 this->m_pc->printf("\r\n");
ansond 0:4c9bfcb3e759 90 this->m_lcd->cls();
ansond 0:4c9bfcb3e759 91 this->m_lcd->locate(0,0);
ansond 0:4c9bfcb3e759 92 this->m_lcd->printf(this->m_message);
ansond 70:055ebf51f6ad 93 if (this->m_mutex != NULL) this->m_mutex->unlock();
ansond 0:4c9bfcb3e759 94 }
ansond 0:4c9bfcb3e759 95
ansond 15:386dccd0000a 96 // pause
ansond 15:386dccd0000a 97 void ErrorHandler::pause(const char *format, ...) {
ansond 70:055ebf51f6ad 98 if (this->m_mutex != NULL) this->m_mutex->lock();
ansond 26:791d22d43cb4 99 memset(this->m_message,0,MAX_LOG_MESSAGE+1);
ansond 15:386dccd0000a 100 va_list args;
ansond 15:386dccd0000a 101 va_start(args, format);
ansond 15:386dccd0000a 102 vsprintf(this->m_message, format, args);
ansond 15:386dccd0000a 103 va_end(args);
ansond 15:386dccd0000a 104 this->m_pc->printf(this->m_message);
ansond 15:386dccd0000a 105 this->m_pc->printf("\r\n");
ansond 15:386dccd0000a 106 this->m_lcd->cls();
ansond 15:386dccd0000a 107 this->m_lcd->locate(0,0);
ansond 15:386dccd0000a 108 this->m_lcd->printf(this->m_message);
ansond 18:bc165829bb88 109 this->m_pc->printf("Press any key to continue...ctrl-c to stop\r\n");
ansond 16:fda7dbb8b47a 110 char c = this->m_pc->getc();
ansond 16:fda7dbb8b47a 111 if (c == 0x03) { // CTRL-C ASCII
ansond 16:fda7dbb8b47a 112 this->m_pc->printf("ctrl-c: closing down...\r\n");
ansond 61:6012d61573ea 113 this->m_mutex->unlock();
ansond 20:f2dbbd852e08 114 closedown(1);
ansond 16:fda7dbb8b47a 115 }
ansond 70:055ebf51f6ad 116 if (this->m_mutex != NULL) this->m_mutex->unlock();
ansond 15:386dccd0000a 117 }
ansond 15:386dccd0000a 118
ansond 0:4c9bfcb3e759 119 // check for exit
ansond 15:386dccd0000a 120 void ErrorHandler::checkForExit() {
ansond 70:055ebf51f6ad 121 if (this->m_close_mutex != NULL) this->m_close_mutex->lock();
ansond 0:4c9bfcb3e759 122 if (this->m_pc->readable()) {
ansond 0:4c9bfcb3e759 123 char c = this->m_pc->getc();
ansond 0:4c9bfcb3e759 124 if (c == 0x03) { // CTRL-C ASCII
ansond 0:4c9bfcb3e759 125 this->m_pc->printf("ctrl-c: closing down...\r\n");
ansond 20:f2dbbd852e08 126 closedown(1);
ansond 0:4c9bfcb3e759 127 }
ansond 0:4c9bfcb3e759 128 }
ansond 70:055ebf51f6ad 129 if (this->m_close_mutex != NULL) this->m_close_mutex->unlock();
ansond 0:4c9bfcb3e759 130 }
ansond 0:4c9bfcb3e759 131
ansond 0:4c9bfcb3e759 132 // set the color LED
ansond 0:4c9bfcb3e759 133 void ErrorHandler::setRGBLED(float H, float S, float V) {
ansond 0:4c9bfcb3e759 134 float f,h,p,q,t;
ansond 0:4c9bfcb3e759 135 int i;
ansond 0:4c9bfcb3e759 136 if( S == 0.0) {
ansond 0:4c9bfcb3e759 137 r = 1.0 - V; // invert pwm !
ansond 0:4c9bfcb3e759 138 g = 1.0 - V;
ansond 0:4c9bfcb3e759 139 b = 1.0 - V;
ansond 0:4c9bfcb3e759 140 return;
ansond 0:4c9bfcb3e759 141 }
ansond 0:4c9bfcb3e759 142 if(H > 360.0) H = 0.0; // check values
ansond 0:4c9bfcb3e759 143 if(S > 1.0) S = 1.0;
ansond 0:4c9bfcb3e759 144 if(S < 0.0) S = 0.0;
ansond 0:4c9bfcb3e759 145 if(V > 1.0) V = 1.0;
ansond 0:4c9bfcb3e759 146 if(V < 0.0) V = 0.0;
ansond 0:4c9bfcb3e759 147 h = H / 60.0;
ansond 0:4c9bfcb3e759 148 i = (int) h;
ansond 0:4c9bfcb3e759 149 f = h - i;
ansond 0:4c9bfcb3e759 150 p = V * (1.0 - S);
ansond 0:4c9bfcb3e759 151 q = V * (1.0 - (S * f));
ansond 0:4c9bfcb3e759 152 t = V * (1.0 - (S * (1.0 - f)));
ansond 0:4c9bfcb3e759 153
ansond 0:4c9bfcb3e759 154 switch(i) {
ansond 0:4c9bfcb3e759 155 case 0:
ansond 0:4c9bfcb3e759 156 r = 1.0 - V; // invert pwm !
ansond 0:4c9bfcb3e759 157 g = 1.0 - t;
ansond 0:4c9bfcb3e759 158 b = 1.0 - p;
ansond 0:4c9bfcb3e759 159 break;
ansond 0:4c9bfcb3e759 160 case 1:
ansond 0:4c9bfcb3e759 161 r = 1.0 - q;
ansond 0:4c9bfcb3e759 162 g = 1.0 - V;
ansond 0:4c9bfcb3e759 163 b = 1.0 - p;
ansond 0:4c9bfcb3e759 164 break;
ansond 0:4c9bfcb3e759 165 case 2:
ansond 0:4c9bfcb3e759 166 r = 1.0 - p;
ansond 0:4c9bfcb3e759 167 g = 1.0 - V;
ansond 0:4c9bfcb3e759 168 b = 1.0 - t;
ansond 0:4c9bfcb3e759 169 break;
ansond 0:4c9bfcb3e759 170 case 3:
ansond 0:4c9bfcb3e759 171 r = 1.0 - p;
ansond 0:4c9bfcb3e759 172 g = 1.0 - q;
ansond 0:4c9bfcb3e759 173 b = 1.0 - V;
ansond 0:4c9bfcb3e759 174 break;
ansond 0:4c9bfcb3e759 175 case 4:
ansond 0:4c9bfcb3e759 176 r = 1.0 - t;
ansond 0:4c9bfcb3e759 177 g = 1.0 - p;
ansond 0:4c9bfcb3e759 178 b = 1.0 - V;
ansond 0:4c9bfcb3e759 179 break;
ansond 0:4c9bfcb3e759 180 case 5:
ansond 0:4c9bfcb3e759 181 default:
ansond 0:4c9bfcb3e759 182 r = 1.0 - V;
ansond 0:4c9bfcb3e759 183 g = 1.0 - p;
ansond 0:4c9bfcb3e759 184 b = 1.0 - q;
ansond 0:4c9bfcb3e759 185 break;
ansond 0:4c9bfcb3e759 186 }
ansond 0:4c9bfcb3e759 187 }
ansond 0:4c9bfcb3e759 188
ansond 0:4c9bfcb3e759 189 // turn the RGB LED specific colors
ansond 0:4c9bfcb3e759 190 void ErrorHandler::turnLEDRed() { this->setRGBLED(0.0,1.0,0.2); }
ansond 0:4c9bfcb3e759 191 void ErrorHandler::turnLEDGreen() { this->setRGBLED(120.0,1.0,0.2); }
ansond 0:4c9bfcb3e759 192 void ErrorHandler::turnLEDBlue() { this->setRGBLED(200.0,1.0,0.2); }
ansond 0:4c9bfcb3e759 193 void ErrorHandler::turnLEDBlack() { this->setRGBLED(0,0,0); }
ansond 0:4c9bfcb3e759 194 void ErrorHandler::turnLEDYellow() { this->setRGBLED(60.0,1.0,0.133); }
ansond 0:4c9bfcb3e759 195
ansond 0:4c9bfcb3e759 196 // reset LEDs
ansond 0:4c9bfcb3e759 197 void ErrorHandler::resetLEDs() {
ansond 0:4c9bfcb3e759 198 // turn off all LEDs
ansond 0:4c9bfcb3e759 199 led1 = 0; led2 = 0; led3 = 0; led4 = 0;
ansond 0:4c9bfcb3e759 200 }
ansond 0:4c9bfcb3e759 201
ansond 0:4c9bfcb3e759 202 // blink an LED
ansond 0:4c9bfcb3e759 203 void ErrorHandler::blinkLED(DigitalOut led) {
ansond 61:6012d61573ea 204 this->m_led_mutex->lock();
ansond 0:4c9bfcb3e759 205 led = 1;
ansond 0:4c9bfcb3e759 206 wait_ms(BLINK_TIME);
ansond 0:4c9bfcb3e759 207 led = 0;
ansond 61:6012d61573ea 208 this->m_led_mutex->unlock();
ansond 0:4c9bfcb3e759 209 }
ansond 0:4c9bfcb3e759 210
ansond 36:73e343ddca7f 211 // blink the Transport TX LED
ansond 36:73e343ddca7f 212 void ErrorHandler::blinkTransportTxLED() { this->blinkLED(led4); }
ansond 0:4c9bfcb3e759 213
ansond 36:73e343ddca7f 214 // blink the Transport RX LED
ansond 36:73e343ddca7f 215 void ErrorHandler::blinkTransportRxLED() { this->blinkLED(led1); }