Changeset 36708
- Timestamp:
- 05/12/08 20:27:25 (7 months ago)
- Location:
- trunk/base/src/port1.0
- Files:
-
- 2 modified
-
portextract.tcl (modified) (2 diffs)
-
portfetch.tcl (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/base/src/port1.0/portextract.tcl
r31028 r36708 59 59 60 60 proc extract_init {args} { 61 global extract.only extract.dir extract.cmd extract.pre_args extract.post_args extract.mkdir distfiles use_bzip2 use_zip workpath61 global extract.only extract.dir extract.cmd extract.pre_args extract.post_args extract.mkdir distfiles use_bzip2 use_zip use_dmg workpath 62 62 63 63 # should the distfiles be extracted to worksrcpath instead? … … 75 75 option extract.pre_args -q 76 76 option extract.post_args "-d [option extract.dir]" 77 } elseif {[tbool use_dmg]} { 78 global worksrcdir 79 set dmg_tmp_dir [exec mktemp -d -q "/tmp/mports.XXXXXXXX"] 80 set dmg_mount ${dmg_tmp_dir}/${worksrcdir} 81 file mkdir ${dmg_mount} 82 option extract.cmd [binaryInPath "hdiutil"] 83 option extract.pre_args attach 84 option extract.post_args "-private -readonly -nobrowse -mountpoint ${dmg_mount} && [binaryInPath "cp"] -Rp ${dmg_mount} ${extract.dir} && ${extract.cmd} detach ${dmg_mount} && [binaryInPath "rmdir"] ${dmg_mount} ${dmg_tmp_dir}" 77 85 } 78 86 } -
trunk/base/src/port1.0/portfetch.tcl
r36688 r36708 42 42 43 43 # define options: distname master_sites 44 options master_sites patch_sites extract.suffix distfiles patchfiles use_zip use_bzip2 dist_subdir \44 options master_sites patch_sites extract.suffix distfiles patchfiles use_zip use_bzip2 use_dmg dist_subdir \ 45 45 fetch.type fetch.user fetch.password fetch.use_epsv fetch.ignore_sslcert \ 46 46 master_sites.mirror_subdir patch_sites.mirror_subdir portname \ … … 99 99 option_proc use_bzip2 fix_extract_suffix 100 100 option_proc use_zip fix_extract_suffix 101 option_proc use_dmg fix_extract_suffix 101 102 102 103 proc fix_extract_suffix {option action args} { … … 110 111 set extract.suffix .zip 111 112 } 113 use_dmg { 114 set extract.suffix .dmg 115 } 112 116 } 113 117 } … … 120 124 set_ui_prefix 121 125 122 # Given a distname, return a suffix based on the use_zip / use_bzip2 / extract.suffix options126 # Given a distname, return a suffix based on the use_zip / use_bzip2 / use_dmg / extract.suffix options 123 127 proc suffix {distname} { 124 128 global extract.suffix fetch.type

