free software resistance
the cost of computing freedom is eternal vigilance
### rpup04.fig
*original date:* dec 2018
*originally posted:* oct 2024
rpup04.fig:
```
#### license: creative commons cc0 1.0 (public domain)
#### http://creativecommons.org/publicdomain/zero/1.0/
proginf "mkrefractahrpup 0.4, 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
now urf iso
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
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
now "mkdir /mnt/mkrefpup/refracta" shell
now "mkdir /mnt/mkrefpup/refractafs" shell
now "mkdir /mnt/mkrefpup/newrefractafs" shell
now "cd /mnt/mkrefpup ; if [ -e logo.16 ] ; then echo ; else wget 'http://murga-linux.com/puppy/viewtopic.php?mode=attach&id=99819' -O logo.16 ; fi" shell
q 34 chr
now "mount " plus q plus pwd plus "/" plus urftahrurl plus q plus " /mnt/mkrefpup/iso -o loop" shell
now "mount " plus q plus pwd plus "/" plus urfrefractaurl plus q plus " /mnt/mkrefpup/refracta -o loop" shell
now "cp /mnt/mkrefpup/iso/* /mnt/mkrefpup/newiso" shell
# now "cp /mnt/mkrefpup/refracta/live/vmlinuz /mnt/mkrefpup/newiso" shell
# now "cp /mnt/mkrefpup/refracta/live/initrd.img /mnt/mkrefpup/newiso/initrd.gz" shell
now "mkdir /mnt/mkrefpup/newiso/live" shell
now "cp /mnt/mkrefpup/refracta/live/vmlinuz /mnt/mkrefpup/newiso/live" shell
now "cp /mnt/mkrefpup/refracta/live/initrd.img /mnt/mkrefpup/newiso/live/" shell
# now "cp /mnt/mkrefpup/refracta/live/filesystem.squashfs /mnt/mkrefpup/newiso/live" shell
now "cat /mnt/mkrefpup/refracta/isolinux/live.cfg >> /mnt/mkrefpup/newiso/isolinux.cfg" shell
now "/mnt/mkrefpup/unsq" chdir
now "unsquashfs /mnt/mkrefpup/iso/puppy_tahr_6.0.5.sfs" shell
now "/mnt/mkrefpup/refractafs" chdir
now "unsquashfs /mnt/mkrefpup/refracta/live/filesystem.squashfs" shell
now "cp /mnt/mkrefpup/unsq/squashfs-root/usr/share/backgrounds/default.png /mnt/mkrefpup/refractafs/squashfs-root/usr/share/backgrounds/xfce" shell
now "sed -i 's/\/usr\/share\/backgrounds\/refracta\/milky-1280x1024-p4-redo.jpg/\/usr\/share\/backgrounds\/xfce\/default.png/g' "
nowplus now plus " /mnt/mkrefpup/refractafs/squashfs-root/home/user/.config/xfce4/xfconf/xfce-perchannel-xml/xfce4-desktop.xml" shell
now "/mnt/mkrefpup/unsq/squashfs-root/usr/share/" chdir
now "mkdir fig ; cd fig ; if [ -e fig31_1.0.deb ] ; then echo ; else wget http://distro.ibiblio.org/refracta/files/extra_packages/fig31_1.0.deb ; fi" 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/refractafs/squashfs-root" chdir
now "mksquashfs . /mnt/mkrefpup/newiso/live/filesystem.squashfs -noappend" shell
now "/mnt/mkrefpup/newiso" chdir
now "rm logo.16 ; cp /mnt/mkrefpup/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
```
license: 0-clause bsd
```
# 2018 mn
#
# Permission to use, copy, modify, and/or distribute this software for any
# purpose with or without fee is hereby granted.
#
# THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
# WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
# MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
# ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
# WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
# ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
# OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
```
=> https://freesoftwareresistance.neocities.org