#include <stdio.h>
#include <stdlib.h>
#include <errno.h>
#include <cups/string.h>
#include <cups/cups.h>
#include <cups/i18n.h>
#ifndef WIN32
# include <unistd.h>
# include <signal.h>
void sighandler(int);
#endif
int restart_job(const char *command, int job_id);
int set_job_attrs(const char *command, int job_id, int num_options,
cups_option_t *options);
char tempfile[1024];
int
main(int argc,
char *argv[])
{
int i, j;
int job_id;
char *printer,
*instance,
*val,
*title;
int priority;
int num_copies;
int num_files;
const char *files[1000];
int num_dests;
cups_dest_t *dests,
*dest;
int num_options;
cups_option_t *options;
int end_options;
int silent;
char buffer[8192];
ssize_t bytes;
off_t filesize;
int temp;
#if defined(HAVE_SIGACTION) && !defined(HAVE_SIGSET)
struct sigaction action;
struct sigaction oldaction;
#endif
#ifdef __sun
if ((val = strrchr(argv[0], '/')) != NULL)
val ++;
else
val = argv[0];
if (!strcmp(val, "printd"))
return (0);
#endif
_cupsSetLocale(argv);
silent = 0;
printer = NULL;
num_dests = 0;
dests = NULL;
num_options = 0;
options = NULL;
num_files = 0;
title = NULL;
job_id = 0;
end_options = 0;
for (i = 1; i < argc; i ++)
if (argv[i][0] == '-' && argv[i][1] && !end_options)
switch (argv[i][1])
{
case 'E' :
#ifdef HAVE_SSL
cupsSetEncryption(HTTP_ENCRYPT_REQUIRED);
#else
_cupsLangPrintf(stderr,
_("%s: Sorry, no encryption support compiled in!\n"),
argv[0]);
#endif
break;
case 'U' :
if (argv[i][2] != '\0')
cupsSetUser(argv[i] + 2);
else
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected username after "
"\'-U\' option!\n"),
argv[0]);
return (1);
}
cupsSetUser(argv[i]);
}
break;
case 'c' :
break;
case 'd' :
if (argv[i][2] != '\0')
printer = argv[i] + 2;
else
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected destination after "
"\'-d\' option!\n"),
argv[0]);
return (1);
}
printer = argv[i];
}
if ((instance = strrchr(printer, '/')) != NULL)
*instance++ = '\0';
if (num_dests == 0)
num_dests = cupsGetDests(&dests);
if ((dest = cupsGetDest(printer, instance, num_dests, dests)) != NULL)
{
for (j = 0; j < dest->num_options; j ++)
if (cupsGetOption(dest->options[j].name, num_options, options) == NULL)
num_options = cupsAddOption(dest->options[j].name,
dest->options[j].value,
num_options, &options);
}
break;
case 'f' :
if (!argv[i][2])
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected form after \'-f\' "
"option!\n"),
argv[0]);
return (1);
}
}
_cupsLangPrintf(stderr, _("%s: Warning - form option ignored!\n"),
argv[0]);
break;
case 'h' :
if (argv[i][2] != '\0')
cupsSetServer(argv[i] + 2);
else
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected hostname after "
"\'-h\' option!\n"),
argv[0]);
return (1);
}
cupsSetServer(argv[i]);
}
break;
case 'i' :
if (argv[i][2])
val = argv[i] + 2;
else
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Expected job ID after \'-i\' option!\n"),
argv[0]);
return (1);
}
val = argv[i];
}
if (num_files > 0)
{
_cupsLangPrintf(stderr,
_("%s: Error - cannot print files and alter "
"jobs simultaneously!\n"),
argv[0]);
return (1);
}
if (strrchr(val, '-') != NULL)
job_id = atoi(strrchr(val, '-') + 1);
else
job_id = atoi(val);
if (job_id < 0)
{
_cupsLangPrintf(stderr, _("%s: Error - bad job ID!\n"), argv[0]);
break;
}
break;
case 'm' :
#ifdef __sun
case 'p' :
#endif
case 'w' :
{
char email[1024];
snprintf(email, sizeof(email), "mailto:%s@%s", cupsUser(),
httpGetHostname(NULL, buffer, sizeof(buffer)));
num_options = cupsAddOption("notify-recipient-uri", email,
num_options, &options);
}
silent = 1;
break;
case 'n' :
if (argv[i][2] != '\0')
num_copies = atoi(argv[i] + 2);
else
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected copies after "
"\'-n\' option!\n"),
argv[0]);
return (1);
}
num_copies = atoi(argv[i]);
}
sprintf(buffer, "%d", num_copies);
num_options = cupsAddOption("copies", buffer, num_options, &options);
break;
case 'o' :
if (argv[i][2] != '\0')
num_options = cupsParseOptions(argv[i] + 2, num_options, &options);
else
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected option string after "
"\'-o\' option!\n"),
argv[0]);
return (1);
}
num_options = cupsParseOptions(argv[i], num_options, &options);
}
break;
#ifndef __sun
case 'p' :
#endif
case 'q' :
if (argv[i][2] != '\0')
priority = atoi(argv[i] + 2);
else
{
if ((i + 1) >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected priority after "
"\'-%c\' option!\n"),
argv[0], argv[i][1]);
return (1);
}
i ++;
priority = atoi(argv[i]);
}
if (priority < 1 || priority > 100)
{
_cupsLangPrintf(stderr,
_("%s: Error - priority must be between 1 and "
"100.\n"),
argv[0]);
return (1);
}
sprintf(buffer, "%d", priority);
num_options = cupsAddOption("job-priority", buffer, num_options, &options);
break;
case 's' :
silent = 1;
break;
case 't' :
if (argv[i][2] != '\0')
title = argv[i] + 2;
else
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected title after "
"\'-t\' option!\n"),
argv[0]);
return (1);
}
title = argv[i];
}
break;
case 'y' :
if (!argv[i][2])
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected mode list after "
"\'-y\' option!\n"),
argv[0]);
return (1);
}
}
_cupsLangPrintf(stderr,
_("%s: Warning - mode option ignored!\n"),
argv[0]);
break;
case 'H' :
if (argv[i][2])
val = argv[i] + 2;
else
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected hold name after "
"\'-H\' option!\n"),
argv[0]);
return (1);
}
val = argv[i];
}
if (!strcmp(val, "hold"))
num_options = cupsAddOption("job-hold-until", "indefinite",
num_options, &options);
else if (!strcmp(val, "resume") ||
!strcmp(val, "release"))
num_options = cupsAddOption("job-hold-until", "no-hold",
num_options, &options);
else if (!strcmp(val, "immediate"))
num_options = cupsAddOption("job-priority", "100",
num_options, &options);
else if (!strcmp(val, "restart"))
{
if (job_id < 1)
{
_cupsLangPrintf(stderr,
_("%s: Need job ID (\'-i jobid\') before "
"\'-H restart\'!\n"),
argv[0]);
return (1);
}
if (restart_job(argv[0], job_id))
return (1);
}
else
num_options = cupsAddOption("job-hold-until", val,
num_options, &options);
break;
case 'P' :
if (argv[i][2])
val = argv[i] + 2;
else
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected page list after "
"\'-P\' option!\n"),
argv[0]);
return (1);
}
val = argv[i];
}
num_options = cupsAddOption("page-ranges", val, num_options,
&options);
break;
case 'S' :
if (!argv[i][2])
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected character set after "
"\'-S\' option!\n"),
argv[0]);
return (1);
}
}
_cupsLangPrintf(stderr,
_("%s: Warning - character set option ignored!\n"),
argv[0]);
break;
case 'T' :
if (!argv[i][2])
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - expected content type after "
"\'-T\' option!\n"),
argv[0]);
return (1);
}
}
_cupsLangPrintf(stderr,
_("%s: Warning - content type option ignored!\n"),
argv[0]);
break;
case '-' :
end_options = 1;
break;
default :
_cupsLangPrintf(stderr, _("%s: Error - unknown option \'%c\'!\n"),
argv[0], argv[i][1]);
return (1);
}
else if (!strcmp(argv[i], "-"))
{
if (num_files || job_id)
{
_cupsLangPrintf(stderr,
_("%s: Error - cannot print from stdin if files or a "
"job ID are provided!\n"),
argv[0]);
return (1);
}
break;
}
else if (num_files < 1000 && job_id == 0)
{
if (access(argv[i], R_OK) != 0)
{
_cupsLangPrintf(stderr, _("%s: Error - unable to access \"%s\" - %s\n"),
argv[0], argv[i], strerror(errno));
return (1);
}
files[num_files] = argv[i];
num_files ++;
if (title == NULL)
{
if ((title = strrchr(argv[i], '/')) != NULL)
title ++;
else
title = argv[i];
}
}
else
_cupsLangPrintf(stderr, _("%s: Error - too many files - \"%s\"\n"),
argv[0], argv[i]);
if (job_id)
return (set_job_attrs(argv[0], job_id, num_options, options));
if (printer == NULL)
{
if (num_dests == 0)
num_dests = cupsGetDests(&dests);
if ((dest = cupsGetDest(NULL, NULL, num_dests, dests)) != NULL)
{
printer = dest->name;
for (j = 0; j < dest->num_options; j ++)
if (cupsGetOption(dest->options[j].name, num_options, options) == NULL)
num_options = cupsAddOption(dest->options[j].name,
dest->options[j].value,
num_options, &options);
}
}
if (printer == NULL)
{
val = NULL;
if ((printer = getenv("LPDEST")) == NULL)
{
if ((printer = getenv("PRINTER")) != NULL)
{
if (!strcmp(printer, "lp"))
printer = NULL;
else
val = "PRINTER";
}
}
else
val = "LPDEST";
if (printer && !cupsGetDest(printer, NULL, num_dests, dests))
_cupsLangPrintf(stderr,
_("%s: Error - %s environment variable names "
"non-existent destination \"%s\"!\n"),
argv[0], val, printer);
else if (cupsLastError() == IPP_NOT_FOUND)
_cupsLangPrintf(stderr,
_("%s: Error - no default destination available.\n"),
argv[0]);
else
_cupsLangPrintf(stderr,
_("%s: Error - scheduler not responding!\n"),
argv[0]);
return (1);
}
if (num_files > 0)
job_id = cupsPrintFiles(printer, num_files, files, title, num_options, options);
else
{
num_files = 1;
#ifndef WIN32
# if defined(HAVE_SIGSET)
sigset(SIGHUP, sighandler);
if (sigset(SIGINT, sighandler) == SIG_IGN)
sigset(SIGINT, SIG_IGN);
sigset(SIGTERM, sighandler);
# elif defined(HAVE_SIGACTION)
memset(&action, 0, sizeof(action));
action.sa_handler = sighandler;
sigaction(SIGHUP, &action, NULL);
sigaction(SIGINT, NULL, &oldaction);
if (oldaction.sa_handler != SIG_IGN)
sigaction(SIGINT, &action, NULL);
sigaction(SIGTERM, &action, NULL);
# else
signal(SIGHUP, sighandler);
if (signal(SIGINT, sighandler) == SIG_IGN)
signal(SIGINT, SIG_IGN);
signal(SIGTERM, sighandler);
# endif
#endif
temp = cupsTempFd(tempfile, sizeof(tempfile));
if (temp < 0)
{
_cupsLangPrintf(stderr,
_("%s: Error - unable to create temporary file \"%s\" - %s\n"),
argv[0], tempfile, strerror(errno));
return (1);
}
while ((bytes = read(0, buffer, sizeof(buffer))) > 0)
if (write(temp, buffer, bytes) < 0)
{
_cupsLangPrintf(stderr,
_("%s: Error - unable to write to temporary file "
"\"%s\" - %s\n"),
argv[0], tempfile, strerror(errno));
close(temp);
unlink(tempfile);
return (1);
}
filesize = lseek(temp, 0, SEEK_CUR);
close(temp);
if (filesize <= 0)
{
_cupsLangPrintf(stderr,
_("%s: Error - stdin is empty, so no job has been sent.\n"),
argv[0]);
unlink(tempfile);
return (1);
}
if (title)
job_id = cupsPrintFile(printer, tempfile, title, num_options, options);
else
job_id = cupsPrintFile(printer, tempfile, "(stdin)", num_options, options);
unlink(tempfile);
}
if (job_id < 1)
{
_cupsLangPrintf(stderr, "%s: %s\n", argv[0], cupsLastErrorString());
return (1);
}
else if (!silent)
_cupsLangPrintf(stdout, _("request id is %s-%d (%d file(s))\n"),
printer, job_id, num_files);
return (0);
}
int
restart_job(const char *command,
int job_id)
{
http_t *http;
ipp_t *request;
char uri[HTTP_MAX_URI];
http = httpConnectEncrypt(cupsServer(), ippPort(), cupsEncryption());
request = ippNewRequest(IPP_RESTART_JOB);
sprintf(uri, "ipp://localhost/jobs/%d", job_id);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
"job-uri", NULL, uri);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME,
"requesting-user-name", NULL, cupsUser());
ippDelete(cupsDoRequest(http, request, "/jobs"));
if (cupsLastError() > IPP_OK_CONFLICT)
{
_cupsLangPrintf(stderr, "%s: %s\n", command, cupsLastErrorString());
return (1);
}
return (0);
}
int
set_job_attrs(const char *command,
int job_id,
int num_options,
cups_option_t *options)
{
http_t *http;
ipp_t *request;
char uri[HTTP_MAX_URI];
if (num_options == 0)
return (0);
http = httpConnectEncrypt(cupsServer(), ippPort(), cupsEncryption());
request = ippNewRequest(IPP_SET_JOB_ATTRIBUTES);
sprintf(uri, "ipp://localhost/jobs/%d", job_id);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
"job-uri", NULL, uri);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME,
"requesting-user-name", NULL, cupsUser());
cupsEncodeOptions(request, num_options, options);
ippDelete(cupsDoRequest(http, request, "/jobs"));
if (cupsLastError() > IPP_OK_CONFLICT)
{
_cupsLangPrintf(stderr, "%s: %s\n", command, cupsLastErrorString());
return (1);
}
return (0);
}
#ifndef WIN32
void
sighandler(int s)
{
unlink(tempfile);
exit(s);
}
#endif