tazbug annotate web/plugins/users/users.cgi @ rev 82
web: plugins dont need to source httphelper.sh
| author | Christophe Lincoln <pankso@slitaz.org> |
|---|---|
| date | Mon Feb 17 23:16:08 2014 +0100 (2014-02-17) |
| parents | 00b8f6d05cd7 |
| children | 0a2f403934e5 |
| rev | line source |
|---|---|
| pankso@66 | 1 #!/bin/sh |
| pankso@66 | 2 # |
| pankso@66 | 3 # TinyCM/TazBug Plugin - Users Admin |
| pankso@66 | 4 # |
| pankso@66 | 5 |
| pankso@66 | 6 case " $(GET) " in |
| pankso@66 | 7 *\ users\ *) |
| pankso@66 | 8 d="Users" |
| pankso@66 | 9 header |
| pankso@66 | 10 html_header |
| pankso@66 | 11 user_box |
| pankso@66 | 12 if check_auth && ! admin_user; then |
| pankso@66 | 13 gettext "You must be admin to manage users" |
| pankso@66 | 14 exit 0 |
| pankso@66 | 15 fi |
| pankso@66 | 16 users=$(ls -1 $PEOPLE | wc -l) |
| pankso@66 | 17 cat << EOT |
| pankso@66 | 18 <h2>Users: $users</h2> |
| pankso@66 | 19 <div id="tools"> |
| pankso@66 | 20 <a href="$script?dashboard">Dashboard</a> |
| pankso@72 | 21 <a href='?logged'>Logged users</a> |
| pankso@66 | 22 </div> |
| pankso@66 | 23 <pre> |
| pankso@66 | 24 EOT |
| pankso@66 | 25 for u in $(ls $PEOPLE) |
| pankso@66 | 26 do |
| pankso@66 | 27 . "${PEOPLE}/${u}/account.conf" |
| pankso@66 | 28 cat << EOT |
| pankso@66 | 29 $(get_gravatar $MAIL 24) <a href="?user=$USER">$USER</a> | $NAME | $MAIL |
| pankso@66 | 30 EOT |
| pankso@66 | 31 # deluser link |
| pankso@66 | 32 #: <a href="?users&deluser=$USER">$(gettext "delete")</a> |
| pankso@66 | 33 unset NAME USER |
| pankso@66 | 34 done |
| pankso@66 | 35 echo "</pre>" && exit 0 ;; |
| pankso@66 | 36 |
| pankso@69 | 37 *\ logged\ *) |
| pankso@66 | 38 # Show online users based on sessions files. |
| pankso@69 | 39 d="Logged users" |
| pankso@66 | 40 header |
| pankso@66 | 41 html_header |
| pankso@66 | 42 user_box |
| pankso@66 | 43 if ! check_auth; then |
| paul@70 | 44 gettext "You must be logged in to view online users" |
| pankso@66 | 45 exit 0 |
| pankso@66 | 46 fi |
| pankso@66 | 47 cat << EOT |
| pankso@69 | 48 <h2>Logged users</h2> |
| pankso@66 | 49 <div id="tools"> |
| pankso@66 | 50 <a href="$script?dashboard">Dashboard</a> |
| pankso@66 | 51 </div> |
| pankso@66 | 52 <pre> |
| pankso@66 | 53 EOT |
| pankso@66 | 54 for u in $(ls $sessions) |
| pankso@66 | 55 do |
| pankso@66 | 56 . "${PEOPLE}/${u}/account.conf" |
| pankso@66 | 57 cat << EOT |
| pankso@66 | 58 $(get_gravatar $MAIL 24) <a href="?user=$USER">$USER</a> | $NAME |
| pankso@66 | 59 EOT |
| pankso@66 | 60 done |
| pankso@66 | 61 echo "</pre>" |
| pankso@66 | 62 html_footer && exit 0 ;; |
| pankso@66 | 63 esac |