转自：http://lht821008.blog.163.com/blog/static/4164786201141134535464/
思考曾经做过的一个黄金交易系统，里面针对后端进行报文发送，报文均是采用的xml格式，只不过传输和接受前后需要进行加解密，现在想来如果不是由于加解密包采用的是java，那我们完全可以采用LR的原生态C函数和XML协议函数做到更为优雅的测试脚本，利用LR的xml函数对整个xml报文实现动态封转。
函数：lr_xml_get_values
Action()
{
char *xml_input=
"<love>"
"<name_man>LHT</name_man>"
"<name_women>PHOEBE</name_women>"
"</love>";
lr_save_string(xml_input,"xml_param");
lr_xml_get_values("XML={xml_param}",
"ValueParam=OutputParam1",
"Query=/love/name_man",
LAST);
lr_xml_get_values("XML={xml_param}",
"ValueParam=OutputParam2",
"Query=/love/name_women",
LAST);
lr_message("husband is:%s",lr_eval_string("{OutputParam1}"));
lr_message("wife is:%s",lr_eval_string("{OutputParam2}"));
return 0;
}
//output
husband is:LHT
wife is:PHOEBE
函数：lr_xml_set_values
Action1() {
char * xml_input =
"<acme_org>"
" <accounts_dept>"
"<employee>"
" <name>John Smith</name>"
"<cubicle>227</cubicle>"
"<extension>2145</extension>"
"</employee>"
"</accounts_dept>"
"<engineering_dept>"
"<employee>"
"<name>Sue Jones</name>"
"<extension>2375</extension>"
"</employee>"
"</engineering_dept>"
"</acme_org>";
int i,NumOfValues;
char buf[64];
lr_save_string(xml_input,"XML_Input_Param"); // Save input as parameter
lr_save_string("lht","ExtensionParam_1");
lr_save_string("phoebe","ExtensionParam_2");
lr_xml_set_values("XML={XML_Input_Param}",
"ResultParam=NewXmlParam",
"ValueParam=ExtensionParam",
"SelectAll=yes",
"Query=//extension",
LAST);
NumOfValues= lr_xml_get_values("XML={NewXmlParam}",
"ValueParam=OutputParam",LAST);
for ( i = 0; i < NumOfValues; i++) { /* Print the multiple values of MultiParam */
sprintf (buf,"Retrieved value %d : {OutputParam_%d}",i+1,i+1);
lr_output_message(lr_eval_string(buf));
}
lr_message("new xml is:%s",lr_eval_string("{NewXmlParam}"));
return 0;
}
//output：
Virtual User Script started
Starting action vuser_init.
Ending action vuser_init.
Running Vuser...
Starting iteration 1.
Starting action Action.
Action.c(11): "lr_xml_get_values" succeeded,1 match processed
Action.c(16): "lr_xml_get_values" succeeded,1 match processed
husband is:LHT
wife is:PHOEBE
Ending action Action.
Starting action Action1.
Action1.c(47): "lr_xml_set_values" succeeded,2 matches processed
Action1.c(60): "lr_xml_get_values" succeeded,2 matches processed
Action1.c(73): Retrieved value 1 : lht
Action1.c(73): Retrieved value 2 : phoebe
new xml is:<acme_org> <accounts_dept><employee> <name>John Smith</name><cubicle>227</cubicle><extension>lht</extension></employee></accounts_dept><engineering_dept><employee><name>Sue Jones</name><extension>phoebe</extension></employee></engineering_dept></acme_org> Ending action Action1. Ending iteration 1. Ending Vuser... Starting action vuser_end. Ending action vuser_end. Vuser Terminated.
