ftp测试脚本

前几天为了测试ftp的性能，好不容易调好了一个脚本，可是loadrunner出了点问题，把我的脚本弄得打不开了，真是郁闷，因为这个脚本现在看起来虽然没什么，可是在当时不了解ftp的情况下去做，可真是费了九牛二虎之力，因此这次一调好了就吸取教训，存起来先：）

 

action.c:

 

#include "lrs.h"

extern char *strtok(char *string, const char *delimiters );
%A s&Pn(K%f0Action()
W4|w'K] O0{51Testing软件测试网G"so?Iko&}
 char *BufVal;

 char *token;

 char hostport[255];51Testing软件测试网EP r6E/\
 char portinfo[8];

 char PortNum[255];

    char cVal[8];

 char cHighVal[8];
S}A-T:~;K0 
;C n4Pj(jO|9J6O.Y1}w0 char cLowVal[8];

    int iVal,iLength,i,j;

    lrs_create_socket("socket0", "TCP", "LocalHost=0", "RemoteHost=192.168.0.100:21",  LrsLastArg);

 lrs_send("socket0","vpnbuf0",LrsLastArg);

    lrs_receive("socket0", "buf0", LrsLastArg);

    lrs_send("socket0", "buf1", LrsLastArg);

    lrs_receive("socket0", "buf2", LrsLastArg);

    lrs_send("socket0", "buf3", LrsLastArg);

    lrs_receive("socket0", "buf4", LrsLastArg);

//send PASV
.FF"V|$D'g8V,J0    lrs_send("socket0", "pasvbuf0", LrsLastArg);
zi L%|Z0 lrs_receive("socket0", "pasvbuf1", LrsLastArg);

//  Get the Local Port of the Local Host on socket0*/51Testing软件测试网 ^
D)P9m&~
 lrs_get_last_received_buffer("socket0",&BufVal,&iLength);51Testing软件测试网3s$iPWy;c C,e"g
 lr_output_message("The buffer is:%s", BufVal);

 strcpy(PortNum,BufVal);51Testing软件测试网fzD?T
// lr_output_message("PortNum Conetnt %s", PortNum);
8EUWQ;S a\L0 51Testing软件测试网\,Z{#g)i!I
 for(i=0,j=40;i<3;i++,j++)
1z
r#SQg o0 {51Testing软件测试网UCiE6V
  cHighVal[i]=PortNum[j];51Testing软件测试网,[(yVx h,~n
 }51Testing软件测试网-qRvbn
 lr_output_message("cHignVal conent %s",cHighVal);

 j=44;51Testing软件测试网I4Km6jiwS5J(g
 token=strtok(lr_eval_string(&PortNum[j]),")");51Testing软件测试网 KE$B,@,?U\(w
 if(token != NULL)51Testing软件测试网im#KV2w \ r2o#Q6q,Vk
  strcpy(cLowVal,token);51Testing软件测试网lm6]Pwj1IE
 lr_output_message("cLowVal is:%s",cLowVal);
sdeF.r [1X!w0 iVal=atoi(cHighVal)*256+atoi(cLowVal);51Testing软件测试网 m]uJ1P,tdw
 lr_output_message("cHighVal*256 id %d",atoi(cHighVal)*256);
x?(i ~
m4Tk0 lr_output_message("iVal %d",iVal);
H.j#t;?/^C'p kM0// lr_output_message("cVal %s",itoa(iVal,cVal,10));51Testing软件测试网"VaS+MfGkEb
 itoa(iVal,cVal,10);51Testing软件测试网0I htMY
 lr_output_message("cVal %s",cVal);51Testing软件测试网.Qz ceI*J7J3?&w
//set the propority's value
M,F6b3YX2S;d0 lr_save_string(cVal,"portinfo");
;Q[']{'U&sv0 //strcpy(&portinfo,&cVal);
.NtH4u3eZ8w0 //lr_output_message("portinfo is :%s",portinfo);

 lrs_free_buffer(BufVal);

//  creat data socket51Testing软件测试网H?Z.\/]%C
 lrs_create_socket("socket1", "TCP", "LocalHost=0", "RemoteHost=192.168.0.100:21",  LrsLastArg);
2B @Dm9SjKW0    lrs_send("socket1", "vpnbuf1", LrsLastArg);

    lrs_receive("socket1", "vpnbuf2", LrsLastArg);

    lrs_send("socket0", "buf7", LrsLastArg);

    lrs_receive("socket0", "buf8", LrsLastArg);

//    lrs_accept_connection("socket1", "socket2");

//    lrs_close_socket("socket1");

    lrs_send("socket1", "buf9", LrsLastArg);

    lrs_close_socket("socket1");

    lrs_receive("socket0", "buf10", LrsLastArg);

    lrs_send("socket0", "buf11", LrsLastArg);

    lrs_receive("socket0", "buf12", LrsLastArg);

    lrs_close_socket("socket0");

    return 0;51Testing软件测试网^C
f3j6p
}

 

data.ws:

 

_rg2\,H0send  vpnbuf0 8151Testing软件测试网P*~
TX/@
 "CONNECT 35622ebb TAURUS/1.0\r\n"
"{&{9By#xT,I0c}Y*Y0    "COOKIE: TaurusSessionID=w1mO0LX84O7EHLnQwBmw6g==\r\n\r\n"

recv  buf0 4351Testing软件测试网7xW*ODJ Br1]oZ
 "CONNECT OK TAURUS/1.0\r\n"
&ULB+r(|W~0 "220 (vsFTPd 1.1.3)\r\n"

send  buf1 11
2X{Q"w\{#H2]+`*P0 "USER libh\r\n"

recv  buf2 3451Testing软件测试网0t4oL4~ f T6u%@U
 "331 Please specify the password.\r\n"

send  buf3 1151Testing软件测试网Ynb\`/[u
L)r v
 "PASS 1111\r\n"

recv  buf4 3351Testing软件测试网EPc7?0Z
Z
 "230 Login successful. Have fun.\r\n"

send  pasvbuf0 651Testing软件测试网s/K~*r*LCv/~ N
 "PASV\r\n"

recv  pasvbuf1 4951Testing软件测试网Fa~.X~
 "227 Entering Passive Mode (192,168,0,16,113,74)\r\n"

send  vpnbuf1 8751Testing软件测试网-Os \LLA#X;\U
 "CONNECT 35622ebb:<portinfo> TAURUS/1.0\r\n"
x)onm0?)wE4Uq0 "COOKIE: TaurusSessionID=w1mO0LX84O7EHLnQwBmw6g==\r\n\r\n"

recv  vpnbuf2 2351Testing软件测试网h*D_@@ `
 "CONNECT OK TAURUS/1.0\r\n"

send  buf7 1551Testing软件测试网m Gs3Jy3h7N`8g
 "STOR 100k.doc\r\n"

recv  buf8 22
@I%MHKmG&p6h+E0 "150 Ok to send data.\r\n"

send  buf9 106496

 "…………"

recv  buf10 22
[S~.JtPHu]U0 "226 File receive OK.\r\n"

send  buf11 6
ga;w9q v fv.Z0 "QUIT\r\n"

recv  buf12 14
)t/HG drZ7SOT0 "221 Goodbye.\r\n"

MbO6z,P9\/cCKs0-1

 

哈哈，这次永远都不会丢了：）