1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
|
/*
* SCCS: @(#)tsinfo.c 1.6 (98/09/01)
*
* UniSoft Ltd., London, England
*
* (C) Copyright 1993 X/Open Company Limited
*
* All rights reserved. No part of this source code may be reproduced,
* stored in a retrieval system, or transmitted, in any form or by any
* means, electronic, mechanical, photocopying, recording or otherwise,
* except as stated in the end-user licence agreement, without the prior
* permission of the copyright owners.
*
* X/Open and the 'X' symbol are trademarks of X/Open Company Limited in
* the UK and other countries.
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
/************************************************************************
SCCS: @(#)tsinfo.c 1.6 98/09/01 TETware release 3.3
NAME: tsinfo.c
PRODUCT: TETware
AUTHOR: Denis McConalogue, UniSoft Ltd.
DATE CREATED: May 1993
DESCRIPTION:
functions to convert DTET interprocess XTI transport-specific
information messages between internal and machine-independent format
MODIFICATIONS:
Andrew Dingwall, UniSoft Ltd., July 1998
Added support for shared API libraries.
************************************************************************/
#include <stdio.h>
#include <sys/types.h>
#include <xti.h>
#include "dtmac.h"
#include "error.h"
#include "ltoa.h"
#include "ldst.h"
#include "dtmsg.h"
#include "ptab.h"
#include "xtilib_xt.h"
#include "tsinfo_xt.h"
#include "dtetlib.h"
static struct stdesc *st = (struct stdesc *)0;
#ifdef TCPTPI
static struct stdesc st_in[] = {
TSINFO_INET_DESC
};
#endif
#ifdef OSITPI
static struct stdesc st_osi[] = {
TSINFO_OSICO_DESC
};
#endif
static short nst = -1;
/* static function declarations */
static void stinit PROTOLIST((void));
static void stinit()
{
register struct tsinfo *sp = (struct tsinfo *) 0;
register int n = 0;
switch (tet_tpi_mode) {
#ifdef TCPTPI
case TPI_TCP:
TSINFO_INET_INIT(st_in, sp, n, nst);
st = st_in;
break;
#endif
#ifdef OSITPI
case TPI_OSICO:
TSINFO_OSICO_INIT(st_osi, sp, n, nst);
st = st_osi;
break;
#endif
default:
fatal(0, "invalid TPI mode, or not defined", tet_i2a(tet_tpi_mode));
break;
}
}
TET_IMPORT int tet_tsinfo2bs(from, to)
register struct tsinfo *from;
register char *to;
{
if (nst < 0)
stinit();
return(tet_st2bs((char *) from, to, st, nst));
}
/*
** tet_bs2tsinfo() - convert a tsinfo message to internal format
*/
int tet_bs2tsinfo(from, fromlen, to, tolen)
register char *from;
register int fromlen;
register struct tsinfo **to;
register int *tolen;
{
if (nst < 0)
stinit();
if (BUFCHK((char **) to, tolen, sizeof **to) < 0)
return(-1);
if (tet_bs2st(from, (char *) *to, st, nst, fromlen) < 0)
return(-1);
return(sizeof **to);
}
|
