#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>
static void show_accepting(http_t *, const char *, int, cups_dest_t *);
static void show_classes(http_t *, const char *);
static void show_default(int, cups_dest_t *);
static void show_devices(http_t *, const char *, int, cups_dest_t *);
static void show_jobs(http_t *, const char *, const char *, int, int);
static void 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;
http_t *http;
int num_dests;
cups_dest_t *dests;
int long_status;
int ranking;
http_encryption_t encryption;
http = NULL;
num_dests = 0;
dests = NULL;
long_status = 0;
ranking = 0;
encryption = cupsEncryption();
for (i = 1; i < argc; i ++)
if (argv[i][0] == '-')
switch (argv[i][1])
{
case 'D' :
long_status = 1;
break;
case 'E' :
#ifdef HAVE_LIBSSL
encryption = HTTP_ENCRYPT_REQUIRED;
if (http)
httpEncryption(http, encryption);
#else
fprintf(stderr, "%s: Sorry, no encryption support compiled in!\n",
argv[0]);
#endif
break;
case 'P' :
break;
case 'R' :
ranking = 1;
break;
case 'S' :
if (!argv[i][2])
i ++;
break;
case 'a' :
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
if (num_dests == 0)
num_dests = cupsGetDests(&dests);
if (argv[i][2] != '\0')
show_accepting(http, argv[i] + 2, num_dests, dests);
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
show_accepting(http, argv[i], num_dests, dests);
}
else
show_accepting(http, NULL, num_dests, dests);
break;
#ifdef __sgi
case 'b' :
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
if (argv[i][2] != '\0')
{
puts("");
show_jobs(http, argv[i] + 2, NULL, 3, ranking);
}
else
{
fputs("lpstat: The -b option requires a destination argument.\n",
stderr);
return (1);
}
break;
#endif
case 'c' :
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
if (argv[i][2] != '\0')
show_classes(http, argv[i] + 2);
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
show_classes(http, argv[i]);
}
else
show_classes(http, NULL);
break;
case 'd' :
if (num_dests == 0)
num_dests = cupsGetDests(&dests);
show_default(num_dests, dests);
break;
case 'f' :
if (!argv[i][2])
i ++;
break;
case 'h' :
if (http)
httpClose(http);
if (argv[i][2] != '\0')
{
http = httpConnectEncrypt(argv[i] + 2, ippPort(), encryption);
cupsSetServer(argv[i] + 2);
}
else
{
i ++;
if (i >= argc)
{
fputs("Error: need hostname after \'-h\' option!\n", stderr);
return (1);
}
http = httpConnectEncrypt(argv[i], ippPort(), encryption);
cupsSetServer(argv[i]);
}
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
break;
case 'l' :
#ifdef __sgi
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
if (argv[i][2] != '\0')
show_jobs(http, argv[i] + 2, NULL, 3, ranking);
else
#endif
long_status = 2;
break;
case 'o' :
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
if (argv[i][2] != '\0')
show_jobs(http, argv[i] + 2, NULL, long_status, ranking);
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
show_jobs(http, argv[i], NULL, long_status, ranking);
}
else
show_jobs(http, NULL, NULL, long_status, ranking);
break;
case 'p' :
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
if (num_dests == 0)
num_dests = cupsGetDests(&dests);
if (argv[i][2] != '\0')
show_printers(http, argv[i] + 2, num_dests, dests, long_status);
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
show_printers(http, argv[i], num_dests, dests, long_status);
}
else
show_printers(http, NULL, num_dests, dests, long_status);
break;
case 'r' :
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
show_scheduler(http);
break;
case 's' :
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
if (num_dests == 0)
num_dests = cupsGetDests(&dests);
show_default(num_dests, dests);
show_classes(http, NULL);
show_devices(http, NULL, num_dests, dests);
break;
case 't' :
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
if (num_dests == 0)
num_dests = cupsGetDests(&dests);
show_scheduler(http);
show_default(num_dests, dests);
show_classes(http, NULL);
show_devices(http, NULL, num_dests, dests);
show_accepting(http, NULL, num_dests, dests);
show_printers(http, NULL, num_dests, dests, long_status);
show_jobs(http, NULL, NULL, long_status, ranking);
break;
case 'u' :
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
if (argv[i][2] != '\0')
show_jobs(http, NULL, argv[i] + 2, long_status, ranking);
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
show_jobs(http, NULL, argv[i], long_status, ranking);
}
else
show_jobs(http, NULL, NULL, long_status, ranking);
break;
case 'v' :
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
if (num_dests == 0)
num_dests = cupsGetDests(&dests);
if (argv[i][2] != '\0')
show_devices(http, argv[i] + 2, num_dests, dests);
else if ((i + 1) < argc && argv[i + 1][0] != '-')
{
i ++;
show_devices(http, argv[i], num_dests, dests);
}
else
show_devices(http, NULL, num_dests, dests);
break;
default :
fprintf(stderr, "lpstat: Unknown option \'%c\'!\n", argv[i][1]);
return (1);
}
else
{
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
show_jobs(http, argv[i], NULL, long_status, ranking);
}
if (argc == 1)
{
if (!http)
{
http = httpConnectEncrypt(cupsServer(), ippPort(), encryption);
if (http == NULL)
{
perror("lpstat: Unable to connect to server");
return (1);
}
}
show_jobs(http, NULL, cupsUser(), long_status, ranking);
}
return (0);
}
static void
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;
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;
}
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) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
for (ptr = printer;
*ptr != '\0' && *dptr != '\0' && *ptr == *dptr;
ptr ++, dptr ++);
if (*ptr == '\0' && (*dptr == '\0' || *dptr == ',' || isspace(*dptr)))
{
match = 1;
break;
}
while (!isspace(*dptr) && *dptr != '\0')
dptr ++;
while (isspace(*dptr) || *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()));
}
static void
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;
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;
}
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 ((http2 = httpConnectEncrypt(server, port, cupsEncryption())) != 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);
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) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
for (ptr = printer;
*ptr != '\0' && *dptr != '\0' && *ptr == *dptr;
ptr ++, dptr ++);
if (*ptr == '\0' && (*dptr == '\0' || *dptr == ',' || isspace(*dptr)))
{
match = 1;
break;
}
while (!isspace(*dptr) && *dptr != '\0')
dptr ++;
while (isspace(*dptr) || *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()));
}
static void
show_default(int num_dests,
cups_dest_t *dests)
{
int i;
for (i = 0; i < num_dests; i ++)
if (dests[i].is_default)
break;
if (i < num_dests)
{
if (dests[i].instance)
printf("system default destination: %s/%s\n", dests[i].name,
dests[i].instance);
else
printf("system default destination: %s\n", dests[i].name);
}
else
puts("no system default destination");
}
static void
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;
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;
}
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) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
for (ptr = printer;
*ptr != '\0' && *dptr != '\0' && *ptr == *dptr;
ptr ++, dptr ++);
if (*ptr == '\0' && (*dptr == '\0' || *dptr == ',' || isspace(*dptr)))
{
match = 1;
break;
}
while (!isspace(*dptr) && *dptr != '\0')
dptr ++;
while (isspace(*dptr) || *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()));
}
static void
show_jobs(http_t *http,
const char *dests,
const char *users,
int long_status,
int ranking)
{
ipp_t *request,
*response;
ipp_attribute_t *attr;
cups_lang_t *language;
const char *dest,
*username,
*title;
int rank,
jobid,
size;
time_t jobtime;
struct tm *jobdate;
const char *dptr,
*ptr;
int match;
char temp[22],
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;
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/");
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;
}
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 = 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) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
for (ptr = dest;
*ptr != '\0' && *dptr != '\0' && *ptr == *dptr;
ptr ++, dptr ++);
if (*ptr == '\0' && (*dptr == '\0' || *dptr == ',' || isspace(*dptr)))
{
match = 1;
break;
}
while (!isspace(*dptr) && *dptr != '\0')
dptr ++;
while (isspace(*dptr) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
}
}
if (users != NULL && username != NULL)
{
for (dptr = users; *dptr != '\0';)
{
while (isspace(*dptr) || *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)))
{
match = 1;
break;
}
while (!isspace(*dptr) && *dptr != '\0')
dptr ++;
while (isspace(*dptr) || *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;%d;%s;%s\n", temp, username ? username : "unknown",
size, title ? title : "unknown", date);
}
else
{
strftime(date, sizeof(date), CUPS_STRFTIME_FORMAT, jobdate);
if (ranking)
printf("%3d %-21s %-13s %8d %s\n", rank, temp,
username ? username : "unknown", size, date);
else
printf("%-23s %-13s %8d %s\n", temp,
username ? username : "unknown", 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()));
}
static void
show_printers(http_t *http,
const char *printers,
int num_dests,
cups_dest_t *dests,
int long_status)
{
int i;
ipp_t *request,
*response,
*jobs;
ipp_attribute_t *attr;
ipp_attribute_t *jobattr;
cups_lang_t *language;
const char *printer,
*message,
*description;
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-type",
"printer-info"
};
static const char *jattrs[] =
{
"job-id"
};
DEBUG_printf(("show_printers(%p, %p)\n", http, dests));
if (http == NULL)
return;
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;
}
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;
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;
if (strcmp(attr->name, "printer-state") == 0 &&
attr->value_tag == IPP_TAG_ENUM)
pstate = (ipp_pstate_t)attr->values[0].integer;
if (strcmp(attr->name, "printer-type") == 0 &&
attr->value_tag == IPP_TAG_ENUM)
ptype = (cups_ptype_t)attr->values[0].integer;
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-info") == 0 &&
attr->value_tag == IPP_TAG_TEXT)
description = 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) || *dptr == ',')
dptr ++;
if (*dptr == '\0')
break;
for (ptr = printer;
*ptr != '\0' && *dptr != '\0' && *ptr == *dptr;
ptr ++, dptr ++);
if (*ptr == '\0' && (*dptr == '\0' || *dptr == ',' || isspace(*dptr)))
{
match = 1;
break;
}
while (!isspace(*dptr) && *dptr != '\0')
dptr ++;
while (isspace(*dptr) || *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\t%s\n", printer,
message == NULL ? "reason unknown" : message);
break;
}
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 (long_status > 1)
{
printf("\tConnection: %s\n",
(ptype & CUPS_PRINTER_REMOTE) ? "remote" : "direct");
if (!(ptype & CUPS_PRINTER_REMOTE))
printf("\tInterface: %s/ppd/%s.ppd\n", root, printer);
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\t%s\n", printer,
dests[i].instance,
message == NULL ? "reason unknown" : message);
break;
}
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 (long_status > 1)
{
printf("\tConnection: %s\n",
(ptype & CUPS_PRINTER_REMOTE) ? "remote" : "direct");
if (!(ptype & CUPS_PRINTER_REMOTE))
printf("\tInterface: %s/ppd/%s.ppd\n", root, printer);
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()));
}
static void
show_scheduler(http_t *http)
{
printf("scheduler is %srunning\n", http == NULL ? "not " : "");
}