c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# CDDL HEADER START
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# The contents of this file are subject to the terms of the
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# Common Development and Distribution License (the "License").
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# You may not use this file except in compliance with the License.
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# or http://www.opensolaris.org/os/licensing.
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# See the License for the specific language governing permissions
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# and limitations under the License.
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# When distributing Covered Code, include this CDDL HEADER in each
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# file and include the License file at usr/src/OPENSOLARIS.LICENSE.
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# If applicable, add the following below this CDDL HEADER, with the
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# fields enclosed by brackets "[]" replaced with your own identifying
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# information: Portions Copyright [yyyy] [name of copyright owner]
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# CDDL HEADER END
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# Copyright 2007 Sun Microsystems, Inc. All rights reserved.
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# Use is subject to license terms.
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# ident "%Z%%M% %I% %E% SMI"
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# This test verifies that we can generate the correct ordering for
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# a given dependency specification. All files either have a dependency
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# on another file or are the dependent of another file. In this way we
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# guarantee consistent ordering as no nodes in the dependency graph will
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam# be isolated.
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamif [ $# != 1 ]; then
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam echo expected one argument: '<'dtrace-path'>'
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam exit 2
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamfi
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamtmpfile=/tmp/libdeporder.$$
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamlibdir=${TMPDIR:-/tmp}/libdep.$$
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamdtrace=$1
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamsetup_libs()
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam{
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam mkdir $libdir
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam cat > $libdir/liba.$$.d <<EOF
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#pragma D depends_on library libd.$$.d
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamEOF
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam cat > $libdir/libb.$$.d <<EOF
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamEOF
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam cat > $libdir/libc.$$.d <<EOF
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#pragma D depends_on library libe.$$.d
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamEOF
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam cat > $libdir/libd.$$.d <<EOF
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#pragma D depends_on library libb.$$.d
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamEOF
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam cat > $libdir/libe.$$.d <<EOF
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam#pragma D depends_on library liba.$$.d
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamEOF
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam}
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamsetup_libs
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamDTRACE_DEBUG=1 $dtrace -L$libdir -e >$tmpfile 2>&1
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamperl /dev/stdin $tmpfile <<EOF
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam @order = qw(libc libe liba libd libb);
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam while (<>) {
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam if (\$_ =~ /lib[a-e]\.[0-9]+.d/) {
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam \$pos = length \$_;
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam for (\$i=0; \$i<=1;\$i++) {
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam \$pos = rindex(\$_, "/", \$pos);
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam \$pos--;
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam }
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam push(@new, substr(\$_, \$pos+2, 4));
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam next;
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam }
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam next;
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam }
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam exit 1 if @new != @order;
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam while (@new) {
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam exit 1 if pop(@new) ne pop(@order);
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam }
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam exit 0;
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamEOF
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslam
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamstatus=$?
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamrm -rf $libdir
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamrm $tmpfile
c9d6cd77e4180c3831afde367c7eb129e72f0b2cjhaslamreturn $status