Rev 16725 | Rev 16749 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 16725 | Rev 16727 | ||
|---|---|---|---|
| Line 1552... | Line 1552... | ||
| 1552 | mkfname(logftmp,"%s/%s/.tmp%lu",s2_dir,sess,nowtime); |
1552 | mkfname(logftmp,"%s/%s/.tmp%lu",s2_dir,sess,nowtime); |
| 1553 | rename(fname,logftmp); |
1553 | rename(fname,logftmp); |
| 1554 | varf=fopen(fname,"a"); |
1554 | varf=fopen(fname,"a"); |
| 1555 | if(varf!=NULL) { |
1555 | if(varf!=NULL) { |
| 1556 | _write_var("module_score",varf,1,1); |
1556 | _write_var("module_score",varf,1,1); |
| 1557 | varg=fopen(logftmp, |
1557 | varg=fopen(logftmp,"r"); |
| 1558 | if(varg!=NULL) { |
1558 | if(varg!=NULL) { |
| 1559 | while ( (c=getc (varg)) != EOF) |
1559 | while ( (c=getc (varg)) != EOF) putc(c,varf); |
| 1560 | putc (c,varf); |
- | |
| 1561 |
|
1560 | fclose(varg); |
| 1562 | } |
1561 | } |
| 1563 | fclose(varf); |
1562 | fclose(varf); |
| 1564 | remove(logftmp); |
1563 | remove(logftmp); |
| 1565 | } |
1564 | } |
| 1566 | } |
1565 | } |
| Line 1638... | Line 1637... | ||
| 1638 | if(cmd_type==cmd_new || cmd_type==cmd_renew) unlink(buf); |
1637 | if(cmd_type==cmd_new || cmd_type==cmd_renew) unlink(buf); |
| 1639 | exolog(buf); |
1638 | exolog(buf); |
| 1640 | } |
1639 | } |
| 1641 | /* for auto log of exercise in freework */ |
1640 | /* for auto log of exercise in freework */ |
| 1642 | if(freeworklogf[0]!=0) { |
1641 | if(freeworklogf[0]!=0) { |
| 1643 | char buf[MAX_FNAME+1],*sess |
1642 | char buf[MAX_FNAME+1],*sess,c; |
| - | 1643 | FILE *varg; |
|
| 1644 | mkdirs(freeworklogd); |
1644 | mkdirs(freeworklogd); |
| 1645 | sess=getvar("wims_session"); |
1645 | sess=getvar("wims_session"); |
| 1646 | mkfname(buf,"%s/%s/exolog",session_dir,sess); |
1646 | mkfname(buf,"%s/%s/exolog",session_dir,sess); |
| 1647 | varg=fopen(buf, |
1647 | varg=fopen(buf,"r"); |
| 1648 | if(varg!=NULL) { |
1648 | if(varg!=NULL) { |
| 1649 | varf=fopen(freeworklogf,"w"); |
1649 | varf=fopen(freeworklogf,"w"); |
| 1650 | while ( (c=getc (varg)) != EOF) |
1650 | while ( (c=getc (varg)) != EOF) |
| 1651 | putc (c,varf); |
1651 | putc (c,varf); |
| 1652 | fclose(varg); |
1652 | fclose(varg); |