![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to hunk.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [MW Coherent from dump] / coherent / g / usr / lib / uucp / tay104 / uuconf|
Return to hunk.c CVS log | Up to [MW Coherent from dump] / coherent / g / usr / lib / uucp / tay104 / uuconf |
1.1 root 1: /* hunk.c
2: Get information about an unknown system from the HDB Permissions file.
3:
4: Copyright (C) 1992 Ian Lance Taylor
5:
6: This file is part of the Taylor UUCP uuconf library.
7:
8: This library is free software; you can redistribute it and/or
9: modify it under the terms of the GNU Library General Public License
10: as published by the Free Software Foundation; either version 2 of
11: the License, or (at your option) any later version.
12:
13: This library is distributed in the hope that it will be useful, but
14: WITHOUT ANY WARRANTY; without even the implied warranty of
15: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16: Library General Public License for more details.
17:
18: You should have received a copy of the GNU Library General Public
19: License along with this library; if not, write to the Free Software
20: Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21:
22: The author of the program may be contacted at [email protected] or
23: c/o Infinity Development Systems, P.O. Box 520, Waltham, MA 02254.
24: */
25:
26: #include "uucnfi.h"
27:
28: #if USE_RCS_ID
29: const char _uuconf_hunk_rcsid[] = "$Id: hunk.c,v 1.1 93/07/30 08:07:20 bin Exp Locker: bin $";
30: #endif
31:
32: #include <errno.h>
33:
34: /* Get information about an unknown system from the HDB Permissions
35: file. This doesn't run the remote.unknown shell script, because
36: that's too system dependent. */
37:
38: int
39: uuconf_hdb_system_unknown (pglobal, qsys)
40: pointer pglobal;
41: struct uuconf_system *qsys;
42: {
43: struct sglobal *qglobal = (struct sglobal *) pglobal;
44: int iret;
45: boolean ffirst;
46: struct shpermissions *qperm;
47: struct uuconf_system *qalt;
48:
49: if (! qglobal->qprocess->fhdb_read_permissions)
50: {
51: iret = _uuconf_ihread_permissions (qglobal);
52: if (iret != UUCONF_SUCCESS)
53: return iret;
54: }
55:
56: _uuconf_uclear_system (qsys);
57: qsys->uuconf_palloc = uuconf_malloc_block ();
58: if (qsys->uuconf_palloc == NULL)
59: {
60: qglobal->ierrno = errno;
61: return UUCONF_MALLOC_FAILED | UUCONF_ERROR_ERRNO;
62: }
63:
64: ffirst = TRUE;
65:
66: for (qperm = qglobal->qprocess->qhdb_permissions;
67: qperm != NULL;
68: qperm = qperm->qnext)
69: {
70: char **pz;
71:
72: if (qperm->pzlogname == NULL
73: || qperm->pzlogname == (char **) &_uuconf_unset)
74: continue;
75:
76: for (pz = qperm->pzlogname; *pz != NULL; pz++)
77: {
78: if (ffirst)
79: {
80: qalt = qsys;
81: ffirst = FALSE;
82: }
83: else
84: {
85: struct uuconf_system **pq;
86:
87: qalt = ((struct uuconf_system *)
88: uuconf_malloc (qsys->uuconf_palloc,
89: sizeof (struct uuconf_system)));
90: if (qalt == NULL)
91: {
92: qglobal->ierrno = errno;
93: return UUCONF_MALLOC_FAILED | UUCONF_ERROR_ERRNO;
94: }
95:
96: _uuconf_uclear_system (qalt);
97: for (pq = &qsys->uuconf_qalternate;
98: *pq != NULL;
99: pq = &(*pq)->uuconf_qalternate)
100: ;
101: *pq = qalt;
102: }
103:
104: /* We recognize LOGNAME=OTHER specially, although this
105: appears to be an SCO innovation. */
106: if (strcmp (*pz, "OTHER") == 0)
107: qalt->uuconf_zcalled_login = (char *) "ANY";
108: else
109: qalt->uuconf_zcalled_login = *pz;
110: qalt->uuconf_fcall = FALSE;
111: qsys->uuconf_fcalled = TRUE;
112: if (qperm->frequest >= 0)
113: qsys->uuconf_fsend_request = qperm->frequest;
114: else
115: qsys->uuconf_fsend_request = FALSE;
116: qsys->uuconf_fcalled_transfer = qperm->fsendfiles;
117: qsys->uuconf_pzremote_send = qperm->pzread;
118: qsys->uuconf_pzremote_receive = qperm->pzwrite;
119: qsys->uuconf_fcallback = qperm->fcallback;
120: qsys->uuconf_zlocalname = qperm->zmyname;
121: qsys->uuconf_zpubdir = qperm->zpubdir;
122: }
123: }
124:
125: if (ffirst)
126: return UUCONF_NOT_FOUND;
127:
128: /* HDB permits local requests to receive to any directory, which is
129: not the default put in by _uuconf_isystem_basic_default. We set
130: it here instead. */
131: for (qalt = qsys; qalt != NULL; qalt = qalt->uuconf_qalternate)
132: {
133: iret = _uuconf_iadd_string (qglobal, (char *) ZROOTDIR,
134: FALSE, FALSE,
135: &qalt->uuconf_pzlocal_receive,
136: qsys->uuconf_palloc);
137: if (iret != UUCONF_SUCCESS)
138: return iret;
139: }
140:
141: return _uuconf_isystem_basic_default (qglobal, qsys);
142: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.