tazbug annotate web/plugins/dashboard/dashboard.cgi @ rev 123
Use new admin config and up users plugins from TinyCM
| author | Christophe Lincoln <pankso@slitaz.org> |
|---|---|
| date | Tue Feb 21 00:51:31 2017 +0100 (2017-02-21) |
| parents | b19dbd851223 |
| children | f07cd117feed |
| 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 bugs=$(ls -1 $bugdir | wc -l) |
| pankso@100 | 16 bugsize=$(du -sh $bugdir | awk '{print $1}') |
| pankso@100 | 17 # Source all plugins.conf to get DASHBOARD_TOOLS and ADMIN_TOOLS |
| pankso@100 | 18 ADMIN_TOOLS="" |
| pankso@100 | 19 DASHBOARD_TOOLS="" |
| pankso@100 | 20 for p in $(ls $plugins) |
| pankso@100 | 21 do |
| pankso@100 | 22 . $plugins/$p/$p.conf |
| pankso@100 | 23 done |
| pankso@100 | 24 if check_auth && ! admin_user; then |
| pankso@67 | 25 ADMIN_TOOLS="" |
| pankso@100 | 26 fi |
| pankso@116 | 27 if check_auth; then |
| pankso@116 | 28 cat << EOT |
| pankso@65 | 29 <div id="tools"> |
| pankso@66 | 30 $DASHBOARD_TOOLS $ADMIN_TOOLS |
| pankso@65 | 31 </div> |
| pankso@123 | 32 <h2>Dashboard</h2> |
| pankso@49 | 33 <pre> |
| pankso@116 | 34 Bugs count : $bugs |
| pankso@116 | 35 Database size : $bugsize |
| pankso@116 | 36 Server uptime :$(uptime | cut -d "," -f 1-2) |
| pankso@49 | 37 </pre> |
| pankso@49 | 38 EOT |
| pankso@123 | 39 |
| pankso@116 | 40 # Only for admins |
| pankso@116 | 41 if check_auth && admin_user; then |
| pankso@116 | 42 # List all plugins |
| pankso@116 | 43 cat << EOT |
| pankso@123 | 44 <h3>$(gettext "Plugins:") $(ls $plugins | wc -l)</h3> |
| pankso@123 | 45 <div id="plugins"> |
| pankso@123 | 46 <table> |
| pankso@123 | 47 <thead> |
| pankso@123 | 48 <td>$(gettext "Name")</td> |
| pankso@123 | 49 <td>$(gettext "Description")</td> |
| pankso@123 | 50 <td>$(gettext "Action")</td> |
| pankso@123 | 51 </thead> |
| pankso@99 | 52 EOT |
| pankso@116 | 53 for p in $(ls -1 $plugins) |
| pankso@116 | 54 do |
| pankso@116 | 55 . $plugins/$p/$p.conf |
| pankso@116 | 56 cat << EOT |
| pankso@123 | 57 <tr> |
| pankso@123 | 58 <td><a href='?$p'>$PLUGIN</a></td> |
| pankso@123 | 59 <td>$SHORT_DESC</td> |
| pankso@123 | 60 <td>TODO</td> |
| pankso@123 | 61 </tr> |
| pankso@116 | 62 EOT |
| pankso@116 | 63 done |
| pankso@123 | 64 echo "</table></div>" |
| pankso@100 | 65 fi |
| pankso@116 | 66 else |
| pankso@116 | 67 gettext "You must be logged in to view the dashboard" |
| pankso@116 | 68 fi |
| pankso@100 | 69 html_footer && exit 0 |
| pankso@82 | 70 fi |