mksparkive.sh revision 1.4
1 #!/bin/sh 2 # 3 # Copyright (c) 2004 The NetBSD Foundation, Inc. 4 # All rights reserved. 5 # 6 # This code is derived from software contributed to The NetBSD Foundation 7 # by Gavan Fantom 8 # 9 # Redistribution and use in source and binary forms, with or without 10 # modification, are permitted provided that the following conditions 11 # are met: 12 # 1. Redistributions of source code must retain the above copyright 13 # notice, this list of conditions and the following disclaimer. 14 # 2. Redistributions in binary form must reproduce the above copyright 15 # notice, this list of conditions and the following disclaimer in the 16 # documentation and/or other materials provided with the distribution. 17 # 3. All advertising materials mentioning features or use of this software 18 # must display the following acknowledgement: 19 # This product includes software developed by the NetBSD 20 # Foundation, Inc. and its contributors. 21 # 4. Neither the name of The NetBSD Foundation nor the names of its 22 # contributors may be used to endorse or promote products derived 23 # from this software without specific prior written permission. 24 # 25 # THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 26 # ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 27 # TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 28 # PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 29 # BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 30 # CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 31 # SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 32 # INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 33 # CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 34 # ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 35 # POSSIBILITY OF SUCH DAMAGE. 36 # 37 38 # 39 # Creates a spark format archive. Some metadata is included, notably 40 # filetypes, but permissions are not. Filename translation is performed 41 # according to RISC OS conventions. 42 # 43 # This script is intended to provide sufficient functionality to create 44 # an archive for distribution of the NetBSD/acorn32 bootloader which can be 45 # used directly in RISC OS. 46 # 47 48 if [ -z "${TOOL_SPARKCRC}" ] 49 then 50 TOOL_SPARKCRC=sparkcrc 51 fi 52 53 # Target byte order is little endian. 54 55 print2() 56 { 57 lowbyte=`expr $1 % 256 | xargs printf %02x` 58 highbyte=`expr $1 / 256 | xargs printf %02x` 59 printf "\x$lowbyte\x$highbyte" 60 } 61 62 print4() 63 { 64 print2 `expr $1 % 65536` 65 print2 `expr $1 / 65536` 66 } 67 68 makeheader() 69 { 70 filename="$1" 71 statfilename="$2" 72 realfilename="$3" 73 filetype=`printf %03s "$4"` 74 compressed="$5" 75 # length is only passed to length4, so we don't need to worry about 76 # extracting only the length here. 77 length=`wc -c "$filename"` 78 eval `stat -s "$statfilename"` 79 # centiseconds since 1st Jan 1900 80 timestamp=`expr $st_mtime \* 100 + 220898880000` 81 lowtype=`echo "$filetype" | sed s/.//` 82 hightype=`echo "$filetype" | sed s/..\$//` 83 highdate=`expr $timestamp / 4294967296 | xargs printf %02x` 84 lowdate=`expr $timestamp % 4294967296` 85 86 # Header version number 87 if [ "$compressed" -ne 0 ] 88 then 89 printf \\xff 90 else 91 printf \\x82 92 fi 93 # Filename 94 printf %-13.13s "$realfilename" | tr " ." \\0/ 95 # Compressed file length 96 print4 $length 97 # File date stamp 98 print2 0 99 # File time stamp 100 print2 0 101 # CRC 102 if [ "$compressed" -ne 0 ] 103 then 104 print2 `${TOOL_SPARKCRC} $statfilename` 105 else 106 print2 `${TOOL_SPARKCRC} $filename` 107 fi 108 # Original file length 109 if [ "$compressed" -ne 0 ] 110 then 111 print4 $st_size 112 else 113 print4 $length 114 fi 115 # Load address (FFFtttdd) 116 printf \\x$highdate 117 printf \\x$lowtype 118 printf \\xf$hightype 119 printf \\xff 120 # Exec address (dddddddd) 121 print4 $lowdate 122 # Attributes 123 # Public read, owner read/write 124 print4 19 125 } 126 127 makearchive() 128 { 129 for file in "$@" 130 do 131 temp=`mktemp -t $progname` || exit 1 132 trap "rm -f $temp" 0 133 # Archive marker 134 printf \\x1a 135 if [ -f "$file" ] 136 then 137 case "$file" in 138 -*) echo "Invalid filename" >&2 139 exit 1 140 ;; 141 *,???) type=`echo "$file" | \ 142 sed "s/.*,\(...\)$/\1/"` 143 filename=`echo "$file" | \ 144 sed "s/,...$//"` 145 ;; 146 *) type=fff 147 filename="$file" 148 ;; 149 esac 150 # The compressed data in a sparkive is the output from 151 # compress, minus the two bytes of magic at the start. 152 # Compress also uses the top bit of the first byte 153 # to indicate its choice of algorithm. Spark doesn't 154 # understand that, so it must be stripped. 155 compress -c "$file" | tail -c +3 >"$temp" 156 size1=`wc -c "$file" | awk '{print $1}'` 157 size2=`wc -c "$temp" | awk '{print $1}'` 158 if [ $size1 -ge $size2 ] 159 then 160 makeheader "$temp" "$file" "$filename" "$type" 1 161 nbits=`dd if="$temp" bs=1 count=1 2>/dev/null| \ 162 od -t d1 | awk '{print $2}'` 163 if [ $nbits -ge 128 ] 164 then 165 nbits=`expr $nbits - 128` 166 fi 167 printf \\x`printf %02x $nbits` 168 tail -c +2 "$temp" 169 else 170 makeheader "$file" "$file" "$filename" "$type" 0 171 cat "$file" 172 fi 173 fi 174 if [ -d "$file" ] 175 then 176 ( 177 cd "$file" 178 makearchive `ls -A` >$temp 179 ) 180 if [ $? -ne 0 ] 181 then 182 exit 1 183 fi 184 makeheader "$temp" "$file" "$file" ddc 0 185 cat "$temp" 186 fi 187 rm -f "$temp" 188 done 189 190 # Archive marker 191 printf \\x1a 192 # Archive terminator 193 printf \\x00 194 } 195 196 if [ $# -eq 0 ] 197 then 198 echo "Usage: $progname filename" 199 echo "$name: Outputs an uncompressed sparkive to stdout." 200 fi 201 202 progname=`basename $0` 203 204 makearchive "$@" 205
Indexes created Mon Oct 20 08:09:54 GMT 2025