client.c
上传用户:xfwatch
上传日期:2020-12-14
资源大小:872k
文件大小:2k
源码类别:

中间件编程

开发平台:

Java

  1. /*
  2.  * JBoss, Home of Professional Open Source
  3.  * Copyright 2008, Red Hat, Inc., and others contributors as indicated
  4.  * by the @authors tag. All rights reserved.
  5.  * See the copyright.txt in the distribution for a
  6.  * full listing of individual contributors.
  7.  * This copyrighted material is made available to anyone wishing to use,
  8.  * modify, copy, or redistribute it subject to the terms and conditions
  9.  * of the GNU Lesser General Public License, v. 2.1.
  10.  * This program is distributed in the hope that it will be useful, but WITHOUT A
  11.  * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
  12.  * PARTICULAR PURPOSE.  See the GNU Lesser General Public License for more details.
  13.  * You should have received a copy of the GNU Lesser General Public License,
  14.  * v.2.1 along with this distribution; if not, write to the Free Software
  15.  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
  16.  * MA  02110-1301, USA.
  17.  */
  18. #include <stdio.h>
  19. #include <string.h>
  20. #include "xatmi.h"
  21. #include "userlogc.h"
  22. int main(int argc, char **argv) {
  23. int tpstatus;
  24. char *retbuf;
  25. char type[20];
  26. char subtype[20];
  27. long retbufsize;
  28. char *sbuf;
  29. long sbufsize;
  30. long callflags;
  31. int i;
  32. for (i = 0; i < 10; i++) {
  33. callflags = 0L;
  34. sbufsize = 29;
  35. sbuf = tpalloc("X_OCTET", 0, sbufsize);
  36. memset(sbuf, 0, sbufsize);
  37. strcpy(sbuf, "THIS IS YOUR CLIENT SPEAKING");
  38. retbufsize = 15;
  39. retbuf = tpalloc("X_OCTET", 0, retbufsize);
  40. memset(retbuf, 0, retbufsize);
  41. // tptypes
  42. tptypes(sbuf, type, subtype);
  43. // tpcall
  44. userlogc((char*) "Calling tpcall with input: %s", sbuf);
  45. tpstatus = tpcall("BAR", sbuf, sbufsize, (char **) &retbuf,
  46. &retbufsize, callflags);
  47. userlogc(
  48. (char*) "Called tpcall with length: %d output: %s and status: %d and tperrno: %d",
  49. retbufsize, retbuf, tpstatus, tperrno);
  50. if (tpstatus == -1 && tperrno == TPENOENT) {
  51. tpfree(sbuf);
  52. tpfree(retbuf);
  53. return -1;
  54. }
  55. tpfree(sbuf);
  56. tpfree(retbuf);
  57. }
  58. return 0;
  59. }