117 lines
1.9 KiB
C
117 lines
1.9 KiB
C
|
|
/* only runable on work station now */
|
|
|
|
#include "PVS.h"
|
|
|
|
#include <string.h>
|
|
#include <stdio.h>
|
|
#include <unistd.h>
|
|
#include <stdlib.h>
|
|
|
|
static int read_pvs(BSDATA* info,int serv,char* sname);
|
|
|
|
int main(int argc,char** argv)
|
|
{
|
|
BSDATA info;
|
|
int rc;
|
|
|
|
if(argc<2)
|
|
{
|
|
fprintf(stderr,"usage: %s IOC-ip-address\n",argv[0]);
|
|
return -1;
|
|
}
|
|
|
|
if(BSsetAddress(&info,argv[1])<0)
|
|
{
|
|
fprintf(stderr,"Cannot determine address for %s\n",argv[1]);
|
|
return -1;
|
|
}
|
|
|
|
rc=read_pvs(&info,PVS_AppList,(char*)NULL);
|
|
|
|
if(rc<0) fprintf(stderr,"read of data failed horribly\n");
|
|
return 0;
|
|
}
|
|
|
|
static int read_pvs(BSDATA* info,int serv,char* sname)
|
|
{
|
|
BS* bs;
|
|
int verb,size,done,len,i,port,rsize;
|
|
char* buffer;
|
|
char ip_from[40];
|
|
FILE* fd;
|
|
|
|
BSgetAddressPort(info,ip_from,&port);
|
|
|
|
/* verify ioc not already added */
|
|
if(access(ip_from,F_OK)==0)
|
|
{
|
|
/* delete the existing file for this IOC */
|
|
unlink(ip_from);
|
|
}
|
|
|
|
done=0;
|
|
BSsetPort(info,PVS_TCP_PORT);
|
|
|
|
if((bs=BSipOpenData(info))==NULL)
|
|
{
|
|
fprintf(stderr,"Open of socket to IOC failed\n");
|
|
return -1;
|
|
}
|
|
|
|
if(serv>PVS_LAST_VERB)
|
|
rsize=strlen(sname)+1;
|
|
else
|
|
rsize=0;
|
|
|
|
if(BSsendHeader(bs,serv,rsize)<0)
|
|
{
|
|
fprintf(stderr,"Command send failed\n");
|
|
return -1;
|
|
}
|
|
|
|
if(rsize>0)
|
|
{
|
|
if(BSsendData(bs,sname,rsize)<0)
|
|
{
|
|
fprintf(stderr,"send of command name failed\n");
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
fd=stdout;
|
|
buffer=(char*)malloc(PVS_TRANSFER_SIZE+2);
|
|
|
|
while(done==0)
|
|
{
|
|
if(BSreceiveHeader(bs,&verb,&size)<0)
|
|
{
|
|
fprintf(stderr,"Receive header failed\n");
|
|
done=-1;
|
|
}
|
|
else
|
|
{
|
|
switch(verb)
|
|
{
|
|
case PVS_Data: /* read a block of names */
|
|
if((len=BSreceiveData(bs,buffer,size))<0)
|
|
fprintf(stderr,"Receive data failed\n");
|
|
else
|
|
fputs(buffer,fd);
|
|
fputc('\n',fd);
|
|
break;
|
|
case BS_Done: /* transfers complete */
|
|
BSclose(bs);
|
|
done=-1;
|
|
break;
|
|
default:
|
|
if(size>0) done=-1;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
free(buffer);
|
|
return 0;
|
|
}
|
|
|