print/bsd-sysv-commands/lpq.c

	lpq.c revision 355b4669e025ff377602b6fc7caaf30dbc218371
/*
 * 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 2006 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 *
 */

/* $Id: lpq.c 146 2006-03-24 00:26:54Z njacobs $ */

#pragma ident   "%Z%%M% %I% %E% SMI"

#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include <locale.h>
#include <libintl.h>
#include <papi.h>
#include "common.h"

static void
usage(char *program)
{
    char *name;

    if ((name = strrchr(program, '/')) == NULL)
        name = program;
    else
        name++;

    fprintf(stdout, gettext("Usage: %s [-P printer] (user|id ...)\n"),
            name);
    exit(1);
}

static void
clear_screen()
{
    static char buf[32];

    /* quick and dirty for now, this should be fixed real soon */
    if (buf[0] == '\0') {
        FILE *fp = popen("/bin/tput clear", "r");
        if (fp != NULL) {
            fgets(buf, sizeof (buf), fp);
            fclose(fp);
        }
    }
    printf("%s", buf);
}

int
main(int ac, char *av[])
{
    char *printer = NULL;
    papi_status_t status;
    papi_service_t svc = NULL;
    papi_encryption_t encryption = PAPI_ENCRYPT_NEVER;
    int format = 3; /* lpq short format */
    int interval = 0;
    int num_jobs;
    int c;

    (void) setlocale(LC_ALL, "");
    (void) textdomain("SUNW_OST_OSCMD");

    while ((c = getopt(ac, av, "EP:l")) != EOF)
        switch (c) {
        case 'E':
            encryption = PAPI_ENCRYPT_REQUIRED;
            break;
        case 'P':
            printer = optarg;
            break;
        case 'l':
            format = 4; /* lpq long format */
            break;
        default:
            usage(av[0]);
        }

    if ((optind < ac) && (av[optind][0] == '+'))
        interval = atoi(av[optind++]);

    if ((printer == NULL) &&
        ((printer = getenv("PRINTER")) == NULL) &&
        ((printer = getenv("LPDEST")) == NULL))
        printer = DEFAULT_DEST;

    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,
            verbose_papi_message(svc, status));
        papiServiceDestroy(svc);
        exit(1);
    }

    do {
        if (interval != 0)
            clear_screen();

        num_jobs = berkeley_queue_report(svc, stdout, printer, format,
                    ac - optind, &av[optind]);

        if ((interval != 0) && (num_jobs > 0))
            sleep(interval);
    } while ((interval > 0) && (num_jobs > 0));

    papiServiceDestroy(svc);

    return (0);
}