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

     /*if(p3-p2>=MAX_LINELEN) user_error("cmd_output_too_long");*/
     memmove(value,p2,p3-p2); value[p3-p2]=0;
     strip_trailing_spaces(value); return;
+  }
 nothing:
-  value[0]=0; return;
+  value[0]=0;
+}
 /*  Get variable definition from a file.
  * Result stored in buffer value of length MAX_LINELEN.
  */
     mod[modcnt].name=p1;
     mod[modcnt].langs[0]=i;
     mod[modcnt].langcnt=1;
     modcnt++;
+  }
-}
-void clean(void)
-{
-  fclose(langf); fclose(titf); fclose(descf); fclose(robotf);
-  fclose(authorf); fclose(versionf);
+}
 char *sheetindex[]={
   "title", "description",
   "duration", "severity",
+}
 unsigned char categories[16];
 char taken[MAX_LINELEN+1];
 int catcnt, takenlen, tweight;
+/* file management for appenditem */
+#define MAX_FILES (MAX_LANGS*catno)
+char *fnames[MAX_FILES];
+FILE *files[MAX_FILES];
+int open_files;
+FILE * file_from_list(char *name){
+  int i, l = 0, r = open_files;
+  while (r>l){
+    int m = (l+r)/2;
+    int cmp = strcmp(name,fnames[m]);
+    if (!cmp) return files[m];
+    if (cmp < 0) r = m; else l = m+1;
+  }
+  for (i=open_files; i > l; i--) {files[i]=files[i-1]; fnames[i]=fnames[i-1];}
+  fnames[l] = xmalloc(MAX_FNAME);
+  ovlstrcpy(fnames[l],name);
+  open_files++;
+  return files[l]=fopen(name,"a");
+}
 void appenditem(char *word, int lind, int serial, int weight, char *l)
+{
   char nbuf[MAX_LINELEN+1], buf[MAX_LINELEN+1];
   int i, ll;
   takenlen+=ll; tweight+=weight;
   snprintf(buf,sizeof(buf),"%s:%d?%d\n",word,serial,weight);
   for(i=0;i<catcnt;i++) {
     snprintf(nbuf,sizeof(nbuf),"%s/%c.%s",
        outdir,categories[i],lang[lind]);
-    f=fopen(nbuf,"a");
+    f = file_from_list(nbuf);
-    if(f!=NULL) {fputs(buf,f); fclose(f);}
+    if(f!=NULL) {fputs(buf,f);}
+  }
+}
 void appenditem1 (char *buf, int lind, int serial, int weight, char *l )
+{
     indbuf[i_keywords_ca], indbuf[i_keywords_en],indbuf[i_keywords_fr],
     indbuf[i_keywords_it], indbuf[i_keywords_nl]);
   unknown_type=unk_leave;
   translate(buf);
   appenditem1(buf,lind,serial,2,module_language);
 /* append level information, with weight 2 */
   snprintf(buf,sizeof(buf),"%s",indbuf[i_level]);
   ovlstrcpy(lbuf,"level");
   for(p1=buf; *p1; p1++) if(!isalnum(*p1)) *p1=' ';
   q=buf+strlen(buf);
      (*(p1+1)!=0 && *(p1+2)!=0)))
        continue;
     *p1=tolower(*p1);
     ovlstrcpy(lbuf+strlen("level"),p1);
     appenditem(lbuf,lind,serial,2,module_language);
   }
 /*   append total weight of module to weight file site2/weight.xx  */
   fprintf(weightf,"%d:%d\n",serial,tweight);
+}
 void modules(void)
     if(gentrycount>0) free(gdicbuf);
     if(suffixcnt>0) free(sufbuf);
     if(dentrycount>0) free(ddicbuf);
     if(weightf) fclose(weightf);
+  }
+}
+void clean(void)
+{
+  int i;
+  for (i = 0; i < open_files; i++) fclose(files[i]);
+  fclose(langf); fclose(titf); fclose(descf); fclose(robotf);
+  fclose(authorf); fclose(versionf);
+}
 /* FIXME ? differences with appenditem - use fprintf instead of  snprintf */
 void sappenditem(char *word, int lind, int serial, int weight)
+{
     if(gentrycount>0) free(gdicbuf);
     if(suffixcnt>0) free(sufbuf);
     if(dentrycount>0) free(ddicbuf);
     fclose(titf); fclose(descf); fclose(indf); fclose(listf);
     fclose(weightf); fclose(addrf); fclose(serialf);
-    fclose(remf);fclose(titlef);
+  }
+}
 int main()
+{

Subversion Repositories wimsdev

(root)/trunk/wims/src/Misc/modind.c – Rev 15393 → 15394