Demo Team / Mbed 2 deprecated Trenton_Doormat_FRDM-KL25Z_ETH

Fork of KL46Z Wifi version. Moved to KL25Z as umbrella stand now requires 2 SPIs, thus requires 46z.

Dependencies:   WIZnet_Library_ASE mbed nanoservice_client_1_12

Fork of Trenton_Doormat_FRDM-KL25Z_ETH by Eric Gowland

pressure_mat.cpp@24:ad4d74ed0e4b, 2014-09-09 (annotated)

Committer:
erigow01
Date:
Tue Sep 09 14:31:24 2014 +0000
Revision:
24:ad4d74ed0e4b
Parent:
18:c1a2c0c738b2 
Updates - working version for Analyst day.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
erigow01 17:8ca4a5801430 1 // Pressure Mat resource implementation
erigow01 17:8ca4a5801430 2
erigow01 17:8ca4a5801430 3 #include "mbed.h"
erigow01 17:8ca4a5801430 4 #include "nsdl_support.h"
erigow01 17:8ca4a5801430 5 #include "pressure_mat.h"
erigow01 17:8ca4a5801430 6
erigow01 17:8ca4a5801430 7 #define PRESSURE_MAT_RES_ID "sen/pressure_mat"
erigow01 17:8ca4a5801430 8
erigow01 18:c1a2c0c738b2 9 #define MINIMUM_POLL_PERIOD 1 //Seconds
erigow01 18:c1a2c0c738b2 10 #define MINIMUM_REPORT_PERIOD 10 //Seconds
erigow01 18:c1a2c0c738b2 11
erigow01 18:c1a2c0c738b2 12 //InterruptIn pressure_mat_in(PTD3);
erigow01 24:ad4d74ed0e4b 13 InterruptIn pressure_mat_in(PTA13);
erigow01 17:8ca4a5801430 14 DigitalOut led1(LED1);
erigow01 17:8ca4a5801430 15 Timer debounce;
erigow01 18:c1a2c0c738b2 16 Timer reportTimer;
erigow01 18:c1a2c0c738b2 17 Timer pollTimer;
erigow01 17:8ca4a5801430 18 /* stored data for observable resource */
erigow01 17:8ca4a5801430 19 static uint8_t obs_number = 0;
erigow01 17:8ca4a5801430 20 static uint8_t *obs_token_ptr = NULL;
erigow01 17:8ca4a5801430 21 static uint8_t obs_token_len = 0;
erigow01 17:8ca4a5801430 22 static uint8_t current_pressure_mat = 0;
erigow01 17:8ca4a5801430 23 static uint8_t last_reported_pressure_mat = 99;
erigow01 17:8ca4a5801430 24 static char pressure_mat_val[2];
erigow01 17:8ca4a5801430 25
erigow01 17:8ca4a5801430 26
erigow01 17:8ca4a5801430 27 /* Interrupt handler for pressure mat pin */
erigow01 17:8ca4a5801430 28 /* Handles Interrupt, sets state for main polling thread to send update message. */
erigow01 17:8ca4a5801430 29 void pressure_mat_interrupt(){
erigow01 17:8ca4a5801430 30 if(debounce.read_ms() > 200) {
erigow01 18:c1a2c0c738b2 31 current_pressure_mat = !pressure_mat_in;
erigow01 18:c1a2c0c738b2 32 led1 = !current_pressure_mat;
erigow01 17:8ca4a5801430 33 debounce.reset();
erigow01 17:8ca4a5801430 34 }
erigow01 17:8ca4a5801430 35 }
erigow01 17:8ca4a5801430 36
erigow01 18:c1a2c0c738b2 37 void pressure_mat_resetTokens() {
erigow01 18:c1a2c0c738b2 38 obs_number = 0;
erigow01 18:c1a2c0c738b2 39 *obs_token_ptr = NULL;
erigow01 18:c1a2c0c738b2 40 obs_token_len = 0;
erigow01 18:c1a2c0c738b2 41 }
erigow01 18:c1a2c0c738b2 42
erigow01 17:8ca4a5801430 43 //This is to be called from main program loop... it only sends report if the pressure mat has changed.
erigow01 17:8ca4a5801430 44 void pressure_mat_report() {
erigow01 18:c1a2c0c738b2 45 //Poll mat anyways...
erigow01 18:c1a2c0c738b2 46 if(pollTimer.read() > MINIMUM_POLL_PERIOD) {
erigow01 18:c1a2c0c738b2 47 current_pressure_mat = !pressure_mat_in;
erigow01 18:c1a2c0c738b2 48 led1 = !current_pressure_mat;
erigow01 18:c1a2c0c738b2 49 pollTimer.reset();
erigow01 18:c1a2c0c738b2 50 }
erigow01 18:c1a2c0c738b2 51 if(reportTimer.read() > MINIMUM_REPORT_PERIOD) {
erigow01 18:c1a2c0c738b2 52 //We haven't reported for minimum period, so take a reading and report.
erigow01 18:c1a2c0c738b2 53 last_reported_pressure_mat = current_pressure_mat + 10; //ensure different values to force report...
erigow01 18:c1a2c0c738b2 54 reportTimer.reset();
erigow01 18:c1a2c0c738b2 55 }
erigow01 17:8ca4a5801430 56 if(last_reported_pressure_mat != current_pressure_mat) {
erigow01 17:8ca4a5801430 57 if(obs_number != 0){// && obs_token_ptr != NULL){
erigow01 17:8ca4a5801430 58 obs_number++;
erigow01 17:8ca4a5801430 59 snprintf(pressure_mat_val,2,"%d" ,current_pressure_mat);
erigow01 17:8ca4a5801430 60 if(sn_nsdl_send_observation_notification(obs_token_ptr, obs_token_len, (uint8_t*)pressure_mat_val, 1, &obs_number, 1, COAP_MSG_TYPE_NON_CONFIRMABLE, 0) == 0)
erigow01 17:8ca4a5801430 61 printf("Pressure Observation Sending Failed\r\n");
erigow01 17:8ca4a5801430 62 else
erigow01 17:8ca4a5801430 63 printf("Pressure Observation Sent\r\n");
erigow01 17:8ca4a5801430 64
erigow01 17:8ca4a5801430 65 //Set last reported to current regardless...
erigow01 17:8ca4a5801430 66 last_reported_pressure_mat = current_pressure_mat;
erigow01 17:8ca4a5801430 67 }
erigow01 17:8ca4a5801430 68 }
erigow01 17:8ca4a5801430 69 }
erigow01 17:8ca4a5801430 70
erigow01 17:8ca4a5801430 71 /* Only GET method allowed */
erigow01 17:8ca4a5801430 72 /* Observable resource */
erigow01 17:8ca4a5801430 73 static uint8_t pressure_mat_resource_cb(sn_coap_hdr_s *received_coap_ptr, sn_nsdl_addr_s *address, sn_proto_info_s * proto)
erigow01 17:8ca4a5801430 74 {
erigow01 18:c1a2c0c738b2 75 uint8_t pressure_mat_reading = !pressure_mat_in;
erigow01 18:c1a2c0c738b2 76 led1 = !pressure_mat_reading;
erigow01 17:8ca4a5801430 77 snprintf(pressure_mat_val,2,"%d" ,pressure_mat_reading);
erigow01 17:8ca4a5801430 78 sn_coap_hdr_s *coap_res_ptr = 0;
erigow01 17:8ca4a5801430 79
erigow01 17:8ca4a5801430 80 printf("pressure mat callback\r\n");
erigow01 17:8ca4a5801430 81 coap_res_ptr = sn_coap_build_response(received_coap_ptr, COAP_MSG_CODE_RESPONSE_CONTENT);
erigow01 17:8ca4a5801430 82
erigow01 17:8ca4a5801430 83 coap_res_ptr->payload_len = 1;
erigow01 17:8ca4a5801430 84 coap_res_ptr->payload_ptr = (uint8_t*)pressure_mat_val;
erigow01 17:8ca4a5801430 85
erigow01 17:8ca4a5801430 86 if(received_coap_ptr->token_ptr)
erigow01 17:8ca4a5801430 87 {
erigow01 17:8ca4a5801430 88 printf(" Token included\r\n");
erigow01 17:8ca4a5801430 89 if(obs_token_ptr)
erigow01 17:8ca4a5801430 90 {
erigow01 17:8ca4a5801430 91 free(obs_token_ptr);
erigow01 17:8ca4a5801430 92 obs_token_ptr = 0;
erigow01 17:8ca4a5801430 93 }
erigow01 17:8ca4a5801430 94 obs_token_ptr = (uint8_t*)malloc(received_coap_ptr->token_len);
erigow01 17:8ca4a5801430 95 if(obs_token_ptr)
erigow01 17:8ca4a5801430 96 {
erigow01 17:8ca4a5801430 97 memcpy(obs_token_ptr, received_coap_ptr->token_ptr, received_coap_ptr->token_len);
erigow01 17:8ca4a5801430 98 obs_token_len = received_coap_ptr->token_len;
erigow01 17:8ca4a5801430 99 }
erigow01 17:8ca4a5801430 100 }
erigow01 17:8ca4a5801430 101
erigow01 17:8ca4a5801430 102 if(received_coap_ptr->options_list_ptr->observe)
erigow01 17:8ca4a5801430 103 {
erigow01 17:8ca4a5801430 104 coap_res_ptr->options_list_ptr = (sn_coap_options_list_s*)malloc(sizeof(sn_coap_options_list_s));
erigow01 17:8ca4a5801430 105 memset(coap_res_ptr->options_list_ptr, 0, sizeof(sn_coap_options_list_s));
erigow01 17:8ca4a5801430 106 coap_res_ptr->options_list_ptr->observe_ptr = &obs_number;
erigow01 17:8ca4a5801430 107 coap_res_ptr->options_list_ptr->observe_len = 1;
erigow01 17:8ca4a5801430 108 obs_number++;
erigow01 17:8ca4a5801430 109 }
erigow01 17:8ca4a5801430 110 printf(" Send observation %d... \r\n", obs_number);
erigow01 17:8ca4a5801430 111 sn_nsdl_send_coap_message(address, coap_res_ptr);
erigow01 17:8ca4a5801430 112
erigow01 17:8ca4a5801430 113 coap_res_ptr->options_list_ptr->observe_ptr = 0;
erigow01 17:8ca4a5801430 114 sn_coap_parser_release_allocated_coap_msg_mem(coap_res_ptr);
erigow01 17:8ca4a5801430 115 return 0;
erigow01 17:8ca4a5801430 116 }
erigow01 17:8ca4a5801430 117
erigow01 17:8ca4a5801430 118 int create_pressure_mat_resource(sn_nsdl_resource_info_s *resource_ptr)
erigow01 17:8ca4a5801430 119 {
erigow01 17:8ca4a5801430 120 nsdl_create_dynamic_resource(resource_ptr, sizeof(PRESSURE_MAT_RES_ID)-1, (uint8_t*)PRESSURE_MAT_RES_ID, 0, 0, 1, &pressure_mat_resource_cb, SN_GRS_GET_ALLOWED);
erigow01 17:8ca4a5801430 121 obs_number++;
erigow01 18:c1a2c0c738b2 122 pressure_mat_in.mode(PullUp);
erigow01 17:8ca4a5801430 123 //Attach interrupt handler and start debounce...
erigow01 17:8ca4a5801430 124 debounce.start();
erigow01 17:8ca4a5801430 125 pressure_mat_in.rise(&pressure_mat_interrupt);
erigow01 17:8ca4a5801430 126 pressure_mat_in.fall(&pressure_mat_interrupt);
erigow01 17:8ca4a5801430 127
erigow01 18:c1a2c0c738b2 128 reportTimer.start();
erigow01 18:c1a2c0c738b2 129 pollTimer.start();
erigow01 18:c1a2c0c738b2 130
erigow01 17:8ca4a5801430 131 return 0;
erigow01 17:8ca4a5801430 132 }