Changeset 13500


Ignore:
Timestamp:
Aug 14, 2005, 7:21:47 AM (15 years ago)
Author:
pguyot (Paul Guyot)
Message:

Add support for bz2 compressed archives.

Bug: #4074
Submitted by: yves@
Reviewed by:
Approved by:
Obtained from:

Location:
trunk/base
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/doc/ports.conf.in

    r12159 r13500  
    3535# first archive to match one of the specified types in order is used.
    3636#
    37 # Supported types: tgz (default), tar, xar, zip, cpgz , cpio
     37# Supported types: tgz (default), tar, tbz, xar, zip, cpgz, cpio
    3838portarchivetype         tgz
    3939
  • trunk/base/src/package1.0/portarchive.tcl

    r9818 r13500  
    169169                        }
    170170                }
    171                 t(ar|gz) {
     171                t(ar|bz|gz) {
    172172                        set tar "tar"
    173173                        if {[catch {set tar [binaryInPath $tar]} errmsg] == 0} {
     
    176176                                set archive.pre_args {-cvf}
    177177                                if {[regexp {z$} ${archive.type}]} {
    178                                         set gzip "gzip"
     178                                        if {[regexp {bz$} ${archive.type}]} {
     179                                                set gzip "bzip2"
     180                                        } else {
     181                                                set gzip "gzip"
     182                                        }
    179183                                        if {[catch {set gzip [binaryInPath $gzip]} errmsg] == 0} {
    180184                                                ui_debug "Using $gzip"
  • trunk/base/src/package1.0/portunarchive.tcl

    r12656 r13500  
    189189                        }
    190190                }
    191                 t(ar|gz) {
     191                t(ar|bz|gz) {
    192192                        set tar "tar"
    193193                        if {[catch {set tar [binaryInPath $tar]} errmsg] == 0} {
     
    197197                                if {[regexp {z$} ${unarchive.type}]} {
    198198                                        set unarchive.args {-}
    199                                         set gzip "gzip"
     199                                        if {[regexp {bz$} ${unarchive.type}]} {
     200                                                set gzip "bzip2"
     201                                        } else {
     202                                                set gzip "gzip"
     203                                        }
    200204                                        if {[catch {set gzip [binaryInPath $gzip]} errmsg] == 0} {
    201205                                                ui_debug "Using $gzip"
  • trunk/base/src/port1.0/portutil.tcl

    r13490 r13500  
    12841284                        }
    12851285                }
    1286                 t(ar|gz) {
     1286                t(ar|bz|gz) {
    12871287                        set tar "tar"
    12881288                        if {[catch {set tar [binaryInPath $tar]} errmsg] == 0} {
    12891289                                if {[regexp {z$} $type]} {
    1290                                         set gzip "gzip"
     1290                                        if {[regexp {bz$} $type]} {
     1291                                                set gzip "bzip2"
     1292                                        } else {
     1293                                                set gzip "gzip"
     1294                                        }
    12911295                                        if {[catch {set gzip [binaryInPath $gzip]} errmsg] == 0} {
    12921296                                                return 0
Note: See TracChangeset for help on using the changeset viewer.