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
|
/*
* SCCS: @(#)tccdaddr.c 1.10 (98/09/01)
*
* UniSoft Ltd., London, England
*
* (C) Copyright 1992 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
#ifndef lint
static char sccsid[] = "@(#)tccdaddr.c 1.10 (98/09/01) TET3 release 3.3";
#endif
/************************************************************************
SCCS: @(#)tccdaddr.c 1.10 98/09/01 TETware release 3.3
NAME: tccdaddr.c
PRODUCT: TETware
AUTHOR: Andrew Dingwall, UniSoft Ltd.
DATE CREATED: April 1992
DESCRIPTION:
function to determine tccd INET address and port number
MODIFICATIONS:
Andrew Dingwall, UniSoft Ltd., October 1996
Windows NT port
Andrew Dingwall, UniSoft Ltd., December 1996
remove casts from inet_addr() call - for n-bit portability
Andrew Dingwall, UniSoft Ltd., March 1997
remove #ifndef __hpux from #include <arpa/inet.h>
since current HP-UX implementations now have this file
Andrew Dingwall, UniSoft Ltd., July 1998
Enable the tccd port number to be specified in the systems file.
Added support for shared API libraries.
Changes to conform to UNIX98.
************************************************************************/
#include <stdlib.h>
#include <errno.h>
#include <sys/types.h>
# include <sys/uio.h>
# include <sys/socket.h>
# include <netinet/in.h>
# include <arpa/inet.h>
#include "dtmac.h"
#include "dtmsg.h"
#include "ptab.h"
#include "tptab_in.h"
#include "sysent.h"
#include "error.h"
#include "ltoa.h"
#include "inetlib_in.h"
#ifdef NEEDsrcFile
static char srcFile[] = __FILE__; /* file name for error reporting */
#endif
/*
** tet_gettccdaddr() - look up the INET address and port number for
** a TCCD and store it in the related tptab entry
**
** return 0 if successful or -1 on error
*/
TET_IMPORT int tet_gettccdaddr(pp)
struct ptab *pp;
{
struct in_addr addr, *ap;
register struct sysent *sp;
register struct tptab *tp = (struct tptab *) pp->pt_tdata;
register int port;
/* look up the host name in the systems file */
errno = 0;
if ((sp = tet_libgetsysbyid(pp->ptr_sysid)) == (struct sysent *) 0) {
error(errno, "can't get systems file entry for sysid",
tet_i2a(pp->ptr_sysid));
return(-1);
}
/* if the system name is a host name, get the INET address */
if ((addr.s_addr = inet_addr(sp->sy_name)) == -1)
if ((ap = tet_gethostaddr(sp->sy_name)) == (struct in_addr *) 0)
return(-1);
else
addr = *ap;
/* get the port number */
if (sp->sy_tccd) {
if ((port = atoi(sp->sy_tccd)) <= 0 || port >= (1 << 16)) {
error(0,
"bad port number specified in the systems file for sysid",
tet_i2a(sp->sy_sysid));
return(-1);
}
}
else if ((port = tet_gettccdport()) == -1)
return(-1);
/* all ok so fill in the address details */
tp->tp_sin.sin_family = AF_INET;
tp->tp_sin.sin_addr = addr;
tp->tp_sin.sin_port = htons((unsigned short) port);
return(0);
}
|
