|
|
1.1 root 1: /* is2paddr.c - old-style P-ADDR lookup */
2:
3: #ifndef lint
4: static char *rcsid = "$Header: /f/osi/acsap/RCS/is2paddr.c,v 7.1 90/03/05 23:02:18 mrose Exp $";
5: #endif
6:
7: /*
8: * $Header: /f/osi/acsap/RCS/is2paddr.c,v 7.1 90/03/05 23:02:18 mrose Exp $
9: *
10: *
11: * $Log: is2paddr.c,v $
12: * Revision 7.1 90/03/05 23:02:18 mrose
13: * touch-up
14: *
15: * Revision 7.0 89/11/23 21:22:10 mrose
16: * Release 6.0
17: *
18: */
19:
20: /*
21: * NOTICE
22: *
23: * Acquisition, use, and distribution of this module and related
24: * materials are subject to the restrictions of a license agreement.
25: * Consult the Preface in the User's Manual for the full terms of
26: * this agreement.
27: *
28: */
29:
30:
31: /* LINTLIBRARY */
32:
33: #include <stdio.h>
34: #include "psap.h"
35: #include "isoaddrs.h"
36: #include "isoservent.h"
37:
38: /* */
39:
40: struct PSAPaddr *is2paddr (host, service, is)
41: char *host,
42: *service;
43: struct isoservent *is;
44: {
45: AEI aei;
46: struct PSAPaddr *pa;
47:
48: if ((aei = str2aei (host, service)) == NULLAEI
49: || (pa = aei2addr (aei)) == NULLPA)
50: return NULLPA;
51:
52: if (is && strcmp (is -> is_provider, "psap") == 0) {
53: if (is -> is_selectlen > PSSIZE) /* XXX */
54: return NULLPA;
55:
56: bcopy (is -> is_selector, pa -> pa_selector,
57: pa -> pa_selectlen = is -> is_selectlen);
58: }
59:
60: return pa;
61: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.