slitaz-tools annotate tinyutils/subox @ rev 393
Added tag 3.3 for changeset b27d8925b831
| author | Christophe Lincoln <pankso@slitaz.org> |
|---|---|
| date | Thu Oct 01 21:57:15 2009 +0200 (2009-10-01) |
| parents | f3862ca85e92 |
| children | 722e05609654 |
| rev | line source |
|---|---|
| pankso@35 | 1 #! /bin/sh |
| pankso@35 | 2 # |
| pankso@35 | 3 # Gtkdialog to execute program as root from a WM menu. |
| pankso@35 | 4 # - SliTaz GNU/Linux 2008. |
| pankso@35 | 5 # |
| pankso@35 | 6 VERSION=20080113 |
| pankso@35 | 7 |
| pankso@35 | 8 # Usage. |
| pankso@35 | 9 if [ -z "$1" ]; then |
| pankso@35 | 10 echo "Slitaz subox version : $VERSION" |
| pankso@35 | 11 echo -e "\nUsage : subox program\n" |
| pankso@35 | 12 exit 0 |
| pankso@35 | 13 fi |
| pankso@35 | 14 |
| pascal@206 | 15 # Nothing to do if we are root |
| pascal@206 | 16 test $(id -u) = 0 && exec $1 |
| pascal@206 | 17 |
| pankso@387 | 18 # Keep command in an exported variable to be used by SU_DIALOG. |
| pankso@387 | 19 export SU_CMD=$@ |
| pankso@35 | 20 |
| MikeDSmith25@252 | 21 # Main window and root password default entry set to 'root'. |
| pankso@35 | 22 export SU_DIALOG=' |
| pankso@38 | 23 <window title="Subox"> |
| pankso@35 | 24 <vbox> |
| pankso@387 | 25 |
| pankso@35 | 26 <text use-markup="true"> |
| pankso@387 | 27 <label>" |
| pankso@35 | 28 <b>SliTaz - Subox</b>" |
| pankso@35 | 29 </label> |
| pankso@35 | 30 </text> |
| pankso@387 | 31 <text wrap="true" width-chars="48"> |
| pankso@387 | 32 <label>" |
| pankso@35 | 33 Please enter root password to execute :" |
| pankso@35 | 34 </label> |
| pankso@35 | 35 </text> |
| pankso@35 | 36 <text> |
| pankso@387 | 37 <input>echo $SU_CMD</input> |
| pankso@35 | 38 </text> |
| pankso@387 | 39 |
| pankso@35 | 40 <hbox> |
| pankso@35 | 41 <text use-markup="true"> |
| pankso@35 | 42 <label>"<b>Root password :</b>"</label> |
| pankso@35 | 43 </text> |
| pankso@35 | 44 <entry visibility="false"> |
| pankso@35 | 45 <default>root</default> |
| pankso@35 | 46 <variable>PASSWD</variable> |
| pankso@35 | 47 </entry> |
| pankso@35 | 48 </hbox> |
| pankso@387 | 49 |
| pankso@35 | 50 <hbox> |
| pankso@35 | 51 <button ok> |
| pankso@387 | 52 <action>echo $PASSWD | su -c "$SU_CMD" &</action> |
| pankso@35 | 53 <action type="closewindow">SU_DIALOG</action> |
| pankso@35 | 54 </button> |
| pankso@35 | 55 <button cancel></button> |
| pankso@35 | 56 </hbox> |
| pankso@387 | 57 |
| pankso@35 | 58 </vbox> |
| pankso@38 | 59 </window> |
| pankso@35 | 60 ' |
| pankso@35 | 61 |
| pankso@36 | 62 gtkdialog --center --program=SU_DIALOG |
| pankso@387 | 63 exit 0 |