| 46,88 → 46,80 |
|---|
| |
| int str2time(char *p) |
| { |
| int sec,min,hr; |
| sec=atoi(p+15); p[14]=0; |
| min=atoi(p+12); p[11]=0; |
| 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; |
| int sec,min,hr; |
| sec=atoi(p+15); p[14]=0; |
| min=atoi(p+12); p[11]=0; |
| 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; |
| } |
| |
| static |
| void oneline(char *p, char *typ) |
| { |
| int i, sh, ex, t; |
| char *data[64]; |
| statexodata *tab; |
| char *pp, *pe; |
| 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; |
| } |
| else { |
| tab=shdata; if(sh>MAX_SHEETS) return; |
| } |
| 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 && |
| ((i > 6 && strcmp(data[6],"noscore")==0) || (i > 7 && strcmp(data[7],"noscore")==0) |
| || (i > 8 && strcmp(data[8],"noscore")==0))){ return; } |
| if(strcmp(typ,"noscore")==0 && |
| (i < 7 || ( i>7 && strcmp(data[7],typ)!=0) |
| || (i > 8 && strcmp(data[8], typ)!=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 && ( |
| (i > 7 && strcmp(data[7],"noscore")==0) |
| || (i > 8 && strcmp(data[8],"noscore")==0)) |
| ) { return; } |
| if(strcmp(typ,"noscore")==0 && ( |
| ( i < 7 || ( i > 7 && strcmp(data[7],"noscore")!=0) |
| || (i > 8 && strcmp(data[8], typ)!=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; |
| if(tab->scorecnt>0) scores[tab->lastscore].next=sccnt; |
| else tab->firstscore=sccnt; |
| tab->lastscore=sccnt; sccnt++; tab->scorecnt++; |
| } |
| int i, j, sh, ex, t; |
| char *data[64]; |
| statexodata *tab; |
| char *pp, *pe; |
| 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; |
| } |
| else { |
| tab=shdata; if(sh>MAX_SHEETS) return; |
| } |
| 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; |
| if(strcmp(typ,"noscore")==0) |
| for (j = 7; j < i; ++j) if (strcmp(data[j],"noscore")==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) |
| for (j = 7; j < i; ++j) |
| if (strcmp(data[j],"noscore")==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; |
| if(tab->scorecnt>0) scores[tab->lastscore].next=sccnt; |
| else tab->firstscore=sccnt; |
| tab->lastscore=sccnt; sccnt++; tab->scorecnt++; |
| } |
| } |
| |
| void onefile(char *fname, char *typ) |
| { |
| FILE *f; |
| char *buf, *pp, *pe; |
| long int l; |
| f=fopen(fname,"r"); if(f==NULL) return; |
| fseek(f,0,SEEK_END); l=ftell(f); fseek(f,0,SEEK_SET); |
| if(l<=0) {fclose(f); return;} |
| buf=xmalloc(l+16); (void)fread(buf,1,l,f); fclose(f); buf[l]=0; |
| fcind=0; |
| for(pp=buf; pp; pp=pe) { |
| pe=strchr(pp,'\n'); if(pe!=NULL) *pe++=0; |
| oneline(pp,typ); |
| } |
| free(buf); |
| if(fcind>0) filecnt++; |
| FILE *f; |
| char *buf, *pp, *pe; |
| long int l; |
| f=fopen(fname,"r"); if(f==NULL) return; |
| fseek(f,0,SEEK_END); l=ftell(f); fseek(f,0,SEEK_SET); |
| if(l<=0) {fclose(f); return;} |
| buf=xmalloc(l+16); (void)fread(buf,1,l,f); fclose(f); buf[l]=0; |
| fcind=0; |
| for(pp=buf; pp; pp=pe) { |
| pe=strchr(pp,'\n'); if(pe!=NULL) *pe++=0; |
| oneline(pp,typ); |
| } |
| free(buf); |
| if(fcind>0) filecnt++; |
| } |
| |
| void onedir_ (char buf[MAX_LINELEN+1], char *typ) |
| 136,88 → 128,86 |
|---|
| DIR *dir; |
| struct dirent *ff; |
| dir=opendir(buf); if(dir==NULL) return; |
| while((ff=readdir(dir))!=NULL) { |
| if(!isalnum(ff->d_name[0]) || |
| strcmp(ff->d_name,"supervisor")==0) continue; |
| snprintf(buf2,sizeof(buf2),"%s/%s",buf,ff->d_name); |
| onefile(buf2,typ); |
| } |
| closedir(dir); |
| while((ff=readdir(dir))!=NULL) { |
| if(!isalnum(ff->d_name[0]) || strcmp(ff->d_name,"supervisor")==0) continue; |
| snprintf(buf2,sizeof(buf2),"%s/%s",buf,ff->d_name); |
| onefile(buf2,typ); |
| } |
| closedir(dir); |
| } |
| |
| void onedir(char *dirname) |
| { |
| char buf[MAX_LINELEN+1]; |
| 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); |
| } |
| char buf[MAX_LINELEN+1]; |
| 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); |
| } |
| } |
| |
| void oneuser(char *dirname, char fname[64]) |
| { |
| char buf[MAX_LINELEN+1], buf2[MAX_LINELEN+1]; |
| 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/%s",dirbase,dirname,fname); |
| onefile(buf,t1); |
| snprintf(buf2,sizeof(buf),"%s/%s/noscore/%s",dirbase,dirname,fname); |
| onefile(buf2,t1); |
| } |
| char buf[MAX_LINELEN+1], buf2[MAX_LINELEN+1]; |
| 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/%s",dirbase,dirname,fname); |
| onefile(buf,t1); |
| snprintf(buf2,sizeof(buf),"%s/%s/noscore/%s",dirbase,dirname,fname); |
| onefile(buf2,t1); |
| } |
| } |
| |
| 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); |
| 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); |
| } |
| } |
| |
| void stati(statexodata *dat) |
| { |
| int i,j; |
| double s,d; |
| |
| scsum=scavg=scdeviat=dursum=duravg=durdeviat=cid=0; |
| scmin=10; scmax=0; durmin=24*3600; durmax=0; |
| {int k; for(k=0; k<10; k++) best[k]=0 ;} |
| int i,j; |
| double s,d; |
| scsum=scavg=scdeviat=dursum=duravg=durdeviat=cid=0; |
| scmin=10; scmax=0; durmin=24*3600; durmax=0; |
| {int k; for(k=0; k<10; k++) best[k]=0 ;} |
| for(i=0,j=dat->firstscore; i<dat->scorecnt; i++) { |
| s=(double) scores[j].score/100; d=(double) scores[j].dure/60; |
| scsum+=s; dursum+=d; |
| if(scmin>s) scmin=s; |
| if(scmax<s) scmax=s; |
| if(durmin>d) durmin=d; |
| if(durmax<d) durmax=d; |
| { |
| int k, l = 0; |
| for (k = 0; k < 10; k++) if (best[k] < best[l]) l = k; |
| if (best[l] < s) best[l] = s; |
| } |
| j=scores[j].next; |
| } |
| if(i<=0) {scmin=durmin=0; return;} |
| scavg=scsum/i; duravg=dursum/i; |
| if(scsum>1) cid=min(4*sqrt(dursum*dat->newcnt)/scsum,99); |
| else cid=0; |
| if(i>=2) { |
| for(i=0,j=dat->firstscore; i<dat->scorecnt; i++) { |
| s=(double) scores[j].score/100; d=(double) scores[j].dure/60; |
| scsum+=s; dursum+=d; |
| if(scmin>s) scmin=s; |
| if(scmax<s) scmax=s; |
| if(durmin>d) durmin=d; |
| if(durmax<d) durmax=d; |
| { |
| int k, l = 0; |
| for (k = 0; k < 10; k++) if (best[k] < best[l]) l = k; |
| if (best[l] < s) best[l] = s; |
| } |
| scdeviat+=(s-scavg)*(s-scavg); durdeviat+=(d-duravg)*(d-duravg); |
| j=scores[j].next; |
| } |
| if(i<=0) {scmin=durmin=0; return;} |
| scavg=scsum/i; duravg=dursum/i; |
| if(scsum>1) cid=min(4*sqrt(dursum*dat->newcnt)/scsum,99); |
| else cid=0; |
| if(i>=2) { |
| for(i=0,j=dat->firstscore; i<dat->scorecnt; i++) { |
| s=(double) scores[j].score/100; d=(double) scores[j].dure/60; |
| scdeviat+=(s-scavg)*(s-scavg); durdeviat+=(d-duravg)*(d-duravg); |
| j=scores[j].next; |
| } |
| scdeviat=sqrt(scdeviat/i); durdeviat=sqrt(durdeviat/i); |
| } |
| scdeviat=sqrt(scdeviat/i); durdeviat=sqrt(durdeviat/i); |
| } |
| } |
| |
| /* Output line format: |
| 254,14 → 244,14 |
|---|
| int k; for (k=0; k<10; k++) printf("%.2f,", best[k]); |
| printf("\n"); |
| break; |
| } |
| } |
| } |
| |
| void outexamexo (int i) |
| { |
| if(examdata[i].newcnt<=0) return; |
| stati(examdata+i); |
| printf(":E %2d %2d %4d %4d \ |
| if(examdata[i].newcnt<=0) return; |
| stati(examdata+i); |
| printf(":E %2d %2d %4d %4d \ |
| %4.0f %4.0f %5.2f %5.2f \ |
| %5.2f %4.1f %5.2f %5.1f \ |
| %5.2f %5.2f %4.1f\n", |
| 276,47 → 266,47 |
|---|
| |
| 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);} |
| 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);} |
| } |
| |
| int main() |
| { |
| char cla[MAX_LINELEN+1], user[256]; |
| char *c1, *c2; |
| char *cdata, *udata, *sh; |
| char cla[MAX_LINELEN+1], user[256]; |
| char *c1, *c2; |
| char *cdata, *udata, *sh; |
| |
| memset(shdata,0,sizeof(shdata)); memset(examdata,0,sizeof(examdata)); |
| dirbase=getenv("exostat_dirbase"); |
| if(dirbase==NULL || *dirbase==0) dirbase="../log/classes"; |
| sdata=getenv("exostat_types"); |
| if(sdata==NULL || *sdata==0) sdata="score noscore"; |
| cdata=getenv("exostat_classes"); |
| if(cdata==NULL || *cdata==0) cdata=getenv("w_wims_class"); |
| if(cdata==NULL || *cdata==0) return -1; |
| snprintf(cla,sizeof(cla),"%s",cdata); |
| udata=getenv("exostat_user"); |
| if(udata==NULL || *udata==0) { |
| for(c1=cla; *c1; c1++) if(!isalnum(*c1) && *c1!='/') *c1=' '; |
| for(c1=find_word_start(cla); *c1; c1=find_word_start(c2)) { |
| c2=find_word_end(c1); if(*c2) *c2++=0; |
| onedir(c1); |
| memset(shdata,0,sizeof(shdata)); memset(examdata,0,sizeof(examdata)); |
| dirbase=getenv("exostat_dirbase"); |
| if(dirbase==NULL || *dirbase==0) dirbase="../log/classes"; |
| sdata=getenv("exostat_types"); |
| if(sdata==NULL || *sdata==0) sdata="score noscore"; |
| cdata=getenv("exostat_classes"); |
| if(cdata==NULL || *cdata==0) cdata=getenv("w_wims_class"); |
| if(cdata==NULL || *cdata==0) return -1; |
| snprintf(cla,sizeof(cla),"%s",cdata); |
| udata=getenv("exostat_user"); |
| if(udata==NULL || *udata==0) { |
| for(c1=cla; *c1; c1++) if(!isalnum(*c1) && *c1!='/') *c1=' '; |
| for(c1=find_word_start(cla); *c1; c1=find_word_start(c2)) { |
| c2=find_word_end(c1); if(*c2) *c2++=0; |
| onedir(c1); |
| } |
| output(); |
| } else { |
| snprintf(user,sizeof(user),"%s",udata); |
| multiuser(cla, user); |
| sh=getenv("exostat_sheet"); |
| if( sh==NULL || *sh==0 ) output(); |
| else { |
| int s=atoi(sh); |
| s=(s-1)*MAX_EXOS; |
| int i; |
| for(i=s;i < s + MAX_EXOS;i++) { |
| outsheetexo(i, 1); |
| } |
| output(); |
| } else { |
| snprintf(user,sizeof(user),"%s",udata); |
| multiuser(cla, user); |
| sh=getenv("exostat_sheet"); |
| if( sh==NULL || *sh==0 ) { output(); } |
| else { |
| int s=atoi(sh); |
| s=(s-1)*MAX_EXOS; |
| int i; |
| for(i=s;i < s + MAX_EXOS;i++) { |
| outsheetexo(i, 1); |
| } |
| }; |
| } |
| return 0; |
| }; |
| } |
| return 0; |
| } |