1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
#include<stdio.h>
#include<stdlib.h>
#include<unistd.h>
#include<sys/types.h>
#include<sys/stat.h>
#include<fcntl.h>
#include<termios.h>
#include<errno.h>
#include<string.h>

#define FALSE -1
#define TRUE 0

int UART_Open(int fd,char* port);
void UART_Close(int fd);
int UART_Set(int fd,int speed,int flow_ctrl,int databits,int stopbits,int parity);
int UART_Init(int fd, int speed,int flow_ctrlint ,int databits,int stopbits,char parity);
int UART_Recv(int fd, char *rcv_buf,int data_len);
int UART_Send(int fd, char *send_buf,int data_len);

/*****************************************************************
* 名称： UART0_Open
* 功能： 打开串口并返回串口设备文件描述
* 入口参数： fd :文件描述符 port :串口号(ttyS0,ttyS1,ttyS2)
* 出口参数： 正确返回为1，错误返回为0
*****************************************************************/
int UART_Open(int fd,char* port)
{
    
      fd = open( port, O_RDWR|O_NOCTTY|O_NDELAY);//fopen
      if (FALSE == fd){
        perror("Can't Open Serial Port");
          return(FALSE);
      }
    
    //判断串口的状态是否为阻塞状态
      if(fcntl(fd, F_SETFL, 0) < 0){
        printf("fcntl failed!n");
            return(FALSE);
      } else {
           //    printf("fcntl=%dn",fcntl(fd, F_SETFL,0));
      }
    
     //测试是否为终端设备
      if(0 == isatty(STDIN_FILENO)){
          printf("standard input is not a terminal devicen");
            return(FALSE);
      }
    
      return fd;
}

void UART_Close(int fd)
{
    close(fd);
}

/*******************************************************************
* 名称： UART0_Set
* 功能： 设置串口数据位，停止位和效验位
* 入口参数： fd 串口文件描述符
* speed 串口速度
* flow_ctrl 数据流控制
* databits 数据位 取值为 7 或者8
* stopbits 停止位 取值为 1 或者2
* parity 效验类型 取值为N,E,O,,S
*出口参数： 正确返回为1，错误返回为0
*******************************************************************/
int UART_Set(int fd,int speed,int flow_ctrl,int databits,int stopbits,int parity)
{
    
        int i;
        //    int status;
      int speed_arr[] = { B38400, B19200, B9600, B4800, B2400, B1200, B300,
                   B38400, B19200, B9600, B4800, B2400, B1200, B300
             };
        int name_arr[] = {
             38400, 19200, 9600, 4800, 2400, 1200, 300, 38400,
                   19200, 9600, 4800, 2400, 1200, 300
             };
    struct termios options;

   /*tcgetattr(fd,&options)得到与fd指向对象的相关参数，并将它们保存于options,该函数,还可以测试配置是否正确，该串口是否可用等。若调用成功，函数返回值为0，若调用失败，函数返回值为1.
    */
    if(tcgetattr( fd,&options) != 0){
     perror("SetupSerial 1");
     return(FALSE);
        }
        
        //设置串口输入波特率和输出波特率
    for(i= 0;i < sizeof(speed_arr) / sizeof(int);i++) {     
        if (speed == name_arr[i]) {
                  cfsetispeed(&options, speed_arr[i]);
                  cfsetospeed(&options, speed_arr[i]);
        }
        }    
//修改控制模式，保证程序不会占用串口        
    options.c_cflag |= CLOCAL;
    //修改控制模式，使得能够从串口中读取输入数据
    options.c_cflag |= CREAD;
    //设置数据流控制
    switch(flow_ctrl){
        case 0 : //不使用流控制
            options.c_cflag &= ~CRTSCTS;
            break;    
        case 1 : //使用硬件流控制
            options.c_cflag |= CRTSCTS;
            break;
        case 2 : //使用软件流控制
            options.c_cflag |= IXON | IXOFF | IXANY;
            break;
    }
     //设置数据位
    options.c_cflag &= ~CSIZE; //屏蔽其他标志位
    switch (databits){
        case 5 :
                options.c_cflag |= CS5;
                break;
        case 6    :
            options.c_cflag |= CS6;
            break;
        case 7    :
            options.c_cflag |= CS7;
            break;
        case 8:
            options.c_cflag |= CS8;
            break;
        default:
            fprintf(stderr,"Unsupported data sizen");
            return (FALSE);
    }
     //设置校验位
    switch (parity) {
        case 'n':
        case 'N': //无奇偶校验位。
            options.c_cflag &= ~PARENB;
            options.c_iflag &= ~INPCK;
            break;
        case 'o':
        case 'O': //设置为奇校验
            options.c_cflag |= (PARODD | PARENB);
            options.c_iflag |= INPCK;
            break;
        case 'e':
        case 'E': //设置为偶校验
            options.c_cflag |= PARENB;
            options.c_cflag &= ~PARODD;
            options.c_iflag |= INPCK;
            break;
        case 's':
        case 'S': //设置为空格
            options.c_cflag &= ~PARENB;
            options.c_cflag &= ~CSTOPB;
            break;
        default:
            fprintf(stderr,"Unsupported parityn");
            return (FALSE);
    }
     // 设置停止位
    switch (stopbits){
        case 1:
            options.c_cflag &= ~CSTOPB;
                break;
        case 2:
            options.c_cflag |= CSTOPB;
                break;
        default:
                fprintf(stderr,"Unsupported stop bitsn");
                return (FALSE);
    }
    //修改输出模式，原始数据输出
    options.c_oflag &= ~OPOST;
    //设置等待时间和最小接收字符
    options.c_cc[VTIME] = 1; /* 读取一个字符等待1*(1/10)s */
    options.c_cc[VMIN] = 1; /* 读取字符的最少个数为1 */
   
    //如果发生数据溢出，接收数据，但是不再读取
    tcflush(fd,TCIFLUSH);
   
    //激活配置 (将修改后的termios数据设置到串口中）
    if (tcsetattr(fd,TCSANOW,&options) != 0)
    {
        perror("com set error!/n");
        return (FALSE);
    }
    return (TRUE);
}


int UART_Init(int fd, int speed,int flow_ctrlint ,int databits,int stopbits,char parity)
{
     //设置串口数据帧格式
    if (FALSE == UART_Set(fd,speed,flow_ctrlint,databits,stopbits,parity)) {         
        return FALSE;
        } else {
           return TRUE;
       }
}



/*******************************************************************
* 名称： UART0_Recv
* 功能： 接收串口数据
* 入口参数： fd :文件描述符
* rcv_buf :接收串口中数据存入rcv_buf缓冲区中
* data_len :一帧数据的长度
* 出口参数： 正确返回为1，错误返回为0
*******************************************************************/
int UART_Recv(int fd, char *rcv_buf,int data_len)
{
    int len,fs_sel;
    fd_set fs_read;
    
    struct timeval time;
    
    FD_ZERO(&fs_read);
    FD_SET(fd,&fs_read);
    
    time.tv_sec = 10;
    time.tv_usec = 0;
    
    //使用select实现串口的多路通信
    fs_sel = select(fd+1,&fs_read,NULL,NULL,&time);
    if(fs_sel){
     len = read(fd,rcv_buf,data_len);    
     return len;
        } else {
        return FALSE;
    }    
}

/*******************************************************************
* 名称： UART0_Send
* 功能： 发送数据
* 入口参数： fd :文件描述符
* send_buf :存放串口发送数据
* data_len :一帧数据的个数
* 出口参数： 正确返回为1，错误返回为0
*******************************************************************/
int UART_Send(int fd, char *send_buf,int data_len)
{
    int ret;
    
    ret = write(fd,send_buf,data_len);
    if (data_len == ret ){    
     return ret;
    } else {
     tcflush(fd,TCOFLUSH);
     return FALSE;
        
    }
    
}

//协议的打包
//协议的解析


int main(int argc, char **argv)
{
    int fd = FALSE;             
    int ret;                          
    char rcv_buf[512];
    int i;
    if(argc != 2){
     printf("Usage: %s /dev/ttySn n",argv[0]);    
     return FALSE;    
    }
    fd = UART_Open(fd,argv[1]);
    if(FALSE == fd){    
     printf("open errorn");    
     exit(1);     
    }
    ret = UART_Init(fd,9600,0,8,1,'N');
    if (FALSE == fd){    
     printf("Set Port Errorn");    
     exit(1);
    }

#if 1
    while(1)
    {
        // ret = UART_Send(fd,"hellorn",7);
        // if(FALSE == ret)
        // {
        //     printf("write error!n");
        //     exit(1);
        // }
        memset(rcv_buf,0,sizeof(rcv_buf));
        ret = UART_Recv(fd, rcv_buf,7);    
        if( ret > 0)
        {       
            printf("%s",rcv_buf);    
        } 
        else 
        {    
            printf("cannot receive data1n"); 
            exit(1);
        }
        sleep(1);
    }
#else
    ret = UART_Send(fd,"*IDN?n",6);
    if(FALSE == ret){
     printf("write error!n");
     exit(1);
    }
    
    printf("command: %sn","*IDN?");
    memset(rcv_buf,0,sizeof(rcv_buf));
    for(i=0;;i++)
    {
     ret = UART_Recv(fd, rcv_buf,512);    
         if( ret > 0){
         rcv_buf[ret]='';        
         printf("%s",rcv_buf);    
     } else {    
     printf("cannot receive data1n");    
            break;
     }
     if('n' == rcv_buf[ret-1])
         break;
    }
#endif
    UART_Close(fd);
    return 0;
}