Ignore:
Timestamp:
Jul 22, 2005, 9:45:55 PM (14 years ago)
Author:
pguyot (Paul Guyot)
Message:

porttrace now only reports dependencies that aren't listed in the Portfile.
I think it ignores variants for now.

Example:
[23:43]/<5>net/openvpn2(52)> sudo port -ft configure
---> Fetching openvpn2
---> Verifying checksum(s) for openvpn2
---> Extracting openvpn2
---> Configuring openvpn2
Warning: trace revealed an undeclared dependency on zlib

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/port1.0/portutil.tcl

    r13172 r13182  
    3636package require msgcat
    3737package require porttrace 1.0
     38package require darwinports 1.0
    3839
    3940global targets target_uniqid all_variants
     
    529530
    530531proc target_run {ditem} {
    531     global target_state_fd portpath portname portversion portrevision portvariants ports_force variations workpath ports_trace
     532    global target_state_fd portpath portname portversion portrevision portvariants ports_force variations workpath ports_trace PortInfo
    532533    set result 0
    533534    set skipped 0
     
    639640                        # Check dependencies.
    640641                        if {([info exists ports_trace] && $ports_trace == "yes")} {
    641                                 trace_check_deps {}
     642                                set deps_run {}
     643                                set deps_lib {}
     644                                set deps_build {}
     645
     646                                if {[info exists PortInfo(depends_run)]} {
     647                                        set deps_run $PortInfo(depends_run)
     648                                }
     649                                if {[info exists PortInfo(depends_lib)]} {
     650                                        set deps_lib $PortInfo(depends_lib)
     651                                }
     652                                if {[info exists PortInfo(depends_build)]} {
     653                                        set deps_lib $PortInfo(depends_build)
     654                                }
     655                                set target [ditem_key $ditem provides]
     656                                set deps {}
     657                                if {$target == "configure"} {
     658                                        set deps $deps_lib
     659                                } elseif {$target == "build"} {
     660                                        set deps $deps_lib
     661                                        lappend deps $deps_build
     662                                } elseif {$target == "destroot"} {
     663                                        set deps $deps_lib
     664                                        lappend deps $deps_build
     665                                        lappend deps $deps_run
     666                                } elseif {$target == "install"} {
     667                                        set deps $deps_lib
     668                                        lappend deps $deps_build
     669                                        lappend deps $deps_run
     670                                } elseif {$target == "package"} {
     671                                        set deps $deps_lib
     672                                        lappend deps $deps_build
     673                                        lappend deps $deps_run
     674                                }
     675                                # Dependencies are in the form verb:[param:]port
     676                                set depsPorts {}
     677                                foreach dep $deps {
     678                                        lappend depsPorts [lindex [split [lindex $dep 0] :] end]
     679                                }
     680                                trace_check_deps $depsPorts
    642681                        }
    643682
Note: See TracChangeset for help on using the changeset viewer.