Steve Karg
107 lines
3.5 KiB
C
107 lines
3.5 KiB
C
/**
|
|
* @file
|
|
* @brief Sends a BACnet service to the network: PrivateTransfer-Request
|
|
* @author Steve Karg <skarg@users.sourceforge.net>
|
|
* @date 2006
|
|
* @copyright SPDX-License-Identifier: MIT
|
|
*/
|
|
#include <stdlib.h>
|
|
#include <stddef.h>
|
|
#include <stdint.h>
|
|
#include <errno.h>
|
|
#include <string.h>
|
|
/* BACnet Stack defines - first */
|
|
#include "bacnet/bacdef.h"
|
|
/* BACnet Stack API */
|
|
#include "bacnet/bacdcode.h"
|
|
#include "bacnet/npdu.h"
|
|
#include "bacnet/apdu.h"
|
|
#include "bacnet/dcc.h"
|
|
#include "bacnet/ptransfer.h"
|
|
/* some demo stuff needed */
|
|
#include "bacnet/basic/binding/address.h"
|
|
#include "bacnet/basic/tsm/tsm.h"
|
|
#include "bacnet/basic/object/device.h"
|
|
#include "bacnet/datalink/datalink.h"
|
|
#include "bacnet/basic/services.h"
|
|
|
|
uint8_t Send_Private_Transfer_Request(uint32_t device_id,
|
|
uint16_t vendor_id,
|
|
uint32_t service_number,
|
|
unsigned int block_number,
|
|
char *block)
|
|
{ /* NULL=optional */
|
|
BACNET_ADDRESS dest;
|
|
BACNET_ADDRESS my_address;
|
|
unsigned max_apdu = 0;
|
|
uint8_t invoke_id = 0;
|
|
bool status = false;
|
|
int len = 0;
|
|
int pdu_len = 0;
|
|
int bytes_sent = 0;
|
|
BACNET_NPDU_DATA npdu_data;
|
|
static uint8_t
|
|
pt_req_buffer[300]; /* Somewhere to build the request packet */
|
|
BACNET_PRIVATE_TRANSFER_DATA private_data;
|
|
|
|
/* if we are forbidden to send, don't send! */
|
|
if (!dcc_communication_enabled()) {
|
|
return 0;
|
|
}
|
|
|
|
/* is the device bound? */
|
|
status = address_get_by_device(device_id, &max_apdu, &dest);
|
|
/* is there a tsm available? */
|
|
if (status) {
|
|
invoke_id = tsm_next_free_invokeID();
|
|
}
|
|
if (invoke_id) {
|
|
/* encode the NPDU portion of the packet */
|
|
datalink_get_my_address(&my_address);
|
|
npdu_encode_npdu_data(&npdu_data, true, MESSAGE_PRIORITY_NORMAL);
|
|
pdu_len = npdu_encode_pdu(
|
|
&Handler_Transmit_Buffer[0], &dest, &my_address, &npdu_data);
|
|
/* encode the APDU portion of the packet */
|
|
private_data.vendorID = vendor_id;
|
|
private_data.serviceNumber = service_number;
|
|
len = uptransfer_encode_apdu(
|
|
&Handler_Transmit_Buffer[pdu_len], &private_data);
|
|
pdu_len += len;
|
|
|
|
if (service_number == MY_SVC_READ) {
|
|
} else {
|
|
len = ptransfer_encode_apdu(
|
|
&Handler_Transmit_Buffer[pdu_len], invoke_id, &pt_block);
|
|
pdu_len += len;
|
|
|
|
/* will it fit in the sender?
|
|
note: if there is a bottleneck router in between
|
|
us and the destination, we won't know unless
|
|
we have a way to check for that and update the
|
|
max_apdu in the address binding table. */
|
|
|
|
if ((unsigned)pdu_len < max_apdu) {
|
|
tsm_set_confirmed_unsegmented_transaction(invoke_id, &dest,
|
|
&npdu_data, &Handler_Transmit_Buffer[0], (uint16_t)pdu_len);
|
|
bytes_sent = datalink_send_pdu(
|
|
&dest, &npdu_data, &Handler_Transmit_Buffer[0], pdu_len);
|
|
#if PRINT_ENABLED
|
|
if (bytes_sent <= 0)
|
|
fprintf(stderr,
|
|
"Failed to Send Private Transfer Request (%s)!\n",
|
|
strerror(errno));
|
|
#endif
|
|
} else {
|
|
tsm_free_invoke_id(invoke_id);
|
|
invoke_id = 0;
|
|
#if PRINT_ENABLED
|
|
fprintf(stderr,
|
|
"Failed to Send Private Transfer Request "
|
|
"(exceeds destination maximum APDU)!\n");
|
|
#endif
|
|
}
|
|
}
|
|
|
|
return invoke_id;
|
|
}
|