/** Main function of server demo. * * @see Device_Set_Object_Instance_Number, dlenv_init, Send_I_Am, * datalink_receive, npdu_handler, * dcc_timer_seconds, bvlc_maintenance_timer, * handler_cov_task, * tsm_timer_milliseconds * * @param argc [in] Arg count. * @param argv [in] Takes one argument: the Device Instance #. * @return 0 on success. */ int main( int argc, char *argv[]) { BACNET_ADDRESS src = { 0 }; /* address where message came from */ uint16_t pdu_len = 0; unsigned timeout = 1; /* milliseconds */ time_t last_seconds = 0; time_t current_seconds = 0; uint32_t elapsed_seconds = 0; uint32_t elapsed_milliseconds = 0; uint32_t address_binding_tmr = 0; /* allow the device ID to be set */ if (argc > 1) { Device_Set_Object_Instance_Number(strtol(argv[1], NULL, 0)); } printf("BACnet Raspberry Pi PiFace Digital Demo\n" "BACnet Stack Version %s\n" "BACnet Device ID: %u\n" "Max APDU: %d\n", BACnet_Version, Device_Object_Instance_Number(), MAX_APDU); /* load any static address bindings to show up in our device bindings list */ address_init(); Init_Service_Handlers(); dlenv_init(); atexit(datalink_cleanup); piface_init(); atexit(piface_cleanup); /* configure the timeout values */ last_seconds = time(NULL); /* broadcast an I-Am on startup */ Send_I_Am(&Handler_Transmit_Buffer[0]); /* loop forever */ for (;;) { /* input */ current_seconds = time(NULL); /* returns 0 bytes on timeout */ pdu_len = datalink_receive(&src, &Rx_Buf[0], MAX_MPDU, timeout); /* process */ if (pdu_len) { npdu_handler(&src, &Rx_Buf[0], pdu_len); } /* at least one second has passed */ elapsed_seconds = (uint32_t) (current_seconds - last_seconds); if (elapsed_seconds) { last_seconds = current_seconds; dcc_timer_seconds(elapsed_seconds); #if defined(BACDL_BIP) && BBMD_ENABLED bvlc_maintenance_timer(elapsed_seconds); #endif dlenv_maintenance_timer(elapsed_seconds); elapsed_milliseconds = elapsed_seconds * 1000; handler_cov_timer_seconds(elapsed_seconds); tsm_timer_milliseconds(elapsed_milliseconds); } handler_cov_task(); /* scan cache address */ address_binding_tmr += elapsed_seconds; if (address_binding_tmr >= 60) { address_cache_timer(address_binding_tmr); address_binding_tmr = 0; } /* output/input */ piface_task(); } return 0; }
/** Main function of server demo. * * @see Device_Set_Object_Instance_Number, dlenv_init, Send_I_Am, * datalink_receive, npdu_handler, * dcc_timer_seconds, bvlc_maintenance_timer, * Load_Control_State_Machine_Handler, handler_cov_task, * tsm_timer_milliseconds * * @param argc [in] Arg count. * @param argv [in] Takes one argument: the Device Instance #. * @return 0 on success. */ int main( int argc, char *argv[]) { BACNET_ADDRESS src = { 0 }; /* address where message came from */ uint16_t pdu_len = 0; unsigned timeout = 1; /* milliseconds */ time_t last_seconds = 0; time_t current_seconds = 0; uint32_t elapsed_seconds = 0; uint32_t elapsed_milliseconds = 0; uint32_t address_binding_tmr = 0; uint32_t recipient_scan_tmr = 0; int uci_id = 0; float val_f, pval_f; int val_i, pval_i; struct uci_context *ctx; time_t chk_mtime = 0; time_t ucimodtime_bacnet_bi = 0; time_t ucimodtime_bacnet_av = 0; time_t ucimodtime_bacnet_ao = 0; time_t ucimodtime_bacnet_mv = 0; int uci_idx = 0; char *section; char *type; char *pEnv = NULL; int rewrite; pEnv = getenv("UCI_SECTION"); ctx = ucix_init("bacnet_dev"); #if PRINT_ENABLED if(!ctx) fprintf(stderr, "Failed to load config file bacnet_dev\n"); #endif uci_id = ucix_get_option_int(ctx, "bacnet_dev", pEnv, "id", 0); if (uci_id != 0) { Device_Set_Object_Instance_Number(uci_id); } else { /* allow the device ID to be set */ if (argc > 1) Device_Set_Object_Instance_Number(strtol(argv[1], NULL, 0)); } if(ctx) ucix_cleanup(ctx); #if PRINT_ENABLED printf("BACnet Server with uci\n" "BACnet Stack Version %s\n" "BACnet Device ID: %u\n" "Max APDU: %d\n", BACnet_Version, Device_Object_Instance_Number(), MAX_APDU); #endif /* load any static address bindings to show up in our device bindings list */ address_init(); Init_Service_Handlers(); dlenv_init(); atexit(datalink_cleanup); /* configure the timeout values */ last_seconds = time(NULL); /* broadcast an I-Am on startup */ Send_I_Am(&Handler_Transmit_Buffer[0]); /* loop forever */ for (;;) { /* input */ current_seconds = time(NULL); /* returns 0 bytes on timeout */ pdu_len = datalink_receive(&src, &Rx_Buf[0], MAX_MPDU, timeout); /* process */ if (pdu_len) { npdu_handler(&src, &Rx_Buf[0], pdu_len); } /* at least one second has passed */ elapsed_seconds = (uint32_t) (current_seconds - last_seconds); if (elapsed_seconds) { last_seconds = current_seconds; dcc_timer_seconds(elapsed_seconds); #if defined(BACDL_BIP) && BBMD_ENABLED bvlc_maintenance_timer(elapsed_seconds); #endif dlenv_maintenance_timer(elapsed_seconds); Load_Control_State_Machine_Handler(); elapsed_milliseconds = elapsed_seconds * 1000; handler_cov_timer_seconds(elapsed_seconds); tsm_timer_milliseconds(elapsed_milliseconds); trend_log_timer(elapsed_seconds); #if defined(INTRINSIC_REPORTING) Device_local_reporting(); #endif } handler_cov_task(); /* scan cache address */ address_binding_tmr += elapsed_seconds; if (address_binding_tmr >= 60) { address_cache_timer(address_binding_tmr); address_binding_tmr = 0; } #if defined(INTRINSIC_REPORTING) /* try to find addresses of recipients */ recipient_scan_tmr += elapsed_seconds; if (recipient_scan_tmr >= NC_RESCAN_RECIPIENTS_SECS) { Notification_Class_find_recipient(); recipient_scan_tmr = 0; } #endif #if false /* output */ rewrite++; if (rewrite>10000) { rewrite=0; printf("rewrite %i\n", rewrite); } /* update Analog Value from uci */ section = "bacnet_av"; type = "av"; chk_mtime = 0; chk_mtime = check_uci_update(section, ucimodtime_bacnet_av); if ( rewrite == 0) { chk_mtime = ucimodtime_bacnet_av; #if PRINT_ENABLED printf("rewrite %i\n", rewrite); #endif } if(chk_mtime != 0) { sleep(1); ucimodtime_bacnet_av = chk_mtime; #if PRINT_ENABLED printf("Config changed, reloading %s\n",section); #endif ctx = ucix_init(section); struct uci_itr_ctx itr; value_tuple_t *cur; itr.list = NULL; itr.section = section; itr.ctx = ctx; ucix_for_each_section_type(ctx, section, type, (void *)load_value, &itr); for( cur = itr.list; cur; cur = cur->next ) { #if PRINT_ENABLED printf("section %s idx %s \n", section, cur->idx); #endif val_f = strtof(cur->value,NULL); uci_idx = atoi(cur->idx); #if PRINT_ENABLED printf("idx %s ",cur->idx); printf("value %s\n",cur->value); #endif pval_f = Analog_Value_Present_Value(uci_idx); if ( val_f != pval_f ) { Analog_Value_Present_Value_Set(uci_idx,val_f,16); } if (cur->Out_Of_Service == 0) { if (Analog_Value_Out_Of_Service(uci_idx)) Analog_Value_Out_Of_Service_Set(uci_idx,0); if (Analog_Value_Reliability(uci_idx)) Analog_Value_Reliability_Set(uci_idx, RELIABILITY_NO_FAULT_DETECTED); } else { #if PRINT_ENABLED printf("idx %s ",cur->idx); printf("Out_Of_Service\n"); #endif Analog_Value_Out_Of_Service_Set(uci_idx,1); Analog_Value_Reliability_Set(uci_idx, RELIABILITY_COMMUNICATION_FAILURE); } } ucix_cleanup(ctx); } /* update end */ /* update Analog Value from uci */ section = "bacnet_ao"; type = "ao"; chk_mtime = 0; chk_mtime = check_uci_update(section, ucimodtime_bacnet_ao); if ( rewrite == 0) { chk_mtime = ucimodtime_bacnet_ao; } if(chk_mtime != 0) { sleep(1); ucimodtime_bacnet_ao = chk_mtime; #if PRINT_ENABLED printf("Config changed, reloading %s\n",section); #endif ctx = ucix_init(section); struct uci_itr_ctx itr; value_tuple_t *cur; itr.list = NULL; itr.section = section; itr.ctx = ctx; ucix_for_each_section_type(ctx, section, type, (void *)load_value, &itr); for( cur = itr.list; cur; cur = cur->next ) { #if PRINT_ENABLED printf("section %s idx %s \n", section, cur->idx); #endif val_f = strtof(cur->value,NULL); uci_idx = atoi(cur->idx); #if PRINT_ENABLED printf("idx %s ",cur->idx); printf("value %s\n",cur->value); #endif pval_f = Analog_Output_Present_Value(uci_idx); if ( val_f != pval_f ) { Analog_Output_Present_Value_Set(uci_idx,val_f,16); } if (cur->Out_Of_Service == 0) { if (Analog_Output_Out_Of_Service(uci_idx)) Analog_Output_Out_Of_Service_Set(uci_idx,0); if (Analog_Output_Reliability(uci_idx)) Analog_Output_Reliability_Set(uci_idx, RELIABILITY_NO_FAULT_DETECTED); } else { #if PRINT_ENABLED printf("idx %s ",cur->idx); printf("Out_Of_Service\n"); #endif Analog_Output_Out_Of_Service_Set(uci_idx,1); Analog_Output_Reliability_Set(uci_idx, RELIABILITY_COMMUNICATION_FAILURE); } } ucix_cleanup(ctx); } /* update end */ /* update Multistate Value from uci */ section = "bacnet_mv"; type = "mv"; chk_mtime = 0; chk_mtime = check_uci_update(section, ucimodtime_bacnet_mv); if ( rewrite == 0) { chk_mtime = ucimodtime_bacnet_mv; } if(chk_mtime != 1) { ucimodtime_bacnet_mv = chk_mtime; #if PRINT_ENABLED printf("Config changed, reloading %s\n",section); #endif ctx = ucix_init(section); struct uci_itr_ctx itr; value_tuple_t *cur; itr.list = NULL; itr.section = section; itr.ctx = ctx; ucix_for_each_section_type(ctx, section, type, (void *)load_value, &itr); for( cur = itr.list; cur; cur = cur->next ) { #if PRINT_ENABLED printf("section %s idx %s \n", section, cur->idx); #endif val_f = strtof(cur->value,NULL); uci_idx = atoi(cur->idx); if (val_f || !strcmp(cur->value, "0")) { #if PRINT_ENABLED printf("idx %s ",cur->idx); printf("value %s\n",cur->value); #endif pval_f = Multistate_Value_Present_Value(uci_idx); if ( val_f != pval_f ) { Multistate_Value_Present_Value_Set(uci_idx,val_f,16); } if (Multistate_Value_Out_Of_Service(uci_idx)) Multistate_Value_Out_Of_Service_Set(uci_idx,0); if (Multistate_Value_Reliability(uci_idx)) Multistate_Value_Reliability_Set(uci_idx, RELIABILITY_NO_FAULT_DETECTED); } else { #if PRINT_ENABLED printf("idx %s ",cur->idx); printf("Out_Of_Service\n"); #endif Multistate_Value_Out_Of_Service_Set(uci_idx,1); Multistate_Value_Reliability_Set(uci_idx, RELIABILITY_COMMUNICATION_FAILURE); } if (cur->Out_Of_Service == 0) { if (Multistate_Value_Out_Of_Service(uci_idx)) Multistate_Value_Out_Of_Service_Set(uci_idx,0); if (Multistate_Value_Reliability(uci_idx)) Multistate_Value_Reliability_Set(uci_idx, RELIABILITY_NO_FAULT_DETECTED); } else { #if PRINT_ENABLED printf("idx %s ",cur->idx); printf("Out_Of_Service\n"); #endif Multistate_Value_Out_Of_Service_Set(uci_idx,1); Multistate_Value_Reliability_Set(uci_idx, RELIABILITY_COMMUNICATION_FAILURE); } } ucix_cleanup(ctx); } /* update end */ /* update Binary Input from uci */ section = "bacnet_bi"; type = "bi"; chk_mtime = 0; chk_mtime = check_uci_update(section, ucimodtime_bacnet_bi); if ( rewrite == 0) { chk_mtime = ucimodtime_bacnet_bi; } if(chk_mtime != 0) { ucimodtime_bacnet_bi = chk_mtime; #if PRINT_ENABLED printf("Config changed, reloading %s\n",section); #endif ctx = ucix_init(section); struct uci_itr_ctx itr; value_tuple_t *cur; itr.list = NULL; itr.section = section; itr.ctx = ctx; ucix_for_each_section_type(ctx, section, type, (void *)load_value, &itr); for( cur = itr.list; cur; cur = cur->next ) { #if PRINT_ENABLED printf("section %s idx %s \n", section, cur->idx); #endif if (cur->value) { #if PRINT_ENABLED printf("idx %s ",cur->idx); printf("value %s\n",cur->value); #endif val_i = atoi(cur->value); uci_idx = atoi(cur->idx); pval_i = Binary_Input_Present_Value(uci_idx); if ( val_i != pval_i ) { Binary_Input_Present_Value_Set(uci_idx,val_i,16); } } if (cur->Out_Of_Service == 0) { if (Binary_Input_Out_Of_Service(uci_idx)) Binary_Input_Out_Of_Service_Set(uci_idx,0); if (Binary_Input_Reliability(uci_idx)) Binary_Input_Reliability_Set(uci_idx, RELIABILITY_NO_FAULT_DETECTED); } else { #if PRINT_ENABLED printf("idx %s ",cur->idx); printf("Out_Of_Service\n"); #endif Binary_Input_Out_Of_Service_Set(uci_idx,1); Binary_Input_Reliability_Set(uci_idx, RELIABILITY_COMMUNICATION_FAILURE); } } ucix_cleanup(ctx); } /* update end */ #endif /* blink LEDs, Turn on or off outputs, etc */ } return 0; }
int main( int argc, char *argv[]) { BACNET_ADDRESS src = { 0 }; /* address where message came from */ uint16_t pdu_len = 0; unsigned timeout = 1; /* milliseconds */ time_t last_seconds = 0; time_t current_seconds = 0; uint32_t elapsed_seconds = 0; uint32_t elapsed_milliseconds = 0; uint32_t address_binding_tmr = 0; uint32_t recipient_scan_tmr = 0; uint16_t count = 0; /* allow the device ID to be set */ if (argc > 1) Device_Set_Object_Instance_Number(strtol(argv[1], NULL, 0)); printf("BACnet Server Demo\n" "BACnet Stack Version %s\n" "BACnet Device ID: %u\n" "Max APDU: %d\n", BACnet_Version, Device_Object_Instance_Number(), MAX_APDU); /* load any static address bindings to show up in our device bindings list */ address_init(); Init_Service_Handlers(); dlenv_init(); atexit(datalink_cleanup); /* configure the timeout values */ last_seconds = time(NULL); /* broadcast an I-Am on startup */ Send_I_Am(&Handler_Transmit_Buffer[0]); ////////////////////////////////////// initPin(GPIO_PIN1); initPin(GPIO_PIN2); setPinDirection(GPIO_PIN1, IN); setPinDirection(GPIO_PIN2, IN); struct itimerval it_val; /* for setting itimer */ /* Upon SIGALRM, call DoStuff(). * Set interval timer. We want frequency in ms, * but the setitimer call needs seconds and useconds. */ if (signal(SIGALRM, (void (*)(int)) countPeopleInFunc) == SIG_ERR) { perror("Unable to catch SIGALRM"); exit(1); } /* if (signal(SIGALRM, (void (*)(int)) countPeopleOutFunc) == SIG_ERR) { perror("Unable to catch SIGALRM"); exit(1); } */ it_val.it_value.tv_sec = INTERVAL/1000; it_val.it_value.tv_usec = (INTERVAL*1000) % 1000000; it_val.it_interval = it_val.it_value; if (setitimer(ITIMER_REAL, &it_val, NULL) == -1) { perror("error calling setitimer()"); exit(1); } //////////////////////////////////////////////////// /* loop forever */ for (;;) { /* input */ current_seconds = time(NULL); /* returns 0 bytes on timeout */ pdu_len = datalink_receive(&src, &Rx_Buf[0], MAX_MPDU, timeout); /* process */ if (pdu_len) { npdu_handler(&src, &Rx_Buf[0], pdu_len); } /* at least one second has passed */ elapsed_seconds = (uint32_t) (current_seconds - last_seconds); if (elapsed_seconds) { last_seconds = current_seconds; dcc_timer_seconds(elapsed_seconds); #if defined(BACDL_BIP) && BBMD_ENABLED bvlc_maintenance_timer(elapsed_seconds); #endif dlenv_maintenance_timer(elapsed_seconds); Load_Control_State_Machine_Handler(); elapsed_milliseconds = elapsed_seconds * 1000; handler_cov_timer_seconds(elapsed_seconds); tsm_timer_milliseconds(elapsed_milliseconds); trend_log_timer(elapsed_seconds); #if defined(INTRINSIC_REPORTING) Device_local_reporting(); #endif } handler_cov_task(); /* scan cache address */ address_binding_tmr += elapsed_seconds; if (address_binding_tmr >= 60) { address_cache_timer(address_binding_tmr); address_binding_tmr = 0; } #if defined(INTRINSIC_REPORTING) /* try to find addresses of recipients */ recipient_scan_tmr += elapsed_seconds; if (recipient_scan_tmr >= NC_RESCAN_RECIPIENTS_SECS) { Notification_Class_find_recipient(); recipient_scan_tmr = 0; } #endif /* output */ /* blink LEDs, Turn on or off outputs, etc */ } return 0; }
/** Main function of server demo. * * @see Device_Set_Object_Instance_Number, dlenv_init, Send_I_Am, * datalink_receive, npdu_handler, * dcc_timer_seconds, bvlc_maintenance_timer, * Load_Control_State_Machine_Handler, handler_cov_task, * tsm_timer_milliseconds * * @param argc [in] Arg count. * @param argv [in] Takes one argument: the Device Instance #. * @return 0 on success. */ int main( int argc, char *argv[]) { BACNET_ADDRESS src = { 0 }; /* address where message came from */ uint16_t pdu_len = 0; unsigned timeout = 1; /* milliseconds */ time_t last_seconds = 0; time_t current_seconds = 0; uint32_t elapsed_seconds = 0; uint32_t elapsed_milliseconds = 0; uint32_t address_binding_tmr = 0; uint32_t recipient_scan_tmr = 0; #if defined(BAC_UCI) int uciId = 0; struct uci_context *ctx; #endif int argi = 0; char *filename = NULL; filename = filename_remove_path(argv[0]); for (argi = 1; argi < argc; argi++) { if (strcmp(argv[argi], "--help") == 0) { print_usage(filename); print_help(filename); return 0; } if (strcmp(argv[argi], "--version") == 0) { printf("%s %s\n", filename, BACNET_VERSION_TEXT); printf("Copyright (C) 2014 by Steve Karg and others.\n" "This is free software; see the source for copying conditions.\n" "There is NO warranty; not even for MERCHANTABILITY or\n" "FITNESS FOR A PARTICULAR PURPOSE.\n"); return 0; } } #if defined(BAC_UCI) ctx = ucix_init("bacnet_dev"); if (!ctx) fprintf(stderr, "Failed to load config file bacnet_dev\n"); uciId = ucix_get_option_int(ctx, "bacnet_dev", "0", "Id", 0); printf("ID: %i", uciId); if (uciId != 0) { Device_Set_Object_Instance_Number(uciId); } else { #endif /* defined(BAC_UCI) */ /* allow the device ID to be set */ if (argc > 1) { Device_Set_Object_Instance_Number(strtol(argv[1], NULL, 0)); } if (argc > 2) { Device_Object_Name_ANSI_Init(argv[2]); } #if defined(BAC_UCI) } ucix_cleanup(ctx); #endif /* defined(BAC_UCI) */ printf("BACnet Server Demo\n" "BACnet Stack Version %s\n" "BACnet Device ID: %u\n" "Max APDU: %d\n", BACnet_Version, Device_Object_Instance_Number(), MAX_APDU); /* load any static address bindings to show up in our device bindings list */ address_init(); Init_Service_Handlers(); dlenv_init(); atexit(datalink_cleanup); /* configure the timeout values */ last_seconds = time(NULL); /* broadcast an I-Am on startup */ Send_I_Am(&Handler_Transmit_Buffer[0]); /* loop forever */ for (;;) { /* input */ current_seconds = time(NULL); /* returns 0 bytes on timeout */ pdu_len = datalink_receive(&src, &Rx_Buf[0], MAX_MPDU, timeout); /* process */ if (pdu_len) { npdu_handler(&src, &Rx_Buf[0], pdu_len); } /* at least one second has passed */ elapsed_seconds = (uint32_t) (current_seconds - last_seconds); if (elapsed_seconds) { last_seconds = current_seconds; dcc_timer_seconds(elapsed_seconds); #if defined(BACDL_BIP) && BBMD_ENABLED bvlc_maintenance_timer(elapsed_seconds); #endif dlenv_maintenance_timer(elapsed_seconds); Load_Control_State_Machine_Handler(); elapsed_milliseconds = elapsed_seconds * 1000; handler_cov_timer_seconds(elapsed_seconds); tsm_timer_milliseconds(elapsed_milliseconds); trend_log_timer(elapsed_seconds); #if defined(INTRINSIC_REPORTING) Device_local_reporting(); #endif } handler_cov_task(); /* scan cache address */ address_binding_tmr += elapsed_seconds; if (address_binding_tmr >= 60) { address_cache_timer(address_binding_tmr); address_binding_tmr = 0; } #if defined(INTRINSIC_REPORTING) /* try to find addresses of recipients */ recipient_scan_tmr += elapsed_seconds; if (recipient_scan_tmr >= NC_RESCAN_RECIPIENTS_SECS) { Notification_Class_find_recipient(); recipient_scan_tmr = 0; } #endif /* output */ /* blink LEDs, Turn on or off outputs, etc */ } return 0; }
/** Main function of server demo. * * @see Device_Set_Object_Instance_Number, dlenv_init, Send_I_Am, * datalink_receive, npdu_handler, * dcc_timer_seconds, bvlc_maintenance_timer, * Load_Control_State_Machine_Handler, handler_cov_task, * tsm_timer_milliseconds * * @param argc [in] Arg count. * @param argv [in] Takes one argument: the Device Instance #. * @return 0 on success. */ int main( int argc, char *argv[]) { BACNET_ADDRESS src = { 0 }; /* address where message came from */ uint16_t pdu_len = 0; unsigned timeout = 1; /* milliseconds */ time_t last_seconds = 0; time_t current_seconds = 0; uint32_t elapsed_seconds = 0; uint32_t elapsed_milliseconds = 0; uint32_t address_binding_tmr = 0; #if defined(INTRINSIC_REPORTING) uint32_t recipient_scan_tmr = 0; #endif #if defined(BACNET_TIME_MASTER) BACNET_DATE_TIME bdatetime; #endif #if defined(BAC_UCI) int uciId = 0; const char *uciName; struct uci_context *ctx; #if defined(AI) time_t ucimodtime_bacnet_ai = 0; #endif #if defined(AO) time_t ucimodtime_bacnet_ao = 0; #endif #if defined(AV) time_t ucimodtime_bacnet_av = 0; #endif #if defined(BI) time_t ucimodtime_bacnet_bi = 0; #endif #if defined(BO) time_t ucimodtime_bacnet_bo = 0; #endif #if defined(BV) time_t ucimodtime_bacnet_bv = 0; #endif #if defined(MSI) time_t ucimodtime_bacnet_mi = 0; #endif #if defined(MSO) time_t ucimodtime_bacnet_mo = 0; #endif #if defined(MSV) time_t ucimodtime_bacnet_mv = 0; #endif int rewrite = 0; #endif int argi = 0; const char *filename = NULL; filename = filename_remove_path(argv[0]); for (argi = 1; argi < argc; argi++) { if (strcmp(argv[argi], "--help") == 0) { print_usage(filename); print_help(filename); return 0; } if (strcmp(argv[argi], "--version") == 0) { printf("%s %s\n", filename, BACNET_VERSION_TEXT); printf("Copyright (C) 2014 by Steve Karg and others.\n" "This is free software; see the source for copying conditions.\n" "There is NO warranty; not even for MERCHANTABILITY or\n" "FITNESS FOR A PARTICULAR PURPOSE.\n"); return 0; } } #if defined(BAC_UCI) char *pEnv = getenv("UCI_SECTION"); if (!pEnv) { pEnv = "0"; #if PRINT_ENABLED fprintf(stderr, "Failed to getenv(UCI_SECTION)\n"); } else { fprintf(stderr, "load config file bacnet_dev %s\n",pEnv); #endif } ctx = ucix_init("bacnet_dev"); #if PRINT_ENABLED if(!ctx) fprintf(stderr, "Failed to load config file bacnet_dev\n"); #endif uciId = ucix_get_option_int(ctx, "bacnet_dev", pEnv, "Id", 0); uciName = ucix_get_option(ctx, "bacnet_dev", pEnv, "name"); if(ctx) ucix_cleanup(ctx); if (uciId != 0) { Device_Set_Object_Instance_Number(uciId); if (uciName) #if PRINT_ENABLED fprintf(stderr, "BACnet Device Name: %s\n", uciName); #endif Device_Object_Name_ANSI_Init(uciName); } else { #endif /* defined(BAC_UCI) */ /* allow the device ID to be set */ if (argc > 1) { Device_Set_Object_Instance_Number(strtol(argv[1], NULL, 0)); } if (argc > 2) { Device_Object_Name_ANSI_Init(argv[2]); } #if defined(BAC_UCI) } #if defined(AI) char ai_path[128]; struct stat ai_s; snprintf(ai_path, sizeof(ai_path), "/etc/config/bacnet_ai"); if( stat(ai_path, &ai_s) > -1 ) ucimodtime_bacnet_ai = ai_s.st_mtime; #endif #if defined(AO) char ao_path[128]; struct stat ao_s; snprintf(ao_path, sizeof(ao_path), "/etc/config/bacnet_ao"); if( stat(ao_path, &ao_s) > -1 ) ucimodtime_bacnet_ao = ao_s.st_mtime; #endif #if defined(AV) char av_path[128]; struct stat av_s; snprintf(av_path, sizeof(av_path), "/etc/config/bacnet_av"); if( stat(av_path, &av_s) > -1 ) ucimodtime_bacnet_av = av_s.st_mtime; #endif #if defined(BI) char bi_path[128]; struct stat bi_s; snprintf(bi_path, sizeof(bi_path), "/etc/config/bacnet_bi"); if( stat(bi_path, &bi_s) > -1 ) ucimodtime_bacnet_bi = bi_s.st_mtime; #endif #if defined(BO) char bo_path[128]; struct stat bo_s; snprintf(bo_path, sizeof(bo_path), "/etc/config/bacnet_bo"); if( stat(bo_path, &bo_s) > -1 ) ucimodtime_bacnet_bo = bo_s.st_mtime; #endif #if defined(BV) char bv_path[128]; struct stat bv_s; snprintf(bv_path, sizeof(bv_path), "/etc/config/bacnet_bv"); if( stat(bv_path, &bv_s) > -1 ) ucimodtime_bacnet_bv = bv_s.st_mtime; #endif #if defined(MSI) char msi_path[128]; struct stat msi_s; snprintf(msi_path, sizeof(msi_path), "/etc/config/bacnet_mi"); if( stat(msi_path, &msi_s) > -1 ) ucimodtime_bacnet_mi = msi_s.st_mtime; #endif #if defined(MSO) char mso_path[128]; struct stat mso_s; snprintf(mso_path, sizeof(mso_path), "/etc/config/bacnet_mo"); if( stat(mso_path, &mso_s) > -1 ) ucimodtime_bacnet_mo = mso_s.st_mtime; #endif #if defined(MSV) char msv_path[128]; struct stat msv_s; snprintf(msv_path, sizeof(msv_path), "/etc/config/bacnet_mv"); if( stat(msv_path, &msv_s) > -1 ) ucimodtime_bacnet_mv = msv_s.st_mtime; #endif #endif /* defined(BAC_UCI) */ #if PRINT_ENABLED printf("BACnet Server Demo\n" "BACnet Stack Version %s\n" "BACnet Device ID: %u\n" "Max APDU: %d\n", BACnet_Version, Device_Object_Instance_Number(), MAX_APDU); #endif /* load any static address bindings to show up in our device bindings list */ address_init(); Init_Service_Handlers(); dlenv_init(); atexit(datalink_cleanup); /* configure the timeout values */ last_seconds = time(NULL); /* broadcast an I-Am on startup */ Send_I_Am(&Handler_Transmit_Buffer[0]); /* loop forever */ for (;;) { /* input */ current_seconds = time(NULL); /* returns 0 bytes on timeout */ pdu_len = datalink_receive(&src, &Rx_Buf[0], MAX_MPDU, timeout); /* process */ if (pdu_len) { npdu_handler(&src, &Rx_Buf[0], pdu_len); } /* at least one second has passed */ elapsed_seconds = (uint32_t) (current_seconds - last_seconds); if (elapsed_seconds) { last_seconds = current_seconds; dcc_timer_seconds(elapsed_seconds); #if defined(BACDL_BIP) && BBMD_ENABLED bvlc_maintenance_timer(elapsed_seconds); #endif dlenv_maintenance_timer(elapsed_seconds); #if defined(LC) Load_Control_State_Machine_Handler(); #endif elapsed_milliseconds = elapsed_seconds * 1000; handler_cov_timer_seconds(elapsed_seconds); tsm_timer_milliseconds(elapsed_milliseconds); #if defined(TRENDLOG) trend_log_timer(elapsed_seconds); #endif #if defined(INTRINSIC_REPORTING) Device_local_reporting(); #endif #if defined(BACNET_TIME_MASTER) Device_getCurrentDateTime(&bdatetime); handler_timesync_task(&bdatetime); #endif } handler_cov_task(); /* scan cache address */ address_binding_tmr += elapsed_seconds; if (address_binding_tmr >= 60) { address_cache_timer(address_binding_tmr); address_binding_tmr = 0; } #if defined(INTRINSIC_REPORTING) /* try to find addresses of recipients */ recipient_scan_tmr += elapsed_seconds; if (recipient_scan_tmr >= NC_RESCAN_RECIPIENTS_SECS) { Notification_Class_find_recipient(); recipient_scan_tmr = 0; } #endif /* output */ #if defined(BAC_UCI) rewrite++; if (rewrite>100000) { #if PRINT_ENABLED printf("rewrite interval %i\n", rewrite); #endif rewrite=0; } #if defined(AI) /* update Analog Input from uci */ ucimodtime_bacnet_ai = uci_Update(ucimodtime_bacnet_ai,OBJECT_ANALOG_INPUT,rewrite); #endif #if defined(AO) /* update Analog Output from uci */ ucimodtime_bacnet_ao = uci_Update(ucimodtime_bacnet_ao,OBJECT_ANALOG_OUTPUT,rewrite); #endif #if defined(AV) /* update Analog Value from uci */ ucimodtime_bacnet_av = uci_Update(ucimodtime_bacnet_av,OBJECT_ANALOG_VALUE,rewrite); #endif #if defined(BI) /* update Binary Input from uci */ ucimodtime_bacnet_bi = uci_Update(ucimodtime_bacnet_bi,OBJECT_BINARY_INPUT,rewrite); #endif #if defined(BO) /* update Binary Output from uci */ ucimodtime_bacnet_bo = uci_Update(ucimodtime_bacnet_bo,OBJECT_BINARY_OUTPUT,rewrite); #endif #if defined(BV) /* update Binary Value from uci */ ucimodtime_bacnet_bv = uci_Update(ucimodtime_bacnet_bv,OBJECT_BINARY_VALUE,rewrite); #endif #if defined(MSI) /* update Multistate Input from uci */ ucimodtime_bacnet_mi = uci_Update(ucimodtime_bacnet_mi,OBJECT_MULTI_STATE_INPUT,rewrite); #endif #if defined(MSO) /* update Multistate Output from uci */ ucimodtime_bacnet_mo = uci_Update(ucimodtime_bacnet_mo,OBJECT_MULTI_STATE_OUTPUT,rewrite); #endif #if defined(MSV) /* update Multistate Value from uci */ ucimodtime_bacnet_mv = uci_Update(ucimodtime_bacnet_mv,OBJECT_MULTI_STATE_VALUE,rewrite); #endif #endif /* defined(BAC_UCI) */ /* blink LEDs, Turn on or off outputs, etc */ } return 0; }
/** Main function of server demo. * * @see Device_Set_Object_Instance_Number, dlenv_init, Send_I_Am, * datalink_receive, npdu_handler, * dcc_timer_seconds, bvlc_maintenance_timer, * Load_Control_State_Machine_Handler, handler_cov_task, * tsm_timer_milliseconds * * @param argc [in] Arg count. * @param argv [in] Takes one argument: the Device Instance #. * @return 0 on success. */ int main( int argc, char *argv[]) { BACNET_ADDRESS src = { 0 }; /* address where message came from */ uint16_t pdu_len = 0; unsigned timeout = 1; /* milliseconds */ time_t last_seconds = 0; time_t current_seconds = 0; uint32_t elapsed_seconds = 0; uint32_t elapsed_milliseconds = 0; uint32_t address_binding_tmr = 0; uint32_t recipient_scan_tmr = 0; /* allow the device ID to be set */ if (argc > 1) Device_Set_Object_Instance_Number(strtol(argv[1], NULL, 0)); printf("BACnet Server Demo\n" "BACnet Stack Version %s\n" "BACnet Device ID: %u\n" "Max APDU: %d\n", BACnet_Version, Device_Object_Instance_Number(), MAX_APDU); /* load any static address bindings to show up in our device bindings list */ address_init(); Init_Service_Handlers(); dlenv_init(); atexit(datalink_cleanup); /* configure the timeout values */ last_seconds = time(NULL); /* broadcast an I-Am on startup */ Send_I_Am(&Handler_Transmit_Buffer[0]); /* loop forever */ for (;;) { /* input */ current_seconds = time(NULL); /* returns 0 bytes on timeout */ pdu_len = datalink_receive(&src, &Rx_Buf[0], MAX_MPDU, timeout); /* process */ if (pdu_len) { npdu_handler(&src, &Rx_Buf[0], pdu_len); } /* at least one second has passed */ elapsed_seconds = (uint32_t) (current_seconds - last_seconds); if (elapsed_seconds) { last_seconds = current_seconds; dcc_timer_seconds(elapsed_seconds); #if defined(BACDL_BIP) && BBMD_ENABLED bvlc_maintenance_timer(elapsed_seconds); #endif dlenv_maintenance_timer(elapsed_seconds); Load_Control_State_Machine_Handler(); elapsed_milliseconds = elapsed_seconds * 1000; handler_cov_timer_seconds(elapsed_seconds); tsm_timer_milliseconds(elapsed_milliseconds); trend_log_timer(elapsed_seconds); #if defined(INTRINSIC_REPORTING) Device_local_reporting(); #endif } handler_cov_task(); /* scan cache address */ address_binding_tmr += elapsed_seconds; if (address_binding_tmr >= 60) { address_cache_timer(address_binding_tmr); address_binding_tmr = 0; } #if defined(INTRINSIC_REPORTING) /* try to find addresses of recipients */ recipient_scan_tmr += elapsed_seconds; if (recipient_scan_tmr >= NC_RESCAN_RECIPIENTS_SECS) { Notification_Class_find_recipient(); recipient_scan_tmr = 0; } #endif /* output */ /* blink LEDs, Turn on or off outputs, etc */ } return 0; }
int main( int argc, char *argv[]) { BACNET_ADDRESS src = { 0 }; /* address where message came from */ uint16_t pdu_len = 0; unsigned timeout = 100; /* milliseconds */ unsigned max_apdu = 0; time_t elapsed_seconds = 0; time_t last_seconds = 0; time_t current_seconds = 0; time_t timeout_seconds = 0; uint8_t invoke_id = 0; bool found = false; BACNET_READ_RANGE_DATA Request; int iCount = 0; int iType = 0; int iKey; int iSecondsRun = 0; if (((argc != 2) && (argc != 3)) || ((argc >= 2) && (strcmp(argv[1], "--help") == 0))) { printf("%s\n", argv[0]); printf("Usage: %s server local-device-instance\r\n or\r\n" " %s remote-device-instance\r\n" "--help gives further information\r\n", filename_remove_path(argv[0]), filename_remove_path(argv[0])); if ((argc > 1) && (strcmp(argv[1], "--help") == 0)) { printf("\r\nServer mode:\r\n\r\n" "<local-device-instance> determins the device id of the application\r\n" "when running as the server end of a test set up. The Server simply\r\n" "returns dummy data for each ReadRange request\r\n\r\n" "Non server:\r\n\r\n" "<remote-device-instance> indicates the device id of the server\r\n" "instance of the application.\r\n" "The non server application will send a series of ReadRange requests to the\r\n" "server with examples of different range types.\r\n"); } return 0; } /* decode the command line parameters */ if (_stricmp(argv[1], "server") == 0) Target_Mode = 1; else Target_Mode = 0; Target_Device_Object_Instance = strtol(argv[1 + Target_Mode], NULL, 0); if (Target_Device_Object_Instance > BACNET_MAX_INSTANCE) { fprintf(stderr, "device-instance=%u - it must be less than %u\r\n", Target_Device_Object_Instance, BACNET_MAX_INSTANCE); return 1; } /* setup my info */ if (Target_Mode) Device_Set_Object_Instance_Number(Target_Device_Object_Instance); else Device_Set_Object_Instance_Number(BACNET_MAX_INSTANCE); Init_Objects(); address_init(); Init_Service_Handlers(); dlenv_init(); atexit(datalink_cleanup); /* configure the timeout values */ last_seconds = time(NULL); timeout_seconds = (apdu_timeout() / 1000) * apdu_retries(); if (Target_Mode) { #if defined(WIN32) || defined(__BORLANDC__) printf("Entering server mode. press q to quit program\r\n\r\n"); #else printf("Entering server mode.\r\n\r\n"); #endif for (;;) { /* increment timer - exit if timed out */ current_seconds = time(NULL); /* returns 0 bytes on timeout */ pdu_len = datalink_receive(&src, &Rx_Buf[0], MAX_MPDU, timeout); /* process */ if (pdu_len) { npdu_handler(&src, &Rx_Buf[0], pdu_len); } /* at least one second has passed */ if (current_seconds != last_seconds) { putchar('.'); /* Just to show that time is passing... */ tsm_timer_milliseconds(((current_seconds - last_seconds) * 1000)); address_cache_timer(current_seconds - last_seconds); trend_log_timer(current_seconds - last_seconds); last_seconds = current_seconds; /* Change the analog input PVs for testing purposes */ for (iCount = 0; iCount < Analog_Input_Count(); iCount++) { Analog_Input_Present_Value_Set(iCount, iSecondsRun * (iCount + 1)); } iSecondsRun++; } #if defined(WIN32) || defined(__BORLANDC__) if (_kbhit()) { iKey = toupper(_getch()); if (iKey == 'Q') { printf("\r\nExiting program now\r\n"); exit(0); } } #endif } } else { /* try to bind with the device */ found = address_bind_request(Target_Device_Object_Instance, &max_apdu, &Target_Address); if (!found) { Send_WhoIs(Target_Device_Object_Instance, Target_Device_Object_Instance); } /* loop forever */ for (;;) { /* increment timer - exit if timed out */ current_seconds = time(NULL); /* returns 0 bytes on timeout */ pdu_len = datalink_receive(&src, &Rx_Buf[0], MAX_MPDU, timeout); /* process */ if (pdu_len) { npdu_handler(&src, &Rx_Buf[0], pdu_len); } /* at least one second has passed */ if (current_seconds != last_seconds) { tsm_timer_milliseconds(((current_seconds - last_seconds) * 1000)); address_cache_timer(current_seconds - last_seconds); trend_log_timer(current_seconds - last_seconds); last_seconds = current_seconds; } if (Error_Detected) break; /* wait until the device is bound, or timeout and quit */ if (!found) found = address_bind_request(Target_Device_Object_Instance, &max_apdu, &Target_Address); if (found) { if (invoke_id == 0) { /* Safe to send a new request */ switch (iCount) { case 0: /* Pass - should read up to 1st 10 */ Request.RequestType = RR_BY_POSITION; Request.Range.RefIndex = 1; Request.Count = 10; Request.object_type = OBJECT_DEVICE; Request.object_instance = Target_Device_Object_Instance; Request.object_property = PROP_DEVICE_ADDRESS_BINDING; Request.array_index = 0; break; case 1: /* Pass - should read entries 2 and 3 */ Request.RequestType = RR_BY_POSITION; Request.Range.RefSeqNum = 3; Request.Count = -2; Request.object_type = OBJECT_DEVICE; Request.object_instance = Target_Device_Object_Instance; Request.object_property = PROP_DEVICE_ADDRESS_BINDING; Request.array_index = 0; break; case 2: /* Fail - By Time not supported */ Request.RequestType = RR_BY_TIME; Request.Range.RefTime.date.year = 2009; Request.Range.RefTime.date.month = 9; Request.Range.RefTime.date.day = 23; Request.Range.RefTime.date.wday = 0xFF; Request.Range.RefTime.time.hour = 22; Request.Range.RefTime.time.min = 23; Request.Range.RefTime.time.sec = 24; Request.Range.RefTime.time.hundredths = 0; Request.Count = 10; Request.object_type = OBJECT_DEVICE; Request.object_instance = Target_Device_Object_Instance; Request.object_property = PROP_DEVICE_ADDRESS_BINDING; Request.array_index = 0; break; case 3: /* Fail - array not supported */ Request.RequestType = RR_BY_POSITION; Request.Range.RefIndex = 1; Request.Count = 10; Request.object_type = OBJECT_DEVICE; Request.object_instance = Target_Device_Object_Instance; Request.object_property = PROP_DEVICE_ADDRESS_BINDING; Request.array_index = 1; break; case 4: /* Fail - By Sequence not supported */ Request.RequestType = RR_BY_SEQUENCE; Request.Range.RefSeqNum = 1; Request.Count = 10; Request.object_type = OBJECT_DEVICE; Request.object_instance = Target_Device_Object_Instance; Request.object_property = PROP_DEVICE_ADDRESS_BINDING; Request.array_index = 0; break; case 5: /* Fail Bytime not supported and array not supported */ Request.RequestType = RR_BY_TIME; Request.Range.RefTime.date.year = 2009; Request.Range.RefTime.date.month = 9; Request.Range.RefTime.date.day = 23; Request.Range.RefTime.date.wday = 0xFF; /* Day of week unspecified */ Request.Range.RefTime.time.hour = 22; Request.Range.RefTime.time.min = 23; Request.Range.RefTime.time.sec = 24; Request.Range.RefTime.time.hundredths = 0; Request.Count = 10; Request.object_type = OBJECT_DEVICE; Request.object_instance = Target_Device_Object_Instance; Request.object_property = PROP_DEVICE_ADDRESS_BINDING; Request.array_index = 1; break; case 6: /* Pass - should try to return all entries */ Request.RequestType = RR_READ_ALL; Request.object_type = OBJECT_DEVICE; Request.object_instance = Target_Device_Object_Instance; Request.object_property = PROP_DEVICE_ADDRESS_BINDING; Request.array_index = 0; break; case 7: /* Fail - array not supported */ Request.RequestType = RR_READ_ALL; Request.object_type = OBJECT_DEVICE; Request.object_instance = Target_Device_Object_Instance; Request.object_property = PROP_DEVICE_ADDRESS_BINDING; Request.array_index = 1; break; case 8: /* Pass - should read 1st 1 */ Request.RequestType = RR_BY_POSITION; Request.Range.RefIndex = 1; Request.Count = 1; Request.object_type = OBJECT_DEVICE; Request.object_instance = Target_Device_Object_Instance; Request.object_property = PROP_DEVICE_ADDRESS_BINDING; Request.array_index = 0; break; case 9: /* Pass - should read 1st 2 */ Request.RequestType = RR_BY_POSITION; Request.Range.RefIndex = 1; Request.Count = 2; Request.object_type = OBJECT_DEVICE; Request.object_instance = Target_Device_Object_Instance; Request.object_property = PROP_DEVICE_ADDRESS_BINDING; Request.array_index = 0; break; case 10: /* Pass - should read 2nd and 3rd */ Request.RequestType = RR_BY_POSITION; Request.Range.RefIndex = 2; Request.Count = 2; Request.object_type = OBJECT_DEVICE; Request.object_instance = Target_Device_Object_Instance; Request.object_property = PROP_DEVICE_ADDRESS_BINDING; Request.array_index = 0; break; case 11: /* Pass - should read 2nd up to 11th */ Request.RequestType = RR_BY_POSITION; Request.Range.RefIndex = 2; Request.Count = 10; Request.object_type = OBJECT_DEVICE; Request.object_instance = Target_Device_Object_Instance; Request.object_property = PROP_DEVICE_ADDRESS_BINDING; Request.array_index = 0; break; } invoke_id = Send_ReadRange_Request(Target_Device_Object_Instance, &Request); } else if (tsm_invoke_id_free(invoke_id)) { if (iCount != 11) { iCount++; invoke_id = 0; } else { break; } } else if (tsm_invoke_id_failed(invoke_id)) { fprintf(stderr, "\rError: TSM Timeout!\r\n"); tsm_free_invoke_id(invoke_id); /* Error_Detected = true; */ /* try again or abort? */ invoke_id = 0; /* Try next operation */ /* break; */ } } else { /* increment timer - exit if timed out */ elapsed_seconds += (current_seconds - last_seconds); if (elapsed_seconds > timeout_seconds) { printf("\rError: APDU Timeout!\r\n"); /* Error_Detected = true; break; */ invoke_id = 0; } } /* keep track of time for next check */ last_seconds = current_seconds; } } if (Error_Detected) return 1; return 0; }