92 lines
1.7 KiB
C
Executable File
92 lines
1.7 KiB
C
Executable File
/* lp 1.4 - Send file to the lineprinter Author: Kees J. Bot
|
|
* 3 Dec 1989
|
|
*/
|
|
#define nil 0
|
|
#include <sys/types.h>
|
|
#include <stdio.h>
|
|
#include <limits.h>
|
|
#include <stdlib.h>
|
|
#include <unistd.h>
|
|
#include <fcntl.h>
|
|
#include <string.h>
|
|
#include <errno.h>
|
|
#include <sys/wait.h>
|
|
|
|
char LPD1[] = "/usr/sbin/lpd"; /* Proper place of lpd */
|
|
char LPD2[] = "/usr/bin/lpd"; /* Minix has no sbin directories. */
|
|
|
|
void report(char *mess)
|
|
{
|
|
fprintf(stderr, "lp: %s: %s\n", mess, strerror(errno));
|
|
}
|
|
|
|
void fatal(char *mess)
|
|
{
|
|
report(mess);
|
|
exit(1);
|
|
}
|
|
|
|
void lp(char *file)
|
|
/* Start the lpd daemon giving it the file to spool and print. */
|
|
{
|
|
int pid, status;
|
|
|
|
if (file[0] != '/' || (pid= fork()) == 0) {
|
|
execl(LPD1, LPD1, file, (char *) nil);
|
|
if (errno != ENOENT) fatal(LPD1);
|
|
execl(LPD2, LPD2, file, (char *) nil);
|
|
fatal(LPD2);
|
|
}
|
|
|
|
if (pid < 0) fatal("can't fork");
|
|
|
|
if (waitpid(pid, &status, 0) < 0) fatal("wait");
|
|
|
|
if (status != 0) exit(1);
|
|
}
|
|
|
|
char path[PATH_MAX+1];
|
|
int cwdsize;
|
|
|
|
int main(int argc, char **argp)
|
|
{
|
|
int e=0;
|
|
char *file;
|
|
|
|
if (argc <= 1) lp("stdin");
|
|
|
|
/* Lpd requires full path names, so find out where we are. */
|
|
if (getcwd(path, sizeof(path)) == nil)
|
|
fatal("Can't determine current directory");
|
|
|
|
cwdsize= strlen(path);
|
|
|
|
/* Hand each file to lpd. */
|
|
while ((file= *++argp) != nil) {
|
|
|
|
close(0);
|
|
|
|
if (open(file, O_RDONLY) != 0) {
|
|
report(file);
|
|
e=1;
|
|
continue;
|
|
}
|
|
if (file[0] == '/') {
|
|
lp(file);
|
|
continue;
|
|
}
|
|
if (cwdsize + 1 + strlen(file) + 1 > sizeof(path)) {
|
|
fprintf(stderr,
|
|
"lp: full pathname of %s is too long\n",
|
|
file);
|
|
e=1;
|
|
continue;
|
|
}
|
|
path[cwdsize] = '/';
|
|
strcpy(path + cwdsize + 1, file);
|
|
|
|
lp(path);
|
|
}
|
|
exit(e);
|
|
}
|