Rev 17386 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 17386 | Rev 17389 | ||
---|---|---|---|
Line 14... | Line 14... | ||
14 | t_=!lower $t_ |
14 | t_=!lower $t_ |
15 | n_=!char 10 to -1 of $u_ |
15 | n_=!char 10 to -1 of $u_ |
16 | !default n_=0 |
16 | !default n_=0 |
17 | !if NaN notin $[1*$n_] and $t_=anonymous |
17 | !if NaN notin $[1*$n_] and $t_=anonymous |
18 | dispo=!record 2 of wimshome/log/classes/$c_/freelogin |
18 | dispo=!record 2 of wimshome/log/classes/$c_/freelogin |
- | 19 | dispo=!nospace $dispo |
|
19 | time=!record 1 of wimshome/log/classes/$c_/freelogin |
20 | time=!record 1 of wimshome/log/classes/$c_/freelogin |
20 | !if $dispo=$empty and ($time=$empty or $wims_nowseconds>$time+600) |
21 | !if $dispo=$empty and ($time=$empty or $wims_nowseconds>$time+600) |
21 | ltuser=!sh cd $wims_home/sessions;\ |
22 | ltuser=!sh cd $wims_home/sessions;\ |
22 | s=`grep wims_class=$c_ ./*/var.stat | cut -d: -f1`;\ |
23 | s=`grep wims_class=$c_ ./*/var.stat | cut -d: -f1`;\ |
23 | grep "wims_user=" $$s | cut -d= -f2; |
24 | grep "wims_user=" $$s | cut -d= -f2; |
Line 43... | Line 44... | ||
43 | !else |
44 | !else |
44 | num=!item 1 of $dispo |
45 | num=!item 1 of $dispo |
45 | test=!fileexists wimshome/log/classes/$c_/.users/anonymous$num |
46 | test=!fileexists wimshome/log/classes/$c_/.users/anonymous$num |
46 | !if $test!=yes |
47 | !if $test!=yes |
47 | nbuser=!recordcnt wimshome/log/classes/$c_/.userlist |
48 | nbuser=!recordcnt wimshome/log/classes/$c_/.userlist |
- | 49 | !if $cllimit=$empty |
|
- | 50 | cllimit=!defof class_limit in wimshome/log/classes/$c_/.def |
|
- | 51 | !if $cllimit=$empty |
|
- | 52 | cllimit=!defof class_user_limit in wimshome/log/wims.conf |
|
- | 53 | !if $cllimit=$empty |
|
- | 54 | cllimit=!defof DF_class_limit in wimshome/public_html/bases/sys/defaults.conf |
|
- | 55 | !endif |
|
- | 56 | !endif |
|
- | 57 | !endif |
|
48 | !if $nbuser<=$cllimit |
58 | !if $nbuser<=$cllimit |
49 | !sh cp $wims_home/log/classes/$c_/.users/anonymous $wims_home/log/classes/$c_/.users/anonymous$num |
59 | !sh cp $wims_home/log/classes/$c_/.users/anonymous $wims_home/log/classes/$c_/.users/anonymous$num |
50 | !readproc adm/class/mkuserlist $c_ |
60 | !readproc adm/class/mkuserlist $c_ |
51 | !else |
61 | !else |
52 | !restart module=adm/class/classes/&+job=example&+fullcls=1 |
62 | !restart module=adm/class/classes/&+job=example&+fullcls=1 |