Annotation of capa/capa51/Historic/Scorer/scorertoset.c, revision 1.1
1.1 ! albertel 1: /*
! 2: * scorertoset.c
! 3: * Copyright Guy Albertelli II 1997
! 4: */
! 5: #include <stdio.h>
! 6: #include <ctype.h>
! 7: #include "Capa/capaCommon.h"
! 8: #include "scorer.h"
! 9:
! 10: #ifdef __sun
! 11: #include <unistd.h> /* lockf() */
! 12: #endif
! 13:
! 14: #ifdef F_DBUG
! 15: extern FILE *dfp;
! 16: #endif
! 17:
! 18: /********************************************************** file locking */
! 19: int flockstream_sh(FILE *sp)
! 20: {
! 21: int fd = fileno(sp);
! 22: #ifdef __sun
! 23: return ( lockf(fd,F_LOCK, 0L) );
! 24: #else
! 25: return (flock(fd,LOCK_SH));
! 26: #endif
! 27: }
! 28:
! 29: int flockstream(FILE *sp)
! 30: {
! 31: int fd = fileno(sp);
! 32: #ifdef __sun
! 33: return ( lockf(fd,F_LOCK, 0L) );
! 34: #else
! 35: return (flock(fd,LOCK_EX));
! 36: #endif
! 37: }
! 38:
! 39: int funlockstream(FILE *sp)
! 40: {
! 41: int fd = fileno(sp);
! 42: #ifdef __sun
! 43: return ( lockf(fd,F_ULOCK, 0L) );
! 44: #else
! 45: return (flock(fd,LOCK_UN));
! 46: #endif
! 47: }
! 48:
! 49: char* capa_malloc(unsigned int num,unsigned int sz)
! 50: {
! 51: char *p;
! 52: p = calloc(num, sz);
! 53: return (p);
! 54: }
! 55:
! 56:
! 57: /****************************************************** Database Entry */
! 58: int /* RETURNS: error code */
! 59: scorer_set_entry(entry, student_number, set, offset)
! 60: T_entry *entry; /* pointer to entry structure to fill in */
! 61: char *student_number;
! 62: int set;
! 63: long offset;
! 64: {
! 65: FILE *fp;
! 66: int errcode=0;
! 67: int len;
! 68: char filename[FILE_NAME_LENGTH];
! 69: char a_line[MAX_LINE_LENGTH];
! 70:
! 71: sprintf(filename,"records/set%d.sb",set);
! 72: if ((fp=fopen(filename,"r+"))==NULL)
! 73: {
! 74: printf("Error: can't open %s\n",filename); return (-1);
! 75: }
! 76: sprintf(a_line,"%s %s,%s\n",entry->student_number,entry->answers,
! 77: entry->tries);
! 78: len = strlen(a_line);
! 79: flockstream(fp);
! 80: fseek(fp,offset,0);
! 81: if (!fwrite(a_line,len,1,fp) )
! 82: {
! 83: printf("Error writing data to file\n");
! 84: errcode= (-1);
! 85: }
! 86: funlockstream(fp);
! 87: fclose(fp);
! 88: return (errcode);
! 89: }
! 90:
! 91: /**************************************************** Get db entry*/
! 92:
! 93: long /* RETURNS: byte offset to start of record, 0 if error,
! 94: -offset if not found & newly created */
! 95: scorer_get_entry(entry, student_number, set)
! 96: T_entry *entry;
! 97: char *student_number;
! 98: int set;
! 99: {
! 100: char filename[FILE_NAME_LENGTH];
! 101: FILE *fp;
! 102: int len, nq;
! 103: char *ans_p, *tries_p,oneline[MAX_LINE_LENGTH],fmtbuf[MAX_LINE_LENGTH];
! 104: long offset=0, next_r;
! 105: int ii, done, found=0;
! 106: char a_sn[MAX_STUDENT_NUMBER+1];
! 107:
! 108: sprintf(filename,"records/set%d.sb",set);
! 109: if ((fp=fopen(filename,"r"))==NULL)
! 110: {
! 111: printf("Error: can't open %s\n",filename);
! 112: return (0);
! 113: }
! 114: sprintf(entry->student_number,"%s",student_number);
! 115: sprintf(fmtbuf, "%%%dc",MAX_STUDENT_NUMBER);
! 116: flockstream(fp);
! 117: fgets(oneline,MAX_LINE_LENGTH-1,fp);
! 118: len = strlen(oneline); sscanf(oneline,"%d",&nq);
! 119: ans_p = capa_malloc(nq+1,1); tries_p = capa_malloc(3*nq,1);
! 120: fgets(oneline,MAX_LINE_LENGTH-1,fp); /* skip weight line */
! 121: fgets(oneline,MAX_LINE_LENGTH-1,fp); /* hand grading */
! 122: done = 0;
! 123: while(!done)
! 124: {
! 125: done = !fgets(oneline,MAX_LINE_LENGTH-1,fp); len = strlen(oneline);
! 126: if( !done )
! 127: {
! 128: sscanf(oneline,fmtbuf,a_sn);
! 129: if( !strncasecmp(a_sn,student_number,MAX_STUDENT_NUMBER) )
! 130: { /* Found */
! 131: next_r = ftell(fp); offset = next_r - len; done = 1; found = 1;
! 132: }
! 133: }
! 134: else
! 135: {
! 136: fseek(fp,0L,SEEK_END);
! 137: offset = ftell(fp); /* last byte, if last bye is cr, back up one */
! 138: fseek(fp,-1L,SEEK_END);
! 139: while(fgetc(fp) == '\n' ) { offset--; fseek(fp,offset,SEEK_SET); }
! 140: offset = offset +2; /* last char and cr */
! 141: found = 0; done=1;
! 142: }
! 143: }
! 144: funlockstream(fp); fclose(fp);
! 145: if(!found)
! 146: {
! 147: for(ii=0;ii<nq;ii++)
! 148: { /* Initialize answer string and tries string */
! 149: ans_p[ii] = '-'; tries_p[3*ii] = ' '; tries_p[3*ii + 1] = '0';
! 150: if(ii < nq-1) tries_p[3*ii + 2] = ',';
! 151: }
! 152: entry->answers = ans_p;
! 153: entry->tries = tries_p;
! 154: entry->e_probs = nq;
! 155: if (scorer_set_entry(entry,student_number,set,offset)==-1)
! 156: offset=0;
! 157: offset = -offset;
! 158: }
! 159: else
! 160: {
! 161: sprintf(fmtbuf, "%%%dc",nq);
! 162: sscanf(oneline + MAX_STUDENT_NUMBER+1,fmtbuf,ans_p);
! 163: sprintf(fmtbuf, "%%%dc",(3*nq-1));
! 164: sscanf(oneline + MAX_STUDENT_NUMBER+1+nq+1,fmtbuf,tries_p);
! 165: entry->answers = ans_p;
! 166: entry->tries = tries_p;
! 167: entry->e_probs = nq;
! 168: }
! 169: return (offset);
! 170: }
! 171:
! 172: void initScreen(void)
! 173: {
! 174: printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");
! 175: printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");
! 176: printf("\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n");
! 177: printf("Covert form Scorer output to CAPA set file and score. ");
! 178: printf("Arch %s, Version %s.%s\n",ARCHSTR,MAJORVER,MINORVER);
! 179: }
! 180:
! 181: int getSetId()
! 182: {
! 183: int setId;
! 184: printf("Please enter the Set Id number:");
! 185: scanf("%d",&setId);
! 186: return setId;
! 187: }
! 188:
! 189: FILE *openInputFile(int setId)
! 190: {
! 191: char filename[MAX_LINE_LENGTH];
! 192: FILE *inputFile;
! 193:
! 194: sprintf(filename,"records/scorer.output.%d",setId);
! 195: inputFile=fopen(filename,"r");
! 196: if (inputFile==NULL)
! 197: {
! 198: fprintf(stderr,"%s not found\n",filename);
! 199: exit(-1);
! 200: }
! 201: return inputFile;
! 202: }
! 203:
! 204: int getHeader(FILE *inputFile, int setId, Question questions[MAX_QUEST])
! 205: {
! 206: char class[MAX_LINE_LENGTH],set[MAX_LINE_LENGTH],flags[MAX_LINE_LENGTH],buf,
! 207: numQuestions[MAX_LINE_LENGTH];
! 208: int i=0,done=FALSE;
! 209: float pauseTime;
! 210:
! 211: fscanf(inputFile,"%s %s %s %s %f",class,set,numQuestions,flags,&pauseTime);
! 212: printf("%s %s %s %s %f\n",class,set,numQuestions,flags,pauseTime);
! 213:
! 214: fscanf(inputFile,"%c",&buf);
! 215: while(!done)
! 216: {
! 217: buf=fgetc(inputFile);
! 218: switch (buf)
! 219: {
! 220: case '\n':
! 221: done=TRUE;
! 222: break;
! 223: case ' ':
! 224: break;
! 225: default:
! 226: questions[i].type=buf;
! 227: buf=fgetc(inputFile);
! 228: questions[i].points=(int)(buf-'0');
! 229: buf=fgetc(inputFile);
! 230: questions[i].leafs=(int)(buf-'0');
! 231: i++;
! 232: break;
! 233: }
! 234: }
! 235: return i;
! 236: }
! 237:
! 238: int getGradingMethod(void)
! 239: {
! 240: int done=FALSE,i;
! 241: while(!done)
! 242: {
! 243: printf("\t\t%d for Capa Standard Method\n",CAPA_METHOD);
! 244: printf("\t\t%d for Lenient Method\n",LENIENT_METHOD);
! 245: printf("\t\t%d for Strict Method\n",STRICT);
! 246: printf("Which grading method?");
! 247:
! 248: scanf("%d",&i);
! 249: switch(i)
! 250: {
! 251: case CAPA_METHOD:
! 252: case LENIENT_METHOD:
! 253: case STRICT:
! 254: done=TRUE;
! 255: break;
! 256: default:
! 257: fprintf(stderr,"Please choose one of\n");
! 258: break;
! 259: }
! 260: }
! 261: return i;
! 262: }
! 263:
! 264: void processFile(FILE *inputFile,Question questions[MAX_QUEST],int setId,
! 265: int gradingMethod,int numQuestions)
! 266: {
! 267: T_entry grade;
! 268: char studentNumber[MAX_STUDENT_NUMBER+1],name[MAX_NAME_CHAR+1];
! 269: int offset,score,section,buf,i,numRight,points=0,leafs,processed=0,unit;
! 270:
! 271: printf("Processing");
! 272: while(fscanf(inputFile,"%s",studentNumber)!=EOF)
! 273: {
! 274: processed++;
! 275: if (processed%100==1) { printf("%d",processed-1); }
! 276: printf(".");
! 277: fflush(stdout);
! 278: if ((offset = scorer_get_entry(&grade,studentNumber,setId))==0)
! 279: {
! 280: fprintf(stderr,"Please create the set%d.sb file\n",setId);
! 281: exit(-1);
! 282: }
! 283: fscanf(inputFile,"%30c",name);
! 284: fscanf(inputFile,"%s",grade.answers);
! 285: fscanf(inputFile,"%d",&score);
! 286: fscanf(inputFile,"%d",§ion);
! 287: if ( (grade.e_probs != strlen(grade.answers))
! 288: ||
! 289: (strlen(grade.answers) != numQuestions))
! 290: {
! 291: fprintf(stderr,"There is a disagreement in the number of problems");
! 292: fprintf(stderr,"\nNumQuestions:%d\n",numQuestions);
! 293: fprintf(stderr,"strlen(grade.answers):%d\n",strlen(grade.answers));
! 294: fprintf(stderr,"grade.answers:%s\n",grade.answers);
! 295: fprintf(stderr,"grade.e_probs:%d\n",grade.e_probs);
! 296: fprintf(stderr,"The set.sb file may have bad entries, please\n");
! 297: fprintf(stderr,"check the file and fix the error.\n");
! 298: exit(-1);
! 299: }
! 300: buf='\0';
! 301: while(buf!='\n')
! 302: {
! 303: buf=fgetc(inputFile);
! 304: }
! 305: #ifdef DEBUG
! 306: printf("%d %d\n",numQuestions,strlen(grade.answers));
! 307: #endif /*DEBUG*/
! 308: for(i=0;i<numQuestions;i++)
! 309: {
! 310: switch(questions[i].type)
! 311: {
! 312: case ONE_OUT_OF_8:
! 313: case SINGLE_DIGIT:
! 314: numRight= (int) (grade.answers[i]-'0');
! 315: score=numRight*questions[i].points;
! 316: grade.answers[i]='0'+(char)score;
! 317: break;
! 318: case STRING_MATCH:
! 319: /*for STRING_MATCH the score is stroed as the NumRight*/
! 320: numRight= (int) (grade.answers[i]-'0');
! 321: score=numRight;
! 322: grade.answers[i]='0'+(char)score;
! 323: break;
! 324: case GLE:
! 325: case TF:
! 326: case N_OUT_OF_M:
! 327: numRight=(int) (grade.answers[i]-'0');
! 328: leafs=questions[i].leafs;
! 329: points=questions[i].points;
! 330: unit=(int)ceil((double)points/(double)leafs);
! 331: if (unit==0) unit=points;
! 332: switch (gradingMethod)
! 333: {
! 334: case CAPA_METHOD:
! 335: score=points-(2*unit*(leafs-numRight));
! 336: break;
! 337: case LENIENT_METHOD:
! 338: score=points-(unit*(leafs-numRight));
! 339: break;
! 340: case STRICT:
! 341: if (numRight==leafs) score=points;
! 342: else score=0;
! 343: break;
! 344: default:
! 345: fprintf(stderr,"Unknown grading Method. %d\n",gradingMethod);
! 346: break;
! 347: }
! 348: if (score<0)
! 349: score=0;
! 350: grade.answers[i]='0'+(char)score;
! 351: break;
! 352: case ASSIGNED:
! 353: /*
! 354: *grade.answers already has the correct number of points.
! 355: *i.e whatever the scorer.output file had in it and was put in
! 356: *grade.
! 357: */
! 358: break;
! 359: default:
! 360: fprintf(stderr,"Unknown question type %c\n",questions[i].type);
! 361: break;
! 362: }
! 363: }
! 364: for(i=0;i<strlen(grade.answers);i++)
! 365: {
! 366: grade.tries[3*i]=' ';
! 367: grade.tries[3*i+1]='1';
! 368: grade.tries[3*i+2]=',';
! 369: }
! 370: grade.tries[3*i-1]='\0';
! 371: grade.answers[i]='\0';
! 372: #ifdef DEBUG
! 373: printf("%s\n",studentNumber);
! 374: #endif /*DEBUG*/
! 375: if (scorer_set_entry(&grade,studentNumber,setId,abs(offset))==-1)
! 376: {
! 377: fprintf(stderr,"Please create the set%d.sb file\n",setId);
! 378: exit(-1);
! 379: }
! 380: }
! 381: printf("\nProcessed %d results\n",processed);
! 382: }
! 383:
! 384: int main(void)
! 385: {
! 386: FILE * inputFile;
! 387: int setId,gradingMethod,numQuestions;
! 388: Question questions[MAX_QUEST];
! 389:
! 390: initScreen();
! 391: setId=getSetId();
! 392: inputFile=openInputFile(setId);
! 393: numQuestions=getHeader(inputFile,setId,questions);
! 394: gradingMethod=getGradingMethod();
! 395:
! 396: processFile(inputFile,questions,setId,gradingMethod,numQuestions);
! 397:
! 398: printf("\nProcessing completed. Look in records/set%d.sb for results.\n",
! 399: setId);
! 400: return 0;
! 401: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/icons/back.gif){kind=icon}
Return to scorertoset.c CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / capa / capa51 / Historic / Scorer