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
pressure_mat.cpp@18:c1a2c0c738b2, 2014-06-27 (annotated)
- Committer:
- erigow01
- Date:
- Fri Jun 27 13:29:54 2014 +0000
- Revision:
- 18:c1a2c0c738b2
- Parent:
- 17:8ca4a5801430
- Child:
- 24:ad4d74ed0e4b
Latest.
Who changed what in which revision?
User | Revision | Line number | New 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 | 17:8ca4a5801430 | 13 | InterruptIn pressure_mat_in(PTD3); |
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 | } |