#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
#include <cups/cups.h>
#include <cups/language.h>
#include <cups/debug.h>
#include <cups/string.h>
#ifdef HAVE_INTTYPES_H
# include <inttypes.h>
#endif
static void check_dest(http_t *, const char *, int *, cups_dest_t **);
static http_t *connect_server(http_t *);
static int show_accepting(http_t *, const char *, int, cups_dest_t *);
static int show_classes(http_t *, const char *);
static void show_default(int, cups_dest_t *);
static int show_devices(http_t *, const char *, int, cups_dest_t *);
static int show_jobs(http_t *, const char *, const char *, int, int,
const char *);
static int show_printers(http_t *, const char *, int, cups_dest_t *, int);
static void show_scheduler(http_t *);
int
main(int argc,
char *argv[])
{
int i,
status;
http_t *http;
int num_dests;
cups_dest_t *dests;
int long_status;
int ranking;
const char *which;
char op;
#ifdef LC_TIME
setlocale(LC_TIME, "");
#endif
http = NULL;
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);
if (http)
httpEncryption(http, HTTP_ENCRYPT_REQUIRED);
#else
fprintf(stderr, "%s: Sorry, no encryption support compiled in!\n",
argv[0]);
#endif
break;
case 'P' :
op = 'P';
break;
case 'R' :
ranking = 1;
break;
case 'S' :
op = 'S';
if (!argv[i][2])
i ++;
break;
case 'W' :
if (argv[i][2])
which = argv[i] + 2;
else
{
i ++;
if (i >= argc)
{
fputs("lpstat: Need \"completed\" or \"not-completed\" after -W!\n",
stderr);
return (1);
}
which = argv[i];
}
if (strcmp(which, "completed") && strcmp(which, "not-completed"))
{
fputs("lpstat: Need \"completed\" or \"not-completed\" after -W!\n",
stderr);
return (1);
}
break;
case 'a' :
op = 'a';
http = connect_server(http);
if (argv[i][2] != '\0')
{
check_dest(http, argv[i] + 2, &num_dests, &dests);
status |= show_accepting(http, argv[i] + 2, num_dests, dests);
}
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
check_dest(http, argv[i], &num_dests, &dests);
status |= show_accepting(http, argv[i], num_dests, dests);
}
else
{
if (num_dests == 0)
num_dests = cupsGetDests2(http, &dests);
status |= show_accepting(http, NULL, num_dests, dests);
}
break;
#ifdef __sgi
case 'b' :
op = 'b';
http = connect_server(http);
if (argv[i][2] != '\0')
{
check_dest(http, argv[i] + 2, &num_dests, &dests);
puts("");
status |= show_jobs(http, argv[i] + 2, NULL, 3, ranking, which);
}
else
{
fputs("lpstat: The -b option requires a destination argument.\n",
stderr);
return (1);
}
break;
#endif
case 'c' :
op = 'c';
http = connect_server(http);
if (argv[i][2] != '\0')
{
check_dest(http, argv[i] + 2, &num_dests, &dests);
status |= show_classes(http, argv[i] + 2);
}
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
check_dest(http, argv[i], &num_dests, &dests);
status |= show_classes(http, argv[i]);
}
else
status |= show_classes(http, NULL);
break;
case 'd' :
op = 'd';
http = connect_server(http);
if (num_dests == 0)
num_dests = cupsGetDests2(http, &dests);
show_default(num_dests, dests);
break;
case 'f' :
op = 'f';
if (!argv[i][2])
i ++;
break;
case 'h' :
if (http)
{
httpClose(http);
http = NULL;
}
if (argv[i][2] != '\0')
cupsSetServer(argv[i] + 2);
else
{
i ++;
if (i >= argc)
{
fputs("Error: need hostname after \'-h\' option!\n", stderr);
return (1);
}
cupsSetServer(argv[i]);
}
break;
case 'l' :
#ifdef __sgi
op = 'l';
http = connect_server(http);
if (argv[i][2] != '\0')
{
check_dest(http, argv[i] + 2, &num_dests, &dests);
status |= show_jobs(http, argv[i] + 2, NULL, 3, ranking, which);
}
else
#endif
long_status = 2;
break;
case 'o' :
op = 'o';
http = connect_server(http);
if (argv[i][2] != '\0')
{
check_dest(http, argv[i] + 2, &num_dests, &dests);
status |= show_jobs(http, argv[i] + 2, NULL, long_status,
ranking, which);
}
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
check_dest(http, argv[i], &num_dests, &dests);
status |= show_jobs(http, argv[i], NULL, long_status,
ranking, which);
}
else
status |= show_jobs(http, NULL, NULL, long_status,
ranking, which);
break;
case 'p' :
op = 'p';
http = connect_server(http);
if (argv[i][2] != '\0')
{
check_dest(http, argv[i] + 2, &num_dests, &dests);
status |= show_printers(http, argv[i] + 2, num_dests, dests, long_status);
}
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
check_dest(http, argv[i], &num_dests, &dests);
status |= show_printers(http, argv[i], num_dests, dests, long_status);
}
else
{
if (num_dests == 0)
num_dests = cupsGetDests2(http, &dests);
status |= show_printers(http, NULL, num_dests, dests, long_status);
}
break;
case 'r' :
op = 'r';
http = connect_server(http);
show_scheduler(http);
break;
case 's' :
op = 's';
http = connect_server(http);
if (num_dests == 0)
num_dests = cupsGetDests2(http, &dests);
show_default(num_dests, dests);
status |= show_classes(http, NULL);
status |= show_devices(http, NULL, num_dests, dests);
break;
case 't' :
op = 't';
http = connect_server(http);
if (num_dests == 0)
num_dests = cupsGetDests2(http, &dests);
show_scheduler(http);
show_default(num_dests, dests);
status |= show_classes(http, NULL);
status |= show_devices(http, NULL, num_dests, dests);
status |= show_accepting(http, NULL, num_dests, dests);
status |= show_printers(http, NULL, num_dests, dests, long_status);
status |= show_jobs(http, NULL, NULL, long_status, ranking, which);
break;
case 'u' :
op = 'u';
http = connect_server(http);
if (argv[i][2] != '\0')
status |= show_jobs(http, NULL, argv[i] + 2, long_status,
ranking, which);
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
status |= show_jobs(http, NULL, argv[i], long_status,
ranking, which);
}
else
status |= show_jobs(http, NULL, NULL, long_status,
ranking, which);
break;
case 'v' :
op = 'v';
http = connect_server(http);
if (argv[i][2] != '\0')
{
check_dest(http, argv[i] + 2, &num_dests, &dests);
status |= show_devices(http, argv[i] + 2, num_dests, dests);
}
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
check_dest(http, argv[i], &num_dests, &dests);
status |= show_devices(http, argv[i], num_dests, dests);
}
else
{
if (num_dests == 0)
num_dests = cupsGetDests2(http, &dests);
status |= show_devices(http, NULL, num_dests, dests);
}
break;
default :
fprintf(stderr, "lpstat: Unknown option \'%c\'!\n", argv[i][1]);
return (1);
}
else
{
http = connect_server(http);
status |= show_jobs(http, argv[i], NULL, long_status, ranking, which);
op = 'o';
}
if (!op)
{
http = connect_server(http);
status |= show_jobs(http, NULL, cupsUser(), long_status, ranking, which);
}
return (status);
}
static void
check_dest(http_t *http,
const char *name,
int *num_dests,
cups_dest_t **dests)
{
const char *dptr;
char *pptr,
printer[128];
if (*num_dests == 0)
*num_dests = cupsGetDests2(http, dests);
for (dptr = name; *dptr != '\0';)
{
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
for (pptr = printer; !isspace(*dptr & 255) && *dptr != ',' && *dptr != '\0';)
{
if ((pptr - printer) < (sizeof(printer) - 1))
*pptr++ = *dptr++;
else
{
fprintf(stderr, "lpstat: Invalid destination name in list \"%s\"!\n", name);
exit(1);
}
}
*pptr = '\0';
if (cupsGetDest(printer, NULL, *num_dests, *dests) == NULL)
{
fprintf(stderr, "lpstat: Unknown destination \"%s\"!\n", printer);
exit(1);
}
}
}
static http_t *
connect_server(http_t *http)
{
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(),
cupsEncryption());
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
exit(1);
}
}
return (http);
}
static int
show_accepting(http_t *http,
const char *printers,
int num_dests,
cups_dest_t *dests)
{
int i;
ipp_t *request,
*response;
ipp_attribute_t *attr;
cups_lang_t *language;
const char *printer,
*message;
int accepting;
const char *dptr,
*ptr;
int match;
static const char *pattrs[] =
{
"printer-name",
"printer-state-message",
"printer-is-accepting-jobs"
};
DEBUG_printf(("show_accepting(%p, %p)\n", http, printers));
if (http == NULL)
return (1);
if (printers != NULL && strcmp(printers, "all") == 0)
printers = NULL;
request = ippNew();
request->request.op.operation_id = CUPS_GET_PRINTERS;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL, language->language);
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", sizeof(pattrs) / sizeof(pattrs[0]),
NULL, pattrs);
if ((response = cupsDoRequest(http, request, "/")) != NULL)
{
DEBUG_puts("show_accepting: request succeeded...");
if (response->request.status.status_code > IPP_OK_CONFLICT)
{
fprintf(stderr, "lpstat: get-printers failed: %s\n",
ippErrorString(response->request.status.status_code));
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;
while (attr != NULL && attr->group_tag == IPP_TAG_PRINTER)
{
if (strcmp(attr->name, "printer-name") == 0 &&
attr->value_tag == IPP_TAG_NAME)
printer = attr->values[0].string.text;
if (strcmp(attr->name, "printer-state-message") == 0 &&
attr->value_tag == IPP_TAG_TEXT)
message = attr->values[0].string.text;
if (strcmp(attr->name, "printer-is-accepting-jobs") == 0 &&
attr->value_tag == IPP_TAG_BOOLEAN)
accepting = attr->values[0].boolean;
attr = attr->next;
}
if (printer == NULL)
{
if (attr == NULL)
break;
else
continue;
}
match = printers == NULL;
if (printers != NULL)
{
for (dptr = printers; *dptr != '\0';)
{
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
for (ptr = printer;
*ptr != '\0' && *dptr != '\0' && tolower(*ptr & 255) == tolower(*dptr & 255);
ptr ++, dptr ++);
if (*ptr == '\0' && (*dptr == '\0' || *dptr == ',' || isspace(*dptr & 255)))
{
match = 1;
break;
}
while (!isspace(*dptr & 255) && *dptr != ',' && *dptr != '\0')
dptr ++;
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
}
}
if (match)
{
if (accepting)
printf("%s accepting requests since Jan 01 00:00\n", printer);
else
printf("%s not accepting requests since Jan 01 00:00 -\n\t%s\n", printer,
message == NULL ? "reason unknown" : message);
for (i = 0; i < num_dests; i ++)
if (strcasecmp(dests[i].name, printer) == 0 && dests[i].instance)
{
if (accepting)
printf("%s/%s accepting requests since Jan 01 00:00\n", printer, dests[i].instance);
else
printf("%s/%s not accepting requests since Jan 01 00:00 -\n\t%s\n", printer,
dests[i].instance,
message == NULL ? "reason unknown" : message);
}
}
if (attr == NULL)
break;
}
ippDelete(response);
}
else
{
fprintf(stderr, "lpstat: get-printers failed: %s\n",
ippErrorString(cupsLastError()));
return (1);
}
return (0);
}
static int
show_classes(http_t *http,
const char *dests)
{
int i;
ipp_t *request,
*response,
*response2;
http_t *http2;
ipp_attribute_t *attr;
cups_lang_t *language;
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;
const char *dptr,
*ptr;
int match;
static const char *cattrs[] =
{
"printer-name",
"printer-uri-supported",
"member-names"
};
DEBUG_printf(("show_classes(%p, %p)\n", http, dests));
if (http == NULL)
return (1);
if (dests != NULL && strcmp(dests, "all") == 0)
dests = NULL;
request = ippNew();
request->request.op.operation_id = CUPS_GET_CLASSES;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL, language->language);
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", sizeof(cattrs) / sizeof(cattrs[0]),
NULL, cattrs);
if ((response = cupsDoRequest(http, request, "/")) != NULL)
{
DEBUG_puts("show_classes: request succeeded...");
if (response->request.status.status_code > IPP_OK_CONFLICT)
{
fprintf(stderr, "lpstat: get-classes failed: %s\n",
ippErrorString(response->request.status.status_code));
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") == 0 &&
attr->value_tag == IPP_TAG_NAME)
printer = attr->values[0].string.text;
if (strcmp(attr->name, "printer-uri-supported") == 0 &&
attr->value_tag == IPP_TAG_URI)
printer_uri = attr->values[0].string.text;
if (strcmp(attr->name, "member-names") == 0 &&
attr->value_tag == IPP_TAG_NAME)
members = attr;
attr = attr->next;
}
response2 = NULL;
if (members == NULL && printer_uri != NULL)
{
httpSeparate(printer_uri, method, username, server, &port, resource);
if (!strcasecmp(server, http->hostname))
http2 = http;
else
http2 = httpConnectEncrypt(server, port, cupsEncryption());
if (http2 != NULL)
{
request = ippNew();
request->request.op.operation_id = IPP_GET_PRINTER_ATTRIBUTES;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL, language->language);
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 != http)
httpClose(http2);
}
}
if (printer == NULL)
{
if (response2)
ippDelete(response2);
if (attr == NULL)
break;
else
continue;
}
match = dests == NULL;
if (dests != NULL)
{
for (dptr = dests; *dptr != '\0';)
{
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
for (ptr = printer;
*ptr != '\0' && *dptr != '\0' && tolower(*ptr & 255) == tolower(*dptr & 255);
ptr ++, dptr ++);
if (*ptr == '\0' && (*dptr == '\0' || *dptr == ',' || isspace(*dptr & 255)))
{
match = 1;
break;
}
while (!isspace(*dptr & 255) && *dptr != ',' && *dptr != '\0')
dptr ++;
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
}
}
if (match)
{
printf("members of class %s:\n", printer);
if (members)
{
for (i = 0; i < members->num_values; i ++)
printf("\t%s\n", members->values[i].string.text);
}
else
puts("\tunknown");
}
if (response2)
ippDelete(response2);
if (attr == NULL)
break;
}
ippDelete(response);
}
else
{
fprintf(stderr, "lpstat: get-classes failed: %s\n",
ippErrorString(cupsLastError()));
return (1);
}
return (0);
}
static void
show_default(int num_dests,
cups_dest_t *dests)
{
cups_dest_t *dest;
const char *printer,
*val;
if ((dest = cupsGetDest(NULL, NULL, num_dests, dests)) != NULL)
{
if (dest->instance)
printf("system default destination: %s/%s\n", dest->name, dest->instance);
else
printf("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 && !cupsGetDest(printer, NULL, num_dests, dests))
printf("lpstat: error - %s environment variable names non-existent destination \"%s\"!\n",
val, printer);
else
puts("no system default destination");
}
}
static int
show_devices(http_t *http,
const char *printers,
int num_dests,
cups_dest_t *dests)
{
int i;
ipp_t *request,
*response;
ipp_attribute_t *attr;
cups_lang_t *language;
const char *printer,
*uri,
*device,
*dptr,
*ptr;
int match;
static const char *pattrs[] =
{
"printer-name",
"printer-uri-supported",
"device-uri"
};
DEBUG_printf(("show_devices(%p, %p)\n", http, dests));
if (http == NULL)
return (1);
if (printers != NULL && strcmp(printers, "all") == 0)
printers = NULL;
request = ippNew();
request->request.op.operation_id = CUPS_GET_PRINTERS;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL, language->language);
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", sizeof(pattrs) / sizeof(pattrs[0]),
NULL, pattrs);
if ((response = cupsDoRequest(http, request, "/")) != NULL)
{
DEBUG_puts("show_devices: request succeeded...");
if (response->request.status.status_code > IPP_OK_CONFLICT)
{
fprintf(stderr, "lpstat: get-printers failed: %s\n",
ippErrorString(response->request.status.status_code));
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") == 0 &&
attr->value_tag == IPP_TAG_NAME)
printer = attr->values[0].string.text;
if (strcmp(attr->name, "printer-uri-supported") == 0 &&
attr->value_tag == IPP_TAG_URI)
uri = attr->values[0].string.text;
if (strcmp(attr->name, "device-uri") == 0 &&
attr->value_tag == IPP_TAG_URI)
device = attr->values[0].string.text;
attr = attr->next;
}
if (printer == NULL)
{
if (attr == NULL)
break;
else
continue;
}
match = printers == NULL;
if (printers != NULL)
{
for (dptr = printers; *dptr != '\0';)
{
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
for (ptr = printer;
*ptr != '\0' && *dptr != '\0' && tolower(*ptr & 255) == tolower(*dptr & 255);
ptr ++, dptr ++);
if (*ptr == '\0' && (*dptr == '\0' || *dptr == ',' || isspace(*dptr & 255)))
{
match = 1;
break;
}
while (!isspace(*dptr & 255) && *dptr != ',' && *dptr != '\0')
dptr ++;
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
}
}
if (match)
{
#ifdef __osf__
char method[HTTP_MAX_URI],
username[HTTP_MAX_URI],
hostname[HTTP_MAX_URI],
resource[HTTP_MAX_URI];
int port;
if (device == NULL)
{
httpSeparate(uri, method, username, hostname, &port, resource);
printf("Output for printer %s is sent to remote printer %s on %s\n",
printer, strrchr(resource, '/') + 1, hostname);
}
else if (strncmp(device, "file:", 5) == 0)
printf("Output for printer %s is sent to %s\n", printer, device + 5);
else
printf("Output for printer %s is sent to %s\n", printer, device);
for (i = 0; i < num_dests; i ++)
if (strcasecmp(printer, dests[i].name) == 0 && dests[i].instance)
{
if (device == NULL)
printf("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) == 0)
printf("Output for printer %s/%s is sent to %s\n", printer, dests[i].instance, device + 5);
else
printf("Output for printer %s/%s is sent to %s\n", printer, dests[i].instance, device);
}
#else
if (device == NULL)
printf("device for %s: %s\n", printer, uri);
else if (strncmp(device, "file:", 5) == 0)
printf("device for %s: %s\n", printer, device + 5);
else
printf("device for %s: %s\n", printer, device);
for (i = 0; i < num_dests; i ++)
if (strcasecmp(printer, dests[i].name) == 0 && dests[i].instance)
{
if (device == NULL)
printf("device for %s/%s: %s\n", printer, dests[i].instance, uri);
else if (strncmp(device, "file:", 5) == 0)
printf("device for %s/%s: %s\n", printer, dests[i].instance, device + 5);
else
printf("device for %s/%s: %s\n", printer, dests[i].instance, device);
}
#endif
}
if (attr == NULL)
break;
}
ippDelete(response);
}
else
{
fprintf(stderr, "lpstat: get-printers failed: %s\n",
ippErrorString(cupsLastError()));
return (1);
}
return (0);
}
static int
show_jobs(http_t *http,
const char *dests,
const char *users,
int long_status,
int ranking,
const char *which)
{
ipp_t *request,
*response;
ipp_attribute_t *attr;
cups_lang_t *language;
const char *dest,
*username,
*title;
int rank,
jobid;
off_t size;
time_t jobtime;
struct tm *jobdate;
const char *dptr,
*ptr;
int match;
char temp[255],
date[32];
static const char *jattrs[] =
{
"job-id",
"job-k-octets",
"job-name",
"time-at-creation",
"job-printer-uri",
"job-originating-user-name"
};
DEBUG_printf(("show_jobs(%p, %p, %p)\n", http, dests, users));
if (http == NULL)
return (1);
if (dests != NULL && strcmp(dests, "all") == 0)
dests = NULL;
request = ippNew();
request->request.op.operation_id = IPP_GET_JOBS;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL, language->language);
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", sizeof(jattrs) / sizeof(jattrs[0]),
NULL, jattrs);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI, "job-uri",
NULL, "ipp://localhost/jobs/");
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD, "which-jobs",
NULL, which);
if ((response = cupsDoRequest(http, request, "/")) != NULL)
{
if (response->request.status.status_code > IPP_OK_CONFLICT)
{
fprintf(stderr, "lpstat: get-jobs failed: %s\n",
ippErrorString(response->request.status.status_code));
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";
while (attr != NULL && attr->group_tag == IPP_TAG_JOB)
{
if (strcmp(attr->name, "job-id") == 0 &&
attr->value_tag == IPP_TAG_INTEGER)
jobid = attr->values[0].integer;
if (strcmp(attr->name, "job-k-octets") == 0 &&
attr->value_tag == IPP_TAG_INTEGER)
size = (off_t)attr->values[0].integer * 1024;
if (strcmp(attr->name, "time-at-creation") == 0 &&
attr->value_tag == IPP_TAG_INTEGER)
jobtime = attr->values[0].integer;
if (strcmp(attr->name, "job-printer-uri") == 0 &&
attr->value_tag == IPP_TAG_URI)
if ((dest = strrchr(attr->values[0].string.text, '/')) != NULL)
dest ++;
if (strcmp(attr->name, "job-originating-user-name") == 0 &&
attr->value_tag == IPP_TAG_NAME)
username = attr->values[0].string.text;
if (strcmp(attr->name, "job-name") == 0 &&
attr->value_tag == IPP_TAG_NAME)
title = attr->values[0].string.text;
attr = attr->next;
}
if (dest == NULL || jobid == 0)
{
if (attr == NULL)
break;
else
continue;
}
match = (dests == NULL && users == NULL);
rank ++;
if (dests != NULL)
{
for (dptr = dests; *dptr != '\0';)
{
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
for (ptr = dest;
*ptr != '\0' && *dptr != '\0' && tolower(*ptr & 255) == tolower(*dptr & 255);
ptr ++, dptr ++);
if (*ptr == '\0' && (*dptr == '\0' || *dptr == ',' || isspace(*dptr & 255)))
{
match = 1;
break;
}
while (!isspace(*dptr & 255) && *dptr != ',' && *dptr != '\0')
dptr ++;
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
}
}
if (users != NULL && username != NULL)
{
for (dptr = users; *dptr != '\0';)
{
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
for (ptr = username;
*ptr != '\0' && *dptr != '\0' && *ptr == *dptr;
ptr ++, dptr ++);
if (*ptr == '\0' && (*dptr == '\0' || *dptr == ',' || isspace(*dptr & 255)))
{
match = 1;
break;
}
while (!isspace(*dptr & 255) && *dptr != ',' && *dptr != '\0')
dptr ++;
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
}
}
if (match)
{
jobdate = localtime(&jobtime);
snprintf(temp, sizeof(temp), "%s-%d", dest, jobid);
if (long_status == 3)
{
strftime(date, sizeof(date), "%b %d %H:%M", jobdate);
printf("%s;%s;%" PRIdMAX ";%s;%s\n", temp, username ? username : "unknown",
(intmax_t)size, title ? title : "unknown", date);
}
else
{
strftime(date, sizeof(date), CUPS_STRFTIME_FORMAT, jobdate);
if (ranking)
printf("%3d %-21s %-13s %8" PRIdMAX " %s\n", rank, temp,
username ? username : "unknown", (intmax_t)size, date);
else
printf("%-23s %-13s %8" PRIdMAX " %s\n", temp,
username ? username : "unknown", (intmax_t)size, date);
if (long_status)
printf("\tqueued for %s\n", dest);
}
}
if (attr == NULL)
break;
}
ippDelete(response);
}
else
{
fprintf(stderr, "lpstat: get-jobs failed: %s\n",
ippErrorString(cupsLastError()));
return (1);
}
return (0);
}
static int
show_printers(http_t *http,
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;
cups_lang_t *language;
const char *printer,
*message,
*description,
*location,
*make_model,
*uri;
ipp_pstate_t pstate;
cups_ptype_t ptype;
int jobid;
const char *dptr,
*ptr;
int match;
char printer_uri[HTTP_MAX_URI];
const char *root;
static const char *pattrs[] =
{
"printer-name",
"printer-state",
"printer-state-message",
"printer-state-reasons",
"printer-type",
"printer-info",
"printer-location",
"printer-make-and-model",
"printer-uri-supported"
};
static const char *jattrs[] =
{
"job-id"
};
DEBUG_printf(("show_printers(%p, %p)\n", http, dests));
if (http == NULL)
return (1);
if ((root = getenv("CUPS_SERVERROOT")) == NULL)
root = CUPS_SERVERROOT;
if (printers != NULL && strcmp(printers, "all") == 0)
printers = NULL;
request = ippNew();
request->request.op.operation_id = CUPS_GET_PRINTERS;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL, cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL, language->language);
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes", sizeof(pattrs) / sizeof(pattrs[0]),
NULL, pattrs);
if ((response = cupsDoRequest(http, request, "/")) != NULL)
{
DEBUG_puts("show_printers: request succeeded...");
if (response->request.status.status_code > IPP_OK_CONFLICT)
{
fprintf(stderr, "lpstat: get-printers failed: %s\n",
ippErrorString(response->request.status.status_code));
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;
ptype = CUPS_PRINTER_LOCAL;
pstate = IPP_PRINTER_IDLE;
message = NULL;
description = NULL;
location = NULL;
make_model = NULL;
reasons = NULL;
uri = NULL;
jobid = 0;
while (attr != NULL && attr->group_tag == IPP_TAG_PRINTER)
{
if (strcmp(attr->name, "printer-name") == 0 &&
attr->value_tag == IPP_TAG_NAME)
printer = attr->values[0].string.text;
else if (strcmp(attr->name, "printer-state") == 0 &&
attr->value_tag == IPP_TAG_ENUM)
pstate = (ipp_pstate_t)attr->values[0].integer;
else if (strcmp(attr->name, "printer-type") == 0 &&
attr->value_tag == IPP_TAG_ENUM)
ptype = (cups_ptype_t)attr->values[0].integer;
else if (strcmp(attr->name, "printer-state-message") == 0 &&
attr->value_tag == IPP_TAG_TEXT)
message = attr->values[0].string.text;
else if (strcmp(attr->name, "printer-info") == 0 &&
attr->value_tag == IPP_TAG_TEXT)
description = attr->values[0].string.text;
else if (strcmp(attr->name, "printer-location") == 0 &&
attr->value_tag == IPP_TAG_TEXT)
location = attr->values[0].string.text;
else if (strcmp(attr->name, "printer-make-and-model") == 0 &&
attr->value_tag == IPP_TAG_TEXT)
make_model = attr->values[0].string.text;
else if (strcmp(attr->name, "printer-uri-supported") == 0 &&
attr->value_tag == IPP_TAG_URI)
uri = attr->values[0].string.text;
else if (strcmp(attr->name, "printer-state-reasons") == 0 &&
attr->value_tag == IPP_TAG_KEYWORD)
reasons = attr;
attr = attr->next;
}
if (printer == NULL)
{
if (attr == NULL)
break;
else
continue;
}
match = printers == NULL;
if (printers != NULL)
{
for (dptr = printers; *dptr != '\0';)
{
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
for (ptr = printer;
*ptr != '\0' && *dptr != '\0' && tolower(*ptr & 255) == tolower(*dptr & 255);
ptr ++, dptr ++);
if (*ptr == '\0' && (*dptr == '\0' || *dptr == ',' || isspace(*dptr & 255)))
{
match = 1;
break;
}
while (!isspace(*dptr & 255) && *dptr != ',' && *dptr != '\0')
dptr ++;
while (isspace(*dptr & 255) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
}
}
if (match)
{
if (pstate == IPP_PRINTER_PROCESSING)
{
request = ippNew();
request->request.op.operation_id = IPP_GET_JOBS;
request->request.op.request_id = 1;
language = cupsLangDefault();
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_CHARSET,
"attributes-charset", NULL,
cupsLangEncoding(language));
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_LANGUAGE,
"attributes-natural-language", NULL,
language->language);
ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD,
"requested-attributes",
sizeof(jattrs) / sizeof(jattrs[0]), NULL, jattrs);
snprintf(printer_uri, sizeof(printer_uri), "ipp://%s/printers/%s",
http->hostname, printer);
ippAddString(request, IPP_TAG_OPERATION, IPP_TAG_URI,
"printer-uri", NULL, printer_uri);
ippAddInteger(request, IPP_TAG_OPERATION, IPP_TAG_INTEGER,
"limit", 1);
if ((jobs = cupsDoRequest(http, request, "/")) != NULL)
{
if ((jobattr = ippFindAttribute(jobs, "job-id", IPP_TAG_INTEGER)) != NULL)
jobid = jobattr->values[0].integer;
ippDelete(jobs);
}
}
switch (pstate)
{
case IPP_PRINTER_IDLE :
printf("printer %s is idle. enabled since Jan 01 00:00\n", printer);
break;
case IPP_PRINTER_PROCESSING :
printf("printer %s now printing %s-%d. enabled since Jan 01 00:00\n", printer, printer, jobid);
break;
case IPP_PRINTER_STOPPED :
printf("printer %s disabled since Jan 01 00:00 -\n", printer);
break;
}
if ((message && *message) || pstate == IPP_PRINTER_STOPPED)
printf("\t%s\n", message == NULL || !*message ? "reason unknown" :
message);
if (long_status > 1)
{
puts("\tForm mounted:");
puts("\tContent types: any");
puts("\tPrinter types: unknown");
}
if (long_status)
{
printf("\tDescription: %s\n", description ? description : "");
if (reasons)
{
printf("\tAlerts:");
for (i = 0; i < reasons->num_values; i ++)
printf(" %s", reasons->values[i].string.text);
putchar('\n');
}
}
if (long_status > 1)
{
printf("\tLocation: %s\n", location ? location : "");
printf("\tConnection: %s\n",
(ptype & CUPS_PRINTER_REMOTE) ? "remote" : "direct");
if (!(ptype & CUPS_PRINTER_REMOTE))
{
if (make_model && strstr(make_model, "System V Printer"))
printf("\tInterface: %s/ppd/%s.ppd\n", root, printer);
else if (make_model && !strstr(make_model, "Raw Printer"))
printf("\tInterface: %s/ppd/%s.ppd\n", root, printer);
}
else if (make_model && !strstr(make_model, "System V Printer") &&
!strstr(make_model, "Raw Printer") && uri)
printf("\tInterface: %s.ppd\n", uri);
puts("\tOn fault: no alert");
puts("\tAfter fault: continue");
puts("\tUsers allowed:");
puts("\t\t(all)");
puts("\tForms allowed:");
puts("\t\t(none)");
puts("\tBanner required");
puts("\tCharset sets:");
puts("\t\t(none)");
puts("\tDefault pitch:");
puts("\tDefault page size:");
puts("\tDefault port settings:");
}
for (i = 0; i < num_dests; i ++)
if (strcasecmp(printer, dests[i].name) == 0 && dests[i].instance)
{
switch (pstate)
{
case IPP_PRINTER_IDLE :
printf("printer %s/%s is idle. enabled since Jan 01 00:00\n", printer, dests[i].instance);
break;
case IPP_PRINTER_PROCESSING :
printf("printer %s/%s now printing %s-%d. enabled since Jan 01 00:00\n", printer,
dests[i].instance, printer, jobid);
break;
case IPP_PRINTER_STOPPED :
printf("printer %s/%s disabled since Jan 01 00:00 -\n", printer,
dests[i].instance);
break;
}
if ((message && *message) || pstate == IPP_PRINTER_STOPPED)
printf("\t%s\n", message == NULL || !*message ? "reason unknown" :
message);
if (long_status > 1)
{
puts("\tForm mounted:");
puts("\tContent types: any");
puts("\tPrinter types: unknown");
}
if (long_status)
{
printf("\tDescription: %s\n", description ? description : "");
if (reasons)
{
printf("\tAlerts:");
for (j = 0; j < reasons->num_values; j ++)
printf(" %s", reasons->values[j].string.text);
putchar('\n');
}
}
if (long_status > 1)
{
printf("\tLocation: %s\n", location ? location : "");
printf("\tConnection: %s\n",
(ptype & CUPS_PRINTER_REMOTE) ? "remote" : "direct");
if (!(ptype & CUPS_PRINTER_REMOTE))
{
if (make_model && strstr(make_model, "System V Printer"))
printf("\tInterface: %s/ppd/%s.ppd\n", root, printer);
else if (make_model && !strstr(make_model, "Raw Printer"))
printf("\tInterface: %s/ppd/%s.ppd\n", root, printer);
}
else if (make_model && !strstr(make_model, "System V Printer") &&
!strstr(make_model, "Raw Printer") && uri)
printf("\tInterface: %s.ppd\n", uri);
puts("\tOn fault: no alert");
puts("\tAfter fault: continue");
puts("\tUsers allowed:");
puts("\t\t(all)");
puts("\tForms allowed:");
puts("\t\t(none)");
puts("\tBanner required");
puts("\tCharset sets:");
puts("\t\t(none)");
puts("\tDefault pitch:");
puts("\tDefault page size:");
puts("\tDefault port settings:");
}
}
}
if (attr == NULL)
break;
}
ippDelete(response);
}
else
{
fprintf(stderr, "lpstat: get-printers failed: %s\n",
ippErrorString(cupsLastError()));
return (1);
}
return (0);
}
static void
show_scheduler(http_t *http)
{
printf("scheduler is %srunning\n", http == NULL ? "not " : "");
}