tazlito annotate tazlito-wiz @ rev 254

Add tazlito-wiz - New GUI to create Live systems
author Christophe Lincoln <pankso@slitaz.org>
date Wed Mar 14 00:12:03 2012 +0100 (2012-03-14)
parents
children eccb6026959e
rev   line source
pankso@254 1 #!/bin/sh
pankso@254 2 #
pankso@254 3 # Live system creation wizard in GTK using Yad.
pankso@254 4 #
pankso@254 5 # Copyright (C) 2012 SliTaz GNU/Linux - GNU gpl v2
pankso@254 6 #
pankso@254 7 # Authors : Christophe Lincoln <pankso@slitaz.org>
pankso@254 8 #
pankso@254 9
pankso@254 10 width="560"
pankso@254 11 icon="/usr/share/pixmaps/slitaz-icon.png"
pankso@254 12 opts="--height=300 --width=$width --image=$icon
pankso@254 13 --image-on-top --window-icon=$icon --title=LiveWizard"
pankso@254 14 rel=$(cat /etc/slitaz-release)
pankso@254 15 [ "$rel" != "cooking" ] && rel=stable
pankso@254 16 live=/home/slitaz/$rel/live
pankso@254 17 db="/var/lib/tazpkg"
pankso@254 18 list="distro-packages.list"
pankso@254 19 distro="/home/slitaz/$rel/distro"
pankso@254 20 addfiles="$distro/addfiles"
pankso@254 21
pankso@254 22 # TazLito wizard is only for root.
pankso@254 23 if test $(id -u) != 0 ; then
pankso@254 24 exec tazbox su $0
pankso@254 25 exit 0
pankso@254 26 fi
pankso@254 27
pankso@254 28 # I18n
pankso@254 29 . /usr/bin/gettext.sh
pankso@254 30 TEXTDOMAIN='tazlito-wiz'
pankso@254 31 export TEXTDOMAIN
pankso@254 32
pankso@254 33 # Sanity check.
pankso@254 34 mkdir -p $live && cd $live
pankso@254 35 #rm -rf *
pankso@254 36
pankso@254 37 #
pankso@254 38 # Functions
pankso@254 39 #
pankso@254 40
pankso@254 41 progress() {
pankso@254 42 yad --progress --height="140" --width="$width" \
pankso@254 43 --image=$icon --image-on-top --window-icon=$icon \
pankso@254 44 --text="<b>$text</b>" --title="SliTaz Live progress" --auto-close
pankso@254 45 }
pankso@254 46
pankso@254 47 edit_list() {
pankso@254 48 text=$(gettext "Edit the distro packages list")
pankso@254 49 cat $live/$list | yad --list $opts --text="$text" \
pankso@254 50 --no-headers --print-all --separator="" \
pankso@254 51 --editable --column=0:TEXT > $live/list
pankso@254 52 mv -f $live/list $live/$list
pankso@254 53 }
pankso@254 54
pankso@254 55 # Start page GUI
pankso@254 56 start_main() {
pankso@254 57 text=$(gettext "SliTaz Live system creator wizard")
pankso@254 58 yad --form $opts --text="<b>$text</b>" \
pankso@254 59 --field="$(gettext "Distro name:")" \
pankso@254 60 --field="$(gettext "Based on:")":CB \
pankso@254 61 --button="TazPanel Live:2" \
pankso@254 62 --button="gtk-cancel:1" \
pankso@254 63 --button="gtk-ok:0" \
pankso@254 64 " " "core!gtkonly!justx!base"
pankso@254 65 }
pankso@254 66
pankso@254 67 # Start page handler
pankso@254 68 start() {
pankso@254 69 # Store box results
pankso@254 70 main=$(start_main)
pankso@254 71 # Deal with --button values
pankso@254 72 case $? in
pankso@254 73 1) exit 0 ;;
pankso@254 74 2) tazweb http://tazpanel:82/live.cgi && exit 0 ;;
pankso@254 75 *) continue ;;
pankso@254 76 esac
pankso@254 77 # Deal with $main values
pankso@254 78 text=$(gettext "Getting flavor file and packages list...")
pankso@254 79 (echo "30" && sleep 1
pankso@254 80 name=$(echo $main | cut -d "|" -f 1)
pankso@254 81 skel=$(echo $main | cut -d "|" -f 2)
pankso@254 82 echo "$skel" > $live/skel
pankso@254 83 echo "60"
pankso@254 84 [ "$name" ] || name="custom"
pankso@254 85 tazlito get-flavor $skel
pankso@254 86 echo "90" && sleep 1
pankso@254 87 sed -i s"/^ISO_NAME=.*/ISO_NAME=\"$name\"/" tazlito.conf
pankso@254 88 sed -i s"/^VOLUM_NAME=.*/VOLUM_NAME=\"SliTaz $name\"/" \
pankso@254 89 tazlito.conf) | progress
pankso@254 90 }
pankso@254 91
pankso@254 92 # Packages page GUI
pankso@254 93 pkgs_main() {
pankso@254 94 pkgs=$(cat $list | wc -l)
pankso@254 95 skel=$(cat $live/skel)
pankso@254 96 text=$(eval_gettext "Packages - The \$skel have \$pkgs packages")
pankso@254 97 yad --form $opts --text="<b>$text</b>" --separator=" " \
pankso@254 98 --field="$(gettext "Additionnal packages separate by space or one by line:")":TXT \
pankso@254 99 --button="$(gettext "Edit packages list"):2" \
pankso@254 100 --button="gtk-cancel:1" --button="gtk-ok:0"
pankso@254 101 }
pankso@254 102
pankso@254 103 # Packages page handler
pankso@254 104 pkgs() {
pankso@254 105 # Store box results
pankso@254 106 main=$(pkgs_main)
pankso@254 107 # Deal with --button values
pankso@254 108 case $? in
pankso@254 109 1) exit 0 ;;
pankso@254 110 2) edit_list ;;
pankso@254 111 *) continue ;;
pankso@254 112 esac
pankso@254 113 # Deal with $main values
pankso@254 114 for pkg in $(echo $main | sed s'/\\n//'g)
pankso@254 115 do
pankso@254 116 vers=$(fgrep "$pkg |" $db/packages.desc | awk '{print $3}')
pankso@254 117 if ! grep "^${pkg}$" $list; then
pankso@254 118 echo "$pkg-$vers" >> $list
pankso@254 119 fi
pankso@254 120 done
pankso@254 121 }
pankso@254 122
pankso@254 123 # Wallpaper page GUI
pankso@254 124 wallpaper_main() {
pankso@254 125 text=$(gettext "SliTaz desktop wallpaper")
pankso@254 126 yad --form $opts --text="<b>$text</b>" --separator="" \
pankso@254 127 --field="$(gettext "Wallpaper JPG image:")":FL
pankso@254 128 }
pankso@254 129
pankso@254 130 # Wallpaper page handler
pankso@254 131 wallpaper() {
pankso@254 132 # Store box results
pankso@254 133 main=$(wallpaper_main)
pankso@254 134 # Deal with --button values
pankso@254 135 case $? in
pankso@254 136 1) exit 0 ;;
pankso@254 137 *) continue ;;
pankso@254 138 esac
pankso@254 139 if echo "$main" | fgrep -q .jpg; then
pankso@254 140 mkdir -p $addfiles/rootfs/usr/share/images
pankso@254 141 cp -f $main $addfiles/rootfs/usr/share/images
pankso@254 142 fi
pankso@254 143 }
pankso@254 144
pankso@254 145 # Last page GUI
pankso@254 146 gen_distro_main() {
pankso@254 147 info=$(gettext "
pankso@254 148 Now it's time to generate the distro. Last chance to start over or stop. \
pankso@254 149 Creating a Live system use quiet a lot of resources and take some time.\n\n
pankso@254 150 Note you can still add some file to the SliTaz root filesystem or on the \
pankso@254 151 cdrom.")
pankso@254 152 text=$(gettext "<b>Generate the distribution</b>")
pankso@254 153 echo "$info" | yad --text-info $opts --text="$text" \
pankso@254 154 --wrap --margins=20
pankso@254 155 }
pankso@254 156
pankso@254 157 # Last page handler
pankso@254 158 gen_distro() {
pankso@254 159 # Store box results
pankso@254 160 main=$(gen_distro_main)
pankso@254 161 # Deal with --button values
pankso@254 162 case $? in
pankso@254 163 1) exit 0 ;;
pankso@254 164 *) echo -e "\n" | tazlito gen-distro 2>1 | yad \
pankso@254 165 --text-info $opts --tail \
pankso@254 166 --text="<b>$(gettext "Building the Live system...")</b>" ;;
pankso@254 167 esac
pankso@254 168 }
pankso@254 169
pankso@254 170 # Summary
pankso@254 171 summary() {
pankso@254 172 . tazlito.conf
pankso@254 173 iso_size=$(du -sh $distro/$ISO_NAME.iso | awk '{print $1}')
pankso@254 174 distro_size=$(du -sh $distro/rootfs | awk '{print $1}')
pankso@254 175 text="$(gettext "Live system summary")"
pankso@254 176 echo -e "\
pankso@254 177 $(gettext "Generated ISO ") \n$distro/$ISO_NAME.iso
pankso@254 178 $(gettext "Image size") \n$iso_size
pankso@254 179 $(gettext "Uncompressed size") \n$distro_size" | \
pankso@254 180 yad --list $opts --text="<b>$text</b>" \
pankso@254 181 --column="Information":0 --column="Value":1 \
pankso@254 182 --button="gtk-close":0
pankso@254 183 }
pankso@254 184
pankso@254 185 #
pankso@254 186 # Script commands
pankso@254 187 #
pankso@254 188
pankso@254 189 case "$1" in
pankso@254 190 usage)
pankso@254 191 echo "Usage: $(basename $0) [command]" ;;
pankso@254 192 *)
pankso@254 193 start
pankso@254 194 pkgs
pankso@254 195 wallpaper
pankso@254 196 gen_distro
pankso@254 197 summary ;;
pankso@254 198 esac
pankso@254 199
pankso@254 200 exit 0
pankso@254 201