C:\Program Files (x86)\MPT>modpoll.exe -c 4 -r 2000 -m tcp 192.168.0.100
modpoll 3.6 - FieldTalk(tm) Modbus(R) Master Simulator
Copyright (c) 2002-2018 proconX Pty Ltd
Visit https://www.modbusdriver.com for Modbus libraries and tools.

Protocol configuration: MODBUS/TCP
Slave configuration...: address = 1, start reference = 2000, count = 4
Communication.........: 192.168.0.100, port 502, t/o 1.00 s, poll rate 1000 ms
Data type.............: 16-bit register, output (holding) register table

-- Polling slave... (Ctrl-C to stop)
[2000]: 0
[2001]: 0
[2002]: 0
[2003]: 0
-- Polling slave... (Ctrl-C to stop)
[2000]: 0
[2001]: 0
[2002]: 0
[2003]: 0
-- Polling slave... (Ctrl-C to stop)
[2000]: 0
[2001]: 0
[2002]: 0
[2003]: 0
-- Polling slave... (Ctrl-C to stop)
[2000]: 0
[2001]: 0
[2002]: 0
[2003]: 0
-- Polling slave... (Ctrl-C to stop)
^C
C:\Program Files (x86)\MPT>

Usage: modpoll [OPTIONS] SERIALPORT|HOST [WRITEVALUES...]
Аргументы:
SERIALPORT    Последовательный порт, когда используется протокол Modbus ASCII или Modbus RTU.
              COM1, COM2 ...                на Windows
              /dev/ttyS0, /dev/ttyS1 ...    на Linux
HOST          Имя хоста или IP-адрес, когда используется протокол MDBUS/TCP.
WRITEVALUES   Список значений для записи. Если ничего не указано (по умолчанию) то modpoll
              прочитает данные.
Основные опции:
-m ascii      Протокол Modbus ASCII.
-m rtu        Протокол RTU (по умолчанию, если SERIALPORT содержит \ или COM).
-m tcp        Протокол MODBUS/TCP (иначе по умолчанию).
-m udp        MODBUS UDP.
-m enc        Modbus RTU, инкапсулированный через TCP.
-a #          Slave address (1-255 для serial, 0-255 для TCP, 1 по умолчанию).
-r #          Начальный адрес значений (1-65536, по умолчанию 100).
-c #          Количество значений для чтения (1-125, 1 по умолчанию).
-t 0          Тип данных дискретный выход (coil).
-t 1          Тип данных дискретный вход.
-t 3          Тип данных 16-битный входной регистр.
-t 3:hex      Тип данных 16-битный входной регистр с HEX-отображением.
-t 3:int      Тип данных 32-битный integer в таблице входных регистров.
-t 3:mod      Тип данных 32-битный module 10000 в таблице входных регистров.
-t 3:float    Тип данных 32-битный float в таблице входных регистров.
-t 4          Тип данных 16-битный регистр выхода (holding), по умолчанию.
-t 4:hex      Тип данных 16-битный регистр выхода (holding), с HEX-отображением.
-t 4:int      Тип данных 32-битный integer в таблице выходных регистров (holding).
-t 4:mod      Тип данных 32-битный module 10000 в таблице выходных регистров (holding).
-t 4:float    Тип данных 32-битный float в таблице выходных регистров (holding).
-i            Slave работает с 32-битными integer с порядком байт big-endian.
-f            Slave работает с 32-битными float с порядком байт big-endian.
-e            Использовать 32-битный режим регистра Daniel/Enron (подразумевает -i и -f).
-0            Начальный адрес отсчитывается от 0 (адресация PDU) вместо 1.
-1            Опросить только один раз, иначе опрашивать с интервалом poll rate.
-l #          Интервал опроса (poll rate) в мс, (по умолчанию 1000).
-o #          Таймаут в секундах (0.01 .. 10.0, по умолчанию 1.0 секунда).
Опции для MODBUS/TCP, UDP и RTU через TCP:
-p #          номер порта IP (по умолчанию 502).
Опции для Modbus ASCII и Modbus RTU:
-b #          Скорость, baudrate (например 9600, 19200, ...). По умолчанию 19200.
-d #          Количество бит в фрейме (7 или 8 для протокола ASCII, 8 для RTU).
-s #          Количество stop-бит (1 или 2, по умолчанию 1).
-p none       Без контроля четности.
-p even       Контроль по четности (по умолчанию).
-p odd        Контроль по нечетности.
-4 #          Режим RS-485, RTS включен при передаче и еще # мс после этого.

static void modbusTask(void *argument)
{
   bool bModBusInitOK;
   eMBErrorCode xStatus;

   /* Код инициализации для LWIP */
   MX_LWIP_Init();
   
   // Инициализация стека Modbus:
   if(eMBTCPInit(MB_TCP_PORT_USE_DEFAULT) != MB_ENOERR)
   {
      umsg("FreeMODBUS: can't initialize modbus stack!\n");
      bModBusInitOK = false;
   }
   else if (eMBEnable() != MB_ENOERR)
   {
      umsg("FreeMODBUS: can't enable modbus stack!\n");
   }
   else
   {
      bModBusInitOK = true;
   }
   
   /* Бесконечный цикл */
   for(;;)
   {
      if (bModBusInitOK)
      {
         xStatus = eMBPoll();
         if (MB_ENOERR != xStatus)
         {
            umsg("Ошибка FreeMODBUS: %i\n", xStatus);
         }
         CheckLink();
      }
   }
}

#define MB_TCP_DEBUG     1

// Этот вариант работает (блокировка на мьютексе средствами RTOS):

//#define  OS_ENTER_CRITICAL()     sys_arch_protect()

//#define  OS_EXIT_CRITICAL()      sys_arch_unprotect(NULL)

// Этот вариант тоже работает (жесткая блокировка с прямым запретом

// прерываний и поддержкой вложенности):

#define  OS_ENTER_CRITICAL()     vPortEnterCritical()

#define  OS_EXIT_CRITICAL()      vPortExitCritical()

// Можно даже совсем закомментировать макросы OS_ENTER_CRITICAL и OS_EXIT_CRITICAL.

#define ENTER_CRITICAL_SECTION(  )   OS_ENTER_CRITICAL()

#define EXIT_CRITICAL_SECTION(  )    OS_EXIT_CRITICAL()

#include "settings.h"

#if (MODBUS_EVENT_PORT == MODBUS_EVENT_WITH_QUEUE)

   #include "portevent-with-queue.c"

#elif (MODBUS_EVENT_PORT == MODBUS_EVENT_WITH_MBOX)

   #include "portevent-with-mbox.c"

#else

   #error "None Modbus portevent selected!"

#endif

#define MB_FRAME_LOG_BUFSIZE 512

#ifdef MB_TCP_DEBUG

void prvvMBTCPLogFrame( UCHAR * pucMsg, UCHAR * pucFrame, USHORT usFrameLen )
{
   int             i;
   int             res = 0;
   int             iBufPos = 0;
   size_t          iBufLeft = MB_FRAME_LOG_BUFSIZE;
   static CHAR     arcBuffer[MB_FRAME_LOG_BUFSIZE];

   assert( pucFrame != NULL );

   for( i = 0; i < usFrameLen; i++ )
   {
      /* Выводит на печать некоторую дополнительную информацию о фрейме. */
      switch ( i )
      {
      case 0:
         /* TID = Transaction Identifier (идентификатор трансляции). */
         res = snprintf( &arcBuffer[iBufPos], iBufLeft, "| TID = " );
         break;
      case 2:
         /* PID = Protocol Identifier (идентификатор протокола). */
         res = snprintf( &arcBuffer[iBufPos], iBufLeft, " | PID = " );
         break;
      case 4:
         /* Длина */
         res = snprintf( &arcBuffer[iBufPos], iBufLeft, " | LEN = " );
         break;
      case 6:
         /* UID = Unit Identifier (идентификатор юнита). */
         res = snprintf( &arcBuffer[iBufPos], iBufLeft, " | UID = " );
         break;
      case 7:
         /* MB Function Code (код функции MODBUS). */
         res = snprintf( &arcBuffer[iBufPos], iBufLeft, "|| FUNC = " );
         break;
      case 8:
         /* MB PDU rest (остаток: данные PDU). */
         res = snprintf( &arcBuffer[iBufPos], iBufLeft, " | DATA = " );
         break;
      default:
         res = 0;
         break;
      }
      if( res == -1 )
      {
          break;
      }
      else
      {
          iBufPos += res;
          iBufLeft -= res;
      }

      /* Вывод на печать данных. */
      res = snprintf( &arcBuffer[iBufPos], iBufLeft, "%02X", pucFrame[i] );
      if( res == -1 )
      {
          break;
      }
      else
      {
          iBufPos += res;
          iBufLeft -= res;
      }
   }

   if( res != -1 )
   {
       /* Добавление конца строки фрейма. */
       res = snprintf( &arcBuffer[iBufPos], iBufLeft, " |\r\n" );
       if( res != -1 )
       {
           vMBPortLog( MB_LOG_DEBUG, (const CHAR*)pucMsg, "%s", arcBuffer );
       }
   }
}

void vMBPortLog( eMBPortLogLevel eLevel,
                 const CHAR * szModule,
                 const CHAR * szFmt,
                 ... )
{
   va_list args;
   static const char *arszLevel2Str[] = {"DEBUG", "INFO", "WARN", "ERROR"};
   static char mbtmpbuf[UPRINTF_BUF_SIZE];
   int16_t outsize;
   
   va_start( args, szFmt );
   outsize = vsprintf(mbtmpbuf, szFmt, args);
   mbtmpbuf[outsize+1] = 0;
   va_end( args );
   umsg("%s: %s: %s", arszLevel2Str[eLevel], szModule, mbtmpbuf);
}

#endif

int16_t uprintf (const char *fmt, ...)
{
   int16_t outsize;
   va_list ap;

   // Вернет ошибку, если формат является указателем NULL:
   if (!fmt) { return -1; }
   // Вернет ошибку, если строка превышает размер буфера, с учетом
   // необходимых дополнительных 2 символов: CR и нулевой терминатор ASCIIZ:
   if (UPRINTF_BUF_SIZE-2 < strlen(fmt)) { return -1; }

   va_start (ap,fmt);
   outsize = vsprintf(strbuf,fmt,ap);
   strbuf[outsize+1] = 0;
   va_end (ap);

   usartputs(strbuf);
   xSemaphoreGive(usarttxSemaphore);
   return outsize;
}

//***************************************

//* Макрос umsg выводит форматированный текст в UART точно так же,

//* как это делает printf в стандартный вывод. Аргумент fmt содержит

//* набор спецификаторов преобразования, директивы и обычные символы,

//* которые используются для управления выводом.

//*

//* Параметры:

//*   fmt      текст, который может содержать спецификаторы формата

//*   ...      список аргументов

//*

//* Возвращаемое значение: количество переданных символов, за

//* исключением CR. Если произошла ошибка, то будет возвращено

//* отрицательное значение.

//*

//* Команды управления:

//* '\e' escape character. It maps to the ASCII Escape code, 27

//* '\f' form feed/flush screen

//* '\n' new line

//* '\r' carriage return

//* '\t' horizontal tab

//* '\v' vertical tab

//*/

#define umsg(...) \

        { \

            uprintf (__VA_ARGS__); \

        }