Rev 16080 | Rev 16129 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 16080 | Rev 16124 | ||
|---|---|---|---|
| Line 1021... | Line 1021... | ||
| 1021 | } |
1021 | } |
| 1022 | 1022 | ||
| 1023 | /* retain initializing parameters, for use in user references */ |
1023 | /* retain initializing parameters, for use in user references */ |
| 1024 | void set_init_parm(void) |
1024 | void set_init_parm(void) |
| 1025 | { |
1025 | { |
| 1026 | char *rq, rqv[MAX_LINELEN*2+2], *u, *sh, *seedr, *exotrymax; |
1026 | char *rq, rqv[MAX_LINELEN*2+2], *u, *sh, *seedr, *exotrymax, *freework; |
| 1027 | char *shname; |
1027 | char *shname; |
| 1028 | int public_sheet; |
1028 | int public_sheet; |
| 1029 | 1029 | ||
| 1030 | if(isexam) return; |
1030 | if(isexam) return; |
| 1031 | force_setvar("wims_sheet",""); force_setvar("wims_exo",""); |
1031 | force_setvar("wims_sheet",""); force_setvar("wims_exo",""); |
| Line 1042... | Line 1042... | ||
| 1042 | in the var.def of the module to be used */ |
1042 | in the var.def of the module to be used */ |
| 1043 | seedr=getvar("seedrepeat"); |
1043 | seedr=getvar("seedrepeat"); |
| 1044 | force_setvar("wims_seed_repeat",seedr); |
1044 | force_setvar("wims_seed_repeat",seedr); |
| 1045 | exotrymax=getvar("exotrymax"); |
1045 | exotrymax=getvar("exotrymax"); |
| 1046 | force_setvar("wims_exotrymax",exotrymax); |
1046 | force_setvar("wims_exotrymax",exotrymax); |
| - | 1047 | /* get freework number*/ |
|
| - | 1048 | freework=getvar("freework"); |
|
| - | 1049 | /* my_debug("freework %i",freework);*/ |
|
| - | 1050 | force_setvar("wims_freework",freework); |
|
| 1047 | /* now determine the sheet number for user */ |
1051 | /* now determine the sheet number for user */ |
| 1048 | sh=getvar(ro_name[ro_worksheet]); if(sh==NULL) return; |
1052 | sh=getvar(ro_name[ro_worksheet]); if(sh==NULL) return; |
| 1049 | if(*sh=='P') {public_sheet=1; sh++;} |
1053 | if(*sh=='P') {public_sheet=1; sh++;} |
| 1050 | shname="sheet"; |
1054 | shname="sheet"; |
| 1051 | u=getvar("wims_user"); if(u==NULL) u=""; |
1055 | u=getvar("wims_user"); if(u==NULL) u=""; |
| Line 1607... | Line 1611... | ||
| 1607 | exolog(buf); |
1611 | exolog(buf); |
| 1608 | } |
1612 | } |
| 1609 | } |
1613 | } |
| 1610 | } |
1614 | } |
| 1611 | if(var_def_buf) free(var_def_buf); |
1615 | if(var_def_buf) free(var_def_buf); |
| - | 1616 | } |
|
| - | 1617 | ||
| - | 1618 | void my_debug(char*s,...) |
|
| - | 1619 | { |
|
| - | 1620 | va_list vp; |
|
| - | 1621 | char buf[MAX_LINELEN+1]; |
|
| - | 1622 | ||
| - | 1623 | va_start(vp,s); |
|
| - | 1624 | vsnprintf(buf,sizeof(buf),s,vp); |
|
| - | 1625 | va_end(vp); |
|
| - | 1626 | // better with zsh, but not always install |
|
| - | 1627 | call_sh(1,"echo -n '%s' >> /home/svn/wims/tmp/debug",buf); |
|
| 1612 | } |
1628 | } |