#include <stdio.h>
#include <stdlib.h>
#include <errno.h>
#include <cups/globals.h>
#include <cups/debug.h>
static void check_dest(const char *command, const char *name,
int *num_dests, cups_dest_t **dests);
static int match_list(const char *list, const char *name);
static int show_accepting(const char *printers, int num_dests,
cups_dest_t *dests);
static int show_classes(const char *dests);
static void show_default(cups_dest_t *dest);
static int show_devices(const char *printers, int num_dests,
cups_dest_t *dests);
static int show_jobs(const char *dests, const char *users, int long_status,
int ranking, const char *which);
static int show_printers(const char *printers, int num_dests,
cups_dest_t *dests, int long_status);
static void show_scheduler(void);
int
main(int argc,
char *argv[])
{
int i,
status;
int num_dests;
cups_dest_t *dests;
int long_status;
int ranking;
const char *which;
char op;
_cupsSetLocale(argv);
num_dests = 0;
dests = NULL;
long_status = 0;
ranking = 0;
status = 0;
which = "not-completed";
op = 0;
for (i = 1; i < argc; i ++)
if (argv[i][0] == '-')
switch (argv[i][1])
{
case 'D' :
long_status = 1;
break;
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 'H' :
if (cupsServer()[0] == '/')
_cupsLangPrintf(stdout, "%s\n", cupsServer());
else
_cupsLangPrintf(stdout, "%s:%d\n", cupsServer(), ippPort());
break;
case 'P' :
op = 'P';
break;
case 'R' :
ranking = 1;
break;
case 'S' :
op = 'S';
if (!argv[i][2])
i ++;
break;
case 'U' :
if (argv[i][2])
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 'W' :
if (argv[i][2])
which = argv[i] + 2;
else
{
i ++;
if (i >= argc)
{
_cupsLangPrintf(stderr,
_("%s: Error - need \"completed\", "
"\"not-completed\", or \"all\" after "
"\'-W\' option!\n"),
argv[0]);
return (1);
}
which = argv[i];
}
if (strcmp(which, "completed") && strcmp(which, "not-completed") &&
strcmp(which, "all"))
{
_cupsLangPrintf(stderr,
_("%s: Error - need \"completed\", "
"\"not-completed\", or \"all\" after "
"\'-W\' option!\n"),
argv[0]);
return (1);
}
break;
case 'a' :
op = 'a';
if (argv[i][2])
{
check_dest(argv[0], argv[i] + 2, &num_dests, &dests);
status |= show_accepting(argv[i] + 2, num_dests, dests);
}
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
check_dest(argv[0], argv[i], &num_dests, &dests);
status |= show_accepting(argv[i], num_dests, dests);
}
else
{
if (num_dests <= 1)
{
cupsFreeDests(num_dests, dests);
num_dests = cupsGetDests(&dests);
}
status |= show_accepting(NULL, num_dests, dests);
}
break;
#ifdef __sgi
case 'b' :
op = 'b';
if (argv[i][2])
{
check_dest(argv[0], argv[i] + 2, &num_dests, &dests);
puts("");
status |= show_jobs(argv[i] + 2, NULL, 3, ranking, which);
}
else
{
_cupsLangPrintf(stderr,
_("%s: Error - expected destination after "
"\'-b\' option!\n"),
argv[0]);
return (1);
}
break;
#endif
case 'c' :
op = 'c';
if (argv[i][2])
{
check_dest(argv[0], argv[i] + 2, &num_dests, &dests);
status |= show_classes(argv[i] + 2);
}
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
check_dest(argv[0], argv[i], &num_dests, &dests);
status |= show_classes(argv[i]);
}
else
status |= show_classes(NULL);
break;
case 'd' :
op = 'd';
if (num_dests != 1 || !dests[0].is_default)
{
cupsFreeDests(num_dests, dests);
dests = cupsGetNamedDest(CUPS_HTTP_DEFAULT, NULL, NULL);
num_dests = dests ? 1 : 0;
}
show_default(dests);
break;
case 'f' :
op = 'f';
if (!argv[i][2])
i ++;
break;
case 'h' :
if (argv[i][2])
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 'l' :
#ifdef __sgi
op = 'l';
if (argv[i][2])
{
check_dest(argv[0], argv[i] + 2, &num_dests, &dests);
status |= show_jobs(argv[i] + 2, NULL, 3, ranking, which);
}
else
#endif
long_status = 2;
break;
case 'o' :
op = 'o';
if (argv[i][2])
{
check_dest(argv[0], argv[i] + 2, &num_dests, &dests);
status |= show_jobs(argv[i] + 2, NULL, long_status, ranking,
which);
}
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
check_dest(argv[0], argv[i], &num_dests, &dests);
status |= show_jobs(argv[i], NULL, long_status, ranking, which);
}
else
status |= show_jobs(NULL, NULL, long_status, ranking, which);
break;
case 'p' :
op = 'p';
if (argv[i][2])
{
check_dest(argv[0], argv[i] + 2, &num_dests, &dests);
status |= show_printers(argv[i] + 2, num_dests, dests,
long_status);
}
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
check_dest(argv[0], argv[i], &num_dests, &dests);
status |= show_printers(argv[i], num_dests, dests, long_status);
}
else
{
if (num_dests <= 1)
{
cupsFreeDests(num_dests, dests);
num_dests = cupsGetDests(&dests);
}
status |= show_printers(NULL, num_dests, dests, long_status);
}
break;
case 'r' :
op = 'r';
show_scheduler();
break;
case 's' :
op = 's';
if (num_dests <= 1)
{
cupsFreeDests(num_dests, dests);
num_dests = cupsGetDests(&dests);
}
show_default(cupsGetDest(NULL, NULL, num_dests, dests));
status |= show_classes(NULL);
status |= show_devices(NULL, num_dests, dests);
break;
case 't' :
op = 't';
if (num_dests <= 1)
{
cupsFreeDests(num_dests, dests);
num_dests = cupsGetDests(&dests);
}
show_scheduler();
show_default(cupsGetDest(NULL, NULL, num_dests, dests));
status |= show_classes(NULL);
status |= show_devices(NULL, num_dests, dests);
status |= show_accepting(NULL, num_dests, dests);
status |= show_printers(NULL, num_dests, dests, long_status);
status |= show_jobs(NULL, NULL, long_status, ranking, which);
break;
case 'u' :
op = 'u';
if (argv[i][2])
status |= show_jobs(NULL, argv[i] + 2, long_status, ranking,
which);
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
status |= show_jobs(NULL, argv[i], long_status, ranking, which);
}
else
status |= show_jobs(NULL, NULL, long_status, ranking, which);
break;
case 'v' :
op = 'v';
if (argv[i][2])
{
check_dest(argv[0], argv[i] + 2, &num_dests, &dests);
status |= show_devices(argv[i] + 2, num_dests, dests);
}
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
check_dest(argv[0], argv[i], &num_dests, &dests);
status |= show_devices(argv[i], num_dests, dests);
}
else
{
if (num_dests <= 1)
{
cupsFreeDests(num_dests, dests);
num_dests = cupsGetDests(&dests);
}
status |= show_devices(NULL, num_dests, dests);
}
break;
default :
_cupsLangPrintf(stderr,
_("%s: Error - unknown option \'%c\'!\n"),
argv[0], argv[i][1]);
return (1);
}
else
{
status |= show_jobs(argv[i], NULL, long_status, ranking, which);
op = 'o';
}
if (!op)
status |= show_jobs(NULL, cupsUser(), long_status, ranking, which);
return (status);
}
static void
check_dest(const char *command,
const char *name,
int *num_dests,
cups_dest_t **dests)
{
const char *dptr;
char *pptr,
printer[1024];
if (*num_dests <= 1)
{
if (*num_dests)
cupsFreeDests(*num_dests, *dests);
if (strchr(name, ','))
*num_dests = cupsGetDests(dests);
else
{
strlcpy(printer, name, sizeof(printer));
if ((pptr = strchr(printer, '/')) != NULL)
*pptr++ = '\0';
if ((*dests = cupsGetNamedDest(CUPS_HTTP_DEFAULT, printer, pptr)) == NULL)
{
_cupsLangPrintf(stderr,
_("%s: Invalid destination name in list \"%s\"!\n"),
command, name);
exit(1);
}
else
{
*num_dests = 1;
return;
}
}
}
for (dptr = name; *dptr;)
{
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (!*dptr)
break;
for (pptr = printer; !isspace(*dptr & 255) && *dptr != ',' && *dptr;)
{
if ((pptr - printer) < (sizeof(printer) - 1))
*pptr++ = *dptr++;
else
{
_cupsLangPrintf(stderr,
_("%s: Invalid destination name in list \"%s\"!\n"),
command, name);
exit(1);
}
}
*pptr = '\0';
if (!cupsGetDest(printer, NULL, *num_dests, *dests))
{
_cupsLangPrintf(stderr,
_("%s: Unknown destination \"%s\"!\n"), command, printer);
exit(1);
}
}
}
static int
match_list(const char *list,
const char *name)
{
const char *nameptr;
if (!list || !*list)
return (1);
while (*list)
{
while (isspace(*list & 255) || *list == ',')
list ++;
if (!*list)
break;
for (nameptr = name;
*nameptr && *list && tolower(*nameptr & 255) == tolower(*list & 255);
nameptr ++, list ++);
if (!*nameptr && (!*list || *list == ',' || isspace(*list & 255)))
return (1);
while (*list && !isspace(*list & 255) && *list != ',')
list ++;
}
return (0);
}
static int
show_accepting(const char *printers,
int num_dests,
cups_dest_t *dests)
{
int i;
ipp_t *request,
*response;
ipp_attribute_t *attr;
const char *printer,
*message;
int accepting;
time_t ptime;
struct tm *pdate;
char printer_state_time[255];
static const char *pattrs[] =
{
"printer-name",
"printer-state-change-time",
"printer-state-message",
"printer-is-accepting-jobs"
};
DEBUG_printf(("show_accepting(printers=\"%s\")\n", printers));
if (printers != NULL && !strcmp(printers, "all"))
printers = NULL;
request = ippNewRequest(CUPS_GET_PRINTERS);
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", sizeof(pattrs) / sizeof(pattrs[0]),
NULL, pattrs);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
NULL, cupsUser());
if ((response = cupsDoRequest(CUPS_HTTP_DEFAULT, request, "/")) != NULL)
{
DEBUG_puts("show_accepting: request succeeded...");
if (response->request.status.status_code > IPP_OK_CONFLICT)
{
_cupsLangPrintf(stderr, "lpstat: %s\n", cupsLastErrorString());
ippDelete(response);
return (1);
}
for (attr = response->attrs; attr != NULL; attr = attr->next)
{
while (attr != NULL && attr->group_tag != IPP_TAG_PRINTER)
attr = attr->next;
if (attr == NULL)
break;
printer = NULL;
message = NULL;
accepting = 1;
ptime = 0;
while (attr != NULL && attr->group_tag == IPP_TAG_PRINTER)
{
if (!strcmp(attr->name, "printer-name") &&
attr->value_tag == IPP_TAG_NAME)
printer = attr->values[0].string.text;
else if (!strcmp(attr->name, "printer-state-change-time") &&
attr->value_tag == IPP_TAG_INTEGER)
ptime = (time_t)attr->values[0].integer;
else if (!strcmp(attr->name, "printer-state-message") &&
attr->value_tag == IPP_TAG_TEXT)
message = attr->values[0].string.text;
else if (!strcmp(attr->name, "printer-is-accepting-jobs") &&
attr->value_tag == IPP_TAG_BOOLEAN)
accepting = attr->values[0].boolean;
attr = attr->next;
}
if (printer == NULL)
{
if (attr == NULL)
break;
else
continue;
}
if (match_list(printers, printer))
{
pdate = localtime(&ptime);
strftime(printer_state_time, sizeof(printer_state_time), "%c", pdate);
if (accepting)
_cupsLangPrintf(stdout, _("%s accepting requests since %s\n"),
printer, printer_state_time);
else
_cupsLangPrintf(stdout, _("%s not accepting requests since %s -\n"
"\t%s\n"),
printer, printer_state_time,
(message == NULL || !*message) ?
"reason unknown" : message);
for (i = 0; i < num_dests; i ++)
if (!strcasecmp(dests[i].name, printer) && dests[i].instance)
{
if (accepting)
_cupsLangPrintf(stdout, _("%s/%s accepting requests since %s\n"),
printer, dests[i].instance, printer_state_time);
else
_cupsLangPrintf(stdout, _("%s/%s not accepting requests since "
"%s -\n\t%s\n"),
printer, dests[i].instance, printer_state_time,
(message == NULL || !*message) ?
"reason unknown" : message);
}
}
if (attr == NULL)
break;
}
ippDelete(response);
}
else
{
_cupsLangPrintf(stderr, "lpstat: %s\n", cupsLastErrorString());
return (1);
}
return (0);
}
static int
show_classes(const char *dests)
{
int i;
ipp_t *request,
*response,
*response2;
http_t *http2;
ipp_attribute_t *attr;
const char *printer,
*printer_uri;
ipp_attribute_t *members;
char method[HTTP_MAX_URI],
username[HTTP_MAX_URI],
server[HTTP_MAX_URI],
resource[HTTP_MAX_URI];
int port;
static const char *cattrs[] =
{
"printer-name",
"printer-uri-supported",
"member-names"
};
DEBUG_printf(("show_classes(dests=\"%s\")\n", dests));
if (dests != NULL && !strcmp(dests, "all"))
dests = NULL;
request = ippNewRequest(CUPS_GET_CLASSES);
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", sizeof(cattrs) / sizeof(cattrs[0]),
NULL, cattrs);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
NULL, cupsUser());
if ((response = cupsDoRequest(CUPS_HTTP_DEFAULT, request, "/")) != NULL)
{
DEBUG_puts("show_classes: request succeeded...");
if (response->request.status.status_code > IPP_OK_CONFLICT)
{
_cupsLangPrintf(stderr, "lpstat: %s\n", cupsLastErrorString());
ippDelete(response);
return (1);
}
for (attr = response->attrs; attr != NULL; attr = attr->next)
{
while (attr != NULL && attr->group_tag != IPP_TAG_PRINTER)
attr = attr->next;
if (attr == NULL)
break;
printer = NULL;
printer_uri = NULL;
members = NULL;
while (attr != NULL && attr->group_tag == IPP_TAG_PRINTER)
{
if (!strcmp(attr->name, "printer-name") &&
attr->value_tag == IPP_TAG_NAME)
printer = attr->values[0].string.text;
if (!strcmp(attr->name, "printer-uri-supported") &&
attr->value_tag == IPP_TAG_URI)
printer_uri = attr->values[0].string.text;
if (!strcmp(attr->name, "member-names") &&
attr->value_tag == IPP_TAG_NAME)
members = attr;
attr = attr->next;
}
response2 = NULL;
if (members == NULL && printer_uri != NULL)
{
httpSeparateURI(HTTP_URI_CODING_ALL, printer_uri, method, sizeof(method),
username, sizeof(username), server, sizeof(server),
&port, resource, sizeof(resource));
if (!strcasecmp(server, cupsServer()))
http2 = CUPS_HTTP_DEFAULT;
else
http2 = httpConnectEncrypt(server, port, cupsEncryption());
request = ippNewRequest(IPP_GET_PRINTER_ATTRIBUTES);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
"printer-uri", NULL, printer_uri);
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes",
sizeof(cattrs) / sizeof(cattrs[0]),
NULL, cattrs);
if ((response2 = cupsDoRequest(http2, request, "/")) != NULL)
members = ippFindAttribute(response2, "member-names", IPP_TAG_NAME);
if (http2)
httpClose(http2);
}
if (printer == NULL)
{
if (response2)
ippDelete(response2);
if (attr == NULL)
break;
else
continue;
}
if (match_list(dests, printer))
{
_cupsLangPrintf(stdout, _("members of class %s:\n"), printer);
if (members)
{
for (i = 0; i < members->num_values; i ++)
_cupsLangPrintf(stdout, "\t%s\n",
members->values[i].string.text);
}
else
_cupsLangPuts(stdout, "\tunknown\n");
}
if (response2)
ippDelete(response2);
if (attr == NULL)
break;
}
ippDelete(response);
}
else
{
_cupsLangPrintf(stderr, "lpstat: %s\n", cupsLastErrorString());
return (1);
}
return (0);
}
static void
show_default(cups_dest_t *dest)
{
const char *printer,
*val;
if (dest)
{
if (dest->instance)
_cupsLangPrintf(stdout, _("system default destination: %s/%s\n"),
dest->name, dest->instance);
else
_cupsLangPrintf(stdout, _("system default destination: %s\n"),
dest->name);
}
else
{
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)
_cupsLangPrintf(stdout,
_("lpstat: error - %s environment variable names "
"non-existent destination \"%s\"!\n"),
val, printer);
else
_cupsLangPuts(stdout, _("no system default destination\n"));
}
}
static int
show_devices(const char *printers,
int num_dests,
cups_dest_t *dests)
{
int i;
ipp_t *request,
*response;
ipp_attribute_t *attr;
const char *printer,
*uri,
*device;
static const char *pattrs[] =
{
"printer-name",
"printer-uri-supported",
"device-uri"
};
DEBUG_printf(("show_devices(printers=\"%s\")\n", printers));
if (printers != NULL && !strcmp(printers, "all"))
printers = NULL;
request = ippNewRequest(CUPS_GET_PRINTERS);
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", sizeof(pattrs) / sizeof(pattrs[0]),
NULL, pattrs);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
NULL, cupsUser());
if ((response = cupsDoRequest(CUPS_HTTP_DEFAULT, request, "/")) != NULL)
{
DEBUG_puts("show_devices: request succeeded...");
if (response->request.status.status_code > IPP_OK_CONFLICT)
{
_cupsLangPrintf(stderr, "lpstat: %s\n", cupsLastErrorString());
ippDelete(response);
return (1);
}
for (attr = response->attrs; attr != NULL; attr = attr->next)
{
while (attr != NULL && attr->group_tag != IPP_TAG_PRINTER)
attr = attr->next;
if (attr == NULL)
break;
printer = NULL;
device = NULL;
uri = NULL;
while (attr != NULL && attr->group_tag == IPP_TAG_PRINTER)
{
if (!strcmp(attr->name, "printer-name") &&
attr->value_tag == IPP_TAG_NAME)
printer = attr->values[0].string.text;
if (!strcmp(attr->name, "printer-uri-supported") &&
attr->value_tag == IPP_TAG_URI)
uri = attr->values[0].string.text;
if (!strcmp(attr->name, "device-uri") &&
attr->value_tag == IPP_TAG_URI)
device = attr->values[0].string.text;
attr = attr->next;
}
if (printer == NULL)
{
if (attr == NULL)
break;
else
continue;
}
if (match_list(printers, printer))
{
#ifdef __osf__
char scheme[HTTP_MAX_URI],
username[HTTP_MAX_URI],
hostname[HTTP_MAX_URI],
resource[HTTP_MAX_URI];
int port;
if (device == NULL)
{
httpSeparateURI(HTTP_URI_CODING_ALL, uri, scheme, sizeof(scheme),
username, sizeof(username), hostname,
sizeof(hostname), &port, resource, sizeof(resource));
_cupsLangPrintf(stdout,
_("Output for printer %s is sent to remote "
"printer %s on %s\n"),
printer, strrchr(resource, '/') + 1, hostname);
}
else if (!strncmp(device, "file:", 5))
_cupsLangPrintf(stdout,
_("Output for printer %s is sent to %s\n"),
printer, device + 5);
else
_cupsLangPrintf(stdout,
_("Output for printer %s is sent to %s\n"),
printer, device);
for (i = 0; i < num_dests; i ++)
if (!strcasecmp(printer, dests[i].name) && dests[i].instance)
{
if (device == NULL)
_cupsLangPrintf(stdout,
_("Output for printer %s/%s is sent to "
"remote printer %s on %s\n"),
printer, dests[i].instance,
strrchr(resource, '/') + 1, hostname);
else if (!strncmp(device, "file:", 5))
_cupsLangPrintf(stdout,
_("Output for printer %s/%s is sent to %s\n"),
printer, dests[i].instance, device + 5);
else
_cupsLangPrintf(stdout,
_("Output for printer %s/%s is sent to %s\n"),
printer, dests[i].instance, device);
}
#else
if (device == NULL)
_cupsLangPrintf(stdout, _("device for %s: %s\n"),
printer, uri);
else if (!strncmp(device, "file:", 5))
_cupsLangPrintf(stdout, _("device for %s: %s\n"),
printer, device + 5);
else
_cupsLangPrintf(stdout, _("device for %s: %s\n"),
printer, device);
for (i = 0; i < num_dests; i ++)
if (!strcasecmp(printer, dests[i].name) && dests[i].instance)
{
if (device == NULL)
_cupsLangPrintf(stdout, _("device for %s/%s: %s\n"),
printer, dests[i].instance, uri);
else if (!strncmp(device, "file:", 5))
_cupsLangPrintf(stdout, _("device for %s/%s: %s\n"),
printer, dests[i].instance, device + 5);
else
_cupsLangPrintf(stdout, _("device for %s/%s: %s\n"),
printer, dests[i].instance, device);
}
#endif
}
if (attr == NULL)
break;
}
ippDelete(response);
}
else
{
_cupsLangPrintf(stderr, "lpstat: %s\n", cupsLastErrorString());
return (1);
}
return (0);
}
static int
show_jobs(const char *dests,
const char *users,
int long_status,
int ranking,
const char *which)
{
int i;
ipp_t *request,
*response;
ipp_attribute_t *attr,
*reasons;
const char *dest,
*username,
*title;
int rank,
jobid,
size;
time_t jobtime;
struct tm *jobdate;
char temp[255],
date[255];
static const char *jattrs[] =
{
"job-id",
"job-k-octets",
"job-name",
"job-originating-user-name",
"job-printer-uri",
"job-state-reasons",
"time-at-creation"
};
DEBUG_printf(("show_jobs(dests=\"%s\", users=\"%s\", long_status=%d, "
"ranking=%d, which=\"%s\")\n", dests, users, long_status,
ranking, which));
if (dests != NULL && !strcmp(dests, "all"))
dests = NULL;
request = ippNewRequest(IPP_GET_JOBS);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "printer-uri",
NULL, "ipp://localhost/");
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", sizeof(jattrs) / sizeof(jattrs[0]),
NULL, jattrs);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
NULL, cupsUser());
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD, "which-jobs",
NULL, which);
if ((response = cupsDoRequest(CUPS_HTTP_DEFAULT, request, "/")) != NULL)
{
if (response->request.status.status_code > IPP_OK_CONFLICT)
{
_cupsLangPrintf(stderr, "lpstat: %s\n", cupsLastErrorString());
ippDelete(response);
return (1);
}
rank = -1;
for (attr = response->attrs; attr != NULL; attr = attr->next)
{
while (attr != NULL && attr->group_tag != IPP_TAG_JOB)
attr = attr->next;
if (attr == NULL)
break;
jobid = 0;
size = 0;
username = NULL;
dest = NULL;
jobtime = 0;
title = "no title";
reasons = NULL;
while (attr != NULL && attr->group_tag == IPP_TAG_JOB)
{
if (!strcmp(attr->name, "job-id") &&
attr->value_tag == IPP_TAG_INTEGER)
jobid = attr->values[0].integer;
if (!strcmp(attr->name, "job-k-octets") &&
attr->value_tag == IPP_TAG_INTEGER)
size = attr->values[0].integer;
if (!strcmp(attr->name, "time-at-creation") &&
attr->value_tag == IPP_TAG_INTEGER)
jobtime = attr->values[0].integer;
if (!strcmp(attr->name, "job-printer-uri") &&
attr->value_tag == IPP_TAG_URI)
if ((dest = strrchr(attr->values[0].string.text, '/')) != NULL)
dest ++;
if (!strcmp(attr->name, "job-originating-user-name") &&
attr->value_tag == IPP_TAG_NAME)
username = attr->values[0].string.text;
if (!strcmp(attr->name, "job-name") &&
attr->value_tag == IPP_TAG_NAME)
title = attr->values[0].string.text;
if (!strcmp(attr->name, "job-state-reasons") &&
attr->value_tag == IPP_TAG_KEYWORD)
reasons = attr;
attr = attr->next;
}
if (dest == NULL || jobid == 0)
{
if (attr == NULL)
break;
else
continue;
}
rank ++;
if (match_list(dests, dest) && match_list(users, username))
{
jobdate = localtime(&jobtime);
snprintf(temp, sizeof(temp), "%s-%d", dest, jobid);
if (long_status == 3)
{
if (!strftime(date, sizeof(date), "%b %d %H:%M", jobdate))
strcpy(date, "Unknown");
_cupsLangPrintf(stdout, "%s;%s;%d;%s;%s\n",
temp, username ? username : "unknown",
size, title ? title : "unknown", date);
}
else
{
if (!strftime(date, sizeof(date), "%c", jobdate))
strcpy(date, "Unknown");
if (ranking)
_cupsLangPrintf(stdout, "%3d %-21s %-13s %8.0f %s\n",
rank, temp, username ? username : "unknown",
1024.0 * size, date);
else
_cupsLangPrintf(stdout, "%-23s %-13s %8.0f %s\n",
temp, username ? username : "unknown",
1024.0 * size, date);
if (long_status)
{
if (reasons)
{
_cupsLangPuts(stdout, _("\tAlerts:"));
for (i = 0; i < reasons->num_values; i ++)
_cupsLangPrintf(stdout, " %s",
reasons->values[i].string.text);
_cupsLangPuts(stdout, "\n");
}
_cupsLangPrintf(stdout, _("\tqueued for %s\n"), dest);
}
}
}
if (attr == NULL)
break;
}
ippDelete(response);
}
else
{
_cupsLangPrintf(stderr, "lpstat: %s\n", cupsLastErrorString());
return (1);
}
return (0);
}
static int
show_printers(const char *printers,
int num_dests,
cups_dest_t *dests,
int long_status)
{
int i, j;
ipp_t *request,
*response,
*jobs;
ipp_attribute_t *attr,
*jobattr,
*reasons;
const char *printer,
*message,
*description,
*location,
*make_model,
*uri;
ipp_attribute_t *allowed,
*denied;
ipp_pstate_t pstate;
cups_ptype_t ptype;
time_t ptime;
struct tm *pdate;
int jobid;
char printer_uri[HTTP_MAX_URI],
printer_state_time[255];
_cups_globals_t *cg = _cupsGlobals();
static const char *pattrs[] =
{
"printer-name",
"printer-state",
"printer-state-message",
"printer-state-reasons",
"printer-state-change-time",
"printer-type",
"printer-info",
"printer-location",
"printer-make-and-model",
"printer-uri-supported",
"requesting-user-name-allowed",
"requesting-user-name-denied"
};
static const char *jattrs[] =
{
"job-id",
"job-state"
};
DEBUG_printf(("show_printers(printers=\"%s\", num_dests=%d, dests=%p, "
"long_status=%d)\n", printers, num_dests, dests, long_status));
if (printers != NULL && !strcmp(printers, "all"))
printers = NULL;
request = ippNewRequest(CUPS_GET_PRINTERS);
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", sizeof(pattrs) / sizeof(pattrs[0]),
NULL, pattrs);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_NAME, "requesting-user-name",
NULL, cupsUser());
if ((response = cupsDoRequest(CUPS_HTTP_DEFAULT, request, "/")) != NULL)
{
DEBUG_puts("show_printers: request succeeded...");
if (response->request.status.status_code > IPP_OK_CONFLICT)
{
_cupsLangPrintf(stderr, "lpstat: %s\n", cupsLastErrorString());
ippDelete(response);
return (1);
}
for (attr = response->attrs; attr != NULL; attr = attr->next)
{
while (attr != NULL && attr->group_tag != IPP_TAG_PRINTER)
attr = attr->next;
if (attr == NULL)
break;
printer = NULL;
ptime = 0;
ptype = CUPS_PRINTER_LOCAL;
pstate = IPP_PRINTER_IDLE;
message = NULL;
description = NULL;
location = NULL;
make_model = NULL;
reasons = NULL;
uri = NULL;
jobid = 0;
allowed = NULL;
denied = NULL;
while (attr != NULL && attr->group_tag == IPP_TAG_PRINTER)
{
if (!strcmp(attr->name, "printer-name") &&
attr->value_tag == IPP_TAG_NAME)
printer = attr->values[0].string.text;
else if (!strcmp(attr->name, "printer-state") &&
attr->value_tag == IPP_TAG_ENUM)
pstate = (ipp_pstate_t)attr->values[0].integer;
else if (!strcmp(attr->name, "printer-type") &&
attr->value_tag == IPP_TAG_ENUM)
ptype = (cups_ptype_t)attr->values[0].integer;
else if (!strcmp(attr->name, "printer-state-message") &&
attr->value_tag == IPP_TAG_TEXT)
message = attr->values[0].string.text;
else if (!strcmp(attr->name, "printer-state-change-time") &&
attr->value_tag == IPP_TAG_INTEGER)
ptime = (time_t)attr->values[0].integer;
else if (!strcmp(attr->name, "printer-info") &&
attr->value_tag == IPP_TAG_TEXT)
description = attr->values[0].string.text;
else if (!strcmp(attr->name, "printer-location") &&
attr->value_tag == IPP_TAG_TEXT)
location = attr->values[0].string.text;
else if (!strcmp(attr->name, "printer-make-and-model") &&
attr->value_tag == IPP_TAG_TEXT)
make_model = attr->values[0].string.text;
else if (!strcmp(attr->name, "printer-uri-supported") &&
attr->value_tag == IPP_TAG_URI)
uri = attr->values[0].string.text;
else if (!strcmp(attr->name, "printer-state-reasons") &&
attr->value_tag == IPP_TAG_KEYWORD)
reasons = attr;
else if (!strcmp(attr->name, "requesting-user-name-allowed") &&
attr->value_tag == IPP_TAG_NAME)
allowed = attr;
else if (!strcmp(attr->name, "requesting-user-name-denied") &&
attr->value_tag == IPP_TAG_NAME)
denied = attr;
attr = attr->next;
}
if (printer == NULL)
{
if (attr == NULL)
break;
else
continue;
}
if (match_list(printers, printer))
{
if (pstate == IPP_PRINTER_PROCESSING)
{
request = ippNewRequest(IPP_GET_JOBS);
request->request.op.operation_id = IPP_GET_JOBS;
request->request.op.request_id = 1;
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes",
sizeof(jattrs) / sizeof(jattrs[0]), NULL, jattrs);
httpAssembleURIf(HTTP_URI_CODING_ALL, printer_uri, sizeof(printer_uri),
"ipp", NULL, "localhost", 0, "/printers/%s", printer);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
"printer-uri", NULL, printer_uri);
if ((jobs = cupsDoRequest(CUPS_HTTP_DEFAULT, request, "/")) != NULL)
{
ipp_jstate_t jobstate = IPP_JOB_PENDING;
jobid = 0;
for (jobattr = jobs->attrs; jobattr; jobattr = jobattr->next)
{
if (!jobattr->name)
{
if (jobstate == IPP_JOB_PROCESSING)
break;
else
continue;
}
if (!strcmp(jobattr->name, "job-id") &&
jobattr->value_tag == IPP_TAG_INTEGER)
jobid = jobattr->values[0].integer;
else if (!strcmp(jobattr->name, "job-state") &&
jobattr->value_tag == IPP_TAG_ENUM)
jobstate = jobattr->values[0].integer;
}
if (jobstate != IPP_JOB_PROCESSING)
jobid = 0;
ippDelete(jobs);
}
}
pdate = localtime(&ptime);
strftime(printer_state_time, sizeof(printer_state_time), "%c", pdate);
switch (pstate)
{
case IPP_PRINTER_IDLE :
_cupsLangPrintf(stdout,
_("printer %s is idle. enabled since %s\n"),
printer, printer_state_time);
break;
case IPP_PRINTER_PROCESSING :
_cupsLangPrintf(stdout,
_("printer %s now printing %s-%d. "
"enabled since %s\n"),
printer, printer, jobid, printer_state_time);
break;
case IPP_PRINTER_STOPPED :
_cupsLangPrintf(stdout,
_("printer %s disabled since %s -\n"),
printer, printer_state_time);
break;
}
if ((message && *message) || pstate == IPP_PRINTER_STOPPED)
{
if (!message || !*message)
_cupsLangPuts(stdout, _("\treason unknown\n"));
else
_cupsLangPrintf(stdout, "\t%s\n", message);
}
if (long_status > 1)
_cupsLangPuts(stdout,
_("\tForm mounted:\n"
"\tContent types: any\n"
"\tPrinter types: unknown\n"));
if (long_status)
{
_cupsLangPrintf(stdout, _("\tDescription: %s\n"),
description ? description : "");
if (reasons)
{
_cupsLangPuts(stdout, _("\tAlerts:"));
for (j = 0; j < reasons->num_values; j ++)
_cupsLangPrintf(stdout, " %s",
reasons->values[j].string.text);
_cupsLangPuts(stdout, "\n");
}
}
if (long_status > 1)
{
_cupsLangPrintf(stdout, _("\tLocation: %s\n"),
location ? location : "");
if (ptype & CUPS_PRINTER_REMOTE)
{
_cupsLangPuts(stdout, _("\tConnection: remote\n"));
if (make_model && !strstr(make_model, "System V Printer") &&
!strstr(make_model, "Raw Printer") && uri)
_cupsLangPrintf(stdout, _("\tInterface: %s.ppd\n"),
uri);
}
else
{
_cupsLangPuts(stdout, _("\tConnection: direct\n"));
if (make_model && strstr(make_model, "System V Printer"))
_cupsLangPrintf(stdout,
_("\tInterface: %s/interfaces/%s\n"),
cg->cups_serverroot, printer);
else if (make_model && !strstr(make_model, "Raw Printer"))
_cupsLangPrintf(stdout,
_("\tInterface: %s/ppd/%s.ppd\n"),
cg->cups_serverroot, printer);
}
_cupsLangPuts(stdout, _("\tOn fault: no alert\n"));
_cupsLangPuts(stdout, _("\tAfter fault: continue\n"));
if (allowed)
{
_cupsLangPuts(stdout, _("\tUsers allowed:\n"));
for (j = 0; j < allowed->num_values; j ++)
_cupsLangPrintf(stdout, "\t\t%s\n",
allowed->values[j].string.text);
}
else if (denied)
{
_cupsLangPuts(stdout, _("\tUsers denied:\n"));
for (j = 0; j < denied->num_values; j ++)
_cupsLangPrintf(stdout, "\t\t%s\n",
denied->values[j].string.text);
}
else
{
_cupsLangPuts(stdout, _("\tUsers allowed:\n"));
_cupsLangPuts(stdout, _("\t\t(all)\n"));
}
_cupsLangPuts(stdout, _("\tForms allowed:\n"));
_cupsLangPuts(stdout, _("\t\t(none)\n"));
_cupsLangPuts(stdout, _("\tBanner required\n"));
_cupsLangPuts(stdout, _("\tCharset sets:\n"));
_cupsLangPuts(stdout, _("\t\t(none)\n"));
_cupsLangPuts(stdout, _("\tDefault pitch:\n"));
_cupsLangPuts(stdout, _("\tDefault page size:\n"));
_cupsLangPuts(stdout, _("\tDefault port settings:\n"));
}
for (i = 0; i < num_dests; i ++)
if (!strcasecmp(printer, dests[i].name) && dests[i].instance)
{
switch (pstate)
{
case IPP_PRINTER_IDLE :
_cupsLangPrintf(stdout,
_("printer %s/%s is idle. "
"enabled since %s\n"),
printer, dests[i].instance,
printer_state_time);
break;
case IPP_PRINTER_PROCESSING :
_cupsLangPrintf(stdout,
_("printer %s/%s now printing %s-%d. "
"enabled since %s\n"),
printer, dests[i].instance, printer, jobid,
printer_state_time);
break;
case IPP_PRINTER_STOPPED :
_cupsLangPrintf(stdout,
_("printer %s/%s disabled since %s -\n"),
printer, dests[i].instance,
printer_state_time);
break;
}
if ((message && *message) || pstate == IPP_PRINTER_STOPPED)
{
if (!message || !*message)
_cupsLangPuts(stdout, _("\treason unknown\n"));
else
_cupsLangPrintf(stdout, "\t%s\n", message);
}
if (long_status > 1)
_cupsLangPuts(stdout,
_("\tForm mounted:\n"
"\tContent types: any\n"
"\tPrinter types: unknown\n"));
if (long_status)
{
_cupsLangPrintf(stdout, _("\tDescription: %s\n"),
description ? description : "");
if (reasons)
{
_cupsLangPuts(stdout, _("\tAlerts:"));
for (j = 0; j < reasons->num_values; j ++)
_cupsLangPrintf(stdout, " %s",
reasons->values[j].string.text);
_cupsLangPuts(stdout, "\n");
}
}
if (long_status > 1)
{
_cupsLangPrintf(stdout, _("\tLocation: %s\n"),
location ? location : "");
if (ptype & CUPS_PRINTER_REMOTE)
{
_cupsLangPuts(stdout, _("\tConnection: remote\n"));
if (make_model && !strstr(make_model, "System V Printer") &&
!strstr(make_model, "Raw Printer") && uri)
_cupsLangPrintf(stdout, _("\tInterface: %s.ppd\n"),
uri);
}
else
{
_cupsLangPuts(stdout, _("\tConnection: direct\n"));
if (make_model && strstr(make_model, "System V Printer"))
_cupsLangPrintf(stdout,
_("\tInterface: %s/interfaces/%s\n"),
cg->cups_serverroot, printer);
else if (make_model && !strstr(make_model, "Raw Printer"))
_cupsLangPrintf(stdout,
_("\tInterface: %s/ppd/%s.ppd\n"),
cg->cups_serverroot, printer);
}
_cupsLangPuts(stdout, _("\tOn fault: no alert\n"));
_cupsLangPuts(stdout, _("\tAfter fault: continue\n"));
if (allowed)
{
_cupsLangPuts(stdout, _("\tUsers allowed:\n"));
for (j = 0; j < allowed->num_values; j ++)
_cupsLangPrintf(stdout, "\t\t%s\n",
allowed->values[j].string.text);
}
else if (denied)
{
_cupsLangPuts(stdout, _("\tUsers denied:\n"));
for (j = 0; j < denied->num_values; j ++)
_cupsLangPrintf(stdout, "\t\t%s\n",
denied->values[j].string.text);
}
else
{
_cupsLangPuts(stdout, _("\tUsers allowed:\n"));
_cupsLangPuts(stdout, _("\t\t(all)\n"));
}
_cupsLangPuts(stdout, _("\tForms allowed:\n"));
_cupsLangPuts(stdout, _("\t\t(none)\n"));
_cupsLangPuts(stdout, _("\tBanner required\n"));
_cupsLangPuts(stdout, _("\tCharset sets:\n"));
_cupsLangPuts(stdout, _("\t\t(none)\n"));
_cupsLangPuts(stdout, _("\tDefault pitch:\n"));
_cupsLangPuts(stdout, _("\tDefault page size:\n"));
_cupsLangPuts(stdout, _("\tDefault port settings:\n"));
}
}
}
if (attr == NULL)
break;
}
ippDelete(response);
}
else
{
_cupsLangPrintf(stderr, "lpstat: %s\n", cupsLastErrorString());
return (1);
}
return (0);
}
static void
show_scheduler(void)
{
http_t *http;
if ((http = httpConnectEncrypt(cupsServer(), ippPort(),
cupsEncryption())) != NULL)
{
_cupsLangPuts(stdout, _("scheduler is running\n"));
httpClose(http);
}
else
_cupsLangPuts(stdout, _("scheduler is not running\n"));
}