（转载）loadrunner简单使用——HTTP，WebService，Socket压力测试脚本编写

原文出处：http://ajita.iteye.com/blog/1728243/

先说明一下，本人是开发，对测试不是特别熟悉，但因工作的需要，也做过一些性能测试方面的东西。比较久之前很简单的用过，最近又用到了，熟悉一下。现做一个总结。 
使用loadrunner进行压力测试主要分两步，第一步是编写脚本（比较重点），第二步执行测试（配置都是在界面上点点就行了，当然我只的是比较简单的，能满足日常需要的），第三步分析结果（这一步比较高深，但是对于我来说能看懂简单的性能指标就OK了）。所以这里就说一下脚本的编写，给未来再用到做参考。 

1.HTTP的GET请求 
这里以访问百度为例，地址http://www.baidu.com/s?wd=mobile，表示在百度上搜索mobile。具体脚本如下（有注释） 

Action()
{
int status;
lr_start_transaction("send");

web_reg_find("Search=Body",//这里说明在Body的范围内查找
"SaveCount=ret_Count",//这里表示把返回值的个数放在变量ret_Count里
"Text=mobile",//这里表示查找的内容是“mobile”
LAST);

status=web_url("Baidu_Search",
"URL= http://www.baidu.com/s?wd=mobile",
"TargetFrame=Main",
"Resource=0",
"RecContentType=text/html",
"Mode=http",
LAST );

lr_output_message("Request Status:%d",status);
lr_output_message("查找到的返回值个数:%d",atoi(lr_eval_string("{ret_Count}")));

if (atoi(lr_eval_string("{ret_Count}")) > 0){//这里判断检查到的个数
lr_output_message("Rec successful.");
lr_end_transaction("send", LR_PASS);
}
else{
lr_error_message("Rec failed");
lr_end_transaction("send", LR_FAIL);
}

return 0;
}

2.HTTP POST请求 
这个是在我们项目中用到的，发送POST请求，进行自然语言识别的，脚本如下：

Action()
{
int status;

lr_start_transaction("send");

web_reg_find("Search=Body",//这里说明在Body的范围内查找
"SaveCount=ret_Count",//这里表示把返回值的个数放在变量ret_Count里
"Text=t",//这里表示查找的内容是“t”
LAST);

status=web_submit_data("trs",
"Action=http://192.168.77.185:9002/recognizeText",//地址
"Method=POST",//POST请求
"RecContentType=text/html",
"Mode=HTML",
ITEMDATA,
"Name=usercontent","Value=gprs",ENDITEM,//这一行表示传入一个参数usercontent，值为gprs
"Name=Accept","Value=text/plain",ENDITEM,
LAST);

lr_output_message("Request Status:%d",status);

if (atoi(lr_eval_string("{ret_Count}")) > 0){//这里判断检查到的个数
lr_output_message("Rec successful.");
lr_end_transaction("send", LR_PASS);
}
else{
lr_error_message("Rec failed");
lr_end_transaction("send", LR_FAIL);
}

return 0;
}

Action()
{
int status;

lr_start_transaction("send");

web_reg_find("Search=Body",//这里说明在Body的范围内查找
"SaveCount=ret_Count",//这里表示把返回值的个数放在变量ret_Count里
"Text=t",//这里表示查找的内容是“t”
LAST);

status=web_submit_data("trs",
"Action=http://192.168.77.185:9002/recognizeText",//地址
"Method=POST",//POST请求
"RecContentType=text/html",
"Mode=HTML",
ITEMDATA,
"Name=usercontent","Value=gprs",ENDITEM,//这一行表示传入一个参数usercontent，值为gprs
"Name=Accept","Value=text/plain",ENDITEM,
LAST);

lr_output_message("Request Status:%d",status);

if (atoi(lr_eval_string("{ret_Count}")) > 0){//这里判断检查到的个数
lr_output_message("Rec successful.");
lr_end_transaction("send", LR_PASS);
}
else{
lr_error_message("Rec failed");
lr_end_transaction("send", LR_FAIL);
}

return 0;
}

3.WebService请求 
webservice请求的脚本建议通过可视化的方式添加 
1)引入webservice，注意wsdl后缀 

2)给入参填值 
 
3)给返回值指定存储到的变量中 
 
4)结果检查 
这个与其它模式一样，不多说了 
我这里添加的是网上公用的天气预报webservice，地址是：http://www.webxml.com.cn/WebServices/WeatherWebService.asmx 
详细脚本如下： 

Action()
{
int status;

lr_start_transaction("send");

status=web_service_call( "StepName=getSupportCity_102",
"SOAPMethod=WeatherWebService|WeatherWebServiceSoap|getSupportCity",//这里是我已经引用了webservice的名称及调用方法
"ResponseParam=response",
"Service=WeatherWebService",
"ExpectedResponse=SoapResult",
"Snapshot=t1353067092.inf",
BEGIN_ARGUMENTS,
"byProvinceName=安徽",//这里是入参，参数名称：byProvinceName，值：安徽。入参和返回值的名称都可以再引用里看见
END_ARGUMENTS,
BEGIN_RESULT,
"getSupportCityResult=result",//这里是返回值，名称：getSupportCityResult，把它放到变量result中
END_RESULT,
LAST);

lr_output_message("Request Status:%d",status);
lr_output_message("Result:%s",lr_eval_string("{result}"));//这里把返回值输出，调试webservice的时候用

if(strstr(lr_eval_string("{result}"),"合肥")>0){//这里是判断返回值中是否包含“合肥”
lr_end_transaction("send",LR_PASS);
}else{
lr_end_transaction("send",LR_AUTO);
}

return 0;
}

4.Socket请求 
我这里指的是简单的Socket请求，端连接，发送接收的都是一个字符串。比较复杂的Socket请求，自己录制脚本。如果不知道，自己去查。 
详细脚本如下，另外还包含一个data.ws文件，用来声明发送和接收的字节数组及其长度的，并指定要发送的内容（发送的内容一样可以参数化的） 

#include "lrs.h"
Action()
{
char *recvbuf;
int recvlen=0;
int rc;

lrs_startup(257);

lr_start_transaction("Trans_1");
lr_start_transaction("Conn_1");

rc=lrs_create_socket("socket0", "TCP", "RemoteHost=192.168.1.101:8888", LrsLastArg);//创建Socket连接

if (rc != 0 ) {
lr_end_transaction("Conn_1", LR_FAIL);
lr_end_transaction ("Trans_1", LR_FAIL);
return 0;
}
lr_end_transaction("Conn_1", LR_PASS); //判断socket是否链接成功的事务，0表示创建成功

lrs_send("socket0", "buf0", LrsLastArg); //发送buf0，buf0为在data.ws中定义的发送变量

lrs_receive("socket0", "buf1", LrsLastArg); //接收消息，存放在buf1中，buf1是在data.ws中定义的接收数组，注意数组长度一定要大于等于实际接收长度

lrs_get_last_received_buffer("socket0",&recvbuf,&recvlen);//把Socket最后接收的字节数组，长度放在recvlen中，内容放在recvbuf中

lr_output_message("Received:%s",lr_eval_string(recvbuf));

if(recvlen>3)
lr_end_transaction("Trans_1", LR_PASS);
else
lr_end_transaction ("Trans_1", LR_FAIL);

lrs_disable_socket("socket0", DISABLE_SEND_RECV);

lrs_close_socket("socket0");
return 0;
}

Lr script代码  

//data.ws
;WSRData 2 1

send buf0 32
"hehehehe"

recv buf1 50

-1

结束的话： 
这里介绍的测试脚本，我觉得开发测试人员都需要会，因为开发弄出来的东西，自己要了解个大概的性能吧。如果测试的专业人员，这些都要熟知，再如果想要了解的更多，请转到51testing上去。