手动编写测试Tuxedo服务的脚本

rerth

现在需要对一个tuxedo服务手工编写测试代码，试验了一下对tuxedo自带的simpapp程序编写脚本，代码如下。

1. #include "lrt.h"
   
2. 
   
3. Action()
   
4. {
   
5.         char* data_input;
   
6.     char* data_output;
   
7.     long buflen_input;
   
8.     long buflen_output;
   
9.     char string[] = "welcome to bea tuxedo";
   
10. 
    
11.     lrt_tuxputenv("WSNADDR=//127.0.0.1:3050");//对应WSL的端口
    
12. 
    
13.     data_input = lrt_tpalloc("STRING", "", sizeof(string));
    
14.     lrt_strcpy(data_input, string);
    
15.     data_output = lrt_tpalloc("STRING", "", 1024);
    
16.     buflen_input = lrt_tptypes(data_output, type, NULL);
    
17.     tpresult_int = lrt_tpcall("TOUPPER", data_input, sizeof(string), &data_output, &buflen_output, 0);
    
18.     lr_output_message("Call:%d", tpresult_int);
    
19.     lr_output_message("Result:%d\t%s", buflen_output,data_output);
    
20. 
    
21.         lrt_tpfree(data_input);
    
22.         lrt_tpfree(data_output);
    
23.         lrt_tpterm();
    
24.         return 0;
    
25. }

复制代码

上面这个是可以正确的返回输入字符串的大写形式的。可是对于待测系统用类似的写法好像就没有效果了，总是报这种错误：
Action.c(17): ERROR:  lrt_tpcall:  TPESVCFAIL - application level service failure
待测系统的输入是一个字符串，返回的是FML32的数据：包含了多个记录。是因为这个吗？大家有过这方面的经验吗？