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
|
/*
* SCCS: @(#)lname2addr.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.
*/
#ifndef lint
static char sccsid[] = "@(#)lname2addr.c 1.6 (98/09/01) TET3 release 3.3";
#endif
/************************************************************************
SCCS: @(#)lname2addr.c 1.6 98/09/01 TETware release 3.3
NAME: lname2addr.c
PRODUCT: TETware
AUTHOR: Denis McConalogue, UniSoft Ltd.
DATE CREATED: April 1993
DESCRIPTION:
function to convert printable XTI caller address into struct netbuf
format.
Warning: The address returned is a pointer to a static buffer. All
the fields of the structure and the address pointed to by
the buf field of the structure should be copied to local
storage after calling this function.
MODIFICATIONS:
Andrew Dingwall, UniSoft Ltd., July 1998
Added support for shared API libraries.
************************************************************************/
#include <sys/types.h>
#include <xti.h>
#include "dtmac.h"
#include "dtmsg.h"
#include "ptab.h"
#include "xtilib_xt.h"
/*
** tet_lname2addr() - convert XTI call address from ascii to binary
*/
TET_IMPORT struct netbuf *tet_lname2addr(ln)
char *ln;
{
static struct netbuf ret;
static char addr[MAX_ADDRL];
register char *p=addr;
char c;
unsigned int len;
if (!ln || !*ln)
return (struct netbuf *)0;
for (len=0; *ln; ln++) {
if (len >= MAX_ADDRL)
return (struct netbuf *)0;
if (isdigit(*ln))
c = (*ln - '0')<<4;
else {
if (isxdigit(*ln))
c = (*ln + 10 - (islower(*ln) ? 'a':'A'))<<4;
else
return (struct netbuf *)0;
}
ln++;
if (isdigit(*ln))
c += (*ln - '0');
else {
if (isxdigit(*ln))
c += (*ln + 10 - (islower(*ln) ? 'a':'A'));
else
return (struct netbuf *)0;
}
*p++=c;
len++;
}
ret.maxlen = MAX_ADDRL;
ret.len = len;
ret.buf = addr;
return (&ret);
}
|
