Subversion Repositories DevTools

Rev

Rev 425 | Rev 429 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 425 Rev 427
Line 44... Line 44...
44 
#                       SetFilePerms            - Set file permissions
 44 
#                       SetFilePerms            - Set file permissions
45 
#                       SetVerbose              - Control progress display
 45 
#                       SetVerbose              - Control progress display
46 
#                       IsProduct               - Flow control
 46 
#                       IsProduct               - Flow control
47 
#                       IsPlatform              - Flow control
 47 
#                       IsPlatform              - Flow control
48 
#                       IsTarget                - Flow control
 48 
#                       IsTarget                - Flow control
- 
 
 49 
#                       IsVariant               - Flow control
49 
#
 50 
#
50 
#                 Thoughts for expansion:
 51 
#                 Thoughts for expansion:
51 
#                       ConvertFile             - Option to convert file(s) to Unix Text
 52 
#                       ConvertFile             - Option to convert file(s) to Unix Text
52 
#                       ReplaceTags             - Replace Tags on target file
 53 
#                       ReplaceTags             - Replace Tags on target file
53 
#                       SrcDir                  - Extend path for resolving local files
 54 
#                       SrcDir                  - Extend path for resolving local files
Line 110... Line 111...
110 
my $opt_pkglibdir;
 111 
my $opt_pkglibdir;
111 
my $opt_pkgbindir;
 112 
my $opt_pkgbindir;
112 
my $opt_pkgpkgdir;
 113 
my $opt_pkgpkgdir;
113 
my $opt_output;
 114 
my $opt_output;
114 
my $opt_name;
 115 
my $opt_name;
- 
 
 116 
my $opt_variant;
115 
 
 117 
 
116 
#
 118 
#
117 
#   Options derived from script directives
 119 
#   Options derived from script directives
118 
#
 120 
#
119 
my $opt_control = '';
 121 
my $opt_control = '';
Line 168... Line 170...
168 
                "PackageDir=s"      => \$opt_pkgdir,
 170 
                "PackageDir=s"      => \$opt_pkgdir,
169 
                "PackageLibDir=s"   => \$opt_pkglibdir,
 171 
                "PackageLibDir=s"   => \$opt_pkglibdir,
170 
                "PackageBinDir=s"   => \$opt_pkgbindir,
 172 
                "PackageBinDir=s"   => \$opt_pkgbindir,
171 
                "PackagePkgDir=s"   => \$opt_pkgpkgdir,
 173 
                "PackagePkgDir=s"   => \$opt_pkgpkgdir,
172 
                "Output=s"          => \$opt_output,
 174 
                "Output=s"          => \$opt_output,
- 
 
 175 
                "Variant:s"         => \$opt_variant,
173 
                "Name=s"            => \$opt_name,
 176 
                "Name=s"            => \$opt_name,
174 
    );
 177 
    );
175 
 
 178 
 
176 
    $opt_verbose++ unless ( $opt_vargs eq '@' );
 179 
    $opt_verbose++ unless ( $opt_vargs eq '@' );
177 
 
 180 
 
Line 230... Line 233...
230 
    #   Display variables used
 233 
    #   Display variables used
231 
    #
 234 
    #
232 
    Message    "=Building Debian Package =============================================";
 235 
    Message    "=Building Debian Package =============================================";
233 
    Message    "Build $opt_name";
 236 
    Message    "Build $opt_name";
234 
    Message    "       Package: $opt_buildname";
 237 
    Message    "       Package: $opt_buildname";
- 
 
 238 
    Message    "       Variant: $opt_variant" if ($opt_variant);
235 
    Message    "       Version: $opt_buildversion";
 239 
    Message    "       Version: $opt_buildversion";
236 
    Message    "  Building for: $opt_platform, $opt_target";
 240 
    Message    "  Building for: $opt_platform, $opt_target";
237 
    Message    "       Product: $opt_product";
 241 
    Message    "       Product: $opt_product";
238 
    Message    "          Type: $opt_type";
 242 
    Message    "          Type: $opt_type";
239 
    Verbose    "       Verbose: $opt_verbose";
 243 
    Verbose    "       Verbose: $opt_verbose";
Line 1068... Line 1072...
1068 
 
 1072 
 
1069 
#-------------------------------------------------------------------------------
 1073 
#-------------------------------------------------------------------------------
1070 
# Function        : IsProduct
 1074 
# Function        : IsProduct
1071 
#                   IsPlatform
 1075 
#                   IsPlatform
1072 
#                   IsTarget
 1076 
#                   IsTarget
- 
 
 1077 
#                   IsVariant
1073 
#
 1078 
#
1074 
# Description     : This function allows some level of control in the
 1079 
# Description     : This function allows some level of control in the
1075 
#                   packaging scripts. It will return true if the current
 1080 
#                   packaging scripts. It will return true if the current
1076 
#                   product is listed.
 1081 
#                   product is listed.
1077 
#
 1082 
#
Line 1109... Line 1114...
1109 
        return 1 if ( $opt_target eq $_ );
 1114 
        return 1 if ( $opt_target eq $_ );
1110 
    }
 1115 
    }
1111 
    return 0;
 1116 
    return 0;
1112 
}
 1117 
}
1113 
 
 1118 
 
- 
 
 1119 
sub IsVariant
- 
 
 1120 
{
- 
 
 1121 
    foreach ( @_ )
- 
 
 1122 
    {
- 
 
 1123 
        return 1 if ( $opt_variant eq $_ );
- 
 
 1124 
    }
- 
 
 1125 
    return 0;
- 
 
 1126 
}
1114 
 
 1127 
 
1115 
#-------------------------------------------------------------------------------
 1128 
#-------------------------------------------------------------------------------
1116 
# Function        : FindFiles
 1129 
# Function        : FindFiles
1117 
#
 1130 
#
1118 
# Description     : Locate files within a given dir tree
 1131 
# Description     : Locate files within a given dir tree