/* Hey EMACS -*- linux-c -*- */
/* $Id: clock.c 2956 2006-09-24 17:11:22Z roms $ */

/*  libticalcs - Ti Calculator library, a part of the TiLP project
 *  Copyright (C) 1999-2005  Romain Liévin
 *
 *  This program 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 2 of the License, or
 *  (at your option) any later version.
 *
 *  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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 */

/*
	Clock support for AMS >= 2.08.
*/

#include <string.h>

#include "ticalcs.h"
#include "logging.h"

#ifdef __WIN32__
#define strcasecmp _stricmp
#endif

#define MAX_FORMAT_89	8
#define MAX_FORMAT_84	3

static const char *TI_CLOCK_89[] = 
{
  "",
  "MM/DD/YY",
  "DD/MM/YY",
  "MM.DD.YY",
  "DD.MM.YY",
  "YY.MM.DD",
  "MM-DD-YY",
  "DD-MM-YY",
  "YY-MM-DD",
  ""
};

static const char *TI_CLOCK_84[] = 
{
  "",
  "M/D/Y",
  "D/M/Y",
  "Y/M/D",
  ""
};

/**
 * ticalcs_clock_format2date:
 * @model: a calculator model
 * @value: a format type
 *
 * Convert a format type into a format string.
 * Example: 1 -> "MM/DD/YY"
 *
 * Return value: a format string.
 **/
TIEXPORT3 const char *TICALL ticalcs_clock_format2date(CalcModel model, int value)
{
  int v;

  if(tifiles_calc_is_ti9x(model))
  {
	  if (value < 1)
		v = 1;
	  else if (value > MAX_FORMAT_89)
		v = MAX_FORMAT_89;
	  else
		v = value;

	  return TI_CLOCK_89[v];
  }
  else if(tifiles_calc_is_ti8x(model))
  {
		if (value < 1)
		v = 1;
	  else if (value > MAX_FORMAT_84)
		v = MAX_FORMAT_84;
	  else
		v = value;

	  return TI_CLOCK_84[v];
  }

  return "";
}

/**
 * ticalcs_clock_date2format:
 * @model: a calculator model
 * @format: a format string
 *
 * Convert a format string into a format type.
 * Example: "MM/DD/YY" -> 1
 *
 * Return value: a format string.
 **/
TIEXPORT3 int TICALL ticalcs_clock_date2format(CalcModel model, const char *format)
{
  int i = 1;

  if(tifiles_calc_is_ti9x(model))
  {
	  for (i = 1; i <= MAX_FORMAT_89; i++) 
	  {
		if (!strcasecmp(TI_CLOCK_89[i], format))
		  break;
	  }
	  if (i > MAX_FORMAT_89)
		return 1;
  }
  else if(tifiles_calc_is_ti8x(model))
  {
	  for (i = 1; i <= MAX_FORMAT_84; i++) 
	  {
		if (!strcasecmp(TI_CLOCK_84[i], format))
		  break;
	  }
	  if (i > MAX_FORMAT_84)
		return 1;
  }

  return i;
}

/**
 * ticalcs_clock_show:
 * @model: calc model
 * @clock: a #CalcClock structure
 *
 * Display to stdout the content of the structure.
 *
 * Return value: always 0.
 **/
TIEXPORT3 int TICALL ticalcs_clock_show(CalcModel model, CalcClock* s)
{
	ticalcs_info("Date: %02i/%02i/%02i", s->day, s->month, s->year);
	ticalcs_info("Time: %02i/%02i/%02i", s->hours, s->minutes, s->seconds);
	ticalcs_info("Time format: %02i", s->time_format);
	ticalcs_info("Date format: %s", ticalcs_clock_format2date(model, s->date_format));

	return 0;
}