/*
** Copyright (c) 2007 D. Richard Hipp
**
** 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 library; if not, write to the
** Free Software Foundation, Inc., 59 Temple Place - Suite 330,
** Boston, MA  02111-1307, USA.
**
** Author contact information:
**   drh@hwaci.com
**   http://www.hwaci.com/drh/
**
*******************************************************************************
**
** This file contains code used render and control ticket entry
** and display pages.
*/
#if 0
#include "config.h"
#include "tkt.h"
#include <assert.h>

/*
** Flags to indicate what kind of ticket string is being generated.
** A bitmask of these is associated with each verb in order to indicate
** which verbs go on which pages.
*/
#define M_NEW  0x01
#define M_EDIT 0x02
#define M_VIEW 0x04

/*
** The Subscript interpreter used to parse the ticket configure
** and to render ticket screens.
*/
static struct Subscript *pInterp = 0;

/*
** The list of database fields in the ticket table.
** This is the user-defined list in the configuration file.
** Add the "tkt_" prefix to all of these names in the real table.
** The real table also contains some addition fields not found
** here.
*/
static int nField = 0;
static Blob fieldList;
static char **azField = 0;

/*
** Subscript command:      LIST setfields
**
** Parse up the list and populate the nField and azField variables.
*/
static int setFieldsCmd(struct Subscript *p, void *pNotUsed){
  if( SbS_RequireStack(p, 1) ) return 1;
  if( nField==0 ){
    char *zFieldList;
    int nFieldList, i;
    Blob field;
    blob_zero(&fieldList);
    zFieldList = SbS_StackValue(p, 0, &nFieldList);
    blob_appendf(&fieldList, zFieldList, nFieldList);
    while( blob_token(&fieldList, &field) ){
      nField++;
    }
    azField = malloc( sizeof(azField[0])*nField );
    blob_rewind(&fieldList);
    i = 0;
    while( blob_token(&fieldList, &field) ){
      azField[i] = blob_terminate(&field);
    }
  }
  SbS_Pop(p, 1);
  return 0;
}

/*
** Subscript command:      INTEGER not INTEGER
*/
static int notCmd(struct Subscript *p, void *pNotUsed){
  int n;
  if( SbS_RequireStack(p, 1) ) return 1;
  n = SbS_StackValueInt(p, 0);
  SbS_Pop(p, 1);
  SbS_PushInt(p, !n);
  return 0;
}

/*
** Subscript command:      INTEGER INTEGER max INTEGER
*/
static int maxCmd(struct Subscript *p, void *pNotUsed){
  int a, b;
  if( SbS_RequireStack(p, 2) ) return 1;
  a = SbS_StackValueInt(p, 0);
  b = SbS_StackValueInt(p, 1);
  SbS_Pop(p, 2);
  SbS_PushInt(p, a>b ? a : b);
  return 0;
}

/*
** Subscript command:      INTEGER INTEGER and INTEGER
*/
static int andCmd(struct Subscript *p, void *pNotUsed){
  int a, b;
  if( SbS_RequireStack(p, 2) ) return 1;
  a = SbS_StackValueInt(p, 0);
  b = SbS_StackValueInt(p, 1);
  SbS_Pop(p, 2);
  SbS_PushInt(p, a && b);
  return 0;
}

/*
** Subscript command:      FIELD wikiview
*/
static int wikiViewCmd(struct Subscript *p, void *pNotUsed){
  if( SbS_RequireStack(p, 2) ) return 1;
  
  SbS_Pop(p, 1);
  return 0;
}


/*
** Create an Subscript interpreter appropriate for processing
** Ticket pages.
*/
static void tkt_screen_init(int flags){
  char *zConfig;
  int i;
  static const struct {
     const char *zName;
     int (*xVerb);
     int mask;
  } aVerb[] = {
    { "not",              notCmd,                M_NEW|M_EDIT|M_VIEW },
    { "max",              maxCmd,                M_NEW|M_EDIT|M_VIEW },
    { "and",              andCmd,                M_NEW|M_EDIT|M_VIEW },
    { "wikiview",         wikiViewCmd,           M_NEW|M_EDIT|M_VIEW },
    { "textview",         textViewCmd,           M_NEW|M_EDIT|M_VIEW },
    { "linecount",        lineCountCmd,          M_NEW|M_EDIT|M_VIEW },
    { "cgiparam",         cgiParamCmd,           M_NEW|M_EDIT|M_VIEW },
    { "enable_output",    enableOutputCmd,       M_NEW|M_EDIT|M_VIEW },
    { "is_anon",          isAnonCmd,             M_NEW|M_EDIT|M_VIEW },
    { "ok_wrtkt",         okWrTktCmd,            M_NEW|M_EDIT|M_VIEW },
    { "default_value",    dfltValueCmd,          M_NEW               },
    { "textedit",         textEditCmd,           M_NEW|M_EDIT        },
    { "combobox",         comboBoxCmd,           M_NEW|M_EDIT        },
    { "multilineedit",    multiLineEditCmd,      M_NEW|M_EDIT        },
    { "multilineappend",  multiAppendCmd,              M_EDIT        },
    { "auxbutton",        auxButtonCmd,          M_NEW|M_EDIT        },
    { "submitbutton",     submitButtonCmd,       M_NEW|M_EDIT        },
  };

  pInterp = SbS_Create();
  SbS_AddVerb(pInterp, "setfields", setFieldsCmd, 0);
  zConfig = db_get("ticket-config","");
  SbS_Eval(pInter, zConfig, -1);
  for(i=0; i<sizeof(aVerb)/sizeof(aVerb[0]); i++){
    SbS_AddVerb(pInterp, aVerb[i].zName, aVerb[i].xVerb, 0);
  }
  /* Extract appropriate template */
  return pInterp;
}

/*
** PAGE: tktnew
*/
void tktnew_page(void){
  struct Subscript *pInterp;
  const char *zPage;
  int nPage;

  tkt_screen_init(M_NEW);
  style_header("New Ticket");
  @ This will become a page for entering new tickets.
  style_footer();
}

/*
** PAGE: tktview
** URL: tktview?name=UUID
**
*/
void tktnew_page(void){
  struct Subscript *pInterp;
  const char *zPage;
  int nPage;

  tkt_screen_init(M_NEW);
  style_header("New Ticket");
  @ This will become a page for entering new tickets.
  style_footer();
}
#endif