利用软件编程方式,可以更加灵活实现各种非常规的通讯。
由于自行编写的程序在工程师站/操作员站运行,需要占用一定的CUP时间及内存,因此在通讯数据量较大,同时要求通讯速度较快时,由于没有专业通讯软件的“例外报告”机制,建议不要采用自行开发程序的办法。
由于自行编写的程序通常没有“数据缓存”机制,在传送非常重要的数据时应该谨慎使用。
自行编程主要工作为了两方面,一为I/A数据的读写及处理,一为通讯的实现。
通常自行开发通讯软件包括:串口通讯(如智能前端)、TCP/IP通讯(如实时数据传送)、FTP通讯(如定期传送报表文本)、基于TCP/IP的MODBUS协议通讯。
以上几种通讯方式在通讯的实现方式上不同,但在I/A’s内数据的读写操作是一样的,接下来将阐述软件编程时的主要函数及方式:
1.I/A’s数据的读写及处理
Foxboro公司I/A’s系统提供强大的内部编程函数(C函数、FORTRAN),主要包括有:
lOMCALL函数–实现I/A’s系统内部数据的读写操作。
主要函数有:
2intgetval(char*name,intobj_type,intimport,char*value,unsignedint*status,intdata_len)
此函数实现单个数据的读操作。
2intom_getval(char*name,intobj_type,intimport,charvalue,unsignedint*status,intdata_len,PSAP_ADDR*psap_ptr)
此函数实现单个数据的读操作,它使用PSAP指针。
2intsetval(char*name,intobj_type,intimport,char*value,unsigned*status,intdata_len)
此函数实现单个数据的写操作。
2intom_setval(char*name,intobj_type,intimport,char*value,unsigned*status,intdata_len,PASP_ADDR*psap_ptr);
此函数实现单个数据的写操作,它使用PSAP指针。
2intomopen(structom_header_node*om_descriptor,intopen_id)
此函数实现打开一个LIST,为数据的读写操作做准备。
2intomread(intomopen_id,intsize_list,structvalue*var_list)
此函数实现从打开的LIST中读取数据。
2intomwrite(intomopen_id,intsize_list,structvalue*var_list);
此函数实现向打开的LIST中写数据。
2intomclose(intopen_id,structom_header_node*header,structopen_var*var_list,structnet_addr*addr_tbl)
此函数实现关闭一个已经打开的LIST。
2头部文件、OM结构及例程
#include
#include
#include
#include
#include
main()
{
structopen_varin_var_list[8];
structheader_nodein_om_desc;
structnet_adrin_net_adr_tbl[2];
intin_open_id;
intrtn;
floatdelta_temp,delta_fc,delta_df;
structvalue*in_data_list,*temp;
inti;
delta_temp=5.0;
delta_fc=1.0;
delta_df=0.5;
in_om_desc.task_status=OM_R_ACCESS;
in_om_desc.net_adr_tbl_ptr=in_net_adr_tbl;
in_om_desc.size_net_adr_tbl=2;
in_om_desc.open_list_ptr=in_var_list;
in_om_desc.size_open_list=8;
……
}
2特点
使用getval、setval、om_getval、om_setval函数进行编程比较简单,但效率较差;用omopen、omread、omwrite、omclose编程需要复杂的声明,编程比较复杂,但程序通用性好(不要FOXAPI的支持)、效率高。
lFOXAPI函数–实现I/A’s系统内部数据的读写操作及强大的C/S结构编程。
主要函数有:
2intsbopen(int*gw_array,intnument,char*name_array,int*valtyp_array,intacctyp,float*delta_array,intclexit,intrsr,intwsr,float*wdelta_array,int*dset,int*index_array,int*error_array,int*reterr)
此函数实现以连续更新的方式打开一个读写SET。
2intbread(intdset,long*value_array,int*status_array,int*reterr)
此函数实现从一个已经打开SET中读取数据。
2intbwrite(intdset,long*value_array,int*error_array,int*reterr)
此函数实现向一个已经打开SET中写数据。
2intclsset(intdset,int*reterr)
此函数实现关闭一个已经打开SET,释放程序所使用的内存空间,释放对CP中数据的控制权。
2头部函数,FOXAPI结构定义及例程
#include
#include
#include
#include
#include
#include
#include
#defineOBJNUM100
#defineSETNUM20
typedefunion
{
longlval;
shortival;
floatfval;
charbval;
}IAXVAL;
/*PredefinedParameterofI/Avalue*/
staticintgw[SETNUM][OBJNUM];/*GatewayArray*/
charname[SETNUM][OBJNUM][32];/*ObjectNameArray*/
chardesc[SETNUM][OBJNUM][15];/*ObjectdescriptionArray*/
staticintvaltype[SETNUM][OBJNUM];/*ObjectValueTypeArray*/
staticintacctype=1;/*Read-onlyArray*/
staticfloatrdelta[SETNUM][OBJNUM];/*ObjectsReadDeltaArray*/
staticfloatwdelta[SETNUM][OBJNUM];/*ObjectsWriteDeltaArray*/
interror[SETNUM][OBJNUM];/*ObjectsErrorArray*/
intindex[SETNUM][OBJNUM];/*ObjectsIndexesArray*/
intstatus[SETNUM][OBJNUM];/*ObjectsStatusArray*/
IAXVALvalue[SETNUM][OBJNUM];/*ObjectsValueArray*/
staticintrsr=4;/*ReadScanRate*/
staticintwsr=4;/*WriteScanRate*/
staticintclexit=1;/*IgnoredinUNIX*/
intreterr[SETNUM];/*OpenSetreturnErrorCode*/
/*PredefineParameterofutility*/
intset[SETNUM];/*OpenSetNumber*/
intTotal_SET;/*TotalSetNumber*/
intLast_SET_Num;/*LastSetValueNuber*/
intTotal_Num;/*TotalNumberofobjects*/
intTotal_File;/*TotaloutputfilesNumber*/
intINTERVAL;/*Communicateinterval*/
intCol_Num;/*Valuenumberperline*/
main()
{
……scopen(gw[i],k,name[i],valtype[i],acctype,rdelta[i],clexit,rsr,
wsr,wdelta[i],&set[i],index[i],error[i],&reterr[i]);
printf(“ReturnErrorCode=%-dn”,reterr[i]);
printf(“ReturnDataSet=%-dn”,set[i]);
……rtn=bread(set[i],value[i],status[i],&reterr[i]);
if(reterr[i]!=0)
{
printf(“BufferedReadObjectsError%d,%d,%dn”,rtn,
reterr[i],set[i]);
}
……for(i=0;i
{
clsset(set[i],&reterr[i]);
}
……
}
2特点
使用FOXAPI编程比较简单,程序效率也很高,但程序的执行需要FOXAPI的支持,编译好的程序只能在装有FOXAPI的AW、AP机器中运行。PI实时数据库实际上便是利用FOXAPI函数编写的应用程序。
lHICALL函数–实现具有I/A’s风格的人机界面(HUMANINTERFACE)编程,包括显示元素,如:矩形、圆弧、填充色;对话框、菜单结构、鼠标键盘驱动、查询、文件驱动等,事实上,整个I/A’s的人机界面编写既是通过这些函数完成。
lIPCALL函数–实现I/A’s系统内部通讯编程,如:SOE软件等。
lICCAPI函数–实现I/A’s控制处理器CP中CIO的相关操作。
l数学库–提供各种经典数值计算的调用函数。
l物理特性库–提供各种物理特性计算的调用函数,包括水、蒸汽的焓、熵等计算。
2intvpt(floatp,floatt,float*v)
此函数根据蒸汽的压力及温度计算蒸汽的容积。
2inthpt_stm(floatp,floatt,float*h)
此函数根据蒸汽的压力及温度计算蒸汽的焓。
2intspt_stm(floatp,floatt,float*s)
此函数根据蒸汽的压力及温度计算蒸汽的熵。
2inthpt_wtr(floatp,floatt,float*h)
此函数根据水的压力及温度计算水的焓。
2intspt_wtr(floatp,floatt,float*s)
此函数根据水的压力及温度计算水的熵。
2inthpt_air(floatp,floatt,float*h)
此函数根据空气的压力及温度计算空气的焓。
2intspt_air(floatp,floatt,float*s)
此函数根据空气的压力及温度计算空气的熵。
lINFORMIX编程。
在某些需要对历史数据进行操作的场合,可以利用INFORMIX及E-SQL进行编程。
2.通讯的实现
在用软件编程实现通讯时所采用的具体的通讯硬件上,既可以通过串口实现RS-232通讯,也可以通过AUI网卡、BNC网卡、RJ-45网卡实现FTP通讯、TCP/IP通讯。
当与I/A’s通讯的其它设备(如智能数据采集前端、gps、自动同期装置等非通用设备)可以提供串口通讯,且通讯点数量不多时,采用专门的硬件实现通讯硬件不是一个非常经济的方案,此时可以采用RS-232实现通讯。
用RS-232实现通讯时,首先应初始化通讯端口,然后可以按RS-232通讯规程(RXD,TXD,RTS,CTS,DSR,DTR,DCD信号),发送指令并接受数据。
以下是初始化端口的一段例程:
intinit_port(intk,int*fd,char*comport)
{
intsavef;
if((*fd=open(comport,O_RDWR|O_NDELAY|O_NONBLOCK))《0)
return(1);
fflush(stdout);
fflush(stdin);
if(savef=fcntl(*fd,F_GETFL,0)《0)
return(2);
if(fcntl(*fd,F_SETFL,savef|O_NDELAY)《0)
return(3);
if(ioctl(*fd,TCGETS,&termio)《0)
return(4);
/*Settheportparameteras9600Baudrate,8databits,1siopbit,
Enablereceiver,Evenparityenable*/
termio.c_cflag=B9600|CS8|CREAD|PARENB|CLOCAL;
termio.c_cflag&=~CSTOPB;
termio.c_cflag&=~PARODD;
termio.c_iflag=INPCK;
termio.c_iflag&=~ISTRIP;
termio.c_lflag=0;
termio.c_oflag=0;
termio.c_cc[VMIN]=1;
termio.c_cc[VTIME]=0;
if(ioctl(*fd,TCSETS,&termio)《0)
return(5);
sleep(1);
return(0);
}
以下是读写端口的一段例程:
intcomm(unsignedcharnum,intfd)
{
intI,rtn,tioc;
unsignedcharT[200];
unsignedcharbuff[200];
……ioctl(fd,TIOCMGET,&tioc);
tioc=tioc|TIOCM_RTS;
ioctl(fd,TIOCMSET,&tioc);
……write(fd,T,200);
rtn=ioctl(fd,TCSBRK,1);
strcpy(buf,”“,200);
read(fd,buf,200);
}
如果与I/A’s进行通讯的是PC机或其它dcs,比较好的通讯办法是利用RJ-45等通讯口,按FTP协议或TCP/IP协议进行通讯。其中,FTP通讯的效率较低,且一直有读盘/写盘动作,对机器的影响较大,但此方法比较简单,容易实现,因此,在通讯不频繁的时候(建议大于一小时),也可以采用这个办法。在更多的时候,则建议使用TCP/IP协议进行通讯。
利用TCP/IP进行通讯时,有两个协议可以选择:TCP及UDP,其中TCP(TransportControlProtocol,传输控制协议)是面向联接的,它提供高可靠性服务,尤其适用于传输大量报文信息。UDP(UserDatagramProtocol,用户数据报协议)是无联接的,它提供高效率的服务,适用于一次传输少量报文信息的场合。
UDP通讯的程序的编写也比较容易,只需指定客户机的IP地址(或主机名)及传送端口号即可,下面是一段利用UDP初始化例程:
#include
#include
#include
#include
#include
#include
intsock,length;
structsockaddr_in,sockname;
charbuff[1024];
intInit_Socket()
{
char*clientName=“AW5101”;
intportNum=10002;
structhostent*hp,*gethostbyname();
/*Creatsocketonwhichtosend.*/
sock=socket(AF_INET,SOCK_DGRAM,0);
if(sock==-1)
{
perror(“opendatagramsocketerr0r”);
exit(1);
}
hp=gethostbyname(clientName);
if(hp==(structhostent*)0)
{
printf(“unkownhost:%sn”,clientName);
exit(2);
}
memcpy((char*)&sockname.sin_addr,(char*)hp-》h_addr,hp-》h_length);
sockname.sin_family=AF_INET;
sockname.sin_port=htons(atoi(portNum);
return(0);
}……