slitaz-tools annotate tinyutils/subox @ rev 445
gettextize subox and scpbox
| author | Christophe Lincoln <pankso@slitaz.org> |
|---|---|
| date | Sat Mar 20 01:02:21 2010 +0100 (2010-03-20) |
| parents | 8ec105954ae9 |
| children | 4fd7d6aa39f3 |
| rev | line source |
|---|---|
| pankso@445 | 1 #!/bin/sh |
| pankso@35 | 2 # |
| pankso@35 | 3 # Gtkdialog to execute program as root from a WM menu. |
| pankso@445 | 4 # (c) SliTaz GNU/Linux 2008-2010 - GNU gpl. |
| pankso@35 | 5 # |
| pankso@445 | 6 VERSION=20100314 |
| 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 |
| pankso@445 | 16 test $(id -u) = 0 && exec $@ |
| pankso@445 | 17 |
| pankso@445 | 18 # Include gettext helper script. |
| pankso@445 | 19 . /usr/bin/gettext.sh |
| pankso@445 | 20 |
| pankso@445 | 21 # Export package name for gettext. |
| pankso@445 | 22 TEXTDOMAIN='subox' |
| pankso@445 | 23 export TEXTDOMAIN |
| pascal@206 | 24 |
| pankso@387 | 25 # Keep command in an exported variable to be used by SU_DIALOG. |
| pankso@387 | 26 export SU_CMD=$@ |
| pankso@35 | 27 |
| MikeDSmith25@252 | 28 # Main window and root password default entry set to 'root'. |
| pankso@35 | 29 export SU_DIALOG=' |
| pankso@445 | 30 <window title="Subox" skip_taskbar_hint="true"> |
| pankso@445 | 31 <vbox> |
| pankso@387 | 32 |
| pankso@445 | 33 <text use-markup="true"> |
| pankso@445 | 34 <label>" |
| pankso@35 | 35 <b>SliTaz - Subox</b>" |
| pankso@445 | 36 </label> |
| pankso@445 | 37 </text> |
| pankso@445 | 38 <text wrap="true" width-chars="64"> |
| pankso@445 | 39 <label>"'`gettext " |
| pankso@445 | 40 Please enter root password (default root) to execute :"`' '$1' |
| pankso@445 | 41 " |
| pankso@445 | 42 </label> |
| pankso@445 | 43 </text> |
| pankso@445 | 44 |
| pankso@445 | 45 <hbox> |
| pankso@445 | 46 <text use-markup="true"> |
| pankso@445 | 47 <label>"'`gettext "<b>Administrator password :</b>"`'"</label> |
| pankso@445 | 48 </text> |
| pankso@445 | 49 <entry visibility="false"> |
| pankso@445 | 50 <variable>PASSWD</variable> |
| pankso@445 | 51 </entry> |
| pankso@445 | 52 </hbox> |
| pankso@445 | 53 |
| pankso@445 | 54 <hbox> |
| pankso@445 | 55 <button ok> |
| pankso@445 | 56 <action>echo $PASSWD | su -c "$SU_CMD" &</action> |
| pankso@445 | 57 <action type="closewindow">SU_DIALOG</action> |
| pankso@445 | 58 </button> |
| pankso@445 | 59 <button cancel></button> |
| pankso@445 | 60 </hbox> |
| pankso@387 | 61 |
| pankso@445 | 62 </vbox> |
| pankso@445 | 63 </window>' |
| pankso@35 | 64 |
| pankso@36 | 65 gtkdialog --center --program=SU_DIALOG |
| pankso@445 | 66 |
| pankso@387 | 67 exit 0 |