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

  */
 /* This is an internal program,
  * used to show statistics of frequentation, module by module.
 */
+/* TODO : lorsqu'on selectionne score et noscore il y a une double lecture
+   des fichiers de log (une premiere lecture pour score et une autre pour noscore
+   surement qu'une seule lecture serait possible A voir */
 #include "../Lib/libwims.h"
 #include "../wimsdef.h"
 #define MAX_SCORE      512*1024
   hr=atoi(p+9);
   if(sec<0 || min<0 || hr<0 || sec>59 || min>59 || hr>23) return -1;
   return hr*3600+min*60+sec;
+}
+/*  traitement d'une ligne des fichiers score/noscore d'un utilisateur
+ les donnees des sheet sont stockees dans shdata
+  les donnees des exam sont stockees dans examdata */
 static
 void oneline(char *p, char *typ)
+{
   int i, j, sh, ex, t;
   char *data[64];
   statexodata *tab;
   char *pp, *pe;
+  char *ltype;
   for(i=0, pp=find_word_start(p); i<9  && *pp; pp=find_word_start(pe),i++) {
     pe=find_word_end(pp); if(*pe) *pe++=0;
     data[i]=pp;
+  }
   if(i<6) return;
   sh=atoi(data[2]); ex=atoi(data[3]);
   if(sh<=0 || ex<=0 || ex>MAX_EXOS || strlen(data[1])>10) return;
   if(data[0][0]=='E') {
     tab=examdata; data[0]++; if(sh>MAX_EXAMS) return;
+    ltype="S";
+  }
   else {
     tab=shdata; if(sh>MAX_SHEETS) return;
+    ltype="noscore";
+  }
   tab+=(sh-1)*MAX_EXOS+(ex-1);
   t=str2time(data[0]); if(t==-1) return;
   if(strstr(data[4],"new")!=NULL) {
     if(strcmp(typ,"score")==0)
-            for (j = 6; j < i; ++j) if (strcmp(data[j],"noscore")==0) return;
+            for (j = 6; j < i; ++j) if (strcmp(data[j],ltype)==0) return;
-    if(strcmp(typ,"noscore")==0)
+    if(strcmp(typ,"noscore")==0) {
+            int test=0;
-            for (j = 7; j < i; ++j) if (strcmp(data[j],"noscore")==0) return;
+            for (j = 7; j < i; ++j) if (strcmp(data[j],ltype)==0) test=1;
+            if (test==0) return;
+    }
     snprintf(tab->lastnew,12,"%s",data[1]);
     tab->newcnt++; tab->lasttime=t;
     fcind++;
     return;
+  }
   if(strcmp(data[4],"score")==0) {
     if(strcmp(tab->lastnew,data[1])!=0) return;
     if(sccnt>=MAX_SCORE) return;
     if(tab->lasttime==-1) return;
-    if(strcmp(typ,"score")==0 || strcmp(typ,"noscore")==0)
+    if(strcmp(typ,"score")==0)
-            for (j = 7; j < i; ++j)
+            for (j = 6; j < i; ++j) if (strcmp(data[j],ltype)==0) return;
-              if (strcmp(data[j],"noscore")==0) return;
+    if(strcmp(typ,"noscore")==0) {
+            int test=0;
+            for (j = 7; j < i; ++j) if (strcmp(data[j],ltype)==0) test=1;
+            if (test==0) return;
+    }
     t-=tab->lasttime; tab->lasttime=-1; if(t<0) t+=24*3600;
     if(t<0) t=0;
     if(t>5*3600) t=5*3600;
     scores[sccnt].dure=t; scores[sccnt].next=-1;
     scores[sccnt].score=(double) atof(data[5])*100+0.5;
     else tab->firstscore=sccnt;
     tab->lastscore=sccnt; sccnt++; tab->scorecnt++;
+  }
+}
+/* traitement d'un fichier de log particulier
+ typ prend deux valeurs score ou noscore */
 void onefile(char *fname, char *typ)
+{
   FILE *f;
   char *buf, *pp, *pe;
   long int l;
     oneline(pp,typ);
+  }
   free(buf);
   if(fcind>0) filecnt++;
+}
+/* traitement de tous les fichiers d'un repertoire
+qui est soit /score soit /noscore */
 void onedir_ (char buf[MAX_LINELEN+1], char *typ)
+{
   char buf2[MAX_LINELEN+1];
   DIR *dir;
   struct dirent *ff;
   dir=opendir(buf); if(dir==NULL) return;
   while((ff=readdir(dir))!=NULL) {
+    /* les fichiers commençant par . sont ceux des eleves supprimes ; les fichiers avec
+    une extension .exam .bin ne sont pas des fichiers de scores
+    le decompte d'activite n'est pas fait sur supervisor */
-    if(!isalnum(ff->d_name[0]) || strcmp(ff->d_name,"supervisor")==0) continue;
+    if(strstr(ff->d_name,".")!=NULL || strcmp(ff->d_name,"supervisor")==0) continue;
     snprintf(buf2,sizeof(buf2),"%s/%s",buf,ff->d_name);
     onefile(buf2,typ);
+  }
   closedir(dir);
+}
   char *t1, *t2, types[256];
   snprintf(types,sizeof(types),"%s",sdata);
   for(t1=find_word_start(types); *t1; t1=find_word_start(t2)) {
     t2=find_word_end(t1); if(*t2) *t2++=0;
     snprintf(buf,sizeof(buf),"%s/%s/score",dirbase,dirname);
     onedir_(buf,t1);
     snprintf(buf,sizeof(buf),"%s/%s/noscore",dirbase,dirname);
     onedir_(buf,t1);
   }
+}
+/* traitement des donnees seulement pour un utilisateur
+  appel de la fonction onefile pour chaque fichier */
 void oneuser(char *dirname, char fname[64])
+{
   char buf[MAX_LINELEN+1], buf2[MAX_LINELEN+1];
   char *t1, *t2, types[256];
     t2=find_word_end(t1); if(*t2) *t2++=0;
     snprintf(buf,sizeof(buf),"%s/%s/score/%s",dirbase,dirname,fname);
     onefile(buf,t1);
     snprintf(buf2,sizeof(buf),"%s/%s/noscore/%s",dirbase,dirname,fname);
     onefile(buf2,t1);
   }
+}
+/* traitement de plusieurs utilisateurs (appel de oneuser
+  pour chacun d'entre eux */
 void multiuser(char *dirname, char *user)
+{
   char buf[MAX_LINELEN+1];
   char *u1, *u2;
   snprintf(buf,sizeof(buf),"%s",user);
   for(u1=find_word_start(buf); *u1; u1=find_word_start(u2)) {
     u2=find_word_end(u1); if(*u2) *u2++=0;
     oneuser(dirname, u1);
   }
 }
+/* fonction de generation des statistiques en utilisant les donnees
+   recoltees dans les fichiers de log avec oneuser onefile etc...
+   ne realise les statistiques que sur une feuille ou exam
+   en meme temps */
 void stati(statexodata *dat)
+{
   int i,j;
   double s,d;
   scsum=scavg=scdeviat=dursum=duravg=durdeviat=cid=0;
              scmin,durmin,scmax,durmax,
              scdeviat, durdeviat,
              cid);
+}
+/* ecriture de la sortie */
 void output(void)
+{
   int i;
   for(i=0;i<MAX_SHEETS*MAX_EXOS;i++) { outsheetexo(i, 0);}
   for(i=0;i<MAX_EXAMS*MAX_EXOS;i++) { outexamexo(i);}

Subversion Repositories wimsdev

(root)/trunk/wims/src/Misc/exostat.c @ 18183 – Rev 12200 → 16866