/*
** builtin_alias.c for 42sh
**
** Made by seblu
** Login   <seblu@epita.fr>
**
** Started on  Thu Nov 16 17:18:24 2006 seblu
** Last update Thu Nov 16 19:27:01 2006 seblu
*/

#include <assert.h>
#include <string.h>
#include <stdio.h>
#include "builtin.h"
#include "../shell/shell.h"

static int	show_all_alias(void);
static int	show_alias(const char *name);
static int	getoption(char *argv[], int *argp, int *p);

int		builtin_alias(char *argv[])
{
  int		argp;
  char		*carg;
  char		*equal;
  int		show = 0;

  assert(argv && argv[0]);
  if (!getoption(argv, &argp, &show))
    return 2;
  if (argv[1] == NULL || show)
    return show_all_alias();
  for (; (carg = argv[argp]); ++argp) {
    if (!(equal = strchr(carg, '=')))
      show_alias(carg);
    else {
      *equal = 0;
      alias_add(shell->alias, strdup(carg), strdup(equal + 1));
      *equal = '=';
    }
  }
  return 0;
}

static int	getoption(char *argv[], int *argp, int *p)
{
  char		*carg;

  for (*argp = 1; (carg = argv[*argp]); ++*argp)
    if (*carg == '-')
      for (++carg; *carg; ++carg)
	if (*carg == 'p')
	  *p = 1;
	else {
	  fprintf(stderr, "%s: alias: -%c: invalid option.\n",
		  shell->name, *carg);
	  fprintf(stderr, "alias: usage: alias [-p] [name[=value]] ... ]\n");
	  return 0;
	}
  return 1;
}

static int	show_alias(const char *name)
{
  for (size_t i = 0; i < shell->alias->count; ++i)
    if (!strcmp(shell->alias->table[i].name, name)) {
      printf("alias %s=%s\n", shell->alias->table[i].name,
	     shell->alias->table[i].value);
      return 1;
  }
  printf("%s: alias: %s: not found.\n", shell->name, name);
  return 0;
}

static int	show_all_alias(void)
{
  for (size_t i = 0; i < shell->alias->count; ++i)
    printf("alias %s=%s\n", shell->alias->table[i].name,
	   shell->alias->table[i].value);
  return 0;
}