/************************************************************************** * * Copyright (C) 2005 Steve Karg * * Permission is hereby granted, free of charge, to any person obtaining * a copy of this software and associated documentation files (the * "Software"), to deal in the Software without restriction, including * without limitation the rights to use, copy, modify, merge, publish, * distribute, sublicense, and/or sell copies of the Software, and to * permit persons to whom the Software is furnished to do so, subject to * the following conditions: * * The above copyright notice and this permission notice shall be included * in all copies or substantial portions of the Software. * * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY * CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. * *********************************************************************/ #include #include #include #include #include #include "config.h" #include "txbuf.h" #include "bacdef.h" #include "bacdcode.h" #include "apdu.h" #include "npdu.h" #include "abort.h" #include "rp.h" /* demo objects */ #include "device.h" #include "ai.h" #include "ao.h" #include "av.h" #include "bi.h" #include "bo.h" #include "bv.h" #include "lsp.h" #include "mso.h" #if BACFILE #include "bacfile.h" #endif static uint8_t Temp_Buf[MAX_APDU] = { 0 }; void handler_read_property(uint8_t * service_request, uint16_t service_len, BACNET_ADDRESS * src, BACNET_CONFIRMED_SERVICE_DATA * service_data) { BACNET_READ_PROPERTY_DATA data; int len = 0; int pdu_len = 0; BACNET_NPDU_DATA npdu_data; bool send = false; bool error = false; int bytes_sent = 0; BACNET_ERROR_CLASS error_class = ERROR_CLASS_OBJECT; BACNET_ERROR_CODE error_code = ERROR_CODE_UNKNOWN_OBJECT; len = rp_decode_service_request(service_request, service_len, &data); #if PRINT_ENABLED if (len <= 0) fprintf(stderr, "Unable to decode Read-Property Request!\n"); #endif /* bad decoding - send an abort */ if (len < 0) { pdu_len = abort_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, ABORT_REASON_OTHER); #if PRINT_ENABLED fprintf(stderr, "Sending Abort!\n"); #endif send = true; } else if (service_data->segmented_message) { pdu_len = abort_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, ABORT_REASON_SEGMENTATION_NOT_SUPPORTED); #if PRINT_ENABLED fprintf(stderr, "Sending Abort!\n"); #endif send = true; } else { switch (data.object_type) { case OBJECT_DEVICE: /* FIXME: probably need a length limitation sent with encode */ if (data.object_instance == Device_Object_Instance_Number()) { len = Device_Encode_Property_APDU(&Temp_Buf[0], data.object_property, data.array_index, &error_class, &error_code); if (len >= 0) { /* encode the APDU portion of the packet */ data.application_data = &Temp_Buf[0]; data.application_data_len = len; /* FIXME: probably need a length limitation sent with encode */ pdu_len = rp_ack_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, &data); #if PRINT_ENABLED fprintf(stderr, "Sending Read Property Ack for Device!\n"); #endif send = true; } else error = true; } else error = true; break; case OBJECT_ANALOG_INPUT: if (Analog_Input_Valid_Instance(data.object_instance)) { len = Analog_Input_Encode_Property_APDU(&Temp_Buf[0], data.object_instance, data.object_property, data.array_index, &error_class, &error_code); if (len >= 0) { /* encode the APDU portion of the packet */ data.application_data = &Temp_Buf[0]; data.application_data_len = len; /* FIXME: probably need a length limitation sent with encode */ pdu_len = rp_ack_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, &data); #if PRINT_ENABLED fprintf(stderr, "Sending Read Property Ack for AI!\n"); #endif send = true; } else error = true; } else error = true; break; case OBJECT_BINARY_INPUT: if (Binary_Input_Valid_Instance(data.object_instance)) { len = Binary_Input_Encode_Property_APDU(&Temp_Buf[0], data.object_instance, data.object_property, data.array_index, &error_class, &error_code); if (len >= 0) { /* encode the APDU portion of the packet */ data.application_data = &Temp_Buf[0]; data.application_data_len = len; /* FIXME: probably need a length limitation sent with encode */ pdu_len = rp_ack_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, &data); #if PRINT_ENABLED fprintf(stderr, "Sending Read Property Ack for BI!\n"); #endif send = true; } else error = true; } else error = true; break; case OBJECT_BINARY_OUTPUT: if (Binary_Output_Valid_Instance(data.object_instance)) { len = Binary_Output_Encode_Property_APDU(&Temp_Buf[0], data.object_instance, data.object_property, data.array_index, &error_class, &error_code); if (len >= 0) { /* encode the APDU portion of the packet */ data.application_data = &Temp_Buf[0]; data.application_data_len = len; /* FIXME: probably need a length limitation sent with encode */ pdu_len = rp_ack_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, &data); #if PRINT_ENABLED fprintf(stderr, "Sending Read Property Ack for BO!\n"); #endif send = true; } else error = true; } else error = true; break; case OBJECT_BINARY_VALUE: if (Binary_Value_Valid_Instance(data.object_instance)) { len = Binary_Value_Encode_Property_APDU(&Temp_Buf[0], data.object_instance, data.object_property, data.array_index, &error_class, &error_code); if (len >= 0) { /* encode the APDU portion of the packet */ data.application_data = &Temp_Buf[0]; data.application_data_len = len; /* FIXME: probably need a length limitation sent with encode */ pdu_len = rp_ack_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, &data); #if PRINT_ENABLED fprintf(stderr, "Sending Read Property Ack for BV!\n"); #endif send = true; } else error = true; } else error = true; break; case OBJECT_ANALOG_OUTPUT: if (Analog_Output_Valid_Instance(data.object_instance)) { len = Analog_Output_Encode_Property_APDU(&Temp_Buf[0], data.object_instance, data.object_property, data.array_index, &error_class, &error_code); if (len >= 0) { /* encode the APDU portion of the packet */ data.application_data = &Temp_Buf[0]; data.application_data_len = len; /* FIXME: probably need a length limitation sent with encode */ pdu_len = rp_ack_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, &data); #if PRINT_ENABLED fprintf(stderr, "Sending Read Property Ack for AO!\n"); #endif send = true; } else error = true; } else error = true; break; case OBJECT_ANALOG_VALUE: if (Analog_Value_Valid_Instance(data.object_instance)) { len = Analog_Value_Encode_Property_APDU(&Temp_Buf[0], data.object_instance, data.object_property, data.array_index, &error_class, &error_code); if (len >= 0) { /* encode the APDU portion of the packet */ data.application_data = &Temp_Buf[0]; data.application_data_len = len; /* FIXME: probably need a length limitation sent with encode */ pdu_len = rp_ack_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, &data); #if PRINT_ENABLED fprintf(stderr, "Sending Read Property Ack for AV!\n"); #endif send = true; } else error = true; } else error = true; break; case OBJECT_LIFE_SAFETY_POINT: if (Life_Safety_Point_Valid_Instance(data.object_instance)) { len = Life_Safety_Point_Encode_Property_APDU(&Temp_Buf[0], data.object_instance, data.object_property, data.array_index, &error_class, &error_code); if (len >= 0) { /* encode the APDU portion of the packet */ data.application_data = &Temp_Buf[0]; data.application_data_len = len; /* FIXME: probably need a length limitation sent with encode */ pdu_len = rp_ack_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, &data); #if PRINT_ENABLED fprintf(stderr, "Sending Read Property Ack for LSP!\n"); #endif send = true; } else error = true; } else error = true; break; case OBJECT_MULTI_STATE_OUTPUT: if (Multistate_Output_Valid_Instance(data.object_instance)) { len = Multistate_Output_Encode_Property_APDU(&Temp_Buf[0], data.object_instance, data.object_property, data.array_index, &error_class, &error_code); if (len >= 0) { /* encode the APDU portion of the packet */ data.application_data = &Temp_Buf[0]; data.application_data_len = len; /* FIXME: probably need a length limitation sent with encode */ pdu_len = rp_ack_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, &data); #if PRINT_ENABLED fprintf(stderr, "Sending Read Property Ack for MSO!\n"); #endif send = true; } else error = true; } else error = true; break; #if BACFILE case OBJECT_FILE: if (bacfile_valid_instance(data.object_instance)) { len = bacfile_encode_property_apdu(&Temp_Buf[0], data.object_instance, data.object_property, data.array_index, &error_class, &error_code); if (len >= 0) { /* encode the APDU portion of the packet */ data.application_data = &Temp_Buf[0]; data.application_data_len = len; /* FIXME: probably need a length limitation sent with encode */ pdu_len = rp_ack_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, &data); #if PRINT_ENABLED fprintf(stderr, "Sending Read Property Ack for File!\n"); #endif send = true; } else error = true; } else error = true; break; #endif /* BACFILE */ default: error = true; break; } } if (error) { pdu_len = bacerror_encode_apdu(&Handler_Transmit_Buffer[0], service_data->invoke_id, SERVICE_CONFIRMED_READ_PROPERTY, error_class, error_code); #if PRINT_ENABLED fprintf(stderr, "Sending Read Property Error!\n"); #endif send = true; } if (send) { npdu_encode_confirmed_apdu(&npdu_data, MESSAGE_PRIORITY_NORMAL); bytes_sent = datalink_send_pdu(src, &npdu_data, &Handler_Transmit_Buffer[0], pdu_len); /* number of bytes of data */ #if PRINT_ENABLED if (bytes_sent <= 0) fprintf(stderr, "Failed to send PDU (%s)!\n", strerror(errno)); #endif } return; }