#include

#include "atmi.h"         /* TUXEDO 頭文件*/

#if defined(__STDC__) || defined(__cplusplus)

main(int argc, char *argv[])

#else

main(argc, argv)

int argc;

char *argv[];

#endif

{

       char *sendbuf, *rcvbuf;

       long sendlen, rcvlen;

       int ret;

       if(argc != 2) {

              (void) fprintf(stderr, "Usage: simpcl string ");

              exit(1);

       }

       /* 作為tuxedo客戶端連入tuxedo System */

       if (tpinit((TPINIT *) NULL) == -1) {

              (void) fprintf(stderr, "Tpinit failed ");

              exit(1);

       }

       sendlen = strlen(argv[1]);

       /* 使用tpalloc申請string類型buffer作為請求和應答buffer */

       if((sendbuf = (char *) tpalloc("STRING", NULL, sendlen+1)) == NULL) {

              (void) fprintf(stderr,"Error allocating send buffer ");

              tpterm();

              exit(1);

       }

       if((rcvbuf = (char *) tpalloc("STRING", NULL, sendlen+1)) == NULL) {

              (void) fprintf(stderr,"Error allocating receive buffer ");

              tpfree(sendbuf);

              tpterm();

              exit(1);

       }

       (void) strcpy(sendbuf, argv[1]);

       /* 同步調用TOUPPER服務 */

       ret = tpcall("TOUPPER", (char *)sendbuf, 0, (char **)&rcvbuf, &rcvlen, (long)0);

       if(ret == -1) {

              (void) fprintf(stderr, "Can't send request to service TOUPPER ");

              (void) fprintf(stderr, "Tperrno = %d ", tperrno);

              tpfree(sendbuf);

              tpfree(rcvbuf);

              tpterm();

              exit(1);

       }

       (void) fprintf(stdout, "Returned string is: %s ", rcvbuf);

       /* 使用tpfree釋放申請的請求和應答buffer空間 */

       tpfree(sendbuf);

       tpfree(rcvbuf);

       /* 使用tpterm離開tuxedo System */

       tpterm();

       return(0);

}

#include

#include

#include        /* TUXEDO頭文件 */

#include   /* TUXEDO頭文件 */

#if defined(__STDC__) || defined(__cplusplus)

tpsvrinit(int argc, char *argv[])

#else

tpsvrinit(argc, argv)

int argc;

char **argv;

#endif

{

       /* 如果沒有argc、argv一些編譯系統會有警告信息. */

       argc = argc;

       argv = argv;

       /* userlog 把tuxedo消息寫入日志文件中 */

       userlog("Welcome to the simple server");

       return(0);

}

#ifdef __cplusplus

extern "C"

#endif

void

#if defined(__STDC__) || defined(__cplusplus)

TOUPPER(TPSVCINFO *rqst)  /*tuxedo服務名字TOUPPER*/

#else

TOUPPER(rqst)

TPSVCINFO *rqst;

#endif

{

       int i;

       for(i = 0; i < rqst->len-1; i++)

              rqst->data[i] = toupper(rqst->data[i]);

       /* 設置返回客戶端buffer */

       tpreturn(TPSUCCESS, 0, rqst->data, 0L, 0);

}

#ident  "@(#) apps/simpapp/ubbsimple    : 1.1

#Skeleton UBBCONFIG file for the TUXEDO Simple Application.

#Replace the items with the appropriate values.

*RESOURCES

IPCKEY      262101

#IPCKEY必須是在32768 與 262143 之間

#Example:

#IPCKEY     123456

DOMAINID    simpapp

MASTER      simple

MAXACCESSERS    10

MAXSERVERS  5

MAXSERVICES10

MODEL       SHM

LDBAL       N

*MACHINES

DEFAULT:

        APPDIR="c: uxedowsy"

        TUXCONFIG="c: uxedowsy uxconfig"

        TUXDIR="c: uxedo"

"WSY"       LMID=simple

*GROUPS

GROUP1

    LMID=simpleGRPNO=1OPENINFO=NONE

*SERVERS

DEFAULT:

        CLOPT="-A"

simpserv    SRVGRP=GROUP1 SRVID=1

*SERVICES

TOUPPER