Home | History | Annotate | Download | only in bsd-sysv-commands
      1 /*
      2  * CDDL HEADER START
      3  *
      4  * The contents of this file are subject to the terms of the
      5  * Common Development and Distribution License (the "License").
      6  * You may not use this file except in compliance with the License.
      7  *
      8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
      9  * or http://www.opensolaris.org/os/licensing.
     10  * See the License for the specific language governing permissions
     11  * and limitations under the License.
     12  *
     13  * When distributing Covered Code, include this CDDL HEADER in each
     14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
     15  * If applicable, add the following below this CDDL HEADER, with the
     16  * fields enclosed by brackets "[]" replaced with your own identifying
     17  * information: Portions Copyright [yyyy] [name of copyright owner]
     18  *
     19  * CDDL HEADER END
     20  */
     21 
     22 /*
     23  * Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
     24  * Use is subject to license terms.
     25  *
     26  */
     27 
     28 /* $Id: lpq.c 146 2006-03-24 00:26:54Z njacobs $ */
     29 
     30 #pragma ident	"%Z%%M%	%I%	%E% SMI"
     31 
     32 #include <stdio.h>
     33 #include <stdlib.h>
     34 #include <unistd.h>
     35 #include <string.h>
     36 #include <locale.h>
     37 #include <libintl.h>
     38 #include <papi.h>
     39 #include "common.h"
     40 
     41 static void
     42 usage(char *program)
     43 {
     44 	char *name;
     45 
     46 	if ((name = strrchr(program, '/')) == NULL)
     47 		name = program;
     48 	else
     49 		name++;
     50 
     51 	fprintf(stdout, gettext("Usage: %s [-P printer] (user|id ...)\n"),
     52 			name);
     53 	exit(1);
     54 }
     55 
     56 static void
     57 clear_screen()
     58 {
     59 	static char buf[32];
     60 
     61 	/* quick and dirty for now, this should be fixed real soon */
     62 	if (buf[0] == '\0') {
     63 		FILE *fp = popen("/bin/tput clear", "r");
     64 		if (fp != NULL) {
     65 			fgets(buf, sizeof (buf), fp);
     66 			fclose(fp);
     67 		}
     68 	}
     69 	printf("%s", buf);
     70 }
     71 
     72 int
     73 main(int ac, char *av[])
     74 {
     75 	char *printer = NULL;
     76 	papi_status_t status;
     77 	papi_service_t svc = NULL;
     78 	papi_encryption_t encryption = PAPI_ENCRYPT_NEVER;
     79 	int format = 3;	/* lpq short format */
     80 	int interval = 0;
     81 	int num_jobs;
     82 	int c;
     83 
     84 	(void) setlocale(LC_ALL, "");
     85 	(void) textdomain("SUNW_OST_OSCMD");
     86 
     87 	while ((c = getopt(ac, av, "EP:l")) != EOF)
     88 		switch (c) {
     89 		case 'E':
     90 			encryption = PAPI_ENCRYPT_REQUIRED;
     91 			break;
     92 		case 'P':
     93 			printer = optarg;
     94 			break;
     95 		case 'l':
     96 			format = 4;	/* lpq long format */
     97 			break;
     98 		default:
     99 			usage(av[0]);
    100 		}
    101 
    102 	if ((optind < ac) && (av[optind][0] == '+'))
    103 		interval = atoi(av[optind++]);
    104 
    105 	if ((printer == NULL) &&
    106 	    ((printer = getenv("PRINTER")) == NULL) &&
    107 	    ((printer = getenv("LPDEST")) == NULL))
    108 		printer = DEFAULT_DEST;
    109 
    110 	status = papiServiceCreate(&svc, printer, NULL, NULL, cli_auth_callback,
    111 					encryption, NULL);
    112 	if (status != PAPI_OK) {
    113 		fprintf(stderr, gettext(
    114 			"Failed to contact service for %s: %s\n"), printer,
    115 			verbose_papi_message(svc, status));
    116 		papiServiceDestroy(svc);
    117 		exit(1);
    118 	}
    119 
    120 	do {
    121 		if (interval != 0)
    122 			clear_screen();
    123 
    124 		num_jobs = berkeley_queue_report(svc, stdout, printer, format,
    125 					ac - optind, &av[optind]);
    126 
    127 		if ((interval != 0) && (num_jobs > 0))
    128 			sleep(interval);
    129 	} while ((interval > 0) && (num_jobs > 0));
    130 
    131 	papiServiceDestroy(svc);
    132 
    133 	return (0);
    134 }
    135