tazbug annotate web/plugins/dashboard/dashboard.cgi @ rev 116
Rename pkgs plugin and improve dashboard
author | Christophe Lincoln <pankso@slitaz.org> |
---|---|
date | Sat Feb 11 15:19:38 2017 +0100 (2017-02-11) |
parents | bcaad2bc76c8 |
children | b19dbd851223 |
rev | line source |
---|---|
pankso@49 | 1 #!/bin/sh |
pankso@49 | 2 # |
pankso@66 | 3 # TazBug Plugin - Dashboard |
pankso@49 | 4 # |
pankso@49 | 5 |
pankso@82 | 6 if [ "$(GET dashboard)" ]; then |
pankso@100 | 7 d="Dashboard" |
pankso@100 | 8 header |
pankso@100 | 9 html_header |
pankso@100 | 10 user_box |
pankso@100 | 11 if ! check_auth; then |
pankso@100 | 12 gettext "You must be logged in to view the dashboard" |
pankso@100 | 13 exit 0 |
pankso@100 | 14 fi |
pankso@100 | 15 users=$(ls -1 $PEOPLE | wc -l) |
pankso@100 | 16 bugs=$(ls -1 $bugdir | wc -l) |
pankso@100 | 17 bugsize=$(du -sh $bugdir | awk '{print $1}') |
pankso@100 | 18 # Source all plugins.conf to get DASHBOARD_TOOLS and ADMIN_TOOLS |
pankso@100 | 19 ADMIN_TOOLS="" |
pankso@100 | 20 DASHBOARD_TOOLS="" |
pankso@100 | 21 for p in $(ls $plugins) |
pankso@100 | 22 do |
pankso@100 | 23 . $plugins/$p/$p.conf |
pankso@100 | 24 done |
pankso@100 | 25 if check_auth && ! admin_user; then |
pankso@67 | 26 ADMIN_TOOLS="" |
pankso@100 | 27 fi |
pankso@116 | 28 if check_auth; then |
pankso@116 | 29 cat << EOT |
pankso@49 | 30 <h2>Dashboard</h2> |
pankso@65 | 31 |
pankso@65 | 32 <div id="tools"> |
pankso@66 | 33 $DASHBOARD_TOOLS $ADMIN_TOOLS |
pankso@65 | 34 </div> |
pankso@65 | 35 |
pankso@49 | 36 <pre> |
pankso@116 | 37 Bugs count : $bugs |
pankso@116 | 38 Database size : $bugsize |
pankso@116 | 39 User accounts : $users |
pankso@116 | 40 Server uptime :$(uptime | cut -d "," -f 1-2) |
pankso@49 | 41 </pre> |
pankso@116 | 42 |
pankso@116 | 43 <h3>Admin users</h3> |
pankso@49 | 44 EOT |
pankso@116 | 45 |
pankso@116 | 46 # Get the list of administrators |
pankso@116 | 47 fgrep -l "ADMIN_USER=" $PEOPLE/*/account.conf | while read file; |
pankso@116 | 48 do |
pankso@116 | 49 . ${file} |
pankso@116 | 50 echo "<a href='?user=$USER'>$USER</a>" |
pankso@116 | 51 unset NAME USER |
pankso@116 | 52 done |
pankso@116 | 53 |
pankso@116 | 54 # Only for admins |
pankso@116 | 55 if check_auth && admin_user; then |
pankso@116 | 56 # List all plugins |
pankso@116 | 57 cat << EOT |
pankso@99 | 58 <h3>$(gettext "Plugins")</h3> |
pankso@99 | 59 <pre> |
pankso@116 | 60 <table> |
pankso@116 | 61 <thead> |
pankso@116 | 62 <td>$(gettext "Name")</td> |
pankso@116 | 63 <td>$(gettext "Description")</td> |
pankso@116 | 64 <td>$(gettext "Action")</td> |
pankso@116 | 65 </thead> |
pankso@99 | 66 EOT |
pankso@116 | 67 for p in $(ls -1 $plugins) |
pankso@116 | 68 do |
pankso@116 | 69 . $plugins/$p/$p.conf |
pankso@116 | 70 cat << EOT |
pankso@116 | 71 <tr> |
pankso@116 | 72 <td><a href='?$p'>$PLUGIN</a></td> |
pankso@116 | 73 <td>$SHORT_DESC</td> |
pankso@116 | 74 <td>TODO</td> |
pankso@116 | 75 </tr> |
pankso@116 | 76 EOT |
pankso@116 | 77 done |
pankso@116 | 78 echo " </table>" |
pankso@116 | 79 echo "</pre>" |
pankso@100 | 80 fi |
pankso@116 | 81 else |
pankso@116 | 82 gettext "You must be logged in to view the dashboard" |
pankso@116 | 83 fi |
pankso@100 | 84 html_footer && exit 0 |
pankso@82 | 85 fi |