/*
 * Ouroboros - Copyright (C) 2016 - 2017
 *
 * Bind AP to a name
 *
 *    Dimitri Staessens <dimitri.staessens@ugent.be>
 *    Sander Vrijders   <sander.vrijders@ugent.be>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License version 2 as
 * published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */

#define _POSIX_C_SOURCE 200809L
#define _XOPEN_SOURCE 500

#include <stdio.h>
#include <string.h>
#include <stdlib.h>

#include <ouroboros/irm.h>
#include <ouroboros/errno.h>

#include "irm_ops.h"
#include "irm_utils.h"

static void usage(void)
{
        printf("Usage: irm bind ap <ap>\n"
               "           name <name>\n"
               "           [auto] (instantiate apn if not running)\n"
               "           [loc] (location-dependent application)\n"
               "           [unique] (there can only be one instantiation)\n"
               "           [-- <application arguments>]\n");
}


int do_bind_ap(int argc, char ** argv)
{
        char * name = NULL;
        char * ap_name = NULL;
        uint16_t flags = 0;
        int ret = 0;
        char * temp = NULL;

        while (argc > 0) {
                if (matches(*argv, "name") == 0) {
                        name = *(argv + 1);
                        ++argv;
                        --argc;
                } else if (matches(*argv, "ap") == 0) {
                        ++argv;
                        temp = realpath(*argv, NULL);
                        if (temp != NULL)
                                *argv = temp;
                        ap_name = *argv;
                        --argc;
                } else if (strcmp(*argv, "auto") == 0) {
                        flags |= BIND_AP_AUTO;
                } else if (strcmp(*argv, "unique") == 0) {
                        flags |= BIND_AP_UNIQUE;
                } else if (strcmp(*argv, "--") == 0) {
                        ++argv;
                        --argc;
                        break;
                } else {
                        printf("\"%s\" is unknown, try \"irm "
                               "bind\".\n", *argv);
                        return -1;
                }

                ++argv;
                --argc;
        }

        if (name == NULL || ap_name == NULL) {
                usage();
                return -1;
        }

        ret = irm_bind_ap(ap_name, name, flags, argc, argv);
        if (ret == -ENOENT) {
                printf("%s does not exist.\n", ap_name);
                return ret;
        }

        if (ret == -EPERM) {
                printf("Cannot execute %s, please check permissions.\n",
                        ap_name);
                return ret;
        }

        if (temp != NULL)
                free(temp);

        return ret;
}