1
+ #include "modbus.h"
2
+
3
+ typedef enum
4
+ {
5
+ STATE_RX_INIT , /*!< Receiver is in initial state. */
6
+ STATE_RX_IDLE , /*!< Receiver is in idle state. */
7
+ STATE_RX_RCV , /*!< Frame is beeing received. */
8
+ STATE_RX_ERROR /*!< If the frame is invalid. */
9
+ } eMBRcvState ;
10
+
11
+ typedef enum {
12
+ STATE_TX_IDLE , /*!< Transmitter is in idle state. */
13
+ STATE_TX_XMIT /*!< Transmitter is in transfer state. */
14
+ } eMBSndState ;
15
+
16
+ /* ----------------------- Static variables ---------------------------------*/
17
+ static volatile eMBSndState eSndState ;
18
+ static volatile eMBRcvState eRcvState ;
19
+ static uint8_t ucMbId ;
20
+ static uint16_t usframeT35_50us ;
21
+ volatile uint32_t * puiTimeTicks ;
22
+ volatile uint32_t usFrameIdleTicks ;
23
+ static volatile uint8_t ucMasterRTURcvBuf [MB_SER_PDU_SIZE_MAX ];
24
+ static volatile uint16_t usRcvBuffPos ;
25
+
26
+ static const uint8_t aucCRCHi [] = {
27
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x01 , 0xC0 , 0x80 , 0x41 ,
28
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x00 , 0xC1 , 0x81 , 0x40 ,
29
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x01 , 0xC0 , 0x80 , 0x41 ,
30
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 ,
31
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x01 , 0xC0 , 0x80 , 0x41 ,
32
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x00 , 0xC1 , 0x81 , 0x40 ,
33
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x00 , 0xC1 , 0x81 , 0x40 ,
34
+ 0x01 , 0xC0 , 0x80 , 0x41 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x00 , 0xC1 , 0x81 , 0x40 ,
35
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x01 , 0xC0 , 0x80 , 0x41 ,
36
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x00 , 0xC1 , 0x81 , 0x40 ,
37
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x01 , 0xC0 , 0x80 , 0x41 ,
38
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 ,
39
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x01 , 0xC0 , 0x80 , 0x41 ,
40
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 ,
41
+ 0x01 , 0xC0 , 0x80 , 0x41 , 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 ,
42
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 ,
43
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x01 , 0xC0 , 0x80 , 0x41 ,
44
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x00 , 0xC1 , 0x81 , 0x40 ,
45
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x01 , 0xC0 , 0x80 , 0x41 ,
46
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 ,
47
+ 0x00 , 0xC1 , 0x81 , 0x40 , 0x01 , 0xC0 , 0x80 , 0x41 , 0x01 , 0xC0 , 0x80 , 0x41 ,
48
+ 0x00 , 0xC1 , 0x81 , 0x40
49
+ };
50
+
51
+ static const uint8_t aucCRCLo [] = {
52
+ 0x00 , 0xC0 , 0xC1 , 0x01 , 0xC3 , 0x03 , 0x02 , 0xC2 , 0xC6 , 0x06 , 0x07 , 0xC7 ,
53
+ 0x05 , 0xC5 , 0xC4 , 0x04 , 0xCC , 0x0C , 0x0D , 0xCD , 0x0F , 0xCF , 0xCE , 0x0E ,
54
+ 0x0A , 0xCA , 0xCB , 0x0B , 0xC9 , 0x09 , 0x08 , 0xC8 , 0xD8 , 0x18 , 0x19 , 0xD9 ,
55
+ 0x1B , 0xDB , 0xDA , 0x1A , 0x1E , 0xDE , 0xDF , 0x1F , 0xDD , 0x1D , 0x1C , 0xDC ,
56
+ 0x14 , 0xD4 , 0xD5 , 0x15 , 0xD7 , 0x17 , 0x16 , 0xD6 , 0xD2 , 0x12 , 0x13 , 0xD3 ,
57
+ 0x11 , 0xD1 , 0xD0 , 0x10 , 0xF0 , 0x30 , 0x31 , 0xF1 , 0x33 , 0xF3 , 0xF2 , 0x32 ,
58
+ 0x36 , 0xF6 , 0xF7 , 0x37 , 0xF5 , 0x35 , 0x34 , 0xF4 , 0x3C , 0xFC , 0xFD , 0x3D ,
59
+ 0xFF , 0x3F , 0x3E , 0xFE , 0xFA , 0x3A , 0x3B , 0xFB , 0x39 , 0xF9 , 0xF8 , 0x38 ,
60
+ 0x28 , 0xE8 , 0xE9 , 0x29 , 0xEB , 0x2B , 0x2A , 0xEA , 0xEE , 0x2E , 0x2F , 0xEF ,
61
+ 0x2D , 0xED , 0xEC , 0x2C , 0xE4 , 0x24 , 0x25 , 0xE5 , 0x27 , 0xE7 , 0xE6 , 0x26 ,
62
+ 0x22 , 0xE2 , 0xE3 , 0x23 , 0xE1 , 0x21 , 0x20 , 0xE0 , 0xA0 , 0x60 , 0x61 , 0xA1 ,
63
+ 0x63 , 0xA3 , 0xA2 , 0x62 , 0x66 , 0xA6 , 0xA7 , 0x67 , 0xA5 , 0x65 , 0x64 , 0xA4 ,
64
+ 0x6C , 0xAC , 0xAD , 0x6D , 0xAF , 0x6F , 0x6E , 0xAE , 0xAA , 0x6A , 0x6B , 0xAB ,
65
+ 0x69 , 0xA9 , 0xA8 , 0x68 , 0x78 , 0xB8 , 0xB9 , 0x79 , 0xBB , 0x7B , 0x7A , 0xBA ,
66
+ 0xBE , 0x7E , 0x7F , 0xBF , 0x7D , 0xBD , 0xBC , 0x7C , 0xB4 , 0x74 , 0x75 , 0xB5 ,
67
+ 0x77 , 0xB7 , 0xB6 , 0x76 , 0x72 , 0xB2 , 0xB3 , 0x73 , 0xB1 , 0x71 , 0x70 , 0xB0 ,
68
+ 0x50 , 0x90 , 0x91 , 0x51 , 0x93 , 0x53 , 0x52 , 0x92 , 0x96 , 0x56 , 0x57 , 0x97 ,
69
+ 0x55 , 0x95 , 0x94 , 0x54 , 0x9C , 0x5C , 0x5D , 0x9D , 0x5F , 0x9F , 0x9E , 0x5E ,
70
+ 0x5A , 0x9A , 0x9B , 0x5B , 0x99 , 0x59 , 0x58 , 0x98 , 0x88 , 0x48 , 0x49 , 0x89 ,
71
+ 0x4B , 0x8B , 0x8A , 0x4A , 0x4E , 0x8E , 0x8F , 0x4F , 0x8D , 0x4D , 0x4C , 0x8C ,
72
+ 0x44 , 0x84 , 0x85 , 0x45 , 0x87 , 0x47 , 0x46 , 0x86 , 0x82 , 0x42 , 0x43 , 0x83 ,
73
+ 0x41 , 0x81 , 0x80 , 0x40
74
+ };
75
+
76
+ uint16_t usMBCRC16 (uint8_t * pucFrame , uint16_t usLen ) {
77
+ uint8_t ucCRCHi = 0xFF ;
78
+ uint8_t ucCRCLo = 0xFF ;
79
+ int iIndex ;
80
+
81
+ while (usLen -- ) {
82
+ iIndex = ucCRCLo ^ * (pucFrame ++ );
83
+ ucCRCLo = (uint8_t )(ucCRCHi ^ aucCRCHi [iIndex ]);
84
+ ucCRCHi = aucCRCLo [iIndex ];
85
+ }
86
+ return (uint16_t )(ucCRCHi << 8 | ucCRCLo );
87
+ }
88
+
89
+ void mb_init (uint8_t id , uint32_t boudrate , volatile uint32_t * time_base ) {
90
+ ucMbId = id ;
91
+ puiTimeTicks = time_base ;
92
+ if (boudrate > 19200 ) {
93
+ usframeT35_50us = 35 ;
94
+ } else {
95
+ usframeT35_50us = (7UL * 220000UL ) / (2UL * boudrate );
96
+ }
97
+ }
98
+
99
+ void mb_put_rec_data (uint8_t data ) {
100
+ usFrameIdleTicks = * puiTimeTicks ;
101
+ ucMasterRTURcvBuf [usRcvBuffPos ++ ] = data ;
102
+ if (usRcvBuffPos == MB_SER_PDU_SIZE_MAX ) {
103
+ mb_get_frame_error_cb (MB_EIO );
104
+ usRcvBuffPos = 0 ;
105
+ }
106
+ }
107
+
108
+ void mb_poll () {
109
+ if ((uint16_t )* puiTimeTicks - usframeT35_50us > usFrameIdleTicks ) {
110
+ if (usRcvBuffPos > MB_SER_PDU_SIZE_MIN && usMBCRC16 ((uint8_t * )ucMasterRTURcvBuf , usRcvBuffPos ) == 0 ) {
111
+ mb_get_frame_cb (ucMasterRTURcvBuf [0 ], (uint8_t * )ucMasterRTURcvBuf , usRcvBuffPos - 2 - 1 );
112
+ usRcvBuffPos = 0 ;
113
+ } else if (usRcvBuffPos > 0 ) {
114
+ mb_get_frame_error_cb (MB_EIO );
115
+ usRcvBuffPos = 0 ;
116
+ }
117
+ }
118
+ }
119
+
120
+ void mb_send_frame (uint8_t * frame , uint16_t length ) {
121
+ uint16_t usCRC16 ;
122
+ uint8_t frame_out [length + 2 ];
123
+ memcpy (frame_out , frame , length );
124
+ usCRC16 = usMBCRC16 (frame , length );
125
+ frame_out [length ] = (uint8_t )(usCRC16 & 0xff );
126
+ frame_out [length + 1 ] = (uint8_t )(usCRC16 >> 8 );
127
+ for (uint16_t i = 0 ; i < length + 2 ; i ++ ) {
128
+ mb_send_one_byte (frame_out [i ]);
129
+ }
130
+ }
0 commit comments