Return to capaNewHTML.c CVS log

Up to [LON-CAPA] / capa / capa51 / pProj

Initial revision

#include <signal.h>
#include "capaParser.h"
#include "capaCommon.h"
#include "ranlib.h"

#include "capaCGI.h"

int main(int argc, char *argv[])
{
  int input_return=0;

  signal(SIGFPE, SIG_IGN);
  strcpy(g_prog_name,argv[0]);
  setbuf(stdout,NULL);

  fprintf(stdout,"Content-type: text/html%c%c",LF,LF);

  input_return = web_get_input();
  web_header(stdout);

#ifdef  CAPA_WEB
  fprintf(stdout,"<!-- new capasbin, CAPA Version %s, %s -->\n",CAPA_VER,
	  COMPILE_DATE);
#else
  fprintf(stdout,"<!-- new capahtml, CAPA Version %s, %s -->\n",CAPA_VER,
	  COMPILE_DATE);
#endif  

  if ( input_return ) {
  } else {
    switch( g_run_mode ) {
    case 0: break;
    case WEB_CHECKIN: web_menu(); break;
    case WEB_TRYSET: web_printset(); break;
    case WEB_VIEWPREV: web_viewprevious(); break;
    case WEB_VIEWSUMMARY: 
    case WEB_EXAMSUMMARY:
    case WEB_QUIZSUMMARY: web_summary(g_run_mode);break;
#ifdef CAPA_WEB 
    case WEB_CHECKANS: web_grade(); break;
#endif
    default: break;
    }
  }
  web_footer(stdout);
  return 0;
}