6 |
|
|
7 |
#include "lcd.h" |
#include "lcd.h" |
8 |
#include "Delay.h" |
#include "Delay.h" |
|
// Delay.h is included inside lcd.c |
|
9 |
|
|
|
#define LCD_LENGTH 16 |
|
|
#define LCD_ROWS 2 |
|
10 |
#define BUFFER 128 |
#define BUFFER 128 |
11 |
#define PWRFAIL RB1 |
#define PWRFAIL RB1 |
12 |
#define FIREDET RB2 |
#define FIREDET RB2 |
17 |
unsigned char global_Pot_Hi, global_Pot_Lo; |
unsigned char global_Pot_Hi, global_Pot_Lo; |
18 |
unsigned char global_serial_send[BUFFER], global_serial_recieve_buffer[BUFFER]; |
unsigned char global_serial_send[BUFFER], global_serial_recieve_buffer[BUFFER]; |
19 |
bit global_recieve_done = 0, global_interval_changed = 0; |
bit global_recieve_done = 0, global_interval_changed = 0; |
20 |
unsigned int global_serial_byte_counter = 0, global_sms_counter = 1, global_time_counter = 0; |
unsigned int global_serial_byte_counter = 0, global_sms_counter = 1, global_time_counter = 0, global_time_counter_image = 0; |
21 |
unsigned int global_emergency_counter = 600, global_time_interval = 3600; |
unsigned int global_emergency_counter = 600, global_time_interval = 3600; |
22 |
unsigned char global_temp = 0; |
unsigned char global_temp = 0; |
23 |
|
|
24 |
unsigned char global_temp_update_display = 0; |
unsigned int global_temp_update_display = 0; |
25 |
|
|
26 |
unsigned char global_message_buffer1[BUFFER]; |
unsigned char global_message_buffer1[BUFFER]; |
27 |
unsigned char global_message_buffer2[BUFFER]; |
unsigned char global_message_buffer2[BUFFER]; |
30 |
|
|
31 |
unsigned char global_lcd_buf[16]; |
unsigned char global_lcd_buf[16]; |
32 |
|
|
33 |
unsigned short global_imei_tversum; |
unsigned int global_imei_tversum; |
34 |
|
|
35 |
unsigned char global_cell_nr[15] = ""; // = "21681784"; |
unsigned char global_cell_nr[15] = ""; // = "21681784"; |
36 |
bit global_modem_init = 0; |
bit global_modem_init = 0; |
41 |
__EEPROM_DATA( 60, 0, 1, 8, '2', '1', '6', '8'); |
__EEPROM_DATA( 60, 0, 1, 8, '2', '1', '6', '8'); |
42 |
__EEPROM_DATA( '1', '7', '8', '4',0,0,0,0); |
__EEPROM_DATA( '1', '7', '8', '4',0,0,0,0); |
43 |
|
|
44 |
|
|
45 |
void serial_recieved(void); |
void serial_recieved(void); |
46 |
void serial_send(void); |
void serial_send(void); |
47 |
void update_lcd(void); |
void update_lcd(void); |
48 |
void convertTemp(void); |
void convert_temp(void); |
49 |
void timer1_interrupt(void); |
void timer1_interrupt(void); |
50 |
void on_recieve(void); |
void on_recieve(void); |
51 |
void on_initial_recieve(void); |
void on_initial_recieve(void); |
53 |
void send_sms(const unsigned char* payload); |
void send_sms(const unsigned char* payload); |
54 |
void eeprom_writer(void); |
void eeprom_writer(void); |
55 |
|
|
56 |
|
|
57 |
void reset_recieve_buffer(void) |
void reset_recieve_buffer(void) |
58 |
{ |
{ |
59 |
global_recieve_done = 0; |
global_recieve_done = 0; |
66 |
memset(global_message_buffer1, 0, BUFFER); |
memset(global_message_buffer1, 0, BUFFER); |
67 |
memset(global_message_buffer2, 0, BUFFER); |
memset(global_message_buffer2, 0, BUFFER); |
68 |
} |
} |
69 |
|
////////// INITS ////////// |
70 |
void pic18_io_init(void) |
void pic18_io_init(void) |
71 |
{ |
{ |
72 |
TRISA0 = 1; // analog input |
TRISA0 = 1; // analog input |
109 |
ADON=1; |
ADON=1; |
110 |
} |
} |
111 |
|
|
|
void rs232_init(void) |
|
|
{ |
|
|
SPEN = 0; // Serial Port Enable Bit... 0 = disabled |
|
|
TRISC6 = 0; |
|
|
TRISC7 = 1; |
|
112 |
|
|
|
SPBRG = 207; // 1200 baud rate... 25 = 9600 |
|
|
// x = (Fosc / (16*[baud rate]) )-1 |
|
|
TXSTA = 0x24; // Enables BRGH and TXEN inthe TXSTA register |
|
|
RCSTA = 0x90; // 0x90 enables SPEN and CREN in the RCSTA register |
|
|
} |
|
113 |
|
|
114 |
void interrupt_init(void) |
void interrupt_init(void) |
115 |
{ |
{ |
122 |
TMR1IE = 1; // Enables timer 1 |
TMR1IE = 1; // Enables timer 1 |
123 |
} |
} |
124 |
|
|
125 |
|
|
126 |
|
|
127 |
void timer_init(void) |
void timer_init(void) |
128 |
{ |
{ |
129 |
TMR1CS = 1; //use external clock |
TMR1CS = 1; //use external clock |
137 |
T1OSCEN = 1; //enable oscillator circuit |
T1OSCEN = 1; //enable oscillator circuit |
138 |
RD16 = 0; //normal 8 bit writes |
RD16 = 0; //normal 8 bit writes |
139 |
TMR1ON = 1; |
TMR1ON = 1; |
140 |
} |
} |
141 |
|
|
142 |
|
void rs232_init(void) |
143 |
|
{ |
144 |
|
SPEN = 0; // Serial Port Enable Bit... 0 = disabled |
145 |
|
TRISC6 = 0; |
146 |
|
TRISC7 = 1; |
147 |
|
|
148 |
void sms_init(void) |
SPBRG = 207; // 1200 baud rate... 25 = 9600 |
149 |
|
// x = (Fosc / (16*[baud rate]) )-1 |
150 |
|
TXSTA = 0x24; // Enables BRGH and TXEN inthe TXSTA register |
151 |
|
RCSTA = 0x90; // 0x90 enables SPEN and CREN in the RCSTA register |
152 |
|
} |
153 |
|
|
154 |
|
void modem_init(void) |
155 |
{ |
{ |
156 |
int i; |
int i; |
157 |
char buf[2]; |
char buf[2]; |
178 |
} |
} |
179 |
} |
} |
180 |
|
|
181 |
|
sprintf(global_serial_send,"%s", "at+cpin?\r"); |
|
sprintf(global_serial_send,"%s", "at+cpin=8043\r"); |
|
182 |
serial_send(); |
serial_send(); |
183 |
|
DelayMs(100); // Delay to give the modem a chance to answer. |
184 |
|
|
185 |
while(global_modem_init == 0) |
if (strstr(global_message_buffer1, "+CPIN: SIM PIN") != 0) |
186 |
{ |
{ |
187 |
on_initial_recieve(); |
sprintf(global_serial_send,"%s", "at+cpin=8043\r"); |
188 |
|
serial_send(); |
189 |
|
|
190 |
|
while(global_modem_init == 0) |
191 |
|
{ |
192 |
|
on_initial_recieve(); |
193 |
|
} |
194 |
} |
} |
|
DelayMs(5); |
|
|
|
|
195 |
reset_recieve_buffer(); |
reset_recieve_buffer(); |
196 |
sprintf(global_serial_send, "at+cmgd=1,4\r"); |
sprintf(global_serial_send, "at+cmgd=1,4\r"); |
197 |
serial_send(); |
serial_send(); |
198 |
while ( strstr(global_message_buffer1,"OK") == 0) ; |
while ( strstr(global_message_buffer1,"OK") == 0) ; |
199 |
} |
} |
200 |
|
|
|
|
|
|
void interrupt interrupt_handler(void) |
|
|
{ |
|
|
// Finds out what interrupt have been trigged, and starts the respective function. |
|
|
if(RCIF == 1) // Serial recieve interrupt |
|
|
{ |
|
|
serial_recieved(); |
|
|
RCIF = 0; |
|
|
} |
|
|
|
|
|
if(TMR1IF == 1) // timer1 interrupt trigger. |
|
|
{ |
|
|
timer1_interrupt(); |
|
|
TMR1IF = 0; |
|
|
} |
|
|
} |
|
|
|
|
|
|
|
201 |
void serial_send(void) |
void serial_send(void) |
202 |
{ |
{ |
203 |
int i; |
int i; |
214 |
DelayMs(150); |
DelayMs(150); |
215 |
global_serial_send[0] = 0; |
global_serial_send[0] = 0; |
216 |
DelayMs(150); |
DelayMs(150); |
217 |
} |
} |
218 |
|
|
219 |
|
void on_initial_recieve(void) |
220 |
|
{ |
221 |
|
// can't se what the outcommented lines in here sould do, that make any sence. |
222 |
|
// char imei[16]; |
223 |
|
// char* ptr; |
224 |
|
// char i; |
225 |
|
// char buf[2]; |
226 |
|
|
227 |
|
if (strstr(global_serial_recieve_buffer,"+WIND: 11") != 0) |
228 |
|
{ |
229 |
|
global_modem_init = 1; |
230 |
|
|
231 |
|
// ptr = strstr(global_serial_recieve_buffer,"cgsn"); |
232 |
|
// ptr +=4; |
233 |
|
// strncpy(imei, ptr,15); |
234 |
|
// imei[15] = 0; |
235 |
|
|
236 |
|
reset_recieve_buffer(); |
237 |
|
} |
238 |
|
} |
239 |
|
|
240 |
/////////////////////////////////////////////////////////////////////////////////////////////////// |
////////// INTERRUPT HANDLER ////////// |
241 |
// Takes the recieving data and fills it in a buffer, when we meet a '\r' we fill the data from, |
void interrupt interrupt_handler(void) |
242 |
// global_serial_recieve_buffer, to global_message_buffer1, and sets the flag global_recieve_done. |
{ |
243 |
|
// Finds out what interrupt have been trigged, and starts the respective function. |
244 |
|
if(RCIF == 1) // Serial recieve interrupt |
245 |
|
{ |
246 |
|
serial_recieved(); |
247 |
|
RCIF = 0; |
248 |
|
} |
249 |
|
|
250 |
|
if(TMR1IF == 1) // timer1 interrupt trigger. |
251 |
|
{ |
252 |
|
timer1_interrupt(); |
253 |
|
TMR1IF = 0; |
254 |
|
} |
255 |
|
} |
256 |
|
|
257 |
|
////////// INTERRUPT TRIGGED ////////// |
258 |
void serial_recieved(void) |
void serial_recieved(void) |
259 |
{ |
{ |
260 |
char data_byte; |
char data_byte; |
305 |
TMR1L = 0xFF; |
TMR1L = 0xFF; |
306 |
global_time_counter++; |
global_time_counter++; |
307 |
global_emergency_counter++; |
global_emergency_counter++; |
308 |
RA1 = !RA1; |
// RA1 = !RA1; |
309 |
} |
} |
310 |
|
////////// ORDENARY FUNKTIONS ////////// |
311 |
void update_lcd(void) |
void update_lcd(void) |
312 |
{ |
{ |
313 |
if(global_temp_update_display != global_time_counter) |
if(global_temp_update_display != global_time_counter) |
338 |
sprintf(global_serial_send, "%s%c", payload, 0x1A); |
sprintf(global_serial_send, "%s%c", payload, 0x1A); |
339 |
serial_send(); |
serial_send(); |
340 |
DelayMs(150); |
DelayMs(150); |
341 |
if(global_sms_counter % 3 == 0) |
if(global_sms_counter % 4 == 0) |
342 |
{ |
{ |
343 |
eeprom_writer(); |
eeprom_writer(); |
344 |
sprintf(global_serial_send, "at+cmgd=1,3\r"); |
sprintf(global_serial_send, "at+cmgd=1,3\r"); |
347 |
} |
} |
348 |
} |
} |
349 |
|
|
350 |
void convertTemp() |
void convert_temp(void) |
351 |
{ |
{ |
352 |
short adVal; |
short adVal; |
353 |
adVal = (global_Pot_Hi << 8) | global_Pot_Lo; |
adVal = (global_Pot_Hi << 8) | global_Pot_Lo; |
392 |
global_cell_nr[i] = 0; //zero terminated! |
global_cell_nr[i] = 0; //zero terminated! |
393 |
} |
} |
394 |
|
|
|
void on_initial_recieve(void) |
|
|
{ |
|
|
char imei[16]; |
|
|
char* ptr; |
|
|
char i; |
|
|
char buf[2]; |
|
|
|
|
|
if (strstr(global_serial_recieve_buffer,"+WIND: 11") != 0) |
|
|
{ |
|
|
global_modem_init = 1; |
|
|
|
|
|
ptr = strstr(global_serial_recieve_buffer,"cgsn"); |
|
|
ptr +=4; |
|
|
strncpy(imei, ptr,15); |
|
|
imei[15] = 0; |
|
|
|
|
|
reset_recieve_buffer(); |
|
|
} |
|
|
} |
|
395 |
|
|
396 |
void on_recieve(void) |
void on_recieve(void) |
397 |
{ |
{ |
405 |
if (strstr(global_message_buffer1,"CMTI") != 0) // here we handles a incomming SMS |
if (strstr(global_message_buffer1,"CMTI") != 0) // here we handles a incomming SMS |
406 |
{ |
{ |
407 |
ptr = strstr(global_message_buffer1,","); // finds the point just before the nr. of the SMS. |
ptr = strstr(global_message_buffer1,","); // finds the point just before the nr. of the SMS. |
408 |
strcat(tmp,ptr+1); // puts that number in tmp |
strcat(tmp,ptr+1); // puts that number in tmp |
409 |
global_sms_recieve_number[0] = 0; // wanna be sure that we write the new number from global_sms_recieve_number[0] |
global_sms_recieve_number[0] = 0; // wanna be sure that we write the new number from global_sms_recieve_number[0] |
410 |
strcat(global_sms_recieve_number, tmp); // puts the sms number into the global variable. |
strcat(global_sms_recieve_number, tmp); // puts the sms number into the global variable. |
411 |
sms_recieved(); |
sms_recieved(); |
412 |
} |
} |
413 |
reset_recieve_buffer(); |
reset_recieve_buffer(); |
455 |
|
|
456 |
global_time_interval = atoi(buf); |
global_time_interval = atoi(buf); |
457 |
global_time_interval *= 60; |
global_time_interval *= 60; |
458 |
eeprom_writer(); // writes the new cell nr. and time interval to the eeprom. |
eeprom_writer(); // writes the new cell nr. and time interval to the eeprom. |
459 |
send_sms("conf ok"); |
send_sms("conf ok"); |
460 |
} |
} |
461 |
|
|
462 |
|
|
463 |
} |
} |
464 |
|
|
465 |
|
void Delay(int time) |
466 |
|
{ |
467 |
|
int wanted = (global_time_counter + time) % global_time_interval; |
468 |
|
|
469 |
|
while (global_time_counter < wanted) ; |
470 |
|
} |
471 |
|
|
472 |
void main() |
void main() |
473 |
{ |
{ |
476 |
|
|
477 |
// Running init for various components. |
// Running init for various components. |
478 |
pic18_io_init(); |
pic18_io_init(); |
479 |
RA5 = 1; // Indicates that the board is running inits. |
RA5 = 1; // Indicates that the board is running inits. |
480 |
|
|
481 |
rs232_init(); |
rs232_init(); |
482 |
ad_init(); |
ad_init(); |
483 |
lcd_init(0); |
lcd_init(0); |
484 |
|
lcd_clear(); |
485 |
|
lcd_home(); |
486 |
interrupt_init(); |
interrupt_init(); |
487 |
timer_init(); |
timer_init(); |
488 |
sms_init(); |
modem_init(); |
489 |
eeprom_reader(); |
eeprom_reader(); |
490 |
/////////////// |
/////////////// |
491 |
// Main loop // |
// Main loop // |
503 |
send_update(); |
send_update(); |
504 |
global_emergency_counter = 0; |
global_emergency_counter = 0; |
505 |
} |
} |
506 |
|
|
507 |
// Every X sec. a status sms is send. |
// Every X sec. a status sms is send. |
508 |
if(global_time_counter >= 3600) |
if(global_time_counter >= global_time_interval) |
509 |
{ |
{ |
510 |
send_update(); |
send_update(); |
511 |
global_time_counter = 0; |
global_time_counter = 0; |
525 |
{ |
{ |
526 |
global_Pot_Hi = ADRESH; |
global_Pot_Hi = ADRESH; |
527 |
global_Pot_Lo = ADRESL; |
global_Pot_Lo = ADRESL; |
528 |
convertTemp(); |
convert_temp(); |
529 |
update_lcd(); |
update_lcd(); |
530 |
GODONE = 1; |
GODONE = 1; |
531 |
} |
} |