WebSVN – wimsdev – Diff – /trunk/wims/src/OefMsg2wims/process.c

 #include "../Lib/libwims.h"
 #include "oef2wims.h"
 int prepcnt;
 int ex_statement=0, ex_hint=0, ex_help=0, ex_solution=0, ex_latex=0;
-char vbuf_latex[MAX_LINELEN+1];
 const size_t MAX_KEY_LEN=128;
 char vbuf_statement[MAX_LINELEN+1];
 char vbuf_hint[MAX_LINELEN+1];
 char vbuf_help[MAX_LINELEN+1];
 char vbuf_solution[MAX_LINELEN+1];
+char vbuf_latex[MAX_LINELEN+1];
 /* empty processor, template. */
 void empty(char *p[MAX_PARM]) {}
 static void p_keyword(char *p[MAX_PARM], const char *key)
+{
     p[0]=find_word_start(p[0]);
     if(strlen(p[0])>MAX_KEY_LEN) p[0][MAX_KEY_LEN]=0;
     fprintf(outf,"%s=%s\n", key, p[0]);
 }
 void p_author(char *p[MAX_PARM]) { p_keyword(p, "author"); }
 void p_email(char *p[MAX_PARM]) { p_keyword(p, "email"); }
 void p_keywords(char *p[MAX_PARM]) { p_keyword(p, "keywords"); }
 void p_title_ca(char *p[MAX_PARM]) { p_keyword(p, "title_ca"); }
 void p_title_cn(char *p[MAX_PARM]) { p_keyword(p, "title_cn"); }
 void p_title_it(char *p[MAX_PARM]) { p_keyword(p, "title_it"); }
 void p_title_nl(char *p[MAX_PARM]) { p_keyword(p, "title_nl"); }
 void p_title_si(char *p[MAX_PARM]) { p_keyword(p, "title_si"); }
 void p_computeanswer(char *p[MAX_PARM])
 {
     p[0]=find_word_start(p[0]);
     *find_word_end(p[0])=0;
     if(strcasecmp(p[0],"yes"))
       fprintf(outf,"computeanswer=no\n");
     else fprintf(outf,"computeanswer=%s\n",p[0]);
 }
 void p_precision(char *p[MAX_PARM])
 {
     int pr;
     pr=atoi(p[0]);
     if(pr<0 || pr>100000000) return;
     fprintf(outf,"precision=%d\n",pr);
+}
 void p_css(char *p[MAX_PARM])
+{
     char vbuf_css[MAX_LINELEN+1];
     if(p==NULL) return;
     snprintf(vbuf_css,sizeof(vbuf_css),"%s",p[0]); subst(vbuf_css);
     fprintf(outf,"oefcss=%s\n",vbuf_css);
 }
 void p_credits(char *p[MAX_PARM])
+{
     char vbuf_credits[MAX_LINELEN+1];
     if(p==NULL) return;
     singlespace(vbuf_credits);
     fprintf(outf,"credits=%s\n\n", vbuf_credits);
+}
 void p_wims(char *p[MAX_PARM])
 {
     char vbuf[MAX_LINELEN+1];
     snprintf(vbuf,sizeof(vbuf),"%s",p[0]); subst(vbuf);
 /* the second condition could be removed?
  * To be very careful! */
     if(strchr(vbuf,'=')==NULL || strchr(vbuf,'!')!=NULL) return;
     if(left>=right-1E-50 || left<-1E50 || right>1E50) return;
     fprintf(outf,"leftrange=%f\nrightrange=%f\n",left,right);
+}
 void p_language(char *p[MAX_PARM])
 {
     p[0]=find_word_start(p[0]);
     *find_word_end(p[0])=0;
     if(strlen(p[0])==2) fprintf(outf,"language=%s\n",p[0]);
+}
       fprintf(outf,"question=%s\n",executed_str);
       ex_statement=1;
+    }
+}
-void p_hint(char *p[MAX_PARM])
+void p_gen(int *ex_gen, char vbuf_gen[], char *name_gen, char *p[MAX_PARM])
+{
-    if(ex_hint<0) return;
+    if(*ex_gen<0) return;
-    if(ex_hint>0 || p==NULL) {
+    if(*ex_gen>0 || p==NULL) {
-      out_exec(vbuf_hint,"hint");
+      out_exec(vbuf_gen, name_gen);
-      ex_hint=-1; return;
+      *ex_gen=-1; return;
+    }
-    snprintf(vbuf_hint,sizeof(vbuf_hint),"%s",p[0]); subst(vbuf_hint);
+    snprintf(vbuf_gen,MAX_LINELEN,"%s",p[0]); subst(vbuf_gen);
-    if(strchr(vbuf_hint,'\\')!=NULL) {
+    if(strchr(vbuf_gen,'\\')!=NULL) {
-      fprintf(outf,"hint=%s\n",executed_str);
+      fprintf(outf,"%s=%s\n", name_gen, executed_str);
-      ex_hint=1;
+      *ex_gen=1;
+    }
     else {
-      singlespace(vbuf_hint);
+      singlespace(vbuf_gen);
-      fprintf(outf,"hint=!nosubst %s\n\n", vbuf_hint);
+      fprintf(outf,"%s=!nosubst %s\n\n", name_gen, vbuf_gen);
+    }
+}
-void p_help(char *p[MAX_PARM])
+void p_hint(char *p[MAX_PARM]) {p_gen(&ex_hint, vbuf_hint, "hint", p);}
-{
-    if(ex_help<0) return;
-    if(ex_help>0 || p==NULL) {
-      out_exec(vbuf_help,"help");
-      ex_help=-1; return;
-    }
-    snprintf(vbuf_help,sizeof(vbuf_help),"%s",p[0]); subst(vbuf_help);
-    if(strchr(vbuf_help,'\\')!=NULL) {
-      fprintf(outf,"help=%s\n",executed_str);
-      ex_help=1;
-    }
-    else {
-      singlespace(vbuf_help);
-      fprintf(outf,"help=!nosubst %s\n\n", vbuf_help);
+void p_help(char *p[MAX_PARM]) {p_gen(&ex_help, vbuf_help, "help", p);}
-    }
-}
-void p_solution(char *p[MAX_PARM])
-{
-    if(ex_solution<0) return;
-    if(ex_solution>0 || p==NULL) {
-      out_exec(vbuf_solution,"solution");
+void p_solution(char *p[MAX_PARM]) {p_gen(&ex_solution, vbuf_solution, "solution", p);}
-      ex_solution=-1; return;
-    }
-    snprintf(vbuf_solution,sizeof(vbuf_solution),"%s",p[0]);
-    subst(vbuf_solution);
-    if(strchr(vbuf_solution,'\\')!=NULL) {
-      fprintf(outf,"solution=%s\n",executed_str);
-      ex_solution=1;
-    }
-    else {
-      singlespace(vbuf_solution);
-      fprintf(outf,"solution=!nosubst %s\n\n", vbuf_solution);
-    }
-}
 void p_latex(char *p[MAX_PARM])
+{
     if(ex_latex<0) return;
     if(ex_latex>0 || p==NULL) {

Subversion Repositories wimsdev

(root)/trunk/wims/src/OefMsg2wims/process.c – Rev 9068 → 9093