| | |
| | | #define PROG_VERSION "v1.0.0" |
| | | #define DAEMON_PIDFILE "/tmp/.mqtt.pid" |
| | | |
| | | #define FLAG_DETECTD (1<<0) |
| | | #define FLAG_RELAYON (1<<1) |
| | | int g_breakin_flag = 0; /* relay already turn on and wait to off */ |
| | | |
| | | int check_set_program_running(int daemon); |
| | | void *mqtt_sub_worker(void *args); |
| | | void *mqtt_pub_worker(void *args); |
| | |
| | | return; |
| | | } |
| | | |
| | | void turn_light_off(int signum) |
| | | { |
| | | if( g_breakin_flag&FLAG_RELAYON ) |
| | | { |
| | | log_nrml("fill-in light timeout and turn light off now\n"); |
| | | turn_relay(OFF); |
| | | } |
| | | |
| | | g_breakin_flag = 0; |
| | | } |
| | | |
| | | int main (int argc, char **argv) |
| | | { |
| | |
| | | int debug = 0; |
| | | int opt; |
| | | char *progname=NULL; |
| | | double lux = 0.0; |
| | | |
| | | struct option long_options[] = { |
| | | {"conf", required_argument, NULL, 'c'}, |
| | |
| | | return -2; |
| | | } |
| | | |
| | | if( hal_init() < 0 ) |
| | | if( hal_init(&ctx.hwconf) < 0 ) |
| | | { |
| | | log_err("Initialise hardware failure\n"); |
| | | return -1; |
| | | return -3; |
| | | } |
| | | log_nrml("HAL initialise ok\n"); |
| | | |
| | | else |
| | | { |
| | | log_nrml("HAL initialise ok\n"); |
| | | } |
| | | |
| | | install_proc_signal(); |
| | | |
| | | if( ctx.hwconf.fillin_light ) |
| | | { |
| | | log_nrml("Install inbreak detected fill-in light off signal\n"); |
| | | signal(SIGALRM, turn_light_off); |
| | | } |
| | | |
| | | if( check_set_program_running(daemon) < 0 ) |
| | | goto OUT; |
| | | |
| | | if( !debug ) |
| | | |
| | | mosquitto_lib_init(); |
| | | |
| | |
| | | } |
| | | log_nrml("Start MQTT publisher worker thread ok\n"); |
| | | |
| | | |
| | | while( ! g_signal.stop ) |
| | | { |
| | | msleep(1000); |
| | | |
| | | if( ctx.hwconf.infrared_pin && !g_breakin_flag ) |
| | | { |
| | | //log_nrml("infrared dected human incoming\n"); |
| | | if( infrared_detect(1000) ) |
| | | { |
| | | log_nrml("Someone incoming detected by infrared\n"); |
| | | g_breakin_flag |= FLAG_DETECTD; |
| | | |
| | | /* setup alarm to turn relay off or clear the flag */ |
| | | alarm(ctx.hwconf.light_intval); |
| | | |
| | | if( ctx.hwconf.inbreak_beep ) |
| | | { |
| | | turn_beep(ctx.hwconf.beep_times); |
| | | } |
| | | |
| | | if( ctx.hwconf.fillin_light==FILLIN_LIGHT_ON && !g_breakin_flag ) |
| | | { |
| | | log_nrml("Force fill-in light on and will be off in [%d] seconds\n", ctx.hwconf.light_intval); |
| | | turn_relay(ON); |
| | | g_breakin_flag |= FLAG_RELAYON; |
| | | } |
| | | else if( ctx.hwconf.fillin_light==FILLIN_LIGHT_AUTO && ctx.hwconf.lux ) |
| | | { |
| | | lux = tsl2561_get_lux(); |
| | | log_nrml("TSL2516 detect illumination intensity %.3flux and threshold %.3flux\n", |
| | | lux, ctx.hwconf.lux_threshold); |
| | | |
| | | /* only lux<0.01 will turn on light */ |
| | | if( lux-0.001 > ctx.hwconf.lux_threshold) |
| | | { |
| | | log_nrml("Illumination intensity enuf, no need fill-in light\n"); |
| | | } |
| | | else |
| | | { |
| | | log_nrml("Auto fill-in light on and will be off in [%d] seconds\n", ctx.hwconf.light_intval); |
| | | turn_relay(ON); |
| | | g_breakin_flag |= FLAG_RELAYON; |
| | | } |
| | | } |
| | | |
| | | } |
| | | |
| | | } |
| | | //log_nrml("Main control thread continue running\n"); |
| | | } |
| | | |
| | |
| | | |
| | | return 0; |
| | | } /* ----- End of main() ----- */ |
| | | |
| | | |
| | | int check_set_program_running(int daemon) |
| | | { |
| | |
| | | mqtt_ctx_t *ctx = (mqtt_ctx_t *)userdata; |
| | | int rv = 0; |
| | | char msg[128]; |
| | | float temp = 0.0; |
| | | float temp = 0.0; /* temperature */ |
| | | float rh = 0.0; /* relative humidity */ |
| | | int retain = 0; |
| | | |
| | | if( result ) |
| | |
| | | |
| | | log_nrml("Publisher connect to broker server[%s:%d] successfully\n", ctx->host, ctx->port); |
| | | |
| | | memset(msg, 0, sizeof(msg)); |
| | | if( ds18b20_get_temperature(&temp) < 0 ) |
| | | strncpy(msg, "{ \"temp\":\"error\" }", sizeof(msg)); |
| | | else |
| | | snprintf(msg, sizeof(msg), "{ \"temp\":\"%.2f\" }", temp); |
| | | if( ctx->hwconf.ds18b20 ) |
| | | { |
| | | memset(msg, 0, sizeof(msg)); |
| | | |
| | | if( ds18b20_get_temperature(&temp) < 0 ) |
| | | snprintf(msg, sizeof(msg), "{ \"id\":%s, \"temp\":\"error\" }", ctx->id); |
| | | else |
| | | snprintf(msg, sizeof(msg), "{ \"id\":%s, \"temp\":\"%.2f\" }", ctx->id, temp); |
| | | |
| | | rv = mosquitto_publish(mosq, NULL, ctx->pubTopic, strlen(msg)+1, msg, ctx->pubQos, retain); |
| | | if( rv ) |
| | | { |
| | | log_err("Publisher broadcast message '%s' failure: %d\n", msg, rv); |
| | | } |
| | | else |
| | | { |
| | | log_nrml("Publisher broadcast message '%s' ok\n", msg); |
| | | rv = mosquitto_publish(mosq, NULL, ctx->pubTopic, strlen(msg), msg, ctx->pubQos, retain); |
| | | if( rv ) |
| | | { |
| | | log_err("Publisher broadcast message '%s' failure: %d\n", msg, rv); |
| | | } |
| | | else |
| | | { |
| | | log_nrml("Publisher broadcast message '%s' ok\n", msg); |
| | | } |
| | | } |
| | | |
| | | if( ctx->hwconf.sht2x ) |
| | | { |
| | | memset(msg, 0, sizeof(msg)); |
| | | |
| | | if( sht2x_get_temp_humidity(&temp, &rh) < 0 ) |
| | | snprintf(msg, sizeof(msg), "{ \"id\":%s, \"temp\":\"error\", \"RH\":\"error\" }", ctx->id); |
| | | else |
| | | snprintf(msg, sizeof(msg), "{ \"id\":%s, \"temp\":\"%.2f\", \"RH\":\"%.2f\" }", ctx->id, temp, rh); |
| | | |
| | | rv = mosquitto_publish(mosq, NULL, ctx->pubTopic, strlen(msg)+1, msg, ctx->pubQos, retain); |
| | | if( rv ) |
| | | { |
| | | log_err("Publisher broadcast message '%s' failure: %d\n", msg, rv); |
| | | } |
| | | else |
| | | { |
| | | log_nrml("Publisher broadcast message '%s' ok\n", msg); |
| | | } |
| | | } |
| | | |
| | | |
| | | log_nrml("Publisher broadcast over and disconnect broker now\n", ctx->host, ctx->port); |
| | | mosquitto_disconnect(mosq); |
| | | |
| | |
| | | turn_led(which, OFF); |
| | | } |
| | | |
| | | void proc_json_items(cJSON *root) |
| | | void proc_json_items(cJSON *root, mqtt_ctx_t *ctx) |
| | | { |
| | | int i; |
| | | char *value; |
| | | cJSON *item; |
| | | cJSON *array; |
| | | hwconf_t *hwconf = &ctx->hwconf; |
| | | |
| | | if( !root ) |
| | | { |
| | |
| | | /* if item is cJSON_Object, then recursive call proc_json */ |
| | | if( cJSON_Object == item->type ) |
| | | { |
| | | proc_json_items(item); |
| | | proc_json_items(item, ctx); |
| | | } |
| | | else if( cJSON_Array == item->type ) |
| | | { |
| | | /* RGB colors led control */ |
| | | if( !strcasecmp(item->string, "led") ) |
| | | if( hwconf->leds && !strcasecmp(item->string, "led") ) |
| | | { |
| | | array = cJSON_GetArrayItem(item, 0); |
| | | if( NULL != array ) |
| | |
| | | value = cJSON_Print(item); |
| | | |
| | | /* light controled by relay */ |
| | | if( !strcasecmp(item->string, "light") ) |
| | | if( hwconf->relay_pin && !strcasecmp(item->string, "light") ) |
| | | { |
| | | if( strcasestr(value, "on") ) |
| | | { |
| | |
| | | } |
| | | |
| | | /* buzzer */ |
| | | if( !strcasecmp(item->string, "buzzer") ) |
| | | if( hwconf->beep_pin && !strcasecmp(item->string, "buzzer") ) |
| | | { |
| | | if( strcasestr(value, "on") ) |
| | | { |
| | | log_nrml("Turn buzzer on\n"); |
| | | } |
| | | else if( strcasestr(value, "music") ) |
| | | { |
| | | log_nrml("Turn buzzer play music\n"); |
| | | log_nrml("Turn buzzer on [%d] times\n", hwconf->beep_times); |
| | | } |
| | | } |
| | | |
| | |
| | | |
| | | void sub_message_callback(struct mosquitto *mosq, void *userdata, const struct mosquitto_message *message) |
| | | { |
| | | cJSON *root = NULL; |
| | | char *out; |
| | | mqtt_ctx_t *ctx = (mqtt_ctx_t *)userdata; |
| | | |
| | | cJSON *root = NULL; |
| | | cJSON *item; |
| | | char *value; |
| | | |
| | | |
| | | if ( !message->payloadlen ) |
| | |
| | | return ; |
| | | } |
| | | |
| | | log_nrml("Subscriber receive message: '%s'\n", message->payload); |
| | | log_dbg("Subscriber receive message: '%s'\n", message->payload); |
| | | |
| | | root = cJSON_Parse(message->payload); |
| | | if( !root ) |
| | |
| | | return ; |
| | | } |
| | | |
| | | proc_json_items(root); |
| | | item = cJSON_GetObjectItem(root, "id"); |
| | | if( !item ) |
| | | { |
| | | log_err("cJSON_Parse get ID failure: %s\n", cJSON_GetErrorPtr()); |
| | | goto OUT; |
| | | } |
| | | |
| | | value = cJSON_PrintUnformatted(item); |
| | | if( strcasecmp(value, ctx->id) ) |
| | | { |
| | | free(value); |
| | | goto OUT; |
| | | } |
| | | |
| | | free(value); |
| | | log_nrml("Subscriber receive message: '%s'\n", message->payload); |
| | | |
| | | proc_json_items(root, ctx); |
| | | |
| | | OUT: |
| | | cJSON_Delete(root); /* must delete it, or it will result memory leak */ |
| | | return ; |
| | | } |