#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include <sys/ipc.h>
#include <sys/msg.h>
#include <signal.h>
#include <errno.h>
#include <sys/types.h>
#include <unistd.h>
#include <fcntl.h>
#include <errno.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <netinet/tcp.h>
#include <arpa/inet.h>
#include <sys/time.h>
int readn(int fd, void *vptr, int n)
{
int nleft, nread;
char *ptr;
ptr = vptr;
nleft = n;
while(nleft > 0)
{
if((nread = read(fd,ptr,nleft)) < 0 )
{
if(errno == EINTR||errno==EINPROGRESS||errno==EWOULDBLOCK)
/*if(errno == EINTR||errno==EINPROGRESS) */
continue;
else if(errno==EAGAIN||errno==EWOULDBLOCK)
break;
else
return -1;
}
else if(nread == 0) /* EOF */
break;
nleft -= nread;
ptr += nread;
}
return (n-nleft);
}
int writen(int fd, const void *vptr, int n)
{
int nleft;
int nwritenn;
const char *ptr;
ptr = vptr;
nleft = n;
while(nleft > 0)
{
if((nwritenn = write(fd,ptr,nleft)) <= 0)
{
if(errno == EINTR||errno==EINPROGRESS||errno==EWOULDBLOCK)
nwritenn = 0;
else
return (-1);
}
nleft -= nwritenn;
ptr += nwritenn;
}
return n;
}
int main (int argc, char *argv[])
{
int iSock, iconnect, iAddrLen;
long lPort;
struct sockaddr_in stSin;
struct linger lig_val;
struct sockaddr_in clientaddr, stSockAddr;
char *p = NULL;
int k = 0,l = 0;
int num = 0x00,num1 = 0x00,num2 = 0x00;
if(argc != 4)
{
printf("参数不正确,格式 可执行程序+IP+PORT+16进制报文内容 16进制报文以'|' 结束\n");
return -1;
}
char sip[30] = {0};
char port[10] = {0};
char sIN[40960] = {0};
char sOut[4096] = {0};
strcpy(sip, argv[1]);
strcpy(port, argv[2]);
lPort = atol(port);
iSock = socket(AF_INET, SOCK_STREAM, 0);
if(iSock < 0) {
printf( "can't create socket: %s\n", strerror(errno));
exit(1);
}
lig_val.l_onoff = 1;
lig_val.l_linger = 0;
setsockopt(iSock, SOL_SOCKET, SO_LINGER, &lig_val, sizeof(lig_val));
clientaddr.sin_addr.s_addr = inet_addr(sip);
clientaddr.sin_family = AF_INET;
clientaddr.sin_port = htons(lPort);
if((p = strstr(argv[3], "$")) == NULL){
printf( "上送的串中没有没有结束符 '$'");
exit(1);
}
while(1){
if ( argv[3][k] == ' '|| argv[3][k] == '\n' || argv[3][k] == '\r' || argv[3][k] == '\t' ){
k++;
continue;
}else if ( argv[3][k] == '$'){
break;
}else{
if(argv[3][k] >= '0' && argv[3][k] <='9'){
num1 = argv[3][k] - '0';
}else if(argv[3][k] >= 'a' && argv[3][k] <='f'){
num1 = argv[3][k] - 'a' +10;
}else if(argv[3][k] >= 'A' && argv[3][k] <='F'){
num1 = argv[3][k] - 'A' + 10;
}else{
printf( "数据异常 \n");
exit(1);
}
k++;
if(argv[3][k] >= '0' && argv[3][k] <='9'){
num2 = argv[3][k] - '0';
}else if(argv[3][k] >= 'a' && argv[3][k] <='f'){
num2 = argv[3][k] - 'a' +10;
}else if(argv[3][k] >= 'A' && argv[3][k] <='F'){
num2 = argv[3][k] - 'A' + 10;
}else{
printf( "数据异常 \n");
exit(1);
}
k++;
num = num1 * 16 +num2;
sIN[l] = num;
//printf( "num1=[%d],num2=[%d],num=[%d],sIN[l]=[%d]",num1,num2,num,sIN[l]);
l++;
}
}
if(connect(iSock, (struct sockaddr *)&clientaddr, sizeof(clientaddr)) == -1)
{
printf("connect失败,ip=[%s],port=[%s],errno=[%d]\n", sip, port, errno);
close(iSock);
return -1;
}
int i, j ,llen = 0;
unsigned char pstr;
printf("要发送的报文长度[%d]内容:\n", l);
printf("%04d: ", j);
for(i = 0; i < l; i++)
{
pstr = sIN[i];
printf("%02X ", pstr);
if((i+1) % 16 == 0 && i!=0)
printf("\n%04d: ", i+1);
}
printf("\n");
if(writen(iSock, sIN, l) < 0)
{
printf("发送报文失败\n");
return -1;
}
memset(sOut, 0x00, sizeof(sOut));
readn(iSock, sOut, 4096) ;
llen = strlen(sOut);
printf("接收到的的报文长度[%d]内容:\n", llen);
printf("%04d: ", j);
for(i = 0; i < llen; i++)
{
pstr = sOut[i];
printf("%02X ", pstr);
if((i+1) % 16 == 0 && i!=0)
printf("\n%04d: ", i+1);
}
printf("\n");
printf("%s\n", sOut);
close(iSock);
return 0;
}