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

古城微笑少年丶 2021-09-17 00:08 345阅读 0赞

###        ###

先说明一下，本人是开发，对测试不是特别熟悉，但因工作的需要，也做过一些性能测试方面的东西。比较久之前很简单的用过，最近又用到了，熟悉一下。现做一个总结。   
使用loadrunner进行压力测试主要分两步，第一步是编写脚本（比较重点），第二步执行测试（配置都是在界面上点点就行了，当然我只的是比较简单的，能满足日常需要的），第三步分析结果（这一步比较高深，但是对于我来说能看懂简单的性能指标就OK了）。所以这里就说一下脚本的编写，给未来再用到做参考。   
  
1.HTTP的GET请求   
这里以访问百度为例，地址http://www.baidu.com/s?wd=mobile，表示在百度上搜索mobile。具体脚本如下（有注释）

Lr script代码   ![收藏代码][icon_star.png]

1.  Action()  
2.  \{  
3.      int status;  
4.      lr\_start\_transaction("send");  
5.    
6.      web\_reg\_find("Search=Body",//这里说明在Body的范围内查找  
7.                   "SaveCount=ret\_Count",//这里表示把返回值的个数放在变量ret\_Count里  
8.                   "Text=mobile",//这里表示查找的内容是“mobile”  
9.                   LAST);  
10.   
11.     status=web\_url("Baidu\_Search",   
12.         "URL= http://www.baidu.com/s?wd=mobile",   
13.         "TargetFrame=Main",   
14.         "Resource=0",   
15.         "RecContentType=text/html",   
16.         "Mode=http",   
17.         LAST );   
18.   
19.     lr\_output\_message("Request Status:%d",status);  
20.     lr\_output\_message("查找到的返回值个数:%d",atoi(lr\_eval\_string("\{ret\_Count\}")));  
21.   
22.   
23.     if (atoi(lr\_eval\_string("\{ret\_Count\}")) > 0)\{//这里判断检查到的个数  
24.          lr\_output\_message("Rec successful.");  
25.          lr\_end\_transaction("send", LR\_PASS);  
26.      \}  
27.      else\{   
28.          lr\_error\_message("Rec failed");  
29.          lr\_end\_transaction("send", LR\_FAIL);  
30.      \}   
31.   
32.     return 0;  
33. \}

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

Lr script代码   ![收藏代码][icon_star.png]

1.  Action()  
2.  \{  
3.      int status;  
4.    
5.      lr\_start\_transaction("send");  
6.    
7.      web\_reg\_find("Search=Body",//这里说明在Body的范围内查找  
8.                   "SaveCount=ret\_Count",//这里表示把返回值的个数放在变量ret\_Count里  
9.                   "Text=t",//这里表示查找的内容是“t”  
10.                  LAST);  
11.   
12.     status=web\_submit\_data("trs",  
13.                 "Action=http://192.168.77.185:9002/recognizeText",//地址  
14.                 "Method=POST",//POST请求  
15.                 "RecContentType=text/html",  
16.                 "Mode=HTML",  
17.                 ITEMDATA,  
18.                 "Name=usercontent","Value=gprs",ENDITEM,//这一行表示传入一个参数usercontent，值为gprs  
19.                 "Name=Accept","Value=text/plain",ENDITEM,  
20.                 LAST);  
21.   
22.      lr\_output\_message("Request Status:%d",status);  
23.   
24.      if (atoi(lr\_eval\_string("\{ret\_Count\}")) > 0)\{//这里判断检查到的个数  
25.          lr\_output\_message("Rec successful.");  
26.          lr\_end\_transaction("send", LR\_PASS);  
27.      \}  
28.      else\{   
29.          lr\_error\_message("Rec failed");  
30.          lr\_end\_transaction("send", LR\_FAIL);  
31.      \}   
32.   
33.      return 0;  
34. \}

3.WebService请求   
webservice请求的脚本建议通过可视化的方式添加   
1)引入webservice，注意wsdl后缀   
![点击查看原始大小图片][f876a5fd-d125-3a68-bb39-3af9ad6f39a3.jpg]  
2)给入参填值   
![f64626d3-6735-3caa-a956-e19ee7d16f78.jpg][]   
3)给返回值指定存储到的变量中   
![7ac71536-3fbe-3ce2-8428-c9a4b26d94c9.jpg][]   
4)结果检查   
这个与其它模式一样，不多说了   
我这里添加的是网上公用的天气预报webservice，地址是：http://www.webxml.com.cn/WebServices/WeatherWebService.asmx   
详细脚本如下：

Lr script代码   ![收藏代码][icon_star.png]

1.  Action()  
2.  \{  
3.      int status;  
4.    
5.      lr\_start\_transaction("send");  
6.    
7.      status=web\_service\_call( "StepName=getSupportCity\_102",  
8.          "SOAPMethod=WeatherWebService|WeatherWebServiceSoap|getSupportCity",//这里是我已经引用了webservice的名称及调用方法  
9.          "ResponseParam=response",  
10.         "Service=WeatherWebService",  
11.         "ExpectedResponse=SoapResult",  
12.         "Snapshot=t1353067092.inf",  
13.         BEGIN\_ARGUMENTS,  
14.                       "byProvinceName=安徽",//这里是入参，参数名称：byProvinceName，值：安徽。入参和返回值的名称都可以再引用里看见  
15.         END\_ARGUMENTS,  
16.         BEGIN\_RESULT,  
17.                       "getSupportCityResult=result",//这里是返回值，名称：getSupportCityResult，把它放到变量result中  
18.         END\_RESULT,  
19.         LAST);  
20.   
21.     lr\_output\_message("Request Status:%d",status);  
22.     lr\_output\_message("Result:%s",lr\_eval\_string("\{result\}"));//这里把返回值输出，调试webservice的时候用  
23.   
24.   
25.     if(strstr(lr\_eval\_string("\{result\}"),"合肥")>0)\{//这里是判断返回值中是否包含“合肥”  
26.         lr\_end\_transaction("send",LR\_PASS);  
27.     \}else\{  
28.         lr\_end\_transaction("send",LR\_AUTO);  
29.     \}  
30.   
31.     return 0;  
32. \}

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

Lr script代码   ![收藏代码][icon_star.png]

1.  \#include "lrs.h"  
2.  Action()  
3.  \{  
4.      char \*recvbuf;  
5.      int recvlen=0;  
6.      int rc;  
7.    
8.      lrs\_startup(257);  
9.    
10.     lr\_start\_transaction("Trans\_1");  
11.     lr\_start\_transaction("Conn\_1");  
12.   
13.     rc=lrs\_create\_socket("socket0", "TCP", "RemoteHost=192.168.1.101:8888",  LrsLastArg);//创建Socket连接  
14.   
15.     if (rc != 0 ) \{     
16.         lr\_end\_transaction("Conn\_1", LR\_FAIL);     
17.         lr\_end\_transaction ("Trans\_1", LR\_FAIL);     
18.         return 0;    
19.     \}  
20.     lr\_end\_transaction("Conn\_1", LR\_PASS);  //判断socket是否链接成功的事务，0表示创建成功  
21.   
22.     lrs\_send("socket0", "buf0", LrsLastArg); //发送buf0，buf0为在data.ws中定义的发送变量  
23.   
24.     lrs\_receive("socket0", "buf1", LrsLastArg); //接收消息，存放在buf1中，buf1是在data.ws中定义的接收数组，注意数组长度一定要大于等于实际接收长度  
25.   
26.     lrs\_get\_last\_received\_buffer("socket0",&recvbuf,&recvlen);//把Socket最后接收的字节数组，长度放在recvlen中，内容放在recvbuf中  
27.   
28.     lr\_output\_message("Received:%s",lr\_eval\_string(recvbuf));  
29.   
30.     if(recvlen>3)  
31.         lr\_end\_transaction("Trans\_1", LR\_PASS);  
32.     else  
33.         lr\_end\_transaction ("Trans\_1", LR\_FAIL);  
34.   
35.   
36.     lrs\_disable\_socket("socket0", DISABLE\_SEND\_RECV);  
37.   
38.     lrs\_close\_socket("socket0");  
39.     return 0;  
40. \}

Lr script代码   ![收藏代码][icon_star.png]

1.  //data.ws  
2.  ;WSRData 2 1  
3.    
4.  send  buf0 32  
5.      "hehehehe"  
6.    
7.  recv  buf1 50  
8.        
9.    
10.   
11. \-1

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

[icon_star.png]: /images/20210726/250a1362134049ff811d869dd244dec7.png
[f876a5fd-d125-3a68-bb39-3af9ad6f39a3.jpg]: /images/20210726/2c6fb76efb5340be9afe3954b7904a0e.png
[f64626d3-6735-3caa-a956-e19ee7d16f78.jpg]: /images/20210726/4b589983aa3146a6b8547b19cab831ed.png
[7ac71536-3fbe-3ce2-8428-c9a4b26d94c9.jpg]: /images/20210726/c80cbe0589704d1c95fcd5f99eb64c65.png