![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to tdial.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 tdial.c CVS log | Up to [MW Coherent from dump] / coherent / g / usr / lib / uucp / tay104 / uuconf |
1.1 root 1: /* tdial.c
2: Find a dialer in the Taylor UUCP configuration files.
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_tdial_rcsid[] = "$Id: tdial.c,v 1.1 93/07/30 08:07:40 bin Exp Locker: bin $";
30: #endif
31:
32: #include <errno.h>
33:
34: static int iddialer P((pointer pglobal, int argc, char **argv, pointer pvar,
35: pointer pinfo));
36: static int idunknown P((pointer pglobal, int argc, char **argv, pointer pvar,
37: pointer pinfo));
38:
39: /* Find a dialer in the Taylor UUCP configuration files by name. */
40:
41: int
42: uuconf_taylor_dialer_info (pglobal, zname, qdialer)
43: pointer pglobal;
44: const char *zname;
45: struct uuconf_dialer *qdialer;
46: {
47: struct sglobal *qglobal = (struct sglobal *) pglobal;
48: FILE *e;
49: pointer pblock;
50: int iret;
51: char **pz;
52:
53: e = NULL;
54: pblock = NULL;
55: iret = UUCONF_NOT_FOUND;
56:
57: for (pz = qglobal->qprocess->pzdialfiles; *pz != NULL; pz++)
58: {
59: struct uuconf_cmdtab as[2];
60: char *zdialer;
61: struct uuconf_dialer sdefault;
62: int ilineno;
63:
64: e = fopen (*pz, "r");
65: if (e == NULL)
66: {
67: if (FNO_SUCH_FILE ())
68: continue;
69: qglobal->ierrno = errno;
70: iret = UUCONF_FOPEN_FAILED | UUCONF_ERROR_ERRNO;
71: break;
72: }
73:
74: qglobal->ilineno = 0;
75:
76: /* Gather the default information from the top of the file. We
77: do this by handling the "dialer" command ourselves and
78: passing every other command to _uuconf_idialer_cmd via
79: idunknown. The value of zdialer will be an malloc block. */
80: as[0].uuconf_zcmd = "dialer";
81: as[0].uuconf_itype = UUCONF_CMDTABTYPE_FN | 2;
82: as[0].uuconf_pvar = (pointer) &zdialer;
83: as[0].uuconf_pifn = iddialer;
84:
85: as[1].uuconf_zcmd = NULL;
86:
87: pblock = uuconf_malloc_block ();
88: if (pblock == NULL)
89: {
90: qglobal->ierrno = errno;
91: iret = UUCONF_MALLOC_FAILED | UUCONF_ERROR_ERRNO;
92: break;
93: }
94:
95: _uuconf_uclear_dialer (&sdefault);
96: sdefault.uuconf_palloc = pblock;
97: zdialer = NULL;
98: iret = uuconf_cmd_file (pglobal, e, as, (pointer) &sdefault,
99: idunknown, UUCONF_CMDTABFLAG_BACKSLASH,
100: pblock);
101:
102: /* Now skip until we find a dialer with a matching name. */
103: while (iret == UUCONF_SUCCESS
104: && zdialer != NULL
105: && strcmp (zname, zdialer) != 0)
106: {
107: free ((pointer) zdialer);
108: zdialer = NULL;
109: ilineno = qglobal->ilineno;
110: iret = uuconf_cmd_file (pglobal, e, as, (pointer) NULL,
111: (uuconf_cmdtabfn) NULL,
112: UUCONF_CMDTABFLAG_BACKSLASH,
113: pblock);
114: qglobal->ilineno += ilineno;
115: }
116:
117: if (iret != UUCONF_SUCCESS)
118: {
119: if (zdialer != NULL)
120: free ((pointer) zdialer);
121: break;
122: }
123:
124: if (zdialer != NULL)
125: {
126: size_t csize;
127:
128: /* We've found the dialer we're looking for. Read the rest
129: of the commands for it. */
130: as[0].uuconf_pvar = NULL;
131:
132: *qdialer = sdefault;
133: csize = strlen (zdialer) + 1;
134: qdialer->uuconf_zname = uuconf_malloc (pblock, csize);
135: if (qdialer->uuconf_zname == NULL)
136: {
137: qglobal->ierrno = errno;
138: free ((pointer) zdialer);
139: iret = UUCONF_MALLOC_FAILED | UUCONF_ERROR_ERRNO;
140: break;
141: }
142: memcpy ((pointer) qdialer->uuconf_zname, (pointer) zdialer,
143: csize);
144: free ((pointer) zdialer);
145:
146: ilineno = qglobal->ilineno;
147: iret = uuconf_cmd_file (pglobal, e, as, qdialer, idunknown,
148: UUCONF_CMDTABFLAG_BACKSLASH, pblock);
149: qglobal->ilineno += ilineno;
150: break;
151: }
152:
153: (void) fclose (e);
154: e = NULL;
155: uuconf_free_block (pblock);
156: pblock = NULL;
157:
158: iret = UUCONF_NOT_FOUND;
159: }
160:
161: if (e != NULL)
162: (void) fclose (e);
163: if (iret != UUCONF_SUCCESS && pblock != NULL)
164: uuconf_free_block (pblock);
165:
166: if (iret != UUCONF_SUCCESS && iret != UUCONF_NOT_FOUND)
167: {
168: qglobal->zfilename = *pz;
169: iret |= UUCONF_ERROR_FILENAME;
170: }
171:
172: return iret;
173: }
174:
175: /* Handle a "dialer" command. This copies the string onto the heap
176: and returns the pointer in *pvar, unless pvar is NULL. It returns
177: UUCONF_CMDTABRET_EXIT to force _uuconf_icmd_file_internal to stop
178: reading and return to the code above, which will then check the
179: dialer name just read to see if it matches. */
180:
181: /*ARGSUSED*/
182: static int
183: iddialer (pglobal, argc, argv, pvar, pinfo)
184: pointer pglobal;
185: int argc;
186: char **argv;
187: pointer pvar;
188: pointer pinfo;
189: {
190: struct sglobal *qglobal = (struct sglobal *) pglobal;
191: char **pz = (char **) pvar;
192:
193: if (pz != NULL)
194: {
195: size_t csize;
196:
197: csize = strlen (argv[1]) + 1;
198: *pz = malloc (csize);
199: if (*pz == NULL)
200: {
201: qglobal->ierrno = errno;
202: return (UUCONF_MALLOC_FAILED
203: | UUCONF_ERROR_ERRNO
204: | UUCONF_CMDTABRET_EXIT);
205: }
206: memcpy ((pointer) *pz, (pointer) argv[1], csize);
207: }
208: return UUCONF_CMDTABRET_EXIT;
209: }
210:
211: /* Handle an unknown command by passing it on to _uuconf_idialer_cmd,
212: which will parse it into the dialer structure. */
213:
214: /*ARGSUSED*/
215: static int
216: idunknown (pglobal, argc, argv, pvar, pinfo)
217: pointer pglobal;
218: int argc;
219: char **argv;
220: pointer pvar;
221: pointer pinfo;
222: {
223: struct sglobal *qglobal = (struct sglobal *) pglobal;
224: struct uuconf_dialer *qdialer = (struct uuconf_dialer *) pinfo;
225:
226: return _uuconf_idialer_cmd (qglobal, argc, argv, qdialer);
227: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.