WebSVN – wimsdev – Diff – /trunk/wims/src/Misc/modind.c

 #define allangcnt 8
 char ignore[MAX_LANGS][MAX_LINELEN+1];
 char mlistfile[MAX_LANGS][256];
 int langcnt;
 FILE *langf, *titf, *descf, *weightf, *robotf, *indf, *listf, *addrf, *serialf, *authorf, *versionf, *remf;
+FILE *titf_ca,*titf_en,*titf_es,*titf_fr,*titf_it,*titf_nl;
 struct cat {
     char *name;
     char typ;
 } cat[]={
     {"all_types", 'A'},
 char *glindex[]={
   "gl_title", "gl_description",
   "", "",
   "gl_level", "gl_domain",
   "gl_keywords","","",""};
 #define SHEETINDEX_NO (sizeof(sheetindex)/sizeof(sheetindex[0]))
 char gsindbuf[SHEETINDEX_NO+1][MAX_LINELEN+1];
 /* do not modify the order, correspond to the order in the sheet file */
 enum{s_title, s_description,
   "title", "description",
   "author", "address", "copyright",
   "version", "wims_version", "language",
   "category", "level", "domain", "keywords",
   "keywords_ca", "keywords_en", "keywords_fr", "keywords_it", "keywords_nl",
-  "title_ca", "title_en", "title_fr", "title_it", "title_nl",
+  "title_ca", "title_en", "title_es", "title_fr", "title_it", "title_nl",
   "require"
 };
 #define MODINDEX_NO (sizeof(modindex)/sizeof(modindex[0]))
 char indbuf[MODINDEX_NO][MAX_LINELEN+1];
 enum{i_title, i_description,
   i_author,i_address,i_copyright,
   i_version,i_wims_version,i_language,
   i_category,i_level,i_domain,i_keywords,
   i_keywords_ca,i_keywords_en,i_keywords_fr,i_keywords_it,i_keywords_nl,
-  i_title_ca,i_title_en,i_title_fr,i_title_it,i_title_nl,
+  i_title_ca,i_title_en,i_title_es,i_title_fr,i_title_it,i_title_nl,
   i_require
 };
 char *module_special_file[]={
   "intro","help","about"
 };
 #define MODSPEC_NO (sizeof(module_special_file)/sizeof(module_special_file[0]))
 char module_language[4];
 char *mdicbuf, *gdicbuf, *ddicbuf, *gentry, *mentry, *dentry;
 int gentrycount, mentrycount, dentrycount;
 /*  fold known accented letters to unaccented, other strange characters to space
  *  apostrophe is among the exceptions to be kept (important for multi-word expressions)
  */
 void deaccent2(char *p)
+{
+  }
+}
 /*  translate everything non-alphanumeric into space */
 void towords(char *p)
 {
   char *pp;
   for(pp=p;*pp;pp++) if(!isalnum(*pp) && strchr("&$+*",*pp)==0) *pp=' ';
+}
 /*  Find first occurrence of word */
 char *wordchr2(char *p, char *w)
+{
   char *r;
   for(r=strstr(p,w);r!=NULL &&
     ( (r>p && !isspace(*(r-1))) || (!isspace(*(r+strlen(w))) && *(r+strlen(w))!=0) );
   r=strstr(r+1,w));
   return r;
+}
   len=strlen(tag);
   for(pp=strchr(p,'<'); pp!=NULL && *pp; pp=strchr(pp+1,'<')) {
     if(strncasecmp(pp+1,tag,len)==0 && !isalnum(*(pp+1+len))) return pp;
+  }
   return p+strlen(p);
 }
 /*  remove all html tags */
 void detag(char *p)
+{
   char *pp, *p2;
   for(pp=strchr(p,'<'); pp!=NULL; pp=strchr(pp,'<')) {
     p2=find_tag_end(pp);
     if(*p2==0) {*pp=0; return; }
     ovlstrcpy(pp,p2);
   }
 }
 /* add a space after comma to see end of words */
 void comma(char *p)
+{
   char *pp;
   for(pp=strchr(p,','); pp; pp=strchr(pp+1,','))
     string_modify3(p,pp,pp+1,", ");
 }
 /* replace / by , */
 void backslash(char *p)
+{
   char *pp;
   for(pp=strchr(p,'/'); pp; pp=strchr(pp+1,'/'))
     string_modify3(p,pp,pp+1,",");
+}
 /* _getdef from lines.c except the error msg*/
 void _getdef(char buf[], char *name, char value[])
 {
   char *p1, *p2, *p3, *p4;
   if(*name==0) goto nothing;      /* this would create segfault. */
   for(p1=strstr(buf,name); p1!=NULL; p1=strstr(p1+1,name)) {
     p2=find_word_start(p1+strlen(name));
   buf=xmalloc(l+256); l=fread(buf,1,l,f);
   fclose(f);
   if(l<=0) return; else buf[l]=0;
   _getdef(buf,name,value);
   free(buf);
 }
 void init(void)
+{
   char buf[MAX_LINELEN+1];
   char *p1,*p2,*s;
   int i,l;
   FILE *f;
   s=getenv("modind_outdir"); if(s!=NULL && *s!=0) outdir=s;
   s=getenv("modind_sheetdir"); if(s!=NULL && *s!=0) sheetdir=s;
   s=getenv("modind_sheetoutdir"); if(s!=NULL && *s!=0) sheetoutdir=s;
   s=getenv("modind_glossaryoutdir"); if(s!=NULL && *s!=0) glossaryoutdir=s;
 /* take the langs declared in conffile */
       else {/*  unknown language, not referenced */
         continue;
+      }
+    }
     if(modcnt>0 && strcmp(old,p1)==0 && thislang>=0) {
       if(mod[modcnt-1].langcnt<langcnt) {
         mod[modcnt-1].langs[mod[modcnt-1].langcnt]=thislang;
         mod[modcnt-1].counts[mod[modcnt-1].langcnt]=t;
         (mod[modcnt-1].langcnt)++;
       }
     }
     else {
       mod[modcnt].name=old=p1;
       if(thislang>=0) {
         mod[modcnt].langs[0]=thislang;
         mod[modcnt].langcnt=1;
+      }
       else mod[modcnt].langcnt=0;
       mod[modcnt].counts[0]=t;
+  }
   snprintf(buf,sizeof(buf),"%s/language",outdir);
   langf=fopen(buf,"w");
   snprintf(buf,sizeof(buf),"%s/title",outdir);
   titf=fopen(buf,"w");
+  snprintf(buf,sizeof(buf),"%s/title_ca",outdir);
+  titf_ca=fopen(buf,"w");
+  snprintf(buf,sizeof(buf),"%s/title_en",outdir);
+  titf_en=fopen(buf,"w");
+  snprintf(buf,sizeof(buf),"%s/title_es",outdir);
+  titf_es=fopen(buf,"w");
+  snprintf(buf,sizeof(buf),"%s/title_fr",outdir);
+  titf_fr=fopen(buf,"w");
+  snprintf(buf,sizeof(buf),"%s/title_it",outdir);
+  titf_it=fopen(buf,"w");
+  snprintf(buf,sizeof(buf),"%s/title_nl",outdir);
+  titf_nl=fopen(buf,"w");
   snprintf(buf,sizeof(buf),"%s/description",outdir);
   descf=fopen(buf,"w");
   snprintf(buf,sizeof(buf),"%s/author",outdir);
   authorf=fopen(buf,"w");
   snprintf(buf,sizeof(buf),"%s/version",outdir);
   versionf=fopen(buf,"w");
   snprintf(buf,sizeof(buf),"%s/%s/robot.phtml",outdir,mlistbase);
   robotf=fopen(buf,"w");
   fclose(addrf); fclose(serialf);
-  if(!robotf || !versionf || !authorf || !descf || !titf || !langf) {
+  if(!robotf || !versionf || !authorf || !descf || !titf
+    || !titf_ca || !titf_en || !titf_es || !titf_fr || !titf_it || !titf_nl
+    || !langf) {
     fprintf(stderr,"modind: error creating output files.\n");
     exit(1);
+  }
+}
   FILE *indf;
   int i,l;
   snprintf(fbuf,sizeof(fbuf),"%s/%s.def",sheetdir,mod[serial].name);
   indf=fopen(fbuf,"r"); if(indf==NULL) return -1;
   l=fread(ibuf,1,MAX_LINELEN,indf); fclose(indf);
   if(l>0 && l<MAX_LINELEN) ibuf[l]=0; else return -1;
   for(i=0;i<SHEETINDEX_NO;i++) gsindbuf[i][0]=0;
   for(i=0,p1=find_word_start(ibuf);
       i<SHEETINDEX_NO-1 && *p1!=':' && *p1!=0;
       i++,p1=p2) {
     p2=strchr(p1,'\n');
     if(f!=NULL) {fprintf(f,"%s\n",name); fclose(f);}
+  }
 /*   add serial number and language (resp.title, ...) to corresponding file  */
   fprintf(langf,"%d:%s\n",serial,module_language);
   fprintf(titf,"%d:%s\n",serial,indbuf[i_title]);
+  if(indbuf[i_title_ca][0]!=0)
+    fprintf(titf_ca,"%d:%s\n",serial,indbuf[i_title_ca]);
+  else
+    fprintf(titf_ca,"%d:%s\n",serial,indbuf[i_title]);
+  if(indbuf[i_title_en][0]!=0)
+    fprintf(titf_en,"%d:%s\n",serial,indbuf[i_title_en]);
+  else
+    fprintf(titf_en,"%d:%s\n",serial,indbuf[i_title]);
+  if(indbuf[i_title_es][0]!=0)
+    fprintf(titf_es,"%d:%s\n",serial,indbuf[i_title_es]);
+  else
+    fprintf(titf_es,"%d:%s\n",serial,indbuf[i_title]);
+  if(indbuf[i_title_fr][0]!=0)
+    fprintf(titf_fr,"%d:%s\n",serial,indbuf[i_title_fr]);
+  else
+    fprintf(titf_fr,"%d:%s\n",serial,indbuf[i_title]);
+  if(indbuf[i_title_it][0]!=0)
+    fprintf(titf_it,"%d:%s\n",serial,indbuf[i_title_it]);
+  else
+    fprintf(titf_it,"%d:%s\n",serial,indbuf[i_title]);
+  if(indbuf[i_title_nl][0]!=0)
+    fprintf(titf_nl,"%d:%s\n",serial,indbuf[i_title_nl]);
+  else
+    fprintf(titf_nl,"%d:%s\n",serial,indbuf[i_title]);
   fprintf(descf,"%d:%s\n",serial,indbuf[i_description]);
   fprintf(authorf,"%d:%s\n",serial,indbuf[i_author]);
   fprintf(versionf,"%d:%s\n",serial,indbuf[i_version]);
 /*   add module's information in html page for robots  */
+{
   int i;
   for (i = 0; i < open_files; i++) fclose(files[i]);
   fclose(langf); fclose(titf); fclose(descf); fclose(robotf);
   fclose(authorf); fclose(versionf);
+  fclose(titf_fr); fclose(titf_it);fclose(titf_es);fclose(titf_nl);
+  fclose(titf_ca);fclose(titf_en);
+}
 /* FIXME ? differences with appenditem - use fprintf instead of  snprintf */
 void sappenditem(char *word, int lind, int serial, int weight)
+{

Subversion Repositories wimsdev

(root)/trunk/wims/src/Misc/modind.c – Rev 15778 → 16987