Apple-2-SW/a2d
1
0
Fork 0
mirror of https://github.com/mi57730/a2d.git synced 2025-02-15 13:32:06 +00:00
Code Issues Projects Releases Wiki Activity

Generate package with Title.Cased DA names. Fixes #124

Browse Source
This commit is contained in:
Joshua Bell 2019-02-03 12:46:42 -08:00
parent 101549d7dd
commit 30b80ac253
1 changed files with 21 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
res/package.sh
View File

@ -7,29 +7,29 @@ set -e
CADIUS="${CADIUS:-$HOME/dev/cadius/bin/release/cadius}" CADIUS="${CADIUS:-$HOME/dev/cadius/bin/release/cadius}"
DAS=$(cat desk.acc/TARGETS) DA_DIRS="desk.acc preview"
PRS=$(cat preview/TARGETS)
PACKDIR="out/package" PACKDIR="out/package"
FINFO="$PACKDIR/_FileInformation.txt" FINFO="$PACKDIR/_FileInformation.txt"
IMGFILE="out/A2DeskTop.po" IMGFILE="out/A2DeskTop.po"
VOLNAME="A2.DeskTop" VOLNAME="A2.DeskTop"
function titlecase {
echo "$@" | perl -pne 's/(^(.)|\.(.))/uc($1)/eg'
}
mkdir -p "$PACKDIR" mkdir -p "$PACKDIR"
echo "" > "$FINFO" echo "" > "$FINFO"
# Prepare _FileInformation.txt file with extra ProDOS file entry data # Prepare _FileInformation.txt file with extra ProDOS file entry data
# and copy renamed files into package directory. # and copy renamed files into package directory.
for file in $DAS; do for da_dir in $DA_DIRS; do
ucfile=$(echo $file | tr a-z A-Z) for file in $(cat $da_dir/TARGETS); do
echo "$ucfile=Type(F1),AuxType(0640),VersionCreate(00),MinVersion(00),Access(E3),FolderInfo1(000000000000000000000000000000000000),FolderInfo2(000000000000000000000000000000000000)" >> "$FINFO" tcfile=$(titlecase $file)
cp "desk.acc/out/$file.built" "out/package/$ucfile" echo "$tcfile=Type(F1),AuxType(0640),VersionCreate(00),MinVersion(00),Access(E3),FolderInfo1(000000000000000000000000000000000000),FolderInfo2(000000000000000000000000000000000000)" >> "$FINFO"
done cp "$da_dir/out/$file.built" "out/package/$tcfile"
for file in $PRS; do done
ucfile=$(echo $file | tr a-z A-Z)
echo "$ucfile=Type(F1),AuxType(0640),VersionCreate(00),MinVersion(00),Access(E3),FolderInfo1(000000000000000000000000000000000000),FolderInfo2(000000000000000000000000000000000000)" >> "$FINFO"
cp "preview/out/$file.built" "out/package/$ucfile"
done done
cat >> "$FINFO" <<EOF cat >> "$FINFO" <<EOF
@ -42,22 +42,21 @@ cp "desktop/out/DESKTOP2.built" "$PACKDIR/DeskTop2"
# Create a new disk image. # Create a new disk image.
rm -f $IMGFILE
$CADIUS CREATEVOLUME $IMGFILE $VOLNAME 800KB $CADIUS CREATEVOLUME $IMGFILE $VOLNAME 800KB
$CADIUS CREATEFOLDER $IMGFILE "/$VOLNAME/Desk.Acc" for da_dir in $DA_DIRS; do
$CADIUS CREATEFOLDER $IMGFILE "/$VOLNAME/Preview" $CADIUS CREATEFOLDER $IMGFILE "/$VOLNAME/$(titlecase $da_dir)"
done
# Add the files into the disk image. # Add the files into the disk image.
for file in $DAS; do for da_dir in $DA_DIRS; do
ucfile=$(echo $file | tr a-z A-Z) for file in $(cat $da_dir/TARGETS); do
$CADIUS ADDFILE $IMGFILE "/$VOLNAME/Desk.Acc" $PACKDIR/$ucfile $CADIUS ADDFILE $IMGFILE "/$VOLNAME/$(titlecase $da_dir)" "$PACKDIR/$(titlecase $file)"
done done
for file in $PRS; do
ucfile=$(echo $file | tr a-z A-Z)
$CADIUS ADDFILE $IMGFILE "/$VOLNAME/Preview" $PACKDIR/$ucfile
done done
for file in DeskTop.system DeskTop2; do for file in DeskTop.system DeskTop2; do
$CADIUS ADDFILE $IMGFILE "/$VOLNAME" $PACKDIR/$file $CADIUS ADDFILE $IMGFILE "/$VOLNAME" "$PACKDIR/$file"
done done