Subversion Repositories DevTools

Rev

Rev 7388 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7388 Rev 7547
Line 98... Line 98...
98
my $opt_info;
98
my $opt_info;
99
my $opt_tarmode;
99
my $opt_tarmode;
100
my $opt_testArchive;
100
my $opt_testArchive;
101
my $opt_noBuild;
101
my $opt_noBuild;
102
my $opt_keepTemp;
102
my $opt_keepTemp;
103
 
103
my $opt_tarzip;
104
 
104
 
105
#
105
#
106
#   Structure to translate -archive=xxx option to archive variable
106
#   Structure to translate -archive=xxx option to archive variable
107
#   These are the various dpkg_archives known to JATS
107
#   These are the various dpkg_archives known to JATS
108
#
108
#
Line 129... Line 129...
129
#       This sub-routine is used to generate a consistent informational log
129
#       This sub-routine is used to generate a consistent informational log
130
#------------------------------------------------------------------------------
130
#------------------------------------------------------------------------------
131
{
131
{
132
    my ($opr, $file) = @_;
132
    my ($opr, $file) = @_;
133
 
133
 
-
 
134
    # Shorten the display by using symbolic pathnames where possible
134
    $file =~ s/\Q$DPKG_DIR\E/PKGDIR/;
135
    $file =~ s/\Q$DPKG_DIR\E/PKGDIR/;
135
    $file =~ s/\Q$DPKG_ROOT\E/DPKG/;
136
    $file =~ s/\Q$DPKG_ROOT\E/DPKG/;
136
    $file =~ s/\Q$SRC_ROOT\E/PKG/;
137
    $file =~ s/\Q$SRC_ROOT\E/PKG/;
137
    $file =~ s/\Q$CWD_DIR\E/CWD/;
138
    $file =~ s/\Q$CWD_DIR\E/CWD/;
138
 
139
 
Line 267... Line 268...
267
                'info!'         => \$opt_info,              # [no]flag
268
                'info!'         => \$opt_info,              # [no]flag
268
                'tarmode!'      => \$opt_tarmode,           # [no]flag
269
                'tarmode!'      => \$opt_tarmode,           # [no]flag
269
                'testArchive'   => \$opt_testArchive,       # [no]flag
270
                'testArchive'   => \$opt_testArchive,       # [no]flag
270
                'nobuild'       => \$opt_noBuild,           # flag
271
                'nobuild'       => \$opt_noBuild,           # flag
271
                'keepTemp'      => \$opt_keepTemp,          # flag
272
                'keepTemp'      => \$opt_keepTemp,          # flag
-
 
273
                'tarzip'        => \$opt_tarzip,            # flag
272
                );
274
                );
273
 
275
 
274
 
276
 
275
    #
277
    #
276
    #   Process help and manual options
278
    #   Process help and manual options
Line 290... Line 292...
290
    {
292
    {
291
       Verbose ("Program: $PROGNAME");
293
       Verbose ("Program: $PROGNAME");
292
       Verbose ("Version: $VERSION");
294
       Verbose ("Version: $VERSION");
293
    }
295
    }
294
 
296
 
-
 
297
    Error ("-tarmode and -tarzip are mutually exclusive") if ($opt_tarmode && $opt_tarzip);
-
 
298
    Error ("-test and -tarzip are mutually exclusive") if ($opt_test && $opt_tarzip);
-
 
299
 
295
    #
300
    #
296
    #   Needed EnvVars
301
    #   Needed EnvVars
297
    #
302
    #
298
    EnvImport ('GBE_MACHTYPE');
303
    EnvImport ('GBE_MACHTYPE');
299
    EnvImport ('GBE_HOSTNAME');
304
    EnvImport ('GBE_HOSTNAME');
Line 309... Line 314...
309
    unless ( $opt_archive )
314
    unless ( $opt_archive )
310
    {
315
    {
311
        $opt_archive = 'main';
316
        $opt_archive = 'main';
312
        $opt_archive = 'escrow' if ($::GBE_DPKG_ESCROW);
317
        $opt_archive = 'escrow' if ($::GBE_DPKG_ESCROW);
313
    }
318
    }
-
 
319
 
314
    my $archive_tag = $Archive2Var{$opt_archive};
320
    my $archive_tag = $Archive2Var{$opt_archive};
315
    Error("Unknown archive specified: $opt_archive")
321
    Error("Unknown archive specified: $opt_archive")
316
        unless ( $archive_tag );
322
        unless ( $archive_tag );
317
    $DPKG_ROOT = $ENV{$archive_tag} || '';
323
    $DPKG_ROOT = $ENV{$archive_tag} || '';
318
    Verbose ("Archive Variable: $archive_tag" );
324
    Verbose ("Archive Variable: $archive_tag" );
Line 530... Line 536...
530
    Information ("Dpkg archive creation tool...");
536
    Information ("Dpkg archive creation tool...");
531
    Information ("Version: $VERSION");
537
    Information ("Version: $VERSION");
532
    Information ("");
538
    Information ("");
533
    Information ("Information:");
539
    Information ("Information:");
534
    Information ("Escrow Build") if ($opt_archive eq 'escrow');
540
    Information ("Escrow Build") if ($opt_archive eq 'escrow');
535
    Information ("Working dir   = [$CWD_DIR]");
541
    Information ("Working dir      = [$CWD_DIR]");
536
    Information ("Package Root  = [$SRC_ROOT]");
542
    Information ("Package Root     = [$SRC_ROOT]");
537
    Information ("Repository    = [$DPKG_ROOT]");
543
    Information ("Repository       = [$DPKG_ROOT]") unless ($opt_tarzip);
538
    Information ("                *Non Standard archive") unless ($opt_archive eq 'main' || $opt_archive eq 'escrow');
544
    Information ("                   *Non Standard archive") unless ($opt_archive eq 'main' || $opt_archive eq 'escrow' || $opt_tarzip);
539
    Information ("Target dir    = [$DPKG_DIR]");
545
    Information ("Target dir       = [$DPKG_DIR]") unless ($opt_tarzip);
-
 
546
    Information ("Target dir       = [$CWD_DIR]") if ($opt_tarzip);
540
    Information1("DPKG_NAME     = [$DPKG_NAME]");
547
    Information1("DPKG_NAME        = [$DPKG_NAME]");
541
    Information1("DPKG_VERSION  = [$DPKG_VERSION]");
548
    Information1("DPKG_VERSION     = [$DPKG_VERSION]");
542
    Information1("DPKG_PRJ      = [$DPKG_PRJ]");
549
    Information1("DPKG_PRJ         = [$DPKG_PRJ]");
543
    Information1("GBE_MACHTYPE  = [$GBE_MACHTYPE]");
550
    Information1("GBE_MACHTYPE     = [$GBE_MACHTYPE]");
544
    Information1("GBE_HOSTNAME  = [$GBE_HOSTNAME]");
551
    Information1("GBE_HOSTNAME     = [$GBE_HOSTNAME]");
545
    Information1("GBE_ABT       = [$GBE_ABT]");
552
    Information1("GBE_ABT          = [$GBE_ABT]");
546
    Information1("USER          = [$USER]");
553
    Information1("USER             = [$USER]");
547
    Information ("")                                if ( $opt_merge || $opt_delete || $opt_info || $opt_tarmode || $opt_testArchive || $opt_noBuild);
554
    Information ("")                               if ( $opt_merge || $opt_delete || $opt_info || $opt_tarmode || $opt_testArchive || $opt_noBuild || $opt_tarzip);
548
    Information ("Opt:NoBuild       = Enabled")     if ( $opt_noBuild );
555
    Information ("Opt:NoBuild      = Enabled")     if ( $opt_noBuild );
549
    Information ("Opt:TarMode       = Enabled")     if ( $opt_tarmode );
556
    Information ("Opt:TarMode      = Enabled")     if ( $opt_tarmode );
550
    Information ("Opt:Delete        = Enabled")     if ( $opt_delete );
557
    Information ("Opt:Delete       = Enabled")     if ( $opt_delete );
551
    Information ("Opt:Merge         = Enabled")     if ( $opt_merge );
558
    Information ("Opt:Merge        = Enabled")     if ( $opt_merge );
552
    Information ("Opt:testArchive   = Enabled")     if ( $opt_testArchive );
559
    Information ("Opt:testArchive  = Enabled")     if ( $opt_testArchive );
-
 
560
    Information ("Opt:TarZip       = Enabled")     if ( $opt_tarzip );
553
    Information ("Opt:TestMode      = Enabled. No Package Transferred") if ( $opt_test );
561
    Information ("Opt:TestMode     = Enabled. No Package Transferred") if ( $opt_test );
554
    Information ("Opt:Info          = Enabled. No Package Transferred") if ( $opt_info );
562
    Information ("Opt:Info         = Enabled. No Package Transferred") if ( $opt_info );
555
    Warning     ("Sandbox Build     = Yes") if ($ENV{GBE_DPKG_SBOX}) ;
563
    Warning     ("Sandbox Build    = Yes") if ($ENV{GBE_DPKG_SBOX}) ;
556
    Information ("---------------------------------------------------------------");
564
    Information ("---------------------------------------------------------------");
557
 
565
 
558
    #
566
    #
559
    #   If the environment variable GBE_DPKG_SBOX is defined then the package
567
    #   If the environment variable GBE_DPKG_SBOX is defined then the package
560
    #   is being built within a development sandbox. In such a sandbox the
568
    #   is being built within a development sandbox. In such a sandbox the
Line 1035... Line 1043...
1035
    #       bsdtar - crashed under server 2003
1043
    #       bsdtar - crashed under server 2003
1036
    #       cygwin - design decision. JATS will not include cygwin
1044
    #       cygwin - design decision. JATS will not include cygwin
1037
    #
1045
    #
1038
    my $tarTarget = join('_', $DPKG_NAME, $DPKG_VERSION, $GBE_HOSTNAME) . '.tar.gz';
1046
    my $tarTarget = join('_', $DPKG_NAME, $DPKG_VERSION, $GBE_HOSTNAME) . '.tar.gz';
1039
    my $tarPath = catfile($DPKG_DIR, $tarTarget);
1047
    my $tarPath = catfile($DPKG_DIR, $tarTarget);
1040
    $FileUtils::isUnix ? createUnixTar($tarPath) : createWindowsTar($tarPath); 
1048
    createTar($tarPath);
1041
}
1049
}
1042
 
1050
 
1043
#-------------------------------------------------------------------------------
1051
#-------------------------------------------------------------------------------
1044
# Function        : createUnixTar  
1052
# Function        : createTar  
1045
#
1053
#
1046
# Description     : Create a tar.gz file under unix
1054
# Description     : Create a tar.gz file under unix and windows
1047
#
1055
#
1048
# Inputs          : $tarPath    - Place tarfile here 
1056
# Inputs          : $tarPath    - Place tarfile here 
1049
#                   $SRC_ROOT   - Directory to tar
1057
#                   $SRC_ROOT   - Directory to tar
1050
#
1058
#
1051
# Returns         : Will not return on error
1059
# Returns         : Will not return on error
1052
#
1060
#
1053
sub createUnixTar
1061
sub createTar
1054
{
1062
{
1055
    my ($tarPath) = @_;
1063
    my ($tarPath) = @_;
1056
 
1064
 
1057
    #
1065
    #
1058
    #   Locate the tar utility
1066
    #   Locate the tar utility
Line 1065... Line 1073...
1065
    #
1073
    #
1066
    #   Tar and gzip file directly into the final location
1074
    #   Tar and gzip file directly into the final location
1067
    LogFileOp ('TarZip', $tarPath);
1075
    LogFileOp ('TarZip', $tarPath);
1068
    my @tarArgs;
1076
    my @tarArgs;
1069
    push @tarArgs, '-v' if IsVerbose(1);
1077
    push @tarArgs, '-v' if IsVerbose(1);
1070
    my $rv = System ('--NoShell', '--NoExit',$tarProg, @tarArgs, '-czf', $tarPath, '-C', $SRC_ROOT, '.' );
1078
    my $rv = System ('--NoShell', '--NoExit',$tarProg, @tarArgs, '--force-local', '-czf', $tarPath, '-C', $SRC_ROOT, '.' );
1071
    if ($rv)
1079
    if ($rv)
1072
    {
1080
    {
1073
        push @tmpFiles, $tarPath;
1081
        push @tmpFiles, $tarPath;
1074
        Error ('Cannot create tarball', "Path:$tarPath");
1082
        Error ('Cannot create tarball', "Path:$tarPath");
1075
    }
1083
    }
1076
}
1084
}
1077
 
1085
 
1078
#-------------------------------------------------------------------------------
1086
#-------------------------------------------------------------------------------
1079
# Function        : createWindowsTar  
-
 
1080
#
-
 
1081
# Description     : Create a tar.gz file under Windows
-
 
1082
#                   Use 7zip (part of JATS)
-
 
1083
#                   7zip cannot do this in one step
-
 
1084
#                       Create tar file
-
 
1085
#                       Create zip file
-
 
1086
#
-
 
1087
# Inputs          : $tarPath    - Place tarfile here 
-
 
1088
#                   $SRC_ROOT   - Directory to tar
-
 
1089
#
-
 
1090
# Returns         : Will not return on error
-
 
1091
#
-
 
1092
sub createWindowsTar
-
 
1093
{
-
 
1094
    my ($tarPath) = @_;
-
 
1095
    my @verboseArgs = qw(-bb1);
-
 
1096
    my $verboseCopyArg = '9';
-
 
1097
    #
-
 
1098
    #   Ensure that the target file does not exist
-
 
1099
    #   7z cannot ovewrite it
-
 
1100
    #
-
 
1101
    LogFileOp ('Delete', $tarPath);
-
 
1102
    RmDirTree($tarPath) && Error ("Target file cannot be deleted", "Target: $tarPath");
-
 
1103
 
-
 
1104
    #
-
 
1105
    #   Setup NON-verbose arguments for 7zip
-
 
1106
    # 
-
 
1107
    unless (IsVerbose(1)) {
-
 
1108
        @verboseArgs = qw(-bb0 -bso0 -bsp0);
-
 
1109
        $verboseCopyArg = '0';
-
 
1110
    }
-
 
1111
 
-
 
1112
    #
-
 
1113
    #   Create a tar file of the required output
-
 
1114
    #   Create the tar file into a temp file that will be deleted on exit
-
 
1115
    #   
-
 
1116
    my $tmpTarFile = catfile($CWD_DIR, join('_', $DPKG_NAME, $DPKG_VERSION) . '.tar' );
-
 
1117
    Verbose("TempTar: $tmpTarFile");
-
 
1118
    RmDirTree($tmpTarFile) && Error ("Target file cannot be deleted", "Target: $tmpTarFile");
-
 
1119
    push @tmpFiles, $tmpTarFile;
-
 
1120
    LogFileOp ('TempTar', $tmpTarFile);
-
 
1121
 
-
 
1122
    chdir ($SRC_ROOT) || Error ("Cannot change directory: $?", "Dir: $SRC_ROOT");
-
 
1123
    my $rv = System ('--NoShell', '--NoExit','7z.exe', 'a', '-r','-y', @verboseArgs, '-ttar', $tmpTarFile, '.' );
-
 
1124
    if ($rv)
-
 
1125
    {
-
 
1126
        Error ('Cannot create tar file');
-
 
1127
    }
-
 
1128
    chdir ($CWD_DIR) || Error ("Cannot change directory: $?", "Dir: $CWD_DIR");
-
 
1129
 
-
 
1130
    #
-
 
1131
    #   gzip the tar file to a temp (local) location
-
 
1132
    # 
-
 
1133
    my $tmpTarGzFile = catfile($CWD_DIR, join('_', $DPKG_NAME, $DPKG_VERSION) . '.tar.gz' );
-
 
1134
    Verbose("TempTarGz: $tmpTarGzFile");
-
 
1135
    RmDirTree($tmpTarGzFile) && Error ("Target file cannot be deleted", "Target: $tmpTarFile");
-
 
1136
    push @tmpFiles, $tmpTarGzFile;
-
 
1137
    LogFileOp ('TempTarGz', $tmpTarGzFile);
-
 
1138
 
-
 
1139
    $rv = System ('--NoShell', '--NoExit','7z.exe', 'a', '-y', @verboseArgs, '-tgzip', $tmpTarGzFile, $tmpTarFile );
-
 
1140
    if ($rv)
-
 
1141
    {
-
 
1142
        Error ('Cannot gzip tar file');
-
 
1143
    }
-
 
1144
 
-
 
1145
    #
-
 
1146
    #   Copy the file to the target
-
 
1147
    #   Note: Jats internal copy
-
 
1148
    #         Args are strange as it was designed to work with makefile stuff
-
 
1149
    #
-
 
1150
    LogFileOp ('CopyTarZip', $tarPath);
-
 
1151
    $rv = System ('--NoShell', '--NoExit','JatsFileUtil.exe', 'c' . $verboseCopyArg, 'copyFile', $tarPath, $tmpTarGzFile, '+w' );
-
 
1152
    if ($rv)
-
 
1153
    {
-
 
1154
        push @tmpFiles, $tarPath;
-
 
1155
        Error ('Cannot transfer tarball', "Path:$tarPath");
-
 
1156
    }
-
 
1157
}
-
 
1158
 
-
 
1159
 
-
 
1160
#-------------------------------------------------------------------------------
-
 
1161
# Function        : pkgFindTarBall 
1087
# Function        : pkgFindTarBall 
1162
#
1088
#
1163
# Description     : Used by CreateDpkgArchiveTarBall
1089
# Description     : Used by CreateDpkgArchiveTarBall
1164
#                   File::Find processing function
1090
#                   File::Find processing function
1165
#                   
1091
#                   
Line 1207... Line 1133...
1207
        $type = 'dir';
1133
        $type = 'dir';
1208
    } else {
1134
    } else {
1209
        Error("Unknown file type. Cannot be packaged");
1135
        Error("Unknown file type. Cannot be packaged");
1210
    }
1136
    }
1211
 
1137
 
-
 
1138
    unless ($opt_tarzip) {
-
 
1139
        #
-
 
1140
        #   Calculate the target directory name
-
 
1141
        #
-
 
1142
        my $target = $item;
-
 
1143
        $target = $DPKG_DIR . substr ( $item, length ($SRC_ROOT) );
-
 
1144
 
-
 
1145
        addFile($type, $item, $target);
-
 
1146
        LogFileOp('Process',$item);
-
 
1147
    }
-
 
1148
}
-
 
1149
 
-
 
1150
#-------------------------------------------------------------------------------
-
 
1151
# Function        : CreateLocalTarZip 
-
 
1152
#
-
 
1153
# Description     : Similar to CreateDpkgArchive, but it will create a tarzip file of the package
-
 
1154
#                   in the current directory.
-
 
1155
#                   
-
 
1156
#                   Can be used by developers to tar-zip a package for cross platform development
-
 
1157
#
-
 
1158
# Inputs          : 
-
 
1159
#
-
 
1160
# Returns         : 
-
 
1161
#
-
 
1162
sub CreateLocalTarZip
-
 
1163
{
-
 
1164
    Information("");
-
 
1165
    InitFileUtils();
-
 
1166
 
-
 
1167
 
1212
    #
1168
    #
-
 
1169
    #   If a 'noBuild' then create a dummy package directory simply
1213
    #   Calculate the target directory name
1170
    #   to contain the metadata. 
-
 
1171
    #   Delete any existing dir of the same name to ensure its clean.
1214
    #
1172
    #
-
 
1173
    if ( $SRC_ROOT eq '' )
-
 
1174
    {
-
 
1175
        $SRC_ROOT = catdir(AbsPath('pkg/noBuild'));
-
 
1176
        RmDirTree ($SRC_ROOT);
-
 
1177
        mkpath($SRC_ROOT, 0, 0775);
-
 
1178
    }
-
 
1179
 
-
 
1180
    #
-
 
1181
    #   Mark the archive with the build machine to indicate which parts of
-
 
1182
    #   a multi-machine build have been performed
-
 
1183
    #
-
 
1184
    createBuiltFile($SRC_ROOT);
-
 
1185
 
-
 
1186
    #   Process the source directory
-
 
1187
    #   A NoBuild will contain one metafile
-
 
1188
    #
-
 
1189
    if ( -d $SRC_ROOT )
-
 
1190
    {
-
 
1191
        File::Find::find( \&pkgFindTarBall, $SRC_ROOT );
-
 
1192
 
-
 
1193
        if (@bad_symlinks)
-
 
1194
        {
-
 
1195
            my $msg = "Bad Symlinks: " . scalar @bad_symlinks;
-
 
1196
            $opt_test ? ReportError($msg, @bad_symlinks) : Warning($msg, @bad_symlinks);
-
 
1197
        }
1215
    my $target = $item;
1198
        ErrorDoExit();
-
 
1199
    }
-
 
1200
    else
-
 
1201
    {
-
 
1202
        Error("Failed to find dir [$SRC_ROOT]",
-
 
1203
              "Check JATS config.");
-
 
1204
    }
-
 
1205
 
-
 
1206
    #
-
 
1207
    #   Create a tar.gz file an transfer to the final location
-
 
1208
    #
-
 
1209
    #   Have failed to find a nice windows utility to create a tar.gz
-
 
1210
    #       bsdtar - crashed under server 2003
-
 
1211
    #       cygwin - design decision. JATS will not include cygwin
-
 
1212
    #
1216
    $target = $DPKG_DIR . substr ( $item, length ($SRC_ROOT) );
1213
    my $tarTarget = $DPKG_NAME . '__' . $DPKG_VERSION . '.tgz';
-
 
1214
    createTarZip($tarTarget);
-
 
1215
}
-
 
1216
 
-
 
1217
#-------------------------------------------------------------------------------
-
 
1218
# Function        : createTarZip  
-
 
1219
#
-
 
1220
# Description     : Create a .tgz file with correct package formatting
-
 
1221
#
-
 
1222
# Inputs          : $tarPath    - Place tarfile here 
-
 
1223
#                   $SRC_ROOT   - Directory to tar
-
 
1224
#
-
 
1225
# Returns         : Will not return on error
-
 
1226
#
-
 
1227
sub createTarZip
-
 
1228
{
-
 
1229
    my ($tarPath) = @_;
1217
 
1230
 
-
 
1231
    #
1218
    addFile($type, $item, $target);
1232
    #   Locate the tar utility
-
 
1233
    #   Use gtar if its available otherwise use tar
-
 
1234
    #   
-
 
1235
    my $tarProg = LocateProgInPath('gtar', '--All');
-
 
1236
    $tarProg = LocateProgInPath('tar', '--All') unless $tarProg;
-
 
1237
    Error ("Tar utility not found in path") unless $tarProg;
-
 
1238
 
-
 
1239
    #
-
 
1240
    #   Tar and gzip file directly into the final location
1219
    LogFileOp('Process',$item);
1241
    LogFileOp ('TarZip', $tarPath);
-
 
1242
    my @tarArgs;
-
 
1243
    push @tarArgs, '-v' if IsVerbose(1);
-
 
1244
    my $rv = System ('--NoShell', '--NoExit',$tarProg, @tarArgs, '-czf', $tarPath, '-C', $SRC_ROOT, '.' , '--transform', "s~^./~$DPKG_NAME/$DPKG_VERSION/~");
-
 
1245
    if ($rv) {
-
 
1246
        push @tmpFiles, $tarPath;
-
 
1247
        Error ('Cannot create tarball', "Path:$tarPath");
-
 
1248
    }
1220
}
1249
}
1221
 
1250
 
1222
#-------------------------------------------------------------------------------
1251
#-------------------------------------------------------------------------------
1223
# Function        : TestDpkgArchive
1252
# Function        : TestDpkgArchive
1224
#
1253
#
Line 1442... Line 1471...
1442
ShowInfo();
1471
ShowInfo();
1443
unless ($opt_info)
1472
unless ($opt_info)
1444
{
1473
{
1445
    unless ( $opt_test )
1474
    unless ( $opt_test )
1446
    {
1475
    {
1447
        if ($opt_tarmode)
1476
        if ($opt_tarzip) {
-
 
1477
            LogFileOp("Creating package tarZip:", $DPKG_DIR);
-
 
1478
            CreateLocalTarZip();
-
 
1479
 
1448
        {
1480
        } elsif ($opt_tarmode) {
1449
            LogFileOp("Creating dpkg_archive tarball:", $DPKG_DIR);
1481
            LogFileOp("Creating dpkg_archive tarball:", $DPKG_DIR);
1450
            CreateDpkgArchiveTarBall();
1482
            CreateDpkgArchiveTarBall();
1451
        }
1483
        }
1452
        else
1484
        else
1453
        {
1485
        {
Line 1498... Line 1530...
1498
    -pversion=version  - Ensure package version is correct
1530
    -pversion=version  - Ensure package version is correct
1499
    -generic           - Create a built.generic file
1531
    -generic           - Create a built.generic file
1500
    -noBuild           - Create dummy build files
1532
    -noBuild           - Create dummy build files
1501
    -[no]tarmode       - Transfer package as tarball
1533
    -[no]tarmode       - Transfer package as tarball
1502
    -[no]md5           - Use MD5 comparison of merged files(enabled)
1534
    -[no]md5           - Use MD5 comparison of merged files(enabled)
-
 
1535
    -tarzip            - Create a tarzip of the package.
1503
 
1536
 
1504
  Debug and Testing:
1537
  Debug and Testing:
1505
    -[no]test          - Test package. Do not transfer.
1538
    -[no]test          - Test package. Do not transfer.
1506
    -[no]info          - Display packaging info. Do not transfer.
1539
    -[no]info          - Display packaging info. Do not transfer.
1507
    -[no]testArchive   - Perform operations within a test archive
1540
    -[no]testArchive   - Perform operations within a test/dev archive
1508
    -keepTemp          - Do not delete temp files
1541
    -keepTemp          - Do not delete temp files
1509
 
1542
 
1510
=head1 OPTIONS
1543
=head1 OPTIONS
1511
 
1544
 
1512
=over 8
1545
=over 8
Line 1659... Line 1692...
1659
the currently configured dpkg_archive. The test area is a subdirectory 
1692
the currently configured dpkg_archive. The test area is a subdirectory 
1660
called C<.dpkg_archive/test_dpkg>
1693
called C<.dpkg_archive/test_dpkg>
1661
 
1694
 
1662
This option is intended for testing use only.
1695
This option is intended for testing use only.
1663
 
1696
 
-
 
1697
This option allows a package created with a developers sandbox to be packaged for testing purposes.
-
 
1698
 
1664
=item B<-keepTemp>
1699
=item B<-keepTemp>
1665
 
1700
 
1666
This option will prevent temp files, created by this utilty, from being deleted when the utilty
1701
This option will prevent temp files, created by this utilty, from being deleted when the utilty
1667
exists.
1702
exists.
1668
 
1703
 
1669
This option is intended for testing use only.
1704
This option is intended for testing use only.
1670
 
1705
 
-
 
1706
=item B<-tarzip>
-
 
1707
 
-
 
1708
This option will cause the utility to generate a zipped tarfile of the current package. 
-
 
1709
It is intended to allow developers to transfer package artifacts from one machine to another,
-
 
1710
perhaps during development in a multi platform environment.
-
 
1711
 
-
 
1712
This option does not create a package in dpkg_archive. It will create the resultant file in the current
-
 
1713
directory. The name of the file will be <packageName>__<version>.tgz
-
 
1714
 
-
 
1715
Several other options have no effect when used with this option.
-
 
1716
 
1671
=back
1717
=back
1672
 
1718
 
1673
=head1 DESCRIPTION
1719
=head1 DESCRIPTION
1674
 
1720
 
1675
This utility program is used to transfer a package that has been built into
1721
This utility program is used to transfer a package that has been built into