diff options
Diffstat (limited to 'usr/src/cmd/print/bsd-sysv-commands/lpstat.c')
| -rw-r--r-- | usr/src/cmd/print/bsd-sysv-commands/lpstat.c | 1444 |
1 files changed, 0 insertions, 1444 deletions
diff --git a/usr/src/cmd/print/bsd-sysv-commands/lpstat.c b/usr/src/cmd/print/bsd-sysv-commands/lpstat.c deleted file mode 100644 index 6f666bcc03..0000000000 --- a/usr/src/cmd/print/bsd-sysv-commands/lpstat.c +++ /dev/null @@ -1,1444 +0,0 @@ -/* - * CDDL HEADER START - * - * The contents of this file are subject to the terms of the - * Common Development and Distribution License (the "License"). - * You may not use this file except in compliance with the License. - * - * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE - * or http://www.opensolaris.org/os/licensing. - * See the License for the specific language governing permissions - * and limitations under the License. - * - * When distributing Covered Code, include this CDDL HEADER in each - * file and include the License file at usr/src/OPENSOLARIS.LICENSE. - * If applicable, add the following below this CDDL HEADER, with the - * fields enclosed by brackets "[]" replaced with your own identifying - * information: Portions Copyright [yyyy] [name of copyright owner] - * - * CDDL HEADER END - */ - -/* - * Copyright 2010 Sun Microsystems, Inc. All rights reserved. - * Use is subject to license terms. - * - */ - -/* $Id: lpstat.c 173 2006-05-25 04:52:06Z njacobs $ */ - - -#include <stdio.h> -#include <stdlib.h> -#include <unistd.h> -#include <string.h> -#include <locale.h> -#include <libintl.h> -#include <ctype.h> -#include <pwd.h> -#include <papi.h> -#include <uri.h> -#include "common.h" -#include "lp.h" - -static void -usage(char *program) -{ - char *name; - - if ((name = strrchr(program, '/')) == NULL) - name = program; - else - name++; - - fprintf(stdout, gettext("Usage: %s [-d] [-r] [-s] [-t] [-a [list]] " - "[-c [list]] [-o [list] [-l]] [-R [list] [-l]] " - "[-p [list] [-D] [-l]] [-v [list]] [-S [list] [-l]] " - "[-f [list] [-l]] [-u list]\n"), - name); - exit(1); -} - -static char * -nctime(time_t *t) -{ - static char buf[64]; - struct tm *tm = localtime(t); - - (void) strftime(buf, sizeof (buf), "%c", tm); - - return (buf); -} - -static char * -printer_name(papi_printer_t printer) -{ - papi_attribute_t **attributes = papiPrinterGetAttributeList(printer); - char *result = NULL; - - if (attributes != NULL) - papiAttributeListGetString(attributes, NULL, - "printer-name", &result); - - return (result); -} - -static int -lpstat_default_printer(papi_encryption_t encryption) -{ - papi_status_t status; - papi_service_t svc = NULL; - papi_printer_t p = NULL; - char *name = NULL; - - status = papiServiceCreate(&svc, NULL, NULL, NULL, cli_auth_callback, - encryption, NULL); - if (status == PAPI_OK) { - char *req[] = { "printer-name", NULL }; - - status = papiPrinterQuery(svc, DEFAULT_DEST, req, NULL, &p); - if (p != NULL) - name = printer_name(p); - } - if (name != NULL) - printf(gettext("system default printer: %s\n"), name); - else - printf(gettext("no system default destination\n")); - papiPrinterFree(p); - papiServiceDestroy(svc); - - return (0); -} - -static int -lpstat_service_status(papi_encryption_t encryption) -{ - papi_status_t status; - papi_service_t svc = NULL; - char *name = NULL; - - if (((name = getenv("PAPI_SERVICE_URI")) == NULL) && - ((name = getenv("IPP_SERVER")) == NULL) && - ((name = getenv("CUPS_SERVER")) == NULL)) - name = DEFAULT_SERVICE_URI; - - status = papiServiceCreate(&svc, name, NULL, NULL, cli_auth_callback, - encryption, NULL); - if (status != PAPI_OK) { - printf(gettext("scheduler is not running\n")); - } else - printf(gettext("scheduler is running\n")); - papiServiceDestroy(svc); - - return (0); -} - -static char * -get_device_uri(papi_service_t svc, char *name) -{ - papi_status_t status; - papi_printer_t p = NULL; - char *keys[] = { "device-uri", NULL }; - char *result = NULL; - - status = papiPrinterQuery(svc, name, keys, NULL, &p); - if ((status == PAPI_OK) && (p != NULL)) { - papi_attribute_t **attrs = papiPrinterGetAttributeList(p); - - (void) papiAttributeListGetString(attrs, NULL, - "device-uri", &result); - if (result != NULL) - result = strdup(result); - - papiPrinterFree(p); - } - - return (result); -} - -static void -print_description(papi_attribute_t **list, char *printer_name) -{ - char *str = ""; - - (void) papiAttributeListGetString(list, NULL, - "printer-info", &str); - - /* - * If no printer-info is read then - * by default the printer-info is <printer-name>@<server> - */ - if (str[0] == '\0') { - char *uri = NULL; - uri_t *u = NULL; - - (void) papiAttributeListGetString(list, NULL, - "printer-uri-supported", &uri); - - if ((uri != NULL) && (uri_from_string(uri, &u) == 0)) { - char *nodename = localhostname(); - - if ((u->host == NULL) || - (strcasecmp(u->host, "localhost") == 0) || - (strcasecmp(u->host, nodename) == 0)) - printf(gettext("\tDescription:\n")); - else - printf(gettext("\tDescription: %s@%s\n"), - printer_name, u->host); - - uri_free(u); - } else - printf(gettext("\tDescription:\n")); - } else - printf(gettext("\tDescription: %s\n"), str); -} - -static char *report_device_keys[] = { "printer-name", "printer-uri-supported", - NULL }; -/* ARGSUSED2 */ -static int -report_device(papi_service_t svc, char *name, papi_printer_t printer, - int verbose, int description) -{ - papi_status_t status; - papi_attribute_t **attrs = papiPrinterGetAttributeList(printer); - char *uri = NULL; - char *device = NULL; - uri_t *u = NULL; - - if (name == NULL) { - status = papiAttributeListGetString(attrs, NULL, - "printer-name", &name); - if (status != PAPI_OK) - status = papiAttributeListGetString(attrs, NULL, - "printer-uri-supported", &name); - } - - if (name == NULL) - return (-1); - - (void) papiAttributeListGetString(attrs, NULL, - "printer-uri-supported", &uri); - - if ((uri != NULL) && (uri_from_string(uri, &u) == 0)) { - char *nodename = localhostname(); - - if ((u->host == NULL) || - (strcasecmp(u->host, "localhost") == 0) || - (strcasecmp(u->host, nodename) == 0)) - device = get_device_uri(svc, name); - - if (device != NULL) { - printf(gettext("device for %s: %s\n"), name, device); - return (0); - } else if (uri != NULL) { - printf(gettext("system for %s: %s (as %s)\n"), name, - u->host?u->host:"localhost", uri); - return (0); - } - - uri_free(u); - } - - return (0); -} - -static char *report_accepting_keys[] = { "printer-name", - "printer-uri-supported", "printer-is-accepting-jobs", - "printer-up-time", "printer-state-time", - "lpsched-reject-date", "lpsched-reject-reason", NULL }; -/* ARGSUSED2 */ -static int -report_accepting(papi_service_t svc, char *name, papi_printer_t printer, - int verbose, int description) -{ - papi_status_t status; - papi_attribute_t **attrs = papiPrinterGetAttributeList(printer); - time_t curr; - char boolean = PAPI_FALSE; - - if (name == NULL) { - status = papiAttributeListGetString(attrs, NULL, - "printer-name", &name); - if (status != PAPI_OK) - status = papiAttributeListGetString(attrs, NULL, - "printer-uri-supported", &name); - } - if (name == NULL) - return (-1); - - (void) papiAttributeListGetBoolean(attrs, NULL, - "printer-is-accepting-jobs", &boolean); - (void) time(&curr); - (void) papiAttributeListGetDatetime(attrs, NULL, - "printer-up-time", &curr); - (void) papiAttributeListGetDatetime(attrs, NULL, - "printer-state-time", &curr); - (void) papiAttributeListGetDatetime(attrs, NULL, - "lpsched-reject-date", &curr); - - if (boolean == PAPI_TRUE) { - printf(gettext("%s accepting requests since %s\n"), - name, nctime(&curr)); - } else { - char *reason = "unknown reason"; - - (void) papiAttributeListGetString(attrs, NULL, - "lpsched-reject-reason", &reason); - - printf(gettext("%s not accepting requests since %s\n\t%s\n"), - name, nctime(&curr), reason); - } - - return (0); -} - -static char *report_class_keys[] = { "printer-name", "printer-uri-supported", - "member-names", NULL }; -/* ARGSUSED2 */ -static int -report_class(papi_service_t svc, char *name, papi_printer_t printer, - int verbose, int description) -{ - papi_status_t status; - papi_attribute_t **attrs = papiPrinterGetAttributeList(printer); - char *member = NULL; - void *iter = NULL; - - status = papiAttributeListGetString(attrs, &iter, - "member-names", &member); - if (status == PAPI_NOT_FOUND) /* it's not a class */ - return (0); - - if (name == NULL) { - status = papiAttributeListGetString(attrs, NULL, - "printer-name", &name); - if (status != PAPI_OK) - status = papiAttributeListGetString(attrs, NULL, - "printer-uri-supported", &name); - } - if (name == NULL) - return (-1); - - printf(gettext("members of class %s:\n\t%s\n"), name, member); - while (papiAttributeListGetString(attrs, &iter, NULL, &member) - == PAPI_OK) - printf("\t%s\n", member); - - return (0); -} - -static int -get_remote_hostname(papi_attribute_t **attrs, char **host) -{ - char *uri = NULL; - uri_t *u; - char *nodename; - - *host = NULL; - (void) papiAttributeListGetString(attrs, NULL, - "job-originating-host-name", host); - (void) papiAttributeListGetString(attrs, NULL, - "printer-uri-supported", &uri); - if (*host == NULL) { - if (uri != NULL) { - if (uri_from_string(uri, &u) == 0) { - if (u->host == NULL) { - uri_free(u); - return (0); - } - *host = strdup(u->host); - uri_free(u); - } else { - return (0); - } - } else { - return (0); - } - } - nodename = localhostname(); - if ((strcasecmp(*host, "localhost") == 0) || - (strcasecmp(*host, nodename) == 0)) { - return (0); - } - return (1); -} - -static char *report_printer_keys[] = { "printer-name", - "printer-uri-supported", "printer-state", - "printer-up-time", "printer-state-time", - "lpsched-disable-date", "printer-state-reasons", - "lpsched-disable-reason", NULL }; -/* ARGSUSED2 */ -static int -report_printer(papi_service_t svc, char *name, papi_printer_t printer, - int verbose, int description) -{ - papi_status_t status; - papi_attribute_t **attrs = papiPrinterGetAttributeList(printer); - time_t curr; - int32_t pstat = 0; - char *member = NULL; - papi_job_t *j = NULL; - - status = papiAttributeListGetString(attrs, NULL, - "member-names", &member); - if (status == PAPI_OK) /* it's a class */ - return (0); - - if (name == NULL) { - status = papiAttributeListGetString(attrs, NULL, - "printer-name", &name); - if (status != PAPI_OK) - status = papiAttributeListGetString(attrs, NULL, - "printer-uri-supported", &name); - } - if (name == NULL) - return (-1); - - printf(gettext("printer %s "), name); - - status = papiAttributeListGetInteger(attrs, NULL, - "printer-state", &pstat); - - switch (pstat) { - case 0x03: /* idle */ - printf(gettext("is idle. enabled")); - break; - case 0x04: /* processing */ - case 0x06: /* faulted printing */ - status = papiPrinterListJobs(svc, name, NULL, - 0, 0, &j); - - if (status == PAPI_OK) { - if (j != NULL) { - int i = 0; - int32_t jobid = 0; - int32_t jstate = 0; - - for (i = 0; j[i] != NULL; ++i) { - papi_attribute_t **attr = - papiJobGetAttributeList(j[i]); - - papiAttributeListGetInteger(attr, - NULL, "job-state", &jstate); - papiAttributeListGetInteger(attr, - NULL, "job-id", &jobid); - /* - * For lpd protocol "job-id-requested" - * should be read. - */ - papiAttributeListGetInteger(attr, - NULL, "job-id-requested", &jobid); - - /* - * When lpd protocol is used job-state - * cannot be retrieved, therefore - * job-state will be 0. - * When ipp protocol is used, the - * active/printing job-state will be - * RS_PRINTING (0x0008) post s10u5. - * For pre-s10u5 job-state will be - * RS_ACTIVE (0x05). So print only when - * the job-state is RS_PRINTING (0x0008) - * or RS_ACTIVE (0x05) or 0 - */ - if ((jstate == 0x0008) || - (jstate == 0x05) || - (jstate == 0)) { - if (pstat == 0x04) - printf(gettext - ("now printing"\ - " %s-%d. enabled"), - name, jobid); - if (pstat == 0x06) - printf(gettext - ("faulted printing"\ - " %s-%d. enabled"), - name, jobid); - break; - } - } - papiJobListFree(j); - } - } - break; - case 0x05: /* stopped */ - printf(gettext("disabled")); - break; - case 0x07: /* faulted printer */ - printf(gettext("faulted. enabled")); - break; - case 0x08: /* waiting for auto retry */ - printf(gettext("waiting for auto-retry.")); - break; - default: - printf(gettext("unknown state(0x%x)."), pstat); - break; - } - - if (pstat == 0x08) - printf(gettext(" available.\n")); - else { - (void) time(&curr); - (void) papiAttributeListGetDatetime(attrs, NULL, - "printer-up-time", &curr); - (void) papiAttributeListGetDatetime(attrs, NULL, - "printer-state-time", &curr); - (void) papiAttributeListGetDatetime(attrs, NULL, - "lpsched-disable-date", &curr); - printf(gettext(" since %s. available.\n"), nctime(&curr)); - } - - if ((pstat == 0x05) || - (pstat == 0x06) || - (pstat == 0x07) || - (pstat == 0x08)) { - char *reason = "unknown reason"; - - (void) papiAttributeListGetString(attrs, NULL, - "printer-state-reasons", &reason); - (void) papiAttributeListGetString(attrs, NULL, - "lpsched-disable-reason", &reason); - printf(gettext("\t%s\n"), reason); - } - - if (verbose == 1) { - void *iter; - char *str; - char *host = NULL; - - if ((get_remote_hostname(attrs, &host)) != 0) { - (void) printf( - gettext("\tRemote Name: %s\n\tRemote Server: " - "%s\n"), name, host); - free(host); - return (0); - } - str = ""; - (void) papiAttributeListGetString(attrs, NULL, - "form-ready", &str); - printf(gettext("\tForm mounted: %s\n"), str); - - str = ""; - iter = NULL; - (void) papiAttributeListGetString(attrs, &iter, - "document-format-supported", &str); - printf(gettext("\tContent types: %s"), str); - while (papiAttributeListGetString(attrs, &iter, NULL, &str) - == PAPI_OK) - printf(", %s", str); - printf("\n"); - - /* Display the printer description */ - print_description(attrs, name); - - str = ""; - iter = NULL; - (void) papiAttributeListGetString(attrs, &iter, - "lpsched-printer-type", &str); - printf(gettext("\tPrinter types: %s"), str); - while (papiAttributeListGetString(attrs, &iter, NULL, &str) - == PAPI_OK) - printf(", %s", str); - printf("\n"); - - str = ""; - (void) papiAttributeListGetString(attrs, NULL, - "lpsched-dial-info", &str); - printf(gettext("\tConnection: %s\n"), - ((str[0] == '\0') ? gettext("direct") : str)); - - str = ""; - (void) papiAttributeListGetString(attrs, NULL, - "lpsched-interface-script", &str); - printf(gettext("\tInterface: %s\n"), str); - - str = NULL; - (void) papiAttributeListGetString(attrs, NULL, - "ppd-file-uri", &str); - (void) papiAttributeListGetString(attrs, NULL, - "lpsched-ppd-source-path", &str); - if (str != NULL) - printf(gettext("\tPPD: %s\n"), str); - - str = NULL; - (void) papiAttributeListGetString(attrs, NULL, - "lpsched-fault-alert-command", &str); - if (str != NULL) - printf(gettext("\tOn fault: %s\n"), str); - - str = ""; - (void) papiAttributeListGetString(attrs, NULL, - "lpsched-fault-recovery", &str); - printf(gettext("\tAfter fault: %s\n"), - ((str[0] == '\0') ? gettext("continue") : str)); - - str = "(all)"; - iter = NULL; - (void) papiAttributeListGetString(attrs, &iter, - "requesting-user-name-allowed", &str); - printf(gettext("\tUsers allowed:\n\t\t%s\n"), - ((str[0] == '\0') ? gettext("(none)") : str)); - if ((str != NULL) && (str[0] != '\0')) - while (papiAttributeListGetString(attrs, &iter, NULL, - &str) == PAPI_OK) - printf("\t\t%s\n", str); - - str = NULL; - iter = NULL; - (void) papiAttributeListGetString(attrs, &iter, - "requesting-user-name-denied", &str); - if (str != NULL) { - printf(gettext("\tUsers denied:\n\t\t%s\n"), - ((str[0] == '\0') ? gettext("(none)") : str)); - if ((str != NULL) && (str[0] != '\0')) - while (papiAttributeListGetString(attrs, &iter, - NULL, &str) == PAPI_OK) - printf("\t\t%s\n", str); - } - - str = "none"; - iter = NULL; - (void) papiAttributeListGetString(attrs, &iter, - "form-supported", &str); - printf(gettext("\tForms allowed:\n\t\t(%s)\n"), - ((str[0] == '\0') ? gettext("none") : str)); - if ((str != NULL) && (str[0] != '\0')) - while (papiAttributeListGetString(attrs, &iter, NULL, - &str) == PAPI_OK) - printf("\t\t(%s)\n", str); - - str = ""; - iter = NULL; - (void) papiAttributeListGetString(attrs, &iter, - "media-supported", &str); - printf(gettext("\tMedia supported:\n\t\t%s\n"), - ((str[0] == '\0') ? gettext("(none)") : str)); - if ((str != NULL) && (str[0] != '\0')) - while (papiAttributeListGetString(attrs, &iter, NULL, - &str) == PAPI_OK) - printf("\t\t%s\n", str); - - str = ""; - (void) papiAttributeListGetString(attrs, NULL, - "job-sheets-supported", &str); - if ((strcasecmp(str, "none")) == 0) - str = gettext("page never printed"); - else if (strcasecmp(str, "optional") == 0) - str = gettext("not required"); - else - str = gettext("required"); - - printf(gettext("\tBanner %s\n"), str); - - - str = ""; - iter = NULL; - (void) papiAttributeListGetString(attrs, &iter, - "lpsched-print-wheels", &str); - printf(gettext("\tCharacter sets:\n\t\t%s\n"), - ((str[0] == '\0') ? gettext("(none)") : str)); - if ((str != NULL) && (str[0] != '\0')) - while (papiAttributeListGetString(attrs, &iter, NULL, - &str) == PAPI_OK) - printf("\t\t%s\n", str); - - printf(gettext("\tDefault pitch:\n")); - printf(gettext("\tDefault page size:\n")); - printf(gettext("\tDefault port setting:\n")); - - str = ""; - iter = NULL; - (void) papiAttributeListGetString(attrs, &iter, - "lpsched-options", &str); - if (str != NULL) { - printf(gettext("\tOptions: %s"), str); - while (papiAttributeListGetString(attrs, &iter, NULL, - &str) == PAPI_OK) - printf(", %s", str); - printf("\n"); - } - - } else if (description == 1) - /* Display printer description */ - print_description(attrs, name); - else if (verbose > 1) - papiAttributeListPrint(stdout, attrs, "\t"); - - if (verbose > 0) - printf("\n"); - - return (0); -} - -static int -printer_query(char *name, int (*report)(papi_service_t, char *, papi_printer_t, - int, int), papi_encryption_t encryption, - int verbose, int description) -{ - int result = 0, i = 0; - papi_status_t status; - papi_service_t svc = NULL; - char **list = getlist(name, LP_WS, LP_SEP); - - if (list == NULL) { - list = (char **)malloc(sizeof (char *)); - list[0] = name; - } - - /* - * The for loop executes once for every printer - * entry in list. If list is NULL that implies - * name is also NULL, the loop runs only one time. - */ - - for (i = 0; name == NULL || list[i] != NULL; i++) { - name = list[i]; - - status = papiServiceCreate(&svc, name, NULL, NULL, - cli_auth_callback, encryption, NULL); - if (status != PAPI_OK) { - if (status == PAPI_NOT_FOUND) - fprintf(stderr, - gettext("%s: unknown printer\n"), - name ? name : "(NULL)"); - else - fprintf(stderr, gettext( - "Failed to contact service for %s: %s\n"), - name ? name : "(NULL)", - verbose_papi_message(svc, status)); - papiServiceDestroy(svc); - result--; - continue; - } - - if (name == NULL) { /* all */ - char **interest = interest_list(svc); - - if (interest != NULL) { - int i; - - for (i = 0; interest[i] != NULL; i++) - result += printer_query(interest[i], - report, encryption, verbose, - description); - } - } else { - papi_printer_t printer = NULL; - char **keys = NULL; - - /* - * Limit the query to only required data - * to reduce the need to go remote for - * information. - */ - if (report == report_device) - keys = report_device_keys; - else if (report == report_class) - keys = report_class_keys; - else if (report == report_accepting) - keys = report_accepting_keys; - else if ((report == report_printer) && (verbose == 0)) - keys = report_printer_keys; - - status = papiPrinterQuery(svc, name, keys, - NULL, &printer); - if (status != PAPI_OK) { - fprintf(stderr, gettext( - "Failed to get printer info for %s: %s\n"), - name, verbose_papi_message(svc, status)); - papiServiceDestroy(svc); - result--; - continue; - } - - if (printer != NULL) - result += report(svc, name, printer, verbose, - description); - - papiPrinterFree(printer); - } - - papiServiceDestroy(svc); - - if (name == NULL) - break; - } - - freelist(list); - - return (result); -} - -static int -match_user(char *user, char **list) -{ - int i; - - for (i = 0; list[i] != NULL; i++) { - if (strcmp(user, list[i]) == 0) - return (0); - } - - return (-1); -} - -static char **users = NULL; - -static int -report_job(char *printer, papi_job_t job, int show_rank, int verbose) -{ - papi_attribute_t **attrs = papiJobGetAttributeList(job); - time_t clock = 0; - char date[24]; - char request[26]; - char *user = "unknown"; - char *host = NULL; - int32_t size = 0; - int32_t jstate = 0; - char User[50]; - - char *destination = "unknown"; - int32_t id = -1; - static int check = 0; - static char *uri = NULL; - static char *puri = NULL; /* printer-uri */ - static char *pname = NULL; /* printer-name */ - - (void) papiAttributeListGetString(attrs, NULL, - "job-originating-user-name", &user); - - if ((users != NULL) && (match_user(user, users) < 0)) - return (0); - - (void) papiAttributeListGetString(attrs, NULL, - "job-originating-host-name", &host); - - /* - * When lpstat is called for multiple printers - * internally the function 'report_job' gets - * called multiple times with different printer-names. - * The following block of code handles the case when lpstat is - * executed for multiple printers. In other words when 'report_job' - * is called multiple times for different printers for - * one lpstat command - * For e.g: lpstat printer1 printer2 printer3 - */ - if (pname == NULL) { - /* - * When lpstat is queried for the first time - * pname is NULL so this part of the code gets executed. - * Read the attribute "job-printer-uri" - * first time - */ - (void) papiAttributeListGetString(attrs, NULL, - "job-printer-uri", &uri); - - if (printer != NULL) { - /* - * Set pname to the printer that is being - * queried so that this can be used later - * if 'report_job' is called multiple times for - * different printers for one lpstat command - */ - pname = printer; - } - - if (uri != NULL) { - /* - * Set puri so that "job-printer-uri" corresponding - * to a particular printer can be used later when - * lpstat is queried for the same printer as - * "job-printer-uri" for a printer is read just once. - */ - puri = strdup(uri); - } - } else { - /* - * This part of the code will get executed when - * 'report_job' is called more than once for the same - * lpstat command - */ - if (printer != NULL) { - if (strcasecmp(pname, printer) != 0) { - /* - * Read the job-printer-uri as - * it will be different for - * different printers - */ - uri = NULL; - (void) papiAttributeListGetString(attrs, - NULL, "job-printer-uri", &uri); - pname = printer; - if (uri != NULL) - puri = strdup(uri); - else - puri = NULL; - } else { - /* - * Same printer queried twice - * uri should be the same as - * already read in the previous call - * to 'report_job'. - * For the same printer 'job-printer-uri' - * is read just once because only in the - * first call it contains the host information - */ - uri = puri; - } - } - } - - if (host) { - /* Check if it is local printer or remote printer */ - uri_t *u = NULL; - - if ((uri != NULL) && (uri_from_string(uri, &u) == 0)) { - char *nodename = localhostname(); - - if ((u->host == NULL) || - (strcasecmp(u->host, "localhost") == 0) || - (strcasecmp(u->host, nodename) == 0)) { - - if (strcasecmp(host, nodename) == 0) { - /* - * Request submitted locally - * for the local queue. - * Hostname will not be displayed - */ - snprintf(User, sizeof (User), "%s", - user); - } - else - snprintf(User, sizeof (User), "%s@%s", - user, host); - } else if (uri != NULL) { - /* - * It's a remote printer. - * In case of remote printers hostname is - * always displayed. - */ - snprintf(User, sizeof (User), "%s@%s", - user, host); - } - uri_free(u); - } else { - /* - * If attribute "job-printer-uri" - * cannot be read - * by default append the hostname - */ - snprintf(User, sizeof (User), "%s@%s", user, host); - } - } else { - /* - * When print server is s10u4 and ipp service is used - * "job-originating-hostname" attribute is not set - * So get the host information from the uri - */ - uri_t *u = NULL; - if ((uri != NULL) && (uri_from_string(uri, &u) == 0)) { - if ((u != NULL) && (u->host != NULL)) - snprintf(User, sizeof (User), "%s@%s", - user, u->host); - else - snprintf(User, sizeof (User), "%s", user); - - uri_free(u); - } else - snprintf(User, sizeof (User), "%s", user); - } - (void) papiAttributeListGetInteger(attrs, NULL, "job-k-octets", &size); - size *= 1024; /* for the approximate byte size */ - (void) papiAttributeListGetInteger(attrs, NULL, "job-octets", &size); - - (void) time(&clock); - (void) papiAttributeListGetInteger(attrs, NULL, - "time-at-creation", (int32_t *)&clock); - (void) strftime(date, sizeof (date), "%b %d %R", localtime(&clock)); - - (void) papiAttributeListGetString(attrs, NULL, - "job-printer-uri", &destination); - (void) papiAttributeListGetString(attrs, NULL, - "printer-name", &destination); - (void) papiAttributeListGetInteger(attrs, NULL, - "job-id", &id); - (void) papiAttributeListGetInteger(attrs, NULL, - "job-id-requested", &id); - - - snprintf(request, sizeof (request), "%s-%d", printer, id); - - if (show_rank != 0) { - int32_t rank = -1; - - (void) papiAttributeListGetInteger(attrs, NULL, - "number-of-intervening-jobs", &rank); - rank++; - - printf("%3d %-21s %-14s %7ld %s", - rank, request, User, size, date); - } else - printf("%-23s %-14s %7ld %s", request, User, size, date); - - (void) papiAttributeListGetInteger(attrs, NULL, - "job-state", &jstate); - - if (jstate == 0x0001) - printf(gettext(" being held")); - else if (jstate == 0x0800) - printf(gettext(" notifying user")); - else if (jstate == 0x0040) - printf(gettext(" cancelled")); - else if (jstate == 0x0010) - printf(gettext(" finished printing")); - else if (jstate == 0x0008) - printf(gettext(" on %s"), destination); - else if (jstate == 0x2000) - printf(gettext(" held by admin")); - else if (jstate == 0x0002) - printf(gettext(" being filtered")); - else if (jstate == 0x0004) - printf(gettext(" filtered")); - else if (jstate == 0x0020) - printf(gettext(" held for change")); - - if (verbose == 1) { - char *form = NULL; - - (void) papiAttributeListGetString(attrs, NULL, - "output-device-assigned", &destination); - printf("\n\t assigned %s", destination); - - (void) papiAttributeListGetString(attrs, NULL, "form", &form); - if (form != NULL) - printf(", form %s", form); - } else if (verbose > 1) { - printf("\n"); - papiAttributeListPrint(stdout, attrs, "\t"); - } - - printf("\n"); - - return (0); -} - -static int -job_query(char *request, int (*report)(char *, papi_job_t, int, int), - papi_encryption_t encryption, int show_rank, int verbose) -{ - int result = 0; - papi_status_t status; - papi_service_t svc = NULL; - char *printer = request; - int32_t id = -1; - int flag1 = 0; - int flag = 1; - int print_flag = 0; - - do { - status = papiServiceCreate(&svc, printer, NULL, NULL, - cli_auth_callback, encryption, NULL); - - if ((status == PAPI_OK) && (printer != NULL)) - print_flag = 1; - - /* <name>-# printer name does not exist */ - if (status != PAPI_OK) { - /* - * Check if <name>-# is a request-id - * Once this check is done flag1 is set - */ - if (flag1 == 1) - break; - - get_printer_id(printer, &printer, &id); - - status = papiServiceCreate(&svc, printer, NULL, NULL, - cli_auth_callback, encryption, NULL); - - if (status != PAPI_OK) { - fprintf(stderr, gettext( - "Failed to contact service for %s: %s\n"), - (printer ? printer : "all"), - verbose_papi_message(svc, status)); - return (-1); - } - } - - if (printer == NULL) { /* all */ - char **interest = interest_list(svc); - - if (interest != NULL) { - int i; - - for (i = 0; interest[i] != NULL; i++) - result += job_query(interest[i], report, - encryption, show_rank, verbose); - } - } else if (id == -1) { /* a printer */ - papi_job_t *jobs = NULL; - - status = papiPrinterListJobs(svc, printer, NULL, - 0, 0, &jobs); - if (status != PAPI_OK) { - fprintf(stderr, gettext( - "Failed to get job list: %s\n"), - verbose_papi_message(svc, status)); - papiServiceDestroy(svc); - return (-1); - } - - if (jobs != NULL) { - int i; - - for (i = 0; jobs[i] != NULL; i++) - result += report(printer, - jobs[i], show_rank, - verbose); - } - - papiJobListFree(jobs); - } else { /* a job */ - papi_job_t job = NULL; - - /* Once a job has been found stop processing */ - flag = 0; - - /* - * Job-id could be the job-id requested - * Check if it is job-id or job-id-requested - */ - id = job_to_be_queried(svc, printer, id); - - if (id >= 0) - status = papiJobQuery(svc, printer, id, - NULL, &job); - else - /* id not found */ - status = PAPI_NOT_FOUND; - - if (status != PAPI_OK) { - if (!print_flag) - fprintf(stderr, gettext( - "Failed to get job"\ - " info for %s: %s\n"), - request, - verbose_papi_message(svc, status)); - papiServiceDestroy(svc); - return (-1); - } - - if (job != NULL) - result = report(printer, job, - show_rank, verbose); - - papiJobFree(job); - } - - if (flag) { - id = -1; - get_printer_id(printer, &printer, &id); - if (id == -1) - flag = 0; - else - flag1 = 1; - } - } while (flag); - - papiServiceDestroy(svc); - - return (result); -} - -static int -report_form(char *name, papi_attribute_t **attrs, int verbose) -{ - papi_status_t status; - char *form = NULL; - void *iter = NULL; - - for (status = papiAttributeListGetString(attrs, &iter, - "form-supported", &form); - status == PAPI_OK; - status = papiAttributeListGetString(attrs, &iter, - NULL, &form)) { - if ((name == NULL) || (strcmp(name, form) == 0)) { - printf(gettext("form %s is available to you\n"), form); - if (verbose != 0) { - char *detail = NULL; - status = papiAttributeListGetString(attrs, NULL, - "form-supported-detail", &detail); - if (status == PAPI_OK) - printf("%s\n", detail); - } - } - } - - return (0); -} - -static int -report_print_wheels(char *name, papi_attribute_t **attrs, int verbose) -{ - papi_status_t status; - char *pw = NULL; - void *iter = NULL; - - for (status = papiAttributeListGetString(attrs, &iter, - "pw-supported", &pw); - status == PAPI_OK; - status = papiAttributeListGetString(attrs, &iter, NULL, &pw)) { - if ((name == NULL) || (strcmp(name, pw) == 0)) { - printf(gettext("charset %s is available\n"), pw); - if (verbose != 0) { - char *info = NULL; - status = papiAttributeListGetString(attrs, NULL, - "pw-supported-extra", &info); - if (status == PAPI_OK) - printf("%s\n", info); - } - } - } - - return (0); -} - -static int -service_query(char *name, int (*report)(char *, papi_attribute_t **, int), - papi_encryption_t encryption, int verbose) -{ - int result = 0; - papi_status_t status; - papi_service_t svc = NULL; - papi_attribute_t **attrs = NULL; - - status = papiServiceCreate(&svc, name, NULL, NULL, cli_auth_callback, - encryption, NULL); - if (status != PAPI_OK) { - papiServiceDestroy(svc); - return (-1); - } - - attrs = papiServiceGetAttributeList(svc); - if (attrs != NULL) { - result = report(name, attrs, verbose); - - if (verbose > 1) { - printf("\n"); - papiAttributeListPrint(stdout, attrs, "\t"); - printf("\n"); - } - } - - papiServiceDestroy(svc); - - return (result); -} - -int -main(int ac, char *av[]) -{ - int exit_code = 0; - papi_encryption_t encryption = PAPI_ENCRYPT_NEVER; - int rank = 0; - int verbose = 0; - int description = 0; - int c; - char **argv; - - (void) setlocale(LC_ALL, ""); - (void) textdomain("SUNW_OST_OSCMD"); - - argv = (char **)calloc((ac + 1), sizeof (char *)); - for (c = 0; c < ac; c++) { - if ((av[c][0] == '-') && (av[c][1] == 'l') && - (isalpha(av[c][2]) != 0)) { - /* preserve old "-l[po...]" behavior */ - argv[c] = &av[c][1]; - argv[c][0] = '-'; - verbose = 1; - - } else - argv[c] = av[c]; - } - - argv[c++] = "--"; - ac = c; - - /* preprocess argument list looking for '-l' or '-R' so it can trail */ - while ((c = getopt(ac, argv, "LEDf:S:stc:p:a:drs:v:l:o:R:u:")) != EOF) { - switch (c) { /* these may or may not have an option */ - case 'a': - case 'c': - case 'p': - case 'o': - case 'R': - case 'u': - case 'v': - case 'l': - case 'f': - case 'S': - if (optarg[0] == '-') { - /* this check stop a possible infinite loop */ - if ((optind > 1) && (argv[optind-1][1] != c)) - optind--; - optarg = NULL; - } else if (strcmp(optarg, "all") == 0) - optarg = NULL; - } - - switch (c) { - case 'l': - if ((optarg == NULL) || (optarg[0] == '-')) - optarg = "1"; - verbose = atoi(optarg); - break; - case 'D': - description = 1; - break; - case 'R': - rank = 1; - break; - case 'E': - encryption = PAPI_ENCRYPT_REQUIRED; - break; - default: - break; - } - } - optind = 1; - - /* process command line arguments */ - while ((c = getopt(ac, argv, "LEDf:S:stc:p:a:drs:v:l:o:R:u:")) != EOF) { - switch (c) { /* these may or may not have an option */ - case 'a': - case 'c': - case 'p': - case 'o': - case 'R': - case 'u': - case 'v': - case 'l': - case 'f': - case 'S': - if (optarg[0] == '-') { - /* this check stop a possible infinite loop */ - if ((optind > 1) && (argv[optind-1][1] != c)) - optind--; - optarg = NULL; - } else if (strcmp(optarg, "all") == 0) - optarg = NULL; - } - - switch (c) { - case 'a': - exit_code += printer_query(optarg, report_accepting, - encryption, verbose, 0); - break; - case 'c': - exit_code += printer_query(optarg, report_class, - encryption, verbose, 0); - break; - case 'p': - exit_code += printer_query(optarg, report_printer, - encryption, verbose, description); - break; - case 'd': - exit_code += lpstat_default_printer(encryption); - break; - case 'r': - exit_code += lpstat_service_status(encryption); - break; - case 'u': - if (optarg != NULL) - users = strsplit(optarg, ", \n"); - exit_code += job_query(NULL, report_job, - encryption, rank, verbose); - if (users != NULL) { - free(users); - users = NULL; - } - break; - case 'v': - exit_code += printer_query(optarg, report_device, - encryption, verbose, 0); - break; - case 'R': /* set "rank" flag in first pass */ - case 'o': - exit_code += job_query(optarg, report_job, - encryption, rank, verbose); - break; - case 'f': - exit_code += service_query(optarg, report_form, - encryption, verbose); - break; - case 'S': - exit_code += service_query(optarg, report_print_wheels, - encryption, verbose); - break; - case 's': - exit_code += lpstat_service_status(encryption); - exit_code += lpstat_default_printer(encryption); - exit_code += printer_query(NULL, report_class, - encryption, verbose, 0); - exit_code += printer_query(NULL, report_device, - encryption, verbose, 0); - exit_code += service_query(optarg, report_form, - encryption, verbose); - exit_code += service_query(optarg, report_print_wheels, - encryption, verbose); - break; - case 't': - exit_code += lpstat_service_status(encryption); - exit_code += lpstat_default_printer(encryption); - exit_code += printer_query(NULL, report_class, - encryption, verbose, 0); - exit_code += printer_query(NULL, report_device, - encryption, verbose, 0); - exit_code += printer_query(NULL, report_accepting, - encryption, verbose, 0); - exit_code += printer_query(NULL, report_printer, - encryption, verbose, 0); - exit_code += service_query(optarg, report_form, - encryption, verbose); - exit_code += service_query(optarg, report_print_wheels, - encryption, verbose); - exit_code += job_query(NULL, report_job, - encryption, rank, verbose); - break; - case 'L': /* local-only, ignored */ - case 'l': /* increased verbose level in first pass */ - case 'D': /* set "description" flag in first pass */ - case 'E': /* set encryption in the first pass */ - break; - default: - usage(av[0]); - } - } - ac--; - - if (ac == 1) { /* report on my jobs */ - struct passwd *pw = getpwuid(getuid()); - - if (pw != NULL) - users = strsplit(pw->pw_name, ""); - exit_code += job_query(NULL, report_job, encryption, - rank, verbose); - if (users != NULL) { - free(users); - users = NULL; - } - } else { - for (c = optind; c < ac; c++) - exit_code += job_query(argv[c], report_job, encryption, - rank, verbose); - } - - - if (exit_code != 0) - exit_code = 1; - - return (exit_code); -} |