spk annotate spk-convert @ rev 112

moved pack to spk-convert for now.
author Christian Mesh <meshca@clarkson.edu>
date Sat Jun 09 15:48:33 2012 -0500 (2012-06-09)
parents dae62126a6a4
children 45434133a9df
rev   line source
meshca@110 1 #!/bin/sh
meshca@110 2 #
meshca@110 3 # Spk-convert - Convert other distrobution's packages to tazpkg form. Read the README before adding or
meshca@110 4 # modifing any code in spk!
meshca@110 5 #
meshca@110 6 # Copyright (C) SliTaz GNU/Linux - BSD License
meshca@110 7 # Author: See AUTHORS files
meshca@110 8 #
meshca@110 9 . /usr/lib/slitaz/libspk.sh
meshca@110 10
meshca@110 11 #
meshca@110 12 # Functions
meshca@110 13 #
meshca@110 14
meshca@110 15 # Help and usage
meshca@110 16 usage() {
meshca@110 17 name=$(basename $0)
meshca@110 18 cat << EOT
meshca@110 19
meshca@110 20 $(boldify $(gettext "Usage:")) $name [packages|--options]
meshca@110 21
meshca@110 22 $(gettext "Convert SliTaz Packages")
meshca@110 23
meshca@110 24 $(boldify $(gettext "Options:"))
meshca@110 25 --install $(gettext "Install package after conversion")
meshca@110 26 --root= $(gettext "Set the root file system path")
meshca@110 27 --debug $(gettext "Display some useful debug information")
meshca@110 28
meshca@110 29 $(boldify $(gettext "Examples:"))
meshca@110 30 $name package1.rpm package2.tgz packageN.ipk
meshca@110 31
meshca@110 32 EOT
meshca@110 33 exit 0
meshca@110 34 }
meshca@110 35
meshca@110 36 # Move tazpkg pack to shared lib?
meshca@110 37
meshca@110 38 # generate a receipt based on standard receipt vars
meshca@110 39 # Usage: generate_receipt $receipt $base_package
meshca@110 40 generate_receipt() {
meshca@110 41 local receipt=$1
meshca@110 42 local base_package=$2
meshca@110 43 cat > $receipt <<EOT
meshca@110 44 # SliTaz package receipt.
meshca@110 45 # generated by tazpkg from package $(basename $base_package)
meshca@110 46 PACKAGE="$PACKAGE"
meshca@110 47 VERSION="$VERSION"
meshca@110 48 CATEGORY="misc"
meshca@110 49 SHORT_DESC="$SHORT_DESC"
meshca@110 50 WEB_SITE="$WEB_SITE"
meshca@110 51 MAINTAINER="$MAINTAINER"
meshca@111 52 DEPENDS="$DEPENDS"
meshca@110 53 CONFIG_FILES="$CONFIG_FILES"
meshca@110 54 EOT
meshca@110 55
meshca@110 56 }
meshca@110 57
meshca@112 58 # Create SliTaz package archive using cpio and lzma.
meshca@112 59 # TODO: Cook also pack packages, we should share code in libpkg.sh
meshca@112 60 # Usage: pack $package
meshca@112 61 pack() {
meshca@112 62 local package=$1
meshca@112 63 local dir="$2"
meshca@112 64 local fs="$dir/fs"
meshca@112 65 local receipt="$dir/receipt"
meshca@112 66
meshca@112 67 if [ ! -f "$receipt" ]; then
meshca@112 68 gettext "Receipt is missing. Please read the documentation."; newline
meshca@112 69 exit 0
meshca@112 70 else
meshca@112 71 # cd $dir
meshca@112 72 newline
meshca@112 73 echo $(boldify "Packing :") $package
meshca@112 74 separator
meshca@112 75
meshca@112 76 # Create files.list with redirecting find outpout.
meshca@112 77 gettext "Creating the list of files..."
meshca@112 78 find $fs -type f -print > $dir/files.list
meshca@112 79 find $fs -type l -print >> $dir/files.list
meshca@112 80
meshca@112 81 status
meshca@112 82 gettext "Creating $CHECKSUM of files..."
meshca@112 83 local file
meshca@112 84 for file in $(cat $dir/files.list); do
meshca@112 85 [ -L "$fs$file" ] && continue
meshca@112 86 [ -f "$fs$file" ] || continue
meshca@112 87 case "$file" in
meshca@112 88 /lib/modules/*/modules.*|*.pyc) continue;;
meshca@112 89 esac
meshca@112 90 $CHECKSUM "$fs$file" | sed 's/ fs/ /' >> $dir/$CHECKSUM
meshca@112 91 done
meshca@112 92
meshca@112 93 status
meshca@112 94 UNPACKED_SIZE=$(du -chs $fs $receipt $dir/files.list $dir/$CHECKSUM \
meshca@112 95 $dir/description.txt 2> /dev/null | \
meshca@112 96 awk '{ sz=$1 } END { print sz }')
meshca@112 97
meshca@112 98 # Build cpio archives.
meshca@112 99 gettext "Compressing the fs... "
meshca@112 100 find $fs | cpio -o -H newc --quiet | lzma e $fs.cpio.lzma -si
meshca@112 101 rm -rf $fs
meshca@112 102 status
meshca@112 103
meshca@112 104 PACKED_SIZE=$(du -chs $fs.cpio.lzma $receipt $dir/files.list \
meshca@112 105 $dir/$CHECKSUM $dir/description.txt 2> /dev/null | \
meshca@112 106 awk '{ sz=$1 } END { print sz }')
meshca@112 107
meshca@112 108 gettext "Updating receipt sizes..."
meshca@112 109 sed -i s/^PACKED_SIZE.*$// $receipt
meshca@112 110 sed -i s/^UNPACKED_SIZE.*$// $receipt
meshca@112 111 sed -i "s/^PACKAGE=/PACKED_SIZE=\"$PACKED_SIZE\"\nUNPACKED_SIZE=\"$UNPACKED_SIZE\"\nPACKAGE=/" $receipt
meshca@112 112 status
meshca@112 113
meshca@112 114 gettext "Creating full cpio archive... "
meshca@112 115 find $dir -print | cpio -o -H newc --quiet > $dir.tazpkg
meshca@112 116 status
meshca@112 117
meshca@112 118 gettext "Restoring original package tree... "
meshca@112 119
meshca@112 120 unlzma -c $fs.cpio.lzma | cpio -idm --quiet $dir
meshca@112 121 status
meshca@112 122
meshca@112 123 rm $fs.cpio.lzma
meshca@112 124 separator
meshca@112 125 eval_gettext "Package \$package compressed successfully."; newline
meshca@112 126 echo $(gettext "Size") : $(du -sh $dir.tazpkg)
meshca@112 127 newline
meshca@112 128 fi
meshca@112 129 }
meshca@112 130
meshca@112 131
meshca@112 132
meshca@111 133 # search dependencies for files
meshca@111 134 # Usage: find_depends $fs
meshca@111 135 find_depends() {
meshca@111 136 local fs=$1
meshca@111 137
meshca@111 138 local DEFAULT_DEPENDS="glibc-base gcc-lib-base"
meshca@111 139
meshca@111 140 for chkfile in $(find $fs -type f); do
meshca@111 141 is_elf $chkfile || continue
meshca@111 142 case "$chkfile" in
meshca@111 143 *.o|*.ko|*.ko.gz) continue;;
meshca@111 144 esac
meshca@111 145
meshca@111 146 ldd $chkfile | \
meshca@111 147 while read lib rem; do
meshca@111 148 case "$lib" in
meshca@111 149 statically|linux-gate.so*|ld-*.so|*/ld-*.so)
meshca@111 150 continue;;
meshca@111 151 esac
meshca@111 152
meshca@111 153 find $fs | grep -q /$lib$ && continue
meshca@111 154
meshca@111 155 for dep in $(fgrep $lib files.list | cut -d: -f1); do
meshca@111 156 case " $DEFAULT_DEPENDS " in
meshca@111 157 *\ $dep\ *) continue 2;;
meshca@111 158 esac
meshca@111 159 grep -qs "^$dep$" $tmpdir/depends && continue 2
meshca@111 160 done
meshca@111 161
meshca@111 162 if [ -n "$dep" ]; then
meshca@111 163 echo "$dep" >> $tmpdir/depends
meshca@111 164 else
meshca@111 165 grep -qs ^$lib$ $tmpdir/unresolved ||
meshca@111 166 echo "$lib" >> $tmpdir/unresolved
meshca@111 167 fi
meshca@111 168 done
meshca@111 169 done
meshca@111 170 unset spc
meshca@111 171 local spc
meshca@111 172 for file in $(cat $tmpdir/depends 2> /dev/null | sort | uniq); do
meshca@111 173 echo -n "$spc$file"
meshca@111 174 spc=" "
meshca@111 175 done
meshca@111 176 }
meshca@111 177
meshca@111 178 show_unresolved_lib() {
meshca@111 179 local receipt=$1
meshca@111 180 if [ -s $tmpdir/unresolved ]; then
meshca@111 181 echo -e "BUGS=\"$(gettext 'No dependency for')" >> $receipt
meshca@111 182 for lib in $(cat $tmpdir/unresolved | sort | uniq); do
meshca@111 183 eval_gettext "WARNING: unknown dependency for \$lib"; newline
meshca@111 184 echo -n " $lib" >> $receipt
meshca@111 185 done
meshca@111 186 echo "\"" >> $receipt
meshca@111 187 fi
meshca@111 188 }
meshca@111 189
meshca@111 190
meshca@111 191
meshca@110 192 # convert a .ipk package to .tazpkg
meshca@110 193 # Usage: convert_ipk $package_file
meshca@110 194 convert_ipk() {
meshca@110 195 local package_file=$1
meshca@110 196
meshca@111 197 mkdir -p $tmpdir
meshca@111 198 tar xOzf $package_file ./control.tar.gz | tar xzf - -C $tmpdir
meshca@110 199
meshca@111 200 local control="$tmpdir/control"
meshca@110 201
meshca@110 202 # filter ipk control file for variable
meshca@110 203 # Usage: filter_vars $search_var
meshca@110 204 filter_vars() {
meshca@110 205 local var=$1
meshca@110 206 echo "$(grep ^$var $control | sed 's/.*: //')"
meshca@110 207 }
meshca@110 208
meshca@110 209 # Load up receipt template variables
meshca@110 210 PACKAGE=$(filter_vars "Package")
meshca@110 211 VERSION=$(filter_vars "Version")
meshca@110 212 MAINTAINER=$(filter_vars "Maintainer")
meshca@110 213 SHORT_DESC=$(filter_vars "Description")
meshca@110 214 WEB_SITE="http://openwrt.org/"
meshca@110 215
meshca@110 216 target=$(filter_vars "Architecture")
meshca@110 217 case "$target" in
meshca@110 218 i386|all)
meshca@110 219 local file="$PACKAGE-$VERSION"
meshca@111 220 local receipt="$tmpdir/$file/receipt"
meshca@111 221 local fs="$tmpdir/$file/fs"
meshca@110 222
meshca@110 223 mkdir -p $fs
meshca@110 224 tar xOzf $package_file ./data.tar.gz | tar xzf - -C $fs
meshca@110 225
meshca@110 226 unset CONFIG_FILES
meshca@111 227 [ -s $tmpdir/conffiles ] && $CONFIG_FILE=$(cat $tmpdir/conffiles)
meshca@110 228
meshca@111 229
meshca@111 230
meshca@111 231 DEPENDS=$(find_depends $fs)
meshca@110 232 generate_receipt $receipt $package_file
meshca@110 233
meshca@110 234 show_unresolved_lib $receipt
meshca@110 235
meshca@110 236 # Writes a ipk script to receipt function
meshca@110 237 # Usage: transpose_func $function_name $script
meshca@110 238 transpose_func() {
meshca@110 239 local func=$1
meshca@110 240 local script=$2
meshca@110 241 if [ -s $script ]; then
meshca@110 242 cat >> $receipt << EOT
meshca@110 243 $func()
meshca@110 244 {
meshca@110 245 $(cat $script)
meshca@110 246 }
meshca@110 247 EOT
meshca@111 248 fi
meshca@110 249 }
meshca@110 250
meshca@110 251 # read functions into receipt
meshca@111 252 transpose_func pre_install $tmpdir/preinst
meshca@111 253 transpose_func post_install $tmpdir/postinst
meshca@111 254 transpose_func pre_remove $tmpdir/prerm
meshca@111 255 transpose_func post_remove $tmpdir/postrm
meshca@110 256
meshca@110 257 [ -z "$SHORT_DESC" ] || echo $SHORT_DESC > $file/description.txt
meshca@110 258
meshca@112 259 pack $PACKAGE $file
meshca@110 260
meshca@111 261 mv $tmpdir/$file.tazpkg .
meshca@110 262 ;;
meshca@110 263 *)
meshca@110 264 gettext "Invalid target: $target (expected i386)"; newline
meshca@110 265 ;;
meshca@110 266 esac
meshca@110 267 unset_receipt
meshca@111 268 rm -rf $tmpdir
meshca@110 269 }
meshca@110 270
meshca@110 271 # convert a .pkg.tar.gz/.apk package to .tazpkg
meshca@110 272 # Usage: convert_arch $package_file
meshca@110 273 convert_arch() {
meshca@110 274 local package_file=$1
meshca@110 275
meshca@110 276 # Extract
meshca@111 277 local fs="$tmpdir/fs"
meshca@110 278 mkdir -p $fs
meshca@110 279 tar xzf $package_file -C $fs
meshca@110 280
meshca@110 281 local PKGINFO="$fs/.PKGINFO"
meshca@110 282 if [ -f $PKGINFO ]; then
meshca@110 283
meshca@110 284 # filter .PKGINFO file for variable
meshca@110 285 # Usage: filter_vars $search_var
meshca@110 286 filter_vars() {
meshca@110 287 local var=$1
meshca@110 288 echo $(grep ^$var $PKGINFO | sed 's/.*= //')
meshca@110 289 }
meshca@110 290
meshca@110 291 PACKAGE=$(filter_vars "pkgname")
meshca@110 292 VERSION=$(filter_vars "pkgver")
meshca@110 293 SHORT_DESC=$(filter_vars "pkgdesc")
meshca@110 294 WEB_SITE=$(filter_vars "url")
meshca@110 295 MAINTAINER=$(filter_vars "packager")
meshca@110 296
meshca@111 297 local file="$tmpdir/$package-$version"
meshca@110 298 local receipt="$file/receipt"
meshca@110 299
meshca@111 300 DEPENDS=$(find_depends $fs)
meshca@110 301 generate_receipt $receipt $package_file
meshca@110 302
meshca@110 303 mkdir $file
meshca@110 304 mv $fs $file
meshca@110 305
meshca@111 306 show_unresolved_lib $tmpdir/$file/receipt
meshca@110 307 rm -f $file/fs/.[A-Z]*
meshca@110 308
meshca@112 309 pack $PACKAGE $file
meshca@110 310
meshca@110 311 mv $file.tazpkg .
meshca@110 312 else
meshca@110 313 eval_gettext "\$package_file does not look like an Archlinux/Alpine package !"; newline
meshca@110 314 fi
meshca@110 315 unset_receipt
meshca@111 316 rm -rf $tmpdir
meshca@110 317 }
meshca@110 318
meshca@110 319 # convert a .tgz package to .tazpkg
meshca@110 320 # Usage: convert_tgz $package_file
meshca@110 321 convert_tgz() {
meshca@110 322 local package_file=$1
meshca@110 323 local package=$(basename $package_file)
meshca@110 324
meshca@110 325 # Set package to current args
meshca@110 326 IFS='-'
meshca@110 327 set -- $package
meshca@110 328 unset IFS
meshca@110 329
meshca@110 330 local PACKAGE=$1
meshca@110 331 local VERSION=$2
meshca@111 332 local file="$tmpdir/$PACKAGE-$VERSION"
meshca@110 333 local receipt="$file/receipt"
meshca@110 334 local fs="$file/fs"
meshca@110 335
meshca@110 336 # Extract package
meshca@110 337 mkdir -p $fs
meshca@110 338 tar xzf $package_file -C $fs
meshca@110 339
meshca@110 340 if [ -d $fs/install ]; then
meshca@110 341 # Set other receipt vars
meshca@110 342 SHORT_DESC=$(grep ^$PACKAGE $fs/install/slack-desc | \
meshca@110 343 head -1 | sed 's/.*(\(.*\)).*/\1/')
meshca@110 344 WEB_SITE="http://www.slackware.com/packages/"
meshca@110 345 MAINTAINER="nobody@slitaz.org"
meshca@110 346
meshca@111 347 DEPENDS=$(find_depends $fs)
meshca@110 348 generate_receipt $receipt $package_file
meshca@110 349
meshca@110 350 show_unresolved_lib $receipt
meshca@110 351
meshca@110 352 # post_install function from doinst.sh
meshca@110 353 if [ -f $fs/install/doinst.sh ]; then
meshca@110 354 cat >> $receipt <<EOM
meshca@110 355
meshca@110 356 post_install()
meshca@110 357 {
meshca@110 358 chroot \$1/ sh - << EOT
meshca@110 359 cd /
meshca@110 360 $(cat $fs/install/doinst.sh | sed -e 's/\\/\\\\/g' | sed -e 's/\$/\\$/g')
meshca@110 361 EOT
meshca@110 362 }
meshca@110 363 EOM
meshca@111 364 fi
meshca@111 365
meshca@110 366 # Get full description
meshca@110 367 if [ ! -z "$SHORT_DESC" ]; then
meshca@110 368 grep ^$PACKAGE $fs/install/slack-desc | \
meshca@110 369 sed "s/^$PACKAGE://" > $file/description.txt
meshca@110 370 fi
meshca@110 371
meshca@110 372 rm -rf $fs/install
meshca@110 373
meshca@112 374 pack $PACKAGE $file
meshca@110 375
meshca@110 376 mv $file.tazpkg .
meshca@110 377 else
meshca@110 378 eval_gettext "\$package_file does not look like a Slackware package !"; newline
meshca@110 379 fi
meshca@111 380 rm -rf $tmpdir
meshca@110 381 }
meshca@110 382
meshca@110 383 # convert a .deb package to .tazpkg
meshca@110 384 # Usage: convert_deb $package_file
meshca@110 385 convert_deb() {
meshca@111 386 local $package_file="$1"
meshca@110 387
meshca@110 388 # Extract deb control
meshca@111 389 mkdir -p $tmpdir
meshca@111 390 dpkg-deb -e $package_file $tmpdir
meshca@110 391
meshca@110 392
meshca@110 393 # filter control file for variable
meshca@110 394 # Usage: filter_vars $search_var
meshca@110 395 filter_vars() {
meshca@110 396 local var=$1
meshca@111 397 local result=$(grep '^ *$var:' $tmpdir/control)
meshca@110 398 echo ${result##*:}
meshca@110 399 }
meshca@110 400
meshca@110 401 PACKAGE=$(filter_vars "Package")
meshca@110 402 VERSION=$(filter_vars "Version")
meshca@110 403 SHORT_DESC=$(filter_vars "Description")
meshca@110 404 WEB_SITE="http://packages.debian.org/search?keywords=$PACKAGE"
meshca@110 405 MAINTAINER="nobody@slitaz.org"
meshca@111 406 target="$(grep ^Architecture $tmpdir/control | sed 's/.*: //')"
meshca@110 407
meshca@110 408 case "$target" in
meshca@110 409 i386|all)
meshca@111 410 local file="$tmpdir/$PACKAGE-$VERSION"
meshca@110 411 local receipt="$file/receipt"
meshca@110 412 local fs="$file/fs"
meshca@110 413
meshca@110 414 # Extract deb contents
meshca@110 415 mkdir -p $fs
meshca@110 416 dpkg-deb -x $package_file $fs
meshca@110 417
meshca@111 418 DEPENDS=$(find_depends $fs)
meshca@110 419 generate_receipt $receipt $package_file
meshca@111 420
meshca@111 421 if [ -s $tmpdir/conffiles ]; then
meshca@110 422 cat >> $receipt <<EOT
meshca@111 423 CONFIG_FILES="$(cat $tmpdir/conffiles)"
meshca@110 424 EOT
meshca@110 425 fi
meshca@110 426
meshca@110 427 show_unresolved_lib $file/receipt
meshca@110 428
meshca@110 429 # Description.txt
meshca@110 430 [ -z "$SHORT_DESC" ] || echo "$SHORT_DESC" > $file/Description.txt
meshca@110 431
meshca@112 432 pack $PACKAGE $file
meshca@110 433
meshca@110 434 mv $file.tazpkg .
meshca@110 435 ;;
meshca@110 436 *)
meshca@110 437 gettext "Invalid target: $target (expected i386 or all)"; newline
meshca@110 438 ;;
meshca@110 439 esac
meshca@111 440 rm -rf $tmpdir
meshca@110 441 }
meshca@110 442
meshca@110 443 # convert a .rpm package to .tazpkg
meshca@110 444 # Usage: convert_rpm $package_file
meshca@110 445 convert_rpm() {
meshca@110 446 local package_file=$1
meshca@110 447
meshca@110 448 # Move package_file to tmp
meshca@111 449 mkdir -p $tmpdir
meshca@111 450 cp $package_file $tmpdir
meshca@111 451 package_file=$tmpdir/$(basename $package_file)
meshca@110 452
meshca@110 453 # filter package_file for variable
meshca@110 454 # Usage: filter_vars $search_var
meshca@110 455 filter_vars() {
meshca@110 456 local var=$1
meshca@110 457 echo $(rpm -qip $package_file | grep "^$var*" | awk '{print $3}')
meshca@110 458 }
meshca@110 459
meshca@110 460 PACKAGE=$(filter_vars "Name")
meshca@110 461 VERSION=$(filter_vars "Version")
meshca@110 462 SHORT_DESC=$(filter_vars "Summary")
meshca@110 463 WEB_SITE=$(filter_vars "URL")
meshca@111 464 if [ -z "$WEB_SITE" ]; then
meshca@110 465 WEB_SITE="http://rpmfind.net/linux/rpm2html/search.php?query=$PACKAGE"
meshca@110 466 fi
meshca@110 467 CATEGORY="misc";
meshca@110 468 MAINTAINER="nobody@slitaz.org";
meshca@110 469
meshca@110 470
meshca@111 471 local file="$tmpdir/$PACKAGE-$VERSION"
meshca@110 472 local receipt="$file/receipt"
meshca@110 473 local fs="$file/fs"
meshca@110 474
meshca@110 475 mkdir -p $fs
meshca@110 476
meshca@111 477 rpm -qip $package_file | \
meshca@110 478 grep "^Description*" -A 100 | \
meshca@110 479 grep -v "^Description*" > \
meshca@110 480 $file/description.txt
meshca@110 481
meshca@110 482 cd $fs
meshca@111 483 rpm2cpio $package_file | cpio -idm --quiet
meshca@110 484 cd - > /dev/null
meshca@110 485
meshca@111 486
meshca@111 487 DEPENDS=$(find_depends $fs)
meshca@111 488 generate_receipt $receipt $package_file
meshca@111 489
meshca@110 490 show_unresolved_lib $receipt
meshca@110 491
meshca@112 492 pack $PACKAGE $file
meshca@110 493
meshca@110 494 mv $file.tazpkg .
meshca@110 495
meshca@110 496 unset_receipt
meshca@111 497 rm -rf $tmpdir
meshca@110 498 }
meshca@110 499
meshca@110 500
meshca@110 501 #
meshca@110 502 # Commands and exit
meshca@110 503 #
meshca@110 504
meshca@110 505 case "$1" in
meshca@110 506 ""|*usage|*help) usage ;;
meshca@110 507 esac
meshca@110 508
meshca@110 509 #
meshca@110 510 # Handle packages: package package.tazpkg ... packageN packageN.tazpkg
meshca@110 511 #
meshca@110 512
meshca@110 513 check_root
meshca@110 514
meshca@110 515 for pkg in $@
meshca@110 516 do
meshca@110 517 if [ "$(dd if=$pkg bs=8 count=1 skip=1 2> /dev/null)" == "debian-b" ];
meshca@110 518 then
meshca@110 519 convert_deb $pkg
meshca@110 520 else
meshca@110 521 case "$pkg" in
meshca@110 522 *.deb|*.udeb)
meshca@110 523 convert_deb $pkg;;
meshca@110 524 *.rpm)
meshca@110 525 convert_rpm $pkg;;
meshca@110 526 *.tgz)
meshca@110 527 convert_tgz $pkg;;
meshca@110 528 *.apk|*.pkg.tar.gz)
meshca@110 529 convert_arch $pkg;;
meshca@110 530 *.ipk|*.opk)
meshca@110 531 convert_ipk $pkg;;
meshca@110 532 *)
meshca@110 533 gettext "Unsupported format"; newline;;
meshca@110 534 esac
meshca@110 535 fi
meshca@110 536 done
meshca@110 537
meshca@110 538 exit 0