9 * Take message and feed a request to UUX
11 * qu2uu_send does the interesting work. This interface was developed
12 * for MMDF by Doug Kingston at the US Army Ballistics Research Lab,
13 * Aberdeen, Maryland. <dpk@brl>
15 * Original Version 21 Oct 81
20 * 27-Oct-82 Marshall T. Rose <mrose%uci@rand-relay>
21 * Support proper munging by using the UCI mail filtering
22 * routines (enabled by #ifdef MF)
24 * 17-Oct-83 Marshall T. Rose <mrose%uci@rand-relay>
25 * Major re-organization and some new interfacing.
30 * MULTI-CHANNEL MEMO DISTRIBUTION FACILITY (MMDF)
33 * Department of Electrical Engineering
34 * University of Delaware
35 * Newark, Delaware 19711
37 * Phone: (302) 738-1163
44 extern char logdfldir[];
46 extern struct ll_struct chanlog;
47 struct ll_struct *logptr = &chanlog;
60 ll_hdinit (logptr, "UU");
61 logptr -> ll_file = dupfpath (logptr -> ll_file, logdfldir);
64 signal (SIGINT, SIG_IGN);
66 if ((chanptr = ch_nm2struct (*argv)) == (Chan *) NOTOK)
67 err_abrt (RP_PARM, "unknown channel name '%s'", *argv);
69 retval = ch_uucp (argc, argv, chanptr);
77 ch_uucp (argc, argv, chanptr)
83 logptr -> ll_level = LLOGBTR;
84 ll_log (logptr, LLOGBTR, "ch_uucp(argc=%d,*argv='%s')", argc, *argv);
87 if (rp_isbad (qu_init (argc, argv)))
89 if (rp_isbad (uu_init (chanptr)))
92 if (rp_isbad (qu2uu_send ()))
103 err_abrt (code, fmt, b, c, d)
110 char linebuf[LINESIZE];
115 sprintf (linebuf, "%s%s", "[ABEND: %s]", fmt);
116 ll_log (logptr, LLOGFAT, linebuf, rp_valstr (code), b, c, d);