Fri Jul 15, 2016 6:26 am
#### license: creative commons cc0 1.0 (public domain)
#### http://creativecommons.org/publicdomain/zero/1.0/
proginf "mkrefractahrpup 0.1, jul 2016 mn" print
function addquoted mainv toquote
q 34 chr
now mainv plus " " plus q plus toquote plus q return now
fig
function urf p
# filename from url
# ... return whats to the right of the rightmost "/" (or entire string if "/" not found)
r p reverse instr r "/" minus 1
ifmore r 0
now p right r return now
else
now p return now
fig
fig
function download iso
now iso print
now urf iso print
u urf iso
ck "ls" addquoted ck u plus " | wc -l" arrshell join ck " " int
ifequal ck 0
now "wget" addquoted now iso shell
fig
fig
pwd "pwd" arrshell join pwd ""
tahrurl "http://distro.ibiblio.org/puppylinux/puppy-tahr/iso/tahrpup%20-6.0-CE/tahr-6.0.5_PAE.iso"
refractaurl "http://downloads.sourceforge.net/project/refracta/testing/refracta8_xfce_i386_beta-20160526_1442.iso?r=&ts=1468558237&use_mirror=netassist"
urftahrurl urf tahrurl
urfrefractaurl urf refractaurl
now download tahrurl
now download refractaurl
fpath pwd plus "/" plus urfrefractaurl
now "ln -s " addquoted now fpath addquoted now "refracta8_xfce_i386_beta-20160526_1442.iso" plus " 2> /dev/null" shell
shel "du -b refr*.iso*"
now "hello" addquoted now shel colortext 7 print
now "mkdir /mnt/mkrefpup" shell
now "mkdir /mnt/mkrefpup/iso" shell
now "mkdir /mnt/mkrefpup/newiso" shell
now "mkdir /mnt/mkrefpup/fs" shell
now "mkdir /mnt/mkrefpup/newfs" shell
now "mkdir /mnt/mkrefpup/unsq" shell
q 34 chr
now "mount " plus q plus pwd plus "/" plus urftahrurl plus q plus " /mnt/mkrefpup/iso -o loop" shell
now "cp /mnt/mkrefpup/iso/* /mnt/mkrefpup/newiso" shell
now "/mnt/mkrefpup/unsq" chdir
now "unsquashfs /mnt/mkrefpup/iso/puppy_tahr_6.0.5.sfs" shell
now "/mnt/mkrefpup/unsq/squashfs-root/usr/share/" chdir
now "mkdir fig ; cd fig ; wget http://distro.ibiblio.org/refracta/files/extra_packages/fig31_1.0.deb" shell
now "/mnt/mkrefpup/unsq/squashfs-root" chdir
now "mksquashfs . /mnt/mkrefpup/newfs/new.sfs -noappend ; cp /mnt/mkrefpup/newfs/new.sfs /mnt/mkrefpup/newiso/puppy_tahr_6.0.5.sfs" shell
now "/mnt/mkrefpup/newiso" chdir
now "rm logo.16 ; wget " plus q plus "http://murga-linux.com/puppy/viewtopic.php?mode=attach&id=99819" plus q plus " -O logo.16" shell
now "genisoimage -b isolinux.bin -c boot.cat -no-emul-boot -boot-load-size 4 -boot-info-table -r -J -l -o /mnt/mkrefpup/unsq/rpup.iso /mnt/mkrefpup/newiso/" shell
Fri Jul 22, 2016 9:17 pm
Fri Jul 22, 2016 10:41 pm
Sat Jul 23, 2016 6:39 am
Your script is outdated already - here's the new link:
https://sourceforge.net/projects/refrac ... 2_1444.iso
fsmithred wrote:Interesting concept. I always make multiboot usb drives, but with this, you could make a multiboot optical disk. Truly read-only.
I like the icewm on refracta - it reminds me of an older version, maybe 605 or so. But it lacks some configuration items - shutdown/reboot, and more important, menu items - I think there's a way to add the debian menu to the icewm menu
Sat Jul 23, 2016 10:27 am
7e5f9391ba703f44db91d08f4ea9260a
Sat Jul 23, 2016 1:44 pm
#!/usr/bin/env bash
# quit-dialog-form
yad --title="Exit Choices" --form --columns 2 --separator " " \
--field "Lock Screen"\!"lock.png:BTN" \
--field "Reboot"\!"gtk-refresh:BTN" \
--field "Hibernate"\!"gnome-session-hibernate:BTN" \
--field "Logout"\!"application-exit:BTN" \
--field "Shutdown"\!"system-shutdown:BTN" \
--field "Suspend"\!"gnome-session-suspend:BTN" \
'xscreensaver-command -lock' \
'sudo /sbin/reboot' \
'sudo /usr/sbin/pm-hibernate' \
'xfce4-session-logout --logout' \
'sudo /sbin/halt' \
'sudo /usr/sbin/pm-suspend' \
--button=Cancel:0
exit 0
# Logout commands
#
# xfce4-session-logout --logout
# openbox --exit
# pkill -u $USER
#
Sat Jul 23, 2016 3:35 pm