/* $NetBSD: wsconscfg.c,v 1.18 2017/05/04 16:26:10 sevan Exp $ */

/*
 * Copyright (c) 1999
 *      Matthias Drochner.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 */

#include <sys/cdefs.h>
#include <stdio.h>
#include <stdlib.h>
#include <fcntl.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/ioctl.h>
#include <err.h>
#include <errno.h>

#include <dev/wscons/wsconsio.h>
#include <dev/wscons/wsdisplay_usl_io.h>

#define DEFDEV "/dev/ttyEcfg"

static void usage(void) __dead;

static void
usage(void)
{
        const char *p = getprogname();
        (void)fprintf(stderr,
             "Usage: %s [-e emul] [-f ctldev] [-t type] index\n"
             "\t%s -d [-F] [-f ctldev] index\n"
             "\t%s -g [-f ctldev]\n"
             "\t%s -k | -m [-d] [-f ctldev] [index]\n"
             "\t%s -s [-f ctldev] index\n", p, p, p, p, p);
        exit(1);
}

int
main(int argc, char **argv)
{
        const char *wsdev;
        int c, delete, kbd, idx, wsfd, swtch, get, mux;
        struct wsdisplay_addscreendata asd;
        struct wsdisplay_delscreendata dsd;
        struct wsmux_device wmd;

        setprogname(argv[0]);
        wsdev = DEFDEV;
        delete = 0;
        kbd = 0;
        mux = 0;
        swtch = 0;
        idx = -1;
        get = 0;
        asd.screentype = 0;
        asd.emul = 0;
        dsd.flags = 0;

        while ((c = getopt(argc, argv, "de:Ff:gkmst:")) != -1) {
                switch (c) {
                case 'd':
                        delete++;
                        break;
                case 'e':
                        asd.emul = optarg;
                        break;
                case 'F':
                        dsd.flags |= WSDISPLAY_DELSCR_FORCE;
                        break;
                case 'f':
                        wsdev = optarg;
                        break;
                case 'g':
                        get++;
                        break;
                case 'k':
                        kbd++;
                        break;
                case 'm':
                        mux++;
                        kbd++;
                        break;
                case 's':
                        swtch++;
                        break;
                case 't':
                        asd.screentype = optarg;
                        break;
                case '?':
                default:
                        usage();
                        break;
                }
        }
        argc -= optind;
        argv += optind;

        if (!get || argc != 0) {
                if ((kbd || swtch) ? (argc > 1) : (argc != 1))
                        usage();

                if (argc > 0 && sscanf(argv[0], "%d", &idx) != 1)
                        errx(1, "invalid index");
        }
        if ((wsfd = open(wsdev, get ? O_RDONLY : O_RDWR)) == -1)
                err(EXIT_FAILURE, "Cannot open `%s'", wsdev);


        if (swtch) {
                if (ioctl(wsfd, VT_ACTIVATE, idx) == -1)
                    err(EXIT_FAILURE, "Cannot switch to %d", idx);
        } else if (get) {
                if (ioctl(wsfd, VT_GETACTIVE, &idx) == -1)
                    err(EXIT_FAILURE, "Cannot get current screen");
                (void)printf("%d\n", idx);
        } else if (kbd) {
                wmd.type = mux ? WSMUX_MUX : WSMUX_KBD;
                wmd.idx = idx;
                if (delete) {
                        if (ioctl(wsfd, WSMUX_REMOVE_DEVICE, &wmd) == -1)
                                err(EXIT_FAILURE, "WSMUX_REMOVE_DEVICE");
                } else {
                        if (ioctl(wsfd, WSMUX_ADD_DEVICE, &wmd) == -1)
                                err(EXIT_FAILURE, "WSMUX_ADD_DEVICE");
                }
        } else if (delete) {
                dsd.idx = idx;
                if (ioctl(wsfd, WSDISPLAYIO_DELSCREEN, &dsd) == -1)
                        err(EXIT_FAILURE, "WSDISPLAYIO_DELSCREEN");
        } else {
                asd.idx = idx;
                if (ioctl(wsfd, WSDISPLAYIO_ADDSCREEN, &asd) == -1) {
                        if (errno == EBUSY)
                                errx(EXIT_FAILURE,
                                    "screen %d is already configured", idx);
                        else
                                err(EXIT_FAILURE, "WSDISPLAYIO_ADDSCREEN");
                }
        }

        return 0;
}