weblogic 与 tuxedo 互联 wtc

    BEA公司的TUXEDO，WEBLOGIC作为优秀的中间件产品,在银行、电信、金融等行业广泛使用，通常采用TUXEDO实现系统的核心业务，用WEBLOGIC做为系统扩展到INTERNET的平台，实现电子商务，由WEBLOGIC调用TUXEDO上的服务，所以TUXEDO与WEBLOGIC之间的互连经常遇到。

    因为在工作中经常用到，先就个人总结和网上收集的资料总结如下，惠人惠己。

目录：

一.    调用方式    
二.    WTC配置步骤：    
1.    Tuxedo的配置    
2.1.1.    设置环境变量:    
2.1.2.    编写Tuxedo服务(atmi)    
2.1.3.    配置ubbconfig   

2.1.4.    编译ubbconfig文件    
2.1.5.    配置domconfig    
2.1.6.    编译domconfig    
2.    Weblogic配置(7.0以上的版本)    
2.1.7.    配置config.xml    
3.    Weblogic做客户端，访问Tuxedo服务    
4.    Tuxedo做客户端，访问Weblogic服务    
三.    JOLT配置步骤：    
1.    Tuxedo的配置    
3.1.1.    配置ubbconfig    
3.1.2.    注册tuxedo service    
2.    Weblogic的配置    
3.1.3.    配置jolt pool    
3.1.4.    配置startup class, shutdown class    
3.    程序调用例子    
四.    CORBA的调用步骤：    
1.    获得IDL，并且根据IDL生成java class    
2.    配置config.xml文件    
3.    程序调用例子    
-----------------------------------------------正文-------------------------------------------------------------------------

    一.    调用方式
WEBLOGIC与TUXEDO的调用有三种方式
1．    WTC(WEBLOGIC TUXEDO CONNECTOR)
2．    JOLT
3．    CORBA(Common Object Request Broker Architecture)

WTC不仅能让WEBLOGIC调用TUXEDO中的SERVICE，而且能让TUXEDO调用WEBLOGIC中的EJB，但是只能用于WEBLOGIC与TUXEDO之间进行互连。
JOLT只能让WEBLOGIC调用TUXEDO. 但JOLT可以使TUXEDO与WEBSPERE等其他应用服务器相连。
CORBA是通用对象请求代理体系结构(Common Object Request Broker Architecture) 的英文缩写，这是标准化组织OMG提出的一种实现分布式异构环境下面向对象软件的可重用、可移植、可互操作的体系结构。只要符合CORBA规范的服务器之间都可以互联。

二.    WTC配置步骤：
1.    Tuxedo的配置
2.1.1.    设置环境变量:
set TUXDIR=C:\bea\tuxedo8.0
set APPDIR=C:\bea\tuxedo8.0\samples\atmi\simpapp
set PATH=%TUXDIR%\bin;%APPDIR%;%PATH%
set TUXCONFIG=%APPDIR%\tuxconfig  编译之后生成的2进制配置文件. tuxconfig
set BDMCONFIG=%APPDIR%\bdmconfig编译之后生成的2进制配置文件. bdmconfig
2.1.2.    编写Tuxedo服务(atmi)

Cpp代码  

1. #include <stdio.h>  
2. #include <ctype.h>  
3. #include <atmi.h>    /* TUXEDO Header File */  
4. #include <userlog.h>    /* TUXEDO Header File */  
5.   
6. /* tpsvrinit is executed when a server is booted, before it begins 
7.    processing requests.  It is not necessary to have this function. 
8.    Also available is tpsvrdone (not used in this example), which is 
9.    called at server shutdown time. 
10. */  
11.   
12. #if defined(__STDC__) || defined(__cplusplus)  
13. tpsvrinit(int argc, char *argv[])  
14. #else  
15. tpsvrinit(argc, argv)  
16. int argc;  
17. char **argv;  
18. #endif  
19. {  
20.     /* Some compilers warn if argc and argv aren't used. */  
21.     argc = argc;  
22.     argv = argv;  
23.   
24.     /* userlog writes to the central TUXEDO message log */  
25.     userlog("Welcome to the simple server");  
26.     return(0);  
27. }  
28.   
29. /* This function performs the actual service requested by the client. 
30.    Its argument is a structure containing among other things a pointer 
31.    to the data buffer, and the length of the data buffer. 
32. */  
33.   
34. #ifdef __cplusplus  
35. extern "C"  
36. #endif  
37. void  
38. #if defined(__STDC__) || defined(__cplusplus)  
39. TOUPPER(TPSVCINFO *rqst)  
40. #else  
41. TOUPPER(rqst)  
42. TPSVCINFO *rqst;  
43. #endif  
44. {  
45.   
46.     int i;  
47.   
48.     for(i = 0; i < rqst->len-1; i++)  
49.         rqst->data[i] = toupper(rqst->data[i]);  
50.   
51.     /* Return the transformed buffer to the requestor. */  
52.     tpreturn(TPSUCCESS, 0, rqst->data, 0L, 0);  
53. }  

 2.1.3.    配置ubbconfig
*RESOURCES
IPCKEY        123456

DOMAINID    simpapp
MASTER        simple
MAXACCESSERS    50
MAXSERVERS    25
MAXSERVICES    50
MODEL        SHM
LDBAL        N

*MACHINES
        "SZ-XJS-DUANW"    
        LMID=simple
        APPDIR="C:/bea/tuxedo8.0/samples/atmi/simpapp"
        TUXCONFIG="C:/bea/tuxedo8.0/samples/atmi/simpapp/tuxconfig"
        TUXDIR="C:/bea/tuxedo8.0"

*GROUPS
GROUP1
    LMID=simple    GRPNO=1    OPENINFO=NONE

GROUP2
    LMID=simple GRPNO=2 OPENINFO=NONE

*SERVERS
simpserv    SRVGRP=GROUP1 SRVID=1
/* simpserv编译生成的可执行文件名字*/
DMADM       SRVGRP=GROUP2 SRVID=2
/*域间通信的进程：管理域的server,在运行时管理BDMCONFIG,对已登记的gateway group提供支持,在tuxedo系统中,只能有一个DMADM进程,且不能对它采用MSSQ,不能有REPLYQ.*/

GWADM       SRVGRP=GROUP2 SRVID=3 
/*管理域的域网关进程,在运行时可以对某一组域网关进行管理,主要从DMADM那里取得域的配置信息,并对域网管进程及跨越域的全局事务的LOG文件进行管理.*/

GWTDOMAIN   SRVGRP=GROUP2 SRVID=4
/*处理域之前的互操作,使本地域和调用远程域可以互相调用彼此的service,其中GMADM和GWTDOMAIN必须在一个组中,一个tuxedo应用可以有多个GWADM,GWTDOMAIN对,一个组只能有一个GMADM,GWTDOMAIN对,但一个tuxedo应用只能有一个DMADM,DMADM可以在如何一个组中,一个本地域可以和多个远程域实现互操作. */

*SERVICES
TOUPPER
/* TOUPPER是simpserv文件中的函数名字, 该函数就被发布为属于server: simpserv中的一个tuxedo service*/

2.1.4.    编译ubbconfig文件
Tmloadcf ?y ubbconfig

2.1.5.    配置domconfig
*DM_RESOURCES
VERSION=U22
*DM_LOCAL_DOMAINS
/*DM_LOCAL_DOMAINS定义本地tuxedo域的信息,分别定义该域所在的组,域类型,域的唯一标识,域间通信时日志的全路径,其中GWGRP, DOMAINID的值要与ubb文件中的定义匹配.*/
TDOM1     GWGRP=GROUP2
    TYPE=TDOMAIN
    DOMAINID="TDOM1"
    BLOCKTIME=20
    MAXDATALEN=56
    MAXRDOM=89
    DMTLOGDEV="C:/bea/tuxedo8.0/samples/atmi/simpapp/TLOG"
    AUDITLOG="C:/bea/tuxedo8.0/samples/atmi/simpapp/AUDITLOG"
    DMTLOGNAME="DMTLOG_TUXDOM"
    
*DM_REMOTE_DOMAINS
/*DM_REMOTE_DOMAINS定义远程weblogic域的信息,分别定义域类型,域的唯一性标识,该id标识需要与在weblogic server中的配置名称吻合,否则通信将会失败*/
TDOM2     TYPE=TDOMAIN
    DOMAINID="TDOM2"

*DM_TDOMAIN
/*DM_TDOMAIN定义在DM_LOCAL_DOMAIN中已经说明的本地域和在DM_REMOTE_DOMAINS中已经说明的远程域的具体的通信ip地址以及通信端口,其中NWDEVICE指定tuxedo发布的server通信进程文件所在的路径*/
TDOM1    NWADDR="//10.16.73.31:9998"
TDOM2    NWADDR="//10.16.73.31:9999"

*DM_REMOTE_SERVICES
/*DM_REMOTE_SERVICES定义当前域需要调用远程域的服务名称*/
TOLOWER RDOM="TDOM2"

*DM_LOCAL_SERVICES
/* DM_LOCAL_SERVICES定义当前域对外发布的tuxedo service名称,可以通过RNAME重新命名service；该service可以被其他域中的服务调用*/
TOUPPER  RNAME=" TOUPPER " 

2.1.6.    编译domconfig
dmloadcf -y domconfig

2.    Weblogic配置(7.0以上的版本)
2.1.7.    配置config.xml
   

Xml代码  

1. <WTCServer Name="MyWTCServer" Targets="myserver">  
2.        <WTCExport EJBName="wtcservice" LocalAccessPoint="TDOM2" Name="WTCExport-1111629542315" ResourceName="TOLOWER"/>  
3.        <WTCImport LocalAccessPoint="TDOM2" Name="WTCImport-1111634013933" RemoteAccessPointList="TDOM1" ResourceName="TOUPPER"/>  
4.        <WTCLocalTuxDom AccessPoint="TDOM2" AccessPointId="TDOM2" NWAddr="//10.16.73.31:9999" Name="WTCLocalTuxDom-1111629491418"/>  
5.        <WTCRemoteTuxDom AccessPoint="TDOM1" AccessPointId="TDOM1" LocalAccessPoint="TDOM2" NWAddr="//10.16.73.31:9998" Name="WTCRemoteTuxDom-1111629517202"/>  
6.    </WTCServer>  

 WTCLocalTuxDom中的AccessPointId与在tuxedo dm文件中*DM_REMOTE_DOMAINS节中指定的domainid相同；NWAddr与*DM_TDOMAIN节中相应的NWADDR相同

WTCRemoteTuxDom中的AccessPointId与在tuxedo dm文件中*DM_REMOTE_DOMAINS节中指定的domainid相同；NWAddr与*DM_TDOMAIN节中相应的NWADDR相同

WTCImport中的ResourceName与在tuxedo ubb文件中SERVICES节点中指定的服务名相同；RemoteName与在tuxedo dm文件中* DM_LOCAL_SERVICES节中发布的服务名相同（可以省略）

WTCImport中的ResourceName与在tuxedo dm文件中DM_REMOTE_SERVICES节点中指定的服务名相同

3.    Weblogic做客户端，访问Tuxedo服务

Cpp代码  

1. import="weblogic.wtc.jatmi.;  
2. import="weblogic.wtc.gwt.*;  
3. import="javax.naming.*;  
4. import="java.sql.;  
5.   
6. try  
7. {      
8.     //调用接口服务  
9.     Context ctx = new InitialContext();  
10.     TuxedoConnectionFactory cdmaTuxedoFactory = (TuxedoConnectionFactory) ctx.lookup("tuxedo.services.TuxedoConnection");  
11.     TuxedoConnection cdmaTuxedo = cdmaTuxedoFactory.getTuxedoConnection();  
12.     TypedString cdmaData = new TypedString(inStr);  
13.     Reply cdmaRtn = cdmaTuxedo.tpcall("TOUPPER", cdmaData, 0);  
14.     cdmaData = (TypedString) cdmaRtn.getReplyBuffer();  
15.     outStr = cdmaData.toString();  
16.     cdmaTuxedo.tpterm();  
17. }  
18. catch(Exception e)  
19. {  
20.     outStr = e.getMessage();  
21. }  

 4.    Tuxedo做客户端，访问Weblogic服务

Cpp代码  

1. #include <stdio.h>  
2. #include "atmi.h"        /* TUXEDO  Header File */  
3.   
4.   
5. #if defined(__STDC__) || defined(__cplusplus)  
6. main(int argc, char *argv[])  
7. #else  
8. main(argc, argv)  
9. int argc;  
10. char *argv[];  
11. #endif  
12.   
13. {  
14.   
15.     char *sendbuf, *rcvbuf;  
16.     long sendlen, rcvlen;  
17.     int ret;  
18.   
19.     if(argc != 2) {  
20.         (void) fprintf(stderr, "Usage: simpcl string\n");  
21.         exit(1);  
22.     }  
23.   
24.     /* Attach to System/T as a Client Process */  
25.     if (tpinit((TPINIT *) NULL) == -1) {  
26.         (void) fprintf(stderr, "Tpinit failed\n");  
27.         exit(1);  
28.     }  
29.       
30.     sendlen = strlen(argv[1]);  
31.   
32.     /* Allocate STRING buffers for the request and the reply */  
33.   
34.     if((sendbuf = (char *) tpalloc("STRING", NULL, sendlen+1)) == NULL) {  
35.         (void) fprintf(stderr,"Error allocating send buffer\n");  
36.         tpterm();  
37.         exit(1);  
38.     }  
39.   
40.     if((rcvbuf = (char *) tpalloc("STRING", NULL, sendlen+1)) == NULL) {  
41.         (void) fprintf(stderr,"Error allocating receive buffer\n");  
42.         tpfree(sendbuf);  
43.         tpterm();  
44.         exit(1);  
45.     }  
46.   
47.     (void) strcpy(sendbuf, argv[1]);  
48.   
49.     /* Request the service TOUPPER TOLOWER, waiting for a reply */  
50.     ret = tpcall("TOLOWER", (char *)sendbuf, 0, (char **)&rcvbuf, &rcvlen, (long)0);  
51.   
52.     if(ret == -1) {  
53.         (void) fprintf(stderr, "Can't send request to service TOLOWER\n");  
54.         (void) fprintf(stderr, "Tperrno = %d\n", tperrno);  
55.         tpfree(sendbuf);  
56.         tpfree(rcvbuf);  
57.         tpterm();  
58.         exit(1);  
59.     }  
60.   
61.     (void) fprintf(stdout, "Returned string is: %s\n", rcvbuf);  
62.   
63.     /* Free Buffers & Detach from System/T */  
64.     tpfree(sendbuf);  
65.     tpfree(rcvbuf);  
66.     tpterm();  
67.     return(0);  
68. }