/* help.c - command to show a help text.  */
/*
 *  VAS_EBOOT  --  GRand Unified Bootloader
 *  Copyright (C) 2005,2007,2008,2009  Free Software Foundation, Inc.
 *
 *  VAS_EBOOT is free software: you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation, either version 3 of the License, or
 *  (at your option) any later version.
 *
 *  VAS_EBOOT 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 VAS_EBOOT.  If not, see <http://www.gnu.org/licenses/>.
 */

#include <VasEBoot/dl.h>
#include <VasEBoot/misc.h>
#include <VasEBoot/term.h>
#include <VasEBoot/extcmd.h>
#include <VasEBoot/i18n.h>
#include <VasEBoot/mm.h>
#include <VasEBoot/normal.h>
#include <VasEBoot/charset.h>

VAS_EBOOT_MOD_LICENSE ("GPLv3+");

static VasEBoot_err_t
VasEBoot_cmd_help (VasEBoot_extcmd_context_t ctxt __attribute__ ((unused)), int argc,
	       char **args)
{
  int cnt = 0;
  char *currarg;

  if (argc == 0)
    {
      VasEBoot_command_t cmd;
      FOR_COMMANDS(cmd)
      {
	if ((cmd->prio & VAS_EBOOT_COMMAND_FLAG_ACTIVE))
	  {
	    struct VasEBoot_term_output *term;
	    const char *summary_translated = _(cmd->summary);
	    char *command_help;
	    VasEBoot_uint32_t *unicode_command_help;
	    VasEBoot_uint32_t *unicode_last_position;

	    command_help = VasEBoot_xasprintf ("%s %s", cmd->name, summary_translated);
	    if (!command_help)
	      break;

	    VasEBoot_utf8_to_ucs4_alloc (command_help, &unicode_command_help,
				     &unicode_last_position);

	    FOR_ACTIVE_TERM_OUTPUTS(term)
	    {
	      unsigned stringwidth;
	      VasEBoot_uint32_t *unicode_last_screen_position;

	      unicode_last_screen_position = unicode_command_help;

	      stringwidth = 0;

	      while (unicode_last_screen_position < unicode_last_position &&
		     stringwidth < ((VasEBoot_term_width (term) / 2) - 2))
		{
		  struct VasEBoot_unicode_glyph glyph;
		  unicode_last_screen_position
		    += VasEBoot_unicode_aglomerate_comb (unicode_last_screen_position,
						     unicode_last_position
						     - unicode_last_screen_position,
						     &glyph);

		  stringwidth
		    += VasEBoot_term_getcharwidth (term, &glyph);
		}

	      VasEBoot_print_ucs4 (unicode_command_help,
			       unicode_last_screen_position, 0, 0, term);
	      if (!(cnt % 2))
		VasEBoot_print_spaces (term, VasEBoot_term_width (term) / 2
				   - stringwidth);
	    }

	    if (cnt % 2)
	      VasEBoot_printf ("\n");
	    cnt++;

	    VasEBoot_free (command_help);
	    VasEBoot_free (unicode_command_help);
	  }
      }
      if (!(cnt % 2))
	VasEBoot_printf ("\n");
    }
  else
    {
      int i;
      VasEBoot_command_t cmd_iter, cmd, cmd_next;

      for (i = 0; i < argc; i++)
	{
	  currarg = args[i];

	  FOR_COMMANDS_SAFE (cmd_iter, cmd_next)
	  {
	    if (!(cmd_iter->prio & VAS_EBOOT_COMMAND_FLAG_ACTIVE))
	      continue;

	    if (VasEBoot_strncmp (cmd_iter->name, currarg,
			      VasEBoot_strlen (currarg)) != 0)
	      continue;
	    if (cmd_iter->flags & VAS_EBOOT_COMMAND_FLAG_DYNCMD)
	      cmd = VasEBoot_dyncmd_get_cmd (cmd_iter);
	    else
	      cmd = cmd_iter;
	    if (!cmd)
	      {
		VasEBoot_print_error ();
		continue;
	      }
	    if (cnt++ > 0)
	      VasEBoot_printf ("\n\n");

	    if ((cmd->flags & VAS_EBOOT_COMMAND_FLAG_EXTCMD) &&
		! (cmd->flags & VAS_EBOOT_COMMAND_FLAG_DYNCMD))
	      VasEBoot_arg_show_help ((VasEBoot_extcmd_t) cmd->data);
	    else
	      VasEBoot_printf ("%s %s %s\n%s\n", _("Usage:"), cmd->name,
			   _(cmd->summary), _(cmd->description));
	  }
	}
    }

  VasEBoot_printf ("\n\nTo enable less(1)-like paging, \"set pager=1\".\n");

  return 0;
}

static VasEBoot_extcmd_t cmd;

VAS_EBOOT_MOD_INIT(help)
{
  cmd = VasEBoot_register_extcmd ("help", VasEBoot_cmd_help, 0,
			      N_("[PATTERN ...]"),
			      N_("Show a help message."), 0);
}

VAS_EBOOT_MOD_FINI(help)
{
  VasEBoot_unregister_extcmd (cmd);
}