uart 串口

#include <stdio.h>      /*标准输入输出定义*/
#include <stdlib.h>
#include <unistd.h>     /*Unix标准函数定义*/
#include <sys/types.h>  
#include <sys/stat.h>   
#include <fcntl.h>      /*文件控制定义*/
#include <termios.h>    /*PPSIX终端控制定义*/
#include <errno.h>      /*错误号定义*/
#include <getopt.h>
#include <string.h>
#include <sys/mman.h>  
#include <sys/ioctl.h>

#define FALSE 1
#define TRUE 0
char *recchr="We received:\"";

#define rcvTimeOut 500

void print_usage();

int write_num = 0;
int read_num = 0;

int speed_arr[] = { 
	B921600, B460800, B230400, B115200, B57600, B38400, B19200, 
	B9600, B4800, B2400, B1200, B300, 
};

int name_arr[] = {
	921600, 460800, 230400, 115200, 57600, 38400,  19200,  
	9600,  4800,  2400,  1200,  300,  
};
/*
	*@param  fd     类型  int  打开的串口文件句柄*
	*@param  speed  类型  int  ÉèÖô®¿Ú²¨ÌØÂÊ
*/

void set_speed(int fd, int speed)
{

		int   i;
		int   status;
		struct termios   Opt;
		tcgetattr(fd, &Opt);
		
	for ( i= 0;  i < sizeof(speed_arr) / sizeof(int);  i++)
	 {
		if  (speed == name_arr[i])
		{
			tcflush(fd, TCIOFLUSH);
			cfsetispeed(&Opt, speed_arr[i]);
			cfsetospeed(&Opt, speed_arr[i]);
			status = tcsetattr(fd, TCSANOW, &Opt);
			if  (status != 0)
				{
					perror("tcsetattr fd1");
					return;
				}
		tcflush(fd,TCIOFLUSH);
  	 	}

		if (i == 12)
		{
			printf("\tSorry, please set the correct baud rate!\n\n");
			print_usage(stderr, 1);
		}
	}
}
/*
	*@brief   设置串口数据位，停止位和效验位
	*@param  fd     类型  int  打开的串口文件句柄*
	*@param  databits 类型  int 数据位   取值 为 7 或者8*
	*@param  stopbits 类型  int 停止位   取值为 1 或者2*
	*@param  parity  类型  int  效验类型 取值为N,E,O,,S
*/



	struct termios options;
	
	if  ( tcgetattr( fd,&options)  !=  0)
	{
		perror("SetupSerial 1");
		return(FALSE);
	}
	
	options.c_cflag &= ~CSIZE ;


	switch (databits) /*设置数据位数*/ 
	{
		case 7:			
			options.c_cflag |= CS7;
			break;
		case 8:
			options.c_cflag |= CS8;
			break;
		default:
			fprintf(stderr,"Unsupported data size\n");

		return (FALSE);
	}
	
	switch (parity)
	{
		case 'n':
		case 'N':
			options.c_cflag &= ~PARENB;   /* Clear parity enable */
			options.c_iflag &= ~INPCK;     /* Enable parity checking */
			break;
		case 'o':
		case 'O':
			options.c_cflag |= (PARODD | PARENB);  /* 设置为奇效验*/
			options.c_iflag |= INPCK ;             /* Disnable parity checking */
			break;
		case 'e':
		case 'E':
			options.c_cflag |= PARENB;     /* Enable parity */
			options.c_cflag &= ~PARODD;   /* 转换为偶效验*/ 
			options.c_iflag |= INPCK ;       /* Disnable parity checking */
			break;
		case 'm':
		case 'M':
			options.c_cflag |= PARENB | CMSPAR | PARODD ;
		//	options.c_cflag |= PARENB | CMSPAR;
	    //	options.c_cflag &= ~PARODD;
		//	options.c_cflag |= ~INPCK;
			break;
		case 'S':	
		case 's':  /*as no parity*/
	//		options.c_cflag &= ~PARENB;
	//		options.c_cflag &= ~CSTOPB;
			options.c_cflag |= PARENB | CMSPAR  ;
			
			break;
		default:
			fprintf(stderr,"Unsupported parity\n");

			return (FALSE);
	}
 	/* 设置停止位*/  
  	switch (stopbits)
	 {
   		case 1:
    		options.c_cflag &= ~CSTOPB;
		  	break;
 		case 2:
  			options.c_cflag |= CSTOPB;
		  	break;
 		default:
  			fprintf(stderr,"Unsupported stop bits\n");
		
  		return (FALSE);
 	}
  	/* Set input parity option */
  	if (parity != 'n')
	{
    	options.c_iflag |= INPCK;
	}
  	options.c_cc[VTIME] = 150; // 15 seconds
    options.c_cc[VMIN] = 0;
    //options.c_iflag &=~(IXON|ISTRIP);
	//options.c_iflag |=(ICRNL|BRKINT|INPCK);
	//options.c_oflag &=~(OPOST);
	//options.c_lflag &= ~(ICANON|ECHO |IEXTEN|ISIG);
	//options.c_cflag|=(CS8|CLOCAL|CREAD|PARENB);
	//options.c_lflag |=(ICANON|ECHO|ECHOE);
	
	options.c_cflag|=CLOCAL | CREAD;
	options.c_lflag &= ~(ICANON|ECHO |ECHOE|ISIG);
	options.c_oflag &=~(OPOST);
	options.c_iflag &=~(ICRNL|BRKINT|INPCK|ISTRIP|IXON);
  	tcflush(fd,TCIOFLUSH); /* Update the options and do it NOW */

  	if (tcsetattr(fd,TCSANOW,&options) != 0) 
	{
    	perror("SetupSerial 3");
  		return (FALSE);
 	}
	return (TRUE);
}
/**
	*@breif 打开串口
*/
int OpenDev(char *Dev)
{
	int fd = open( Dev, O_RDWR | O_NOCTTY | O_NONBLOCK );         //O_RDWR | O_NOCTTY | O_NDELAY

 	if (-1 == fd)
	{ /*设置数据位数*/
   		printf("Can't Open Serial Port\n");
   		return -1;
	}
	else
	{
		return fd;
	}
}
int set_port(int fd)
{
	if (fd > 0)
	{
		set_speed(fd, 4800);
		if(fcntl(fd, F_SETFL, FNDELAY) < 0)
		{
			printf("failed fcntl\n");
		}
		set_Parity(fd,8,1,'N');
		//set_Parity(fd,8,1,'e');
	}
	else
	{
		exit(1);
	}
	return fd;
}
int readDataTty(int fd, char *rcv_buf, int TimeOut, int Len)
{
	int retval;
	fd_set rfds;
	struct timeval tv;
	int ret, pos;
	tv.tv_sec = TimeOut / 1000;  //set the rcv wait time  
	tv.tv_usec = TimeOut % 1000 * 1000;  //100000us = 0.1s  
 
	pos = 0;
	while (1)
	{
		FD_ZERO(&rfds);
		FD_SET(fd, &rfds);
		retval = select(fd + 1, &rfds, NULL, NULL, &tv);
		if (retval == -1)
		{
			perror("select()");
			break;
		}
		else if (retval)
		{
			ret = read(fd, rcv_buf + pos, 1);
			if (-1 == ret)
			{
				break;
			}
 
			pos++;
			if (Len <= pos)
			{
				break;
			}
		}
		else
		{
			break;
		}
	}

		return pos;

}