| /* | |
| * "lpc" command for CUPS. | |
| * | |
| * Copyright 2007-2014 by Apple Inc. | |
| * Copyright 1997-2006 by Easy Software Products. | |
| * | |
| * Licensed under Apache License v2.0. See the file "LICENSE" for more information. | |
| */ | |
| /* | |
| * Include necessary headers... | |
| */ | |
| #include <cups/cups-private.h> | |
| /* | |
| * Local functions... | |
| */ | |
| static int compare_strings(const char *, const char *, size_t); | |
| static void do_command(http_t *, const char *, const char *); | |
| static void show_help(const char *); | |
| static void show_status(http_t *, const char *); | |
| /* | |
| * 'main()' - Parse options and commands. | |
| */ | |
| int | |
| main(int argc, /* I - Number of command-line arguments */ | |
| char *argv[]) /* I - Command-line arguments */ | |
| { | |
| http_t *http; /* Connection to server */ | |
| char line[1024], /* Input line from user */ | |
| *params; /* Pointer to parameters */ | |
| _cupsSetLocale(argv); | |
| /* | |
| * Connect to the scheduler... | |
| */ | |
| http = httpConnectEncrypt(cupsServer(), ippPort(), cupsEncryption()); | |
| if (argc > 1) | |
| { | |
| /* | |
| * Process a single command on the command-line... | |
| */ | |
| do_command(http, argv[1], argv[2]); | |
| } | |
| else | |
| { | |
| /* | |
| * Do the command prompt thing... | |
| */ | |
| _cupsLangPuts(stdout, _("lpc> ")); /* TODO: Need no-newline version */ | |
| while (fgets(line, sizeof(line), stdin) != NULL) | |
| { | |
| /* | |
| * Strip trailing whitespace... | |
| */ | |
| for (params = line + strlen(line) - 1; params >= line;) | |
| if (!isspace(*params & 255)) | |
| break; | |
| else | |
| *params-- = '\0'; | |
| /* | |
| * Strip leading whitespace... | |
| */ | |
| for (params = line; isspace(*params & 255); params ++); | |
| if (params > line) | |
| _cups_strcpy(line, params); | |
| if (!line[0]) | |
| { | |
| /* | |
| * Nothing left, just show a prompt... | |
| */ | |
| _cupsLangPuts(stdout, _("lpc> ")); /* TODO: Need no newline version */ | |
| continue; | |
| } | |
| /* | |
| * Find any options in the string... | |
| */ | |
| for (params = line; *params != '\0'; params ++) | |
| if (isspace(*params & 255)) | |
| break; | |
| /* | |
| * Remove whitespace between the command and parameters... | |
| */ | |
| while (isspace(*params & 255)) | |
| *params++ = '\0'; | |
| /* | |
| * The "quit" and "exit" commands exit; otherwise, process as needed... | |
| */ | |
| if (!compare_strings(line, "quit", 1) || | |
| !compare_strings(line, "exit", 2)) | |
| break; | |
| if (*params == '\0') | |
| do_command(http, line, NULL); | |
| else | |
| do_command(http, line, params); | |
| /* | |
| * Put another prompt out to the user... | |
| */ | |
| _cupsLangPuts(stdout, _("lpc> ")); /* TODO: Need no newline version */ | |
| } | |
| } | |
| /* | |
| * Close the connection to the server and return... | |
| */ | |
| httpClose(http); | |
| return (0); | |
| } | |
| /* | |
| * 'compare_strings()' - Compare two command-line strings. | |
| */ | |
| static int /* O - -1 or 1 = no match, 0 = match */ | |
| compare_strings(const char *s, /* I - Command-line string */ | |
| const char *t, /* I - Option string */ | |
| size_t tmin) /* I - Minimum number of unique chars in option */ | |
| { | |
| size_t slen; /* Length of command-line string */ | |
| slen = strlen(s); | |
| if (slen < tmin) | |
| return (-1); | |
| else | |
| return (strncmp(s, t, slen)); | |
| } | |
| /* | |
| * 'do_command()' - Do an lpc command... | |
| */ | |
| static void | |
| do_command(http_t *http, /* I - HTTP connection to server */ | |
| const char *command, /* I - Command string */ | |
| const char *params) /* I - Parameters for command */ | |
| { | |
| if (!compare_strings(command, "status", 4)) | |
| show_status(http, params); | |
| else if (!compare_strings(command, "help", 1) || !strcmp(command, "?")) | |
| show_help(params); | |
| else | |
| _cupsLangPrintf(stdout, | |
| _("%s is not implemented by the CUPS version of lpc."), | |
| command); | |
| } | |
| /* | |
| * 'show_help()' - Show help messages. | |
| */ | |
| static void | |
| show_help(const char *command) /* I - Command to describe or NULL */ | |
| { | |
| if (!command) | |
| { | |
| _cupsLangPrintf(stdout, | |
| _("Commands may be abbreviated. Commands are:\n" | |
| "\n" | |
| "exit help quit status ?")); | |
| } | |
| else if (!compare_strings(command, "help", 1) || !strcmp(command, "?")) | |
| _cupsLangPrintf(stdout, _("help\t\tGet help on commands.")); | |
| else if (!compare_strings(command, "status", 4)) | |
| _cupsLangPrintf(stdout, _("status\t\tShow status of daemon and queue.")); | |
| else | |
| _cupsLangPrintf(stdout, _("?Invalid help command unknown.")); | |
| } | |
| /* | |
| * 'show_status()' - Show printers. | |
| */ | |
| static void | |
| show_status(http_t *http, /* I - HTTP connection to server */ | |
| const char *dests) /* I - Destinations */ | |
| { | |
| ipp_t *request, /* IPP Request */ | |
| *response; /* IPP Response */ | |
| ipp_attribute_t *attr; /* Current attribute */ | |
| char *printer, /* Printer name */ | |
| *device, /* Device URI */ | |
| *delimiter; /* Char search result */ | |
| ipp_pstate_t pstate; /* Printer state */ | |
| int accepting; /* Is printer accepting jobs? */ | |
| int jobcount; /* Count of current jobs */ | |
| const char *dptr, /* Pointer into destination list */ | |
| *ptr; /* Pointer into printer name */ | |
| int match; /* Non-zero if this job matches */ | |
| static const char *requested[] = /* Requested attributes */ | |
| { | |
| "device-uri", | |
| "printer-is-accepting-jobs", | |
| "printer-name", | |
| "printer-state", | |
| "queued-job-count" | |
| }; | |
| if (http == NULL) | |
| return; | |
| /* | |
| * Build a CUPS_GET_PRINTERS request, which requires the following | |
| * attributes: | |
| * | |
| * attributes-charset | |
| * attributes-natural-language | |
| */ | |
| request = ippNewRequest(CUPS_GET_PRINTERS); | |
| ippAddStrings(request, IPP_TAG_OPERATION, IPP_TAG_KEYWORD, | |
| "requested-attributes", sizeof(requested) / sizeof(requested[0]), | |
| NULL, requested); | |
| /* | |
| * Do the request and get back a response... | |
| */ | |
| if ((response = cupsDoRequest(http, request, "/")) != NULL) | |
| { | |
| /* | |
| * Loop through the printers returned in the list and display | |
| * their status... | |
| */ | |
| for (attr = response->attrs; attr != NULL; attr = attr->next) | |
| { | |
| /* | |
| * Skip leading attributes until we hit a job... | |
| */ | |
| while (attr != NULL && attr->group_tag != IPP_TAG_PRINTER) | |
| attr = attr->next; | |
| if (attr == NULL) | |
| break; | |
| /* | |
| * Pull the needed attributes from this job... | |
| */ | |
| printer = NULL; | |
| device = "file:/dev/null"; | |
| pstate = IPP_PRINTER_IDLE; | |
| jobcount = 0; | |
| accepting = 1; | |
| while (attr != NULL && attr->group_tag == IPP_TAG_PRINTER) | |
| { | |
| if (!strcmp(attr->name, "device-uri") && | |
| attr->value_tag == IPP_TAG_URI) | |
| device = attr->values[0].string.text; | |
| else if (!strcmp(attr->name, "printer-is-accepting-jobs") && | |
| attr->value_tag == IPP_TAG_BOOLEAN) | |
| accepting = attr->values[0].boolean; | |
| else if (!strcmp(attr->name, "printer-name") && | |
| attr->value_tag == IPP_TAG_NAME) | |
| printer = attr->values[0].string.text; | |
| else if (!strcmp(attr->name, "printer-state") && | |
| attr->value_tag == IPP_TAG_ENUM) | |
| pstate = (ipp_pstate_t)attr->values[0].integer; | |
| else if (!strcmp(attr->name, "queued-job-count") && | |
| attr->value_tag == IPP_TAG_INTEGER) | |
| jobcount = attr->values[0].integer; | |
| attr = attr->next; | |
| } | |
| /* | |
| * See if we have everything needed... | |
| */ | |
| if (printer == NULL) | |
| { | |
| if (attr == NULL) | |
| break; | |
| else | |
| continue; | |
| } | |
| /* | |
| * A single 'all' printer name is special, meaning all printers. | |
| */ | |
| if (dests != NULL && !strcmp(dests, "all")) | |
| dests = NULL; | |
| /* | |
| * See if this is a printer we're interested in... | |
| */ | |
| match = dests == NULL; | |
| if (dests != NULL) | |
| { | |
| for (dptr = dests; *dptr != '\0';) | |
| { | |
| /* | |
| * Skip leading whitespace and commas... | |
| */ | |
| while (isspace(*dptr & 255) || *dptr == ',') | |
| dptr ++; | |
| if (*dptr == '\0') | |
| break; | |
| /* | |
| * Compare names... | |
| */ | |
| for (ptr = printer; | |
| *ptr != '\0' && *dptr != '\0' && *ptr == *dptr; | |
| ptr ++, dptr ++) | |
| /* do nothing */; | |
| if (*ptr == '\0' && (*dptr == '\0' || *dptr == ',' || | |
| isspace(*dptr & 255))) | |
| { | |
| match = 1; | |
| break; | |
| } | |
| /* | |
| * Skip trailing junk... | |
| */ | |
| while (!isspace(*dptr & 255) && *dptr != '\0') | |
| dptr ++; | |
| while (isspace(*dptr & 255) || *dptr == ',') | |
| dptr ++; | |
| if (*dptr == '\0') | |
| break; | |
| } | |
| } | |
| /* | |
| * Display the printer entry if needed... | |
| */ | |
| if (match) | |
| { | |
| /* | |
| * Display it... | |
| */ | |
| printf("%s:\n", printer); | |
| if (!strncmp(device, "file:", 5)) | |
| _cupsLangPrintf(stdout, | |
| _("\tprinter is on device \'%s\' speed -1"), | |
| device + 5); | |
| else | |
| { | |
| /* | |
| * Just show the scheme... | |
| */ | |
| if ((delimiter = strchr(device, ':')) != NULL ) | |
| { | |
| *delimiter = '\0'; | |
| _cupsLangPrintf(stdout, | |
| _("\tprinter is on device \'%s\' speed -1"), | |
| device); | |
| } | |
| } | |
| if (accepting) | |
| _cupsLangPuts(stdout, _("\tqueuing is enabled")); | |
| else | |
| _cupsLangPuts(stdout, _("\tqueuing is disabled")); | |
| if (pstate != IPP_PRINTER_STOPPED) | |
| _cupsLangPuts(stdout, _("\tprinting is enabled")); | |
| else | |
| _cupsLangPuts(stdout, _("\tprinting is disabled")); | |
| if (jobcount == 0) | |
| _cupsLangPuts(stdout, _("\tno entries")); | |
| else | |
| _cupsLangPrintf(stdout, _("\t%d entries"), jobcount); | |
| _cupsLangPuts(stdout, _("\tdaemon present")); | |
| } | |
| if (attr == NULL) | |
| break; | |
| } | |
| ippDelete(response); | |
| } | |
| } |