Added a demo for RenitializeDevice service.

bacnet-stack/demo/reinit/Makefile

@@ -0,0 +1,77 @@
+#Makefile to build BACnet Application for the Linux Port
+CC      = gcc
+BASEDIR = .
+#CFLAGS  = -Wall -I.
+# -g for debugging with gdb
+#CFLAGS  = -Wall -I. -O2 -g
+# Note: you can strip out symbols using the strip command
+# to get an idea of how big the compile really is.
+#DEFINES = -DBACFILE=1 -DBACDL_ETHERNET=1
+#DEFINES = -DBACFILE=1 -DBACDL_ARCNET=1
+#DEFINES = -DBACFILE=1 -DBACDL_MSTP=1 
+DEFINES = -DBACFILE=1 -DTSM_ENABLED=1 -DBACDL_BIP=1
+BACNET_PORT = ../../ports/linux
+BACNET_OBJECT = ../object
+BACNET_HANDLER = ../handler
+BACNET_ROOT = ../..
+INCLUDES = -I$(BACNET_ROOT) -I$(BACNET_PORT) -I$(BACNET_OBJECT) -I$(BACNET_HANDLER) 
+
+CFLAGS  = -Wall -g $(INCLUDES) $(DEFINES)
+
+TARGET = bacrd
+
+SRCS = main.c \
+       $(BACNET_ROOT)/rd.c \
+       $(BACNET_PORT)/bip-init.c \
+       $(BACNET_ROOT)/bip.c \
+       $(BACNET_HANDLER)/txbuf.c \
+       $(BACNET_HANDLER)/noserv.c \
+       $(BACNET_HANDLER)/h_whois.c \
+       $(BACNET_HANDLER)/h_rp.c \
+       $(BACNET_HANDLER)/h_iam.c  \
+       $(BACNET_HANDLER)/s_whois.c  \
+       $(BACNET_OBJECT)/device.c \
+       $(BACNET_OBJECT)/ai.c \
+       $(BACNET_OBJECT)/ao.c \
+       $(BACNET_OBJECT)/bacfile.c \
+       $(BACNET_ROOT)/filename.c \
+       $(BACNET_ROOT)/rp.c \
+       $(BACNET_ROOT)/wp.c \
+       $(BACNET_ROOT)/bacdcode.c \
+       $(BACNET_ROOT)/bacapp.c \
+       $(BACNET_ROOT)/bacprop.c \
+       $(BACNET_ROOT)/bacstr.c \
+       $(BACNET_ROOT)/bactext.c \
+       $(BACNET_ROOT)/indtext.c \
+       $(BACNET_ROOT)/bigend.c \
+       $(BACNET_ROOT)/whois.c \
+       $(BACNET_ROOT)/iam.c \
+       $(BACNET_ROOT)/tsm.c \
+       $(BACNET_ROOT)/datalink.c \
+       $(BACNET_ROOT)/address.c \
+       $(BACNET_ROOT)/arf.c \
+       $(BACNET_ROOT)/abort.c \
+       $(BACNET_ROOT)/reject.c \
+       $(BACNET_ROOT)/bacerror.c \
+       $(BACNET_ROOT)/apdu.c \
+       $(BACNET_ROOT)/npdu.c
+
+OBJS = ${SRCS:.c=.o}
+
+all: ${TARGET}
+ 
+${TARGET}: ${OBJS}
+	${CC} -o $@ ${OBJS} 
+
+.c.o:
+	${CC} -c ${CFLAGS} $*.c -o $@
+	
+depend:
+	rm -f .depend
+	${CC} -MM ${CFLAGS} *.c >> .depend
+	
+clean:
+	rm -rf core ${TARGET} $(OBJS) *.bak ports/linux/*.bak *.1 *.ini
+
+include: .depend
+

bacnet-stack/demo/reinit/main.c

@@ -0,0 +1,371 @@
+/**************************************************************************
+*
+* Copyright (C) 2006 Steve Karg <skarg@users.sourceforge.net>
+*
+* 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.
+*
+*********************************************************************/
+
+/* WRITEPROP: command line tool that writes a property to a BACnet device. */
+#include <stddef.h>
+#include <stdint.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <time.h> /* for time */
+#include <errno.h>
+#include "bactext.h"
+#include "iam.h"
+#include "arf.h"
+#include "tsm.h"
+#include "address.h"
+#include "config.h"
+#include "bacdef.h"
+#include "npdu.h"
+#include "apdu.h"
+#include "device.h"
+#include "net.h"
+#include "datalink.h"
+#include "whois.h"
+#include "rd.h"
+/* some demo stuff needed */
+#include "filename.h"
+#include "handlers.h"
+#include "client.h"
+#include "txbuf.h"
+
+// buffer used for receive
+static uint8_t Rx_Buf[MAX_MPDU] = {0};
+
+/* global variables used in this file */
+static uint32_t Target_Device_Object_Instance = BACNET_MAX_INSTANCE;
+static BACNET_ADDRESS Target_Address;
+static BACNET_REINITIALIZED_STATE Reinitialize_State = BACNET_REINIT_COLDSTART;
+static char *Reinitialize_Password = NULL;
+
+static bool Error_Detected = false;
+
+static uint8_t Send_Reinitialize_Device_Request(
+  uint32_t device_id,
+  BACNET_REINITIALIZED_STATE state,
+  char *password)
+{
+  BACNET_ADDRESS dest;
+  BACNET_ADDRESS my_address;
+  unsigned max_apdu = 0;
+  uint8_t invoke_id = 0;
+  bool status = false;
+  int pdu_len = 0;
+  int bytes_sent = 0;
+  BACNET_CHARACTER_STRING password_string;
+
+  /* is the device bound? */
+  status = address_get_by_device(device_id, &max_apdu, &dest);
+  /* is there a tsm available? */
+  if (status)
+     status = tsm_transaction_available();
+  if (status)
+  {
+    datalink_get_my_address(&my_address);
+    pdu_len = npdu_encode_apdu(
+      &Handler_Transmit_Buffer[0],
+      &dest,
+      &my_address,
+      true,  // true for confirmed messages
+      MESSAGE_PRIORITY_NORMAL);
+
+    invoke_id = tsm_next_free_invokeID();
+    // load the data for the encoding
+    characterstring_init_ansi(&password_string,password);
+    pdu_len += rd_encode_apdu(
+      &Handler_Transmit_Buffer[pdu_len],
+      invoke_id,
+      state,
+      password?&password_string:NULL);
+    /* 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,
+        &Handler_Transmit_Buffer[0],
+        pdu_len);
+      bytes_sent = datalink_send_pdu(
+        &dest,  // destination address
+        &Handler_Transmit_Buffer[0],
+        pdu_len); // number of bytes of data
+      if (bytes_sent <= 0)
+        fprintf(stderr,"Failed to Send ReinitializeDevice Request (%s)!\n",
+          strerror(errno));
+    }
+    else
+      fprintf(stderr,"Failed to Send ReinitializeDevice Request "
+        "(exceeds destination maximum APDU)!\n");
+  }
+  
+  return invoke_id;
+}
+
+
+static void MyErrorHandler(
+  BACNET_ADDRESS *src,
+  uint8_t invoke_id,
+  BACNET_ERROR_CLASS error_class,
+  BACNET_ERROR_CODE error_code)
+{
+  /* FIXME: verify src and invoke id */
+  (void)src;
+  (void)invoke_id;
+  printf("BACnet Error: %s: %s\r\n",
+    bactext_error_class_name(error_class),
+    bactext_error_code_name(error_code));
+  Error_Detected = true;
+}
+
+void MyAbortHandler(
+  BACNET_ADDRESS *src,
+  uint8_t invoke_id,
+  uint8_t abort_reason)
+{
+  /* FIXME: verify src and invoke id */
+  (void)src;
+  (void)invoke_id;
+  printf("BACnet Abort: %s\r\n",
+    bactext_abort_reason_name(abort_reason));
+  Error_Detected = true;
+}
+
+void MyRejectHandler(
+  BACNET_ADDRESS *src,
+  uint8_t invoke_id,
+  uint8_t reject_reason)
+{
+  /* FIXME: verify src and invoke id */
+  (void)src;
+  (void)invoke_id;
+  printf("BACnet Reject: %s\r\n",
+    bactext_reject_reason_name(reject_reason));
+  Error_Detected = true;
+}
+
+void MyReinitializeDeviceSimpleAckHandler(
+  BACNET_ADDRESS *src,
+  uint8_t invoke_id)
+{
+  (void)src;
+  (void)invoke_id;
+  printf("ReinitializeDevice Acknowledged!\r\n");
+}
+
+static void Init_Service_Handlers(void)
+{
+  /* we need to handle who-is 
+     to support dynamic device binding to us */
+  apdu_set_unconfirmed_handler(
+    SERVICE_UNCONFIRMED_WHO_IS,
+    handler_who_is);
+  /* handle i-am to support binding to other devices */
+  apdu_set_unconfirmed_handler(
+    SERVICE_UNCONFIRMED_I_AM,
+    handler_i_am_bind);
+  /* set the handler for all the services we don't implement
+     It is required to send the proper reject message... */
+  apdu_set_unrecognized_service_handler_handler(
+    handler_unrecognized_service);
+  /* we must implement read property - it's required! */
+  apdu_set_confirmed_handler(
+    SERVICE_CONFIRMED_READ_PROPERTY,
+    handler_read_property);
+  /* handle the ack coming back */
+  apdu_set_confirmed_simple_ack_handler(
+    SERVICE_CONFIRMED_REINITIALIZE_DEVICE,
+    MyReinitializeDeviceSimpleAckHandler);
+  /* handle any errors coming back */
+  apdu_set_error_handler(
+    SERVICE_CONFIRMED_REINITIALIZE_DEVICE,
+    MyErrorHandler);
+  apdu_set_abort_handler(
+    MyAbortHandler);
+  apdu_set_reject_handler(
+    MyRejectHandler);
+}
+
+#ifdef BIP_DEBUG
+static void print_address(
+  char *name,
+  BACNET_ADDRESS *dest) // destination address
+{
+  int i = 0; // counter
+
+  if (dest)
+  {
+    printf("%s: ",name);
+    for (i = 0; i < dest->mac_len; i++)
+    {
+      printf("%02X",dest->mac[i]);
+    }
+    printf("\n");
+  }
+}
+#endif
+
+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;
+  char *value_string = NULL;
+  bool status = false;
+  #ifdef BIP_DEBUG
+  BACNET_ADDRESS my_address, broadcast_address;
+  #endif
+  
+  if (argc < 3)
+  {
+    /* note: priority 16 and 0 should produce the same end results... */
+    printf(
+      "Usage: %s device-instance state [password]\r\n"
+      "Send BACnet ReinitializeDevice service to device.\r\n"
+      "\r\n"
+      "The device-instance can be 0 to %d.\r\n"
+      "Possible state values:\r\n"
+      "  0=coldstart\r\n"
+      "  1=warmstart\r\n"
+      "  2=startbackup\r\n"
+      "  3=endbackup\r\n"
+      "  4=startrestore\r\n"
+      "  5=endrestore\r\n"
+      "  6=abortrestore\r\n"
+      "The optional password is a character string of 1 to 20 characters.\r\n",
+      filename_remove_path(argv[0]),
+      BACNET_MAX_INSTANCE-1);
+    return 0;
+  }
+  /* decode the command line parameters */
+  Target_Device_Object_Instance = strtol(argv[1],NULL,0);
+  Reinitialize_State = strtol(argv[2],NULL,0);
+  /* optional password */
+  if (argc > 3)
+    Reinitialize_Password = argv[3];
+    
+  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 */
+  Device_Set_Object_Instance_Number(BACNET_MAX_INSTANCE);
+  address_init();
+  Init_Service_Handlers();
+  /* configure standard BACnet/IP port */
+  bip_set_interface("eth0"); /* for linux */
+  bip_set_port(0xBAC0);
+  if (!bip_init())
+    return 1;
+  #ifdef BIP_DEBUG
+  datalink_get_broadcast_address(&broadcast_address);
+  print_address("Broadcast",&broadcast_address);
+  datalink_get_my_address(&my_address);
+  print_address("Address",&my_address);
+  #endif
+  /* configure the timeout values */
+  last_seconds = time(NULL);
+  timeout_seconds = (Device_APDU_Timeout() / 1000) *
+    Device_Number_Of_APDU_Retries();
+  /* don't send an I-Am unless asked */
+  I_Am_Request = false;
+  /* try to bind with the device */
+  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 = bip_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));
+    if (Error_Detected)
+      break;
+    if (I_Am_Request)
+    {
+      I_Am_Request = false;
+      iam_send(&Handler_Transmit_Buffer[0]);
+    }
+    else
+    {
+      /* wait until the device is bound, or timeout and quit */
+      found = address_bind_request(
+        Target_Device_Object_Instance,
+        &max_apdu,
+        &Target_Address);
+      if (found)
+      {
+        if (invoke_id == 0) 
+        {
+          invoke_id = Send_Reinitialize_Device_Request(
+            Target_Device_Object_Instance,
+            Reinitialize_State,
+            Reinitialize_Password);
+        }
+        else if (tsm_invoke_id_free(invoke_id))
+          break;
+      }
+      else
+      {
+        /* increment timer - exit if timed out */
+        elapsed_seconds += (current_seconds - last_seconds);
+        if (elapsed_seconds > timeout_seconds)
+          break;
+      }
+    }
+    /* keep track of time for next check */
+    last_seconds = current_seconds;
+  }
+
+  return 0;
+}

bacnet-stack/demo/reinit/makefile.b32

@@ -0,0 +1,145 @@
+#
+# Simple makefile to build an executable for Win32
+#
+# This makefile assumes Borland bcc32 development environment
+# on Windows NT/9x/2000/XP
+#
+
+!ifndef BORLAND_DIR
+BORLAND_DIR_Not_Defined:
+   @echo .
+   @echo You must define environment variable BORLAND_DIR to compile.
+!endif
+
+PRODUCT = bacrd
+PRODUCT_EXE = $(PRODUCT).exe
+
+# Choose the Data Link Layer to Enable
+DEFINES = -DBACDL_BIP=1;TSM_ENABLED=1;USE_INADDR=1;BIP_DEBUG
+
+SRCS = main.c \
+       ..\..\rd.c \
+       ..\..\ports\win32\bip-init.c \
+       ..\..\filename.c \
+       ..\..\bip.c  \
+       ..\..\demo\handler\txbuf.c  \
+       ..\..\demo\handler\noserv.c  \
+       ..\..\demo\handler\h_whois.c  \
+       ..\..\demo\handler\h_iam.c  \
+       ..\..\demo\handler\h_rp.c  \
+       ..\..\demo\handler\s_whois.c  \
+       ..\..\bacdcode.c \
+       ..\..\bacapp.c \
+       ..\..\bacstr.c \
+       ..\..\bactext.c \
+       ..\..\indtext.c \
+       ..\..\bigend.c \
+       ..\..\whois.c \
+       ..\..\iam.c \
+       ..\..\rp.c \
+       ..\..\wp.c \
+       ..\..\arf.c \
+       ..\..\awf.c \
+       ..\..\demo\object\bacfile.c \
+       ..\..\demo\object\device.c \
+       ..\..\demo\object\ai.c \
+       ..\..\demo\object\ao.c \
+       ..\..\datalink.c \
+       ..\..\tsm.c \
+       ..\..\address.c \
+       ..\..\abort.c \
+       ..\..\reject.c \
+       ..\..\bacerror.c \
+       ..\..\apdu.c \
+       ..\..\npdu.c
+
+OBJS = $(SRCS:.c=.obj)
+
+# Compiler definitions
+#
+CC = $(BORLAND_DIR)\bin\bcc32 +bcc32.cfg
+#LINK = $(BORLAND_DIR)\bin\tlink32
+LINK = $(BORLAND_DIR)\bin\ilink32
+TLIB = $(BORLAND_DIR)\bin\tlib
+
+#
+# Include directories
+#
+CC_DIR     = $(BORLAND_DIR)\BIN
+INCL_DIRS = -I$(BORLAND_DIR)\include;..\..\;..\..\demo\object\;..\..\demo\handler\;..\..\ports\win32\;.
+
+CFLAGS = $(INCL_DIRS) $(CS_FLAGS) $(DEFINES)
+
+# Libraries
+#
+C_LIB_DIR = $(BORLAND_DIR)\lib
+
+LIBS = $(C_LIB_DIR)\IMPORT32.lib \
+$(C_LIB_DIR)\CW32MT.lib
+
+#
+# Main target
+#
+# This should be the first one in the makefile
+
+all : bcc32.cfg $(PRODUCT_EXE)
+
+# Linker specific: the link below is for BCC linker/compiler. If you link
+# with a different linker - please change accordingly.
+#
+
+# need a temp response file (@&&) because command line is too long
+$(PRODUCT_EXE) : $(OBJS)
+	@echo Running Linker for $(PRODUCT_EXE)
+	$(LINK)	-L$(C_LIB_DIR) -m -c -s -v @&&| # temp response file, starts with |
+	  $(BORLAND_DIR)\lib\c0x32.obj $**  # $** lists each dependency
+	$<
+	$*.map
+	$(LIBS)
+| # end of temp response file
+
+#
+# Utilities
+
+clean :
+	@echo Deleting obj files, $(PRODUCT_EXE) and map files.
+#	del $(OBJS) # command too long, bummer!
+	del *.obj
+	del ..\..\*.obj
+	del ..\..\demo\handler\*.obj
+	del ..\..\demo\object\*.obj
+	del ..\..\ports\win32\*.obj
+	del $(PRODUCT_EXE)
+	del *.map
+	del bcc32.cfg
+
+#
+# Generic rules
+#
+.SUFFIXES: .cpp .c .sbr .obj
+
+#
+# cc generic rule
+#
+.c.obj:
+	$(CC) -o$@ $<
+
+# Compiler configuration file
+bcc32.cfg :
+   Copy &&|
+$(CFLAGS) 
+-c 
+-y     #include line numbers in OBJ's
+-v     #include debug info
+-w+    #turn on all warnings
+-Od    #disable all optimizations
+#-a4    #32 bit data alignment
+#-M     # generate link map
+#-ls    # linker options
+#-WM-   #not multithread
+-WM    #multithread
+-w-aus # ignore warning assigned a value that is never used
+-w-sig # ignore warning conversion may lose sig digits
+| $@
+
+# EOF: makefile

bacnet-stack/rd.c

@@ -37,15 +37,15 @@
 #include "bacdef.h"
 #include "rd.h"
 
-// encode service
+/* encode service */
 int rd_encode_apdu(
   uint8_t *apdu,
   uint8_t invoke_id,
   BACNET_REINITIALIZED_STATE state,
   BACNET_CHARACTER_STRING *password)
 {
-  int len = 0; // length of each encoding
+  int len = 0; /* length of each encoding */
-  int apdu_len = 0; // total length of the apdu, return value
+  int apdu_len = 0; /* total length of the apdu, return value */
 
   if (apdu)
   {
@@ -57,16 +57,20 @@ int rd_encode_apdu(
     len = encode_context_enumerated(&apdu[apdu_len], 0,
       state);
     apdu_len += len;
-    /* FIXME: must be at least 1 character, limited to 20 characters */
+    /* optional password */
-    len = encode_context_character_string(&apdu[apdu_len], 1,
+    if (password)
-      password);
+    {
-    apdu_len += len;
+      /* FIXME: must be at least 1 character, limited to 20 characters */
+      len = encode_context_character_string(&apdu[apdu_len], 1,
+        password);
+      apdu_len += len;
+    }
   }
 
   return apdu_len;
 }
 
-// decode the service request only
+/* decode the service request only */
 int rd_decode_service_request(
   uint8_t *apdu,
   unsigned apdu_len,
@@ -76,8 +80,9 @@ int rd_decode_service_request(
   unsigned len = 0;
   uint8_t tag_number = 0;
   uint32_t len_value_type = 0;
+  int value = 0;
 
-  // check for value pointers
+  /* check for value pointers */
   if (apdu_len)
   {
     /* Tag 0: reinitializedStateOfDevice */
@@ -85,13 +90,18 @@ int rd_decode_service_request(
       return -1;
     len += decode_tag_number_and_value(&apdu[len],
         &tag_number, &len_value_type);
-    len += decode_enumerated(&apdu[len], len_value_type, (int*)state);
+    len += decode_enumerated(&apdu[len], len_value_type, &value);
-    // Tag 1: password
+    if (state)
-    if (!decode_is_context_tag(&apdu[len], 1))
+      *state = value;
-      return -1;
+    /* Tag 1: password - optional */
-    len += decode_tag_number_and_value(&apdu[len],
+    if (len < apdu_len)
-        &tag_number, &len_value_type);
+    {
-    len += decode_character_string(&apdu[len], len_value_type, password);
+      if (!decode_is_context_tag(&apdu[len], 1))
+        return -1;
+      len += decode_tag_number_and_value(&apdu[len],
+          &tag_number, &len_value_type);
+      len += decode_character_string(&apdu[len], len_value_type, password);
+    }
   }
 
   return (int)len;