/*
 * 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 $ */

#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);
}