Subversion Repositories DevTools

Rev

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

Rev 1105 Rev 1107
Line 388... Line 388...
388
# Description     : Package up the created image and create an SD memory image
388
# Description     : Package up the created image and create an SD memory image
389
#                   This is destructive and can only be done one
389
#                   This is destructive and can only be done one
390
#
390
#
391
# Inputs          : Options
391
# Inputs          : Options
392
#                       --disk_blocks           - Size the output disk
392
#                       --disk_blocks           - Size the output disk
-
 
393
#                       --full_image            - Size of Full Image
-
 
394
#                       --debug
393
#
395
#
394
# Returns         : 
396
# Returns         : 
395
#
397
#
396
sub Day0BuildSdImage
398
sub Day0BuildSdImage
397
{
399
{
398
    my $size = 501248;
400
    my $size = 501248;
-
 
401
    my $fullfs = 0;
399
    my $debug;
402
    my $debug;
400
 
403
 
401
    #
404
    #
402
    #   Ensure that some work is being done
405
    #   Ensure that some work is being done
403
    #
406
    #
Line 412... Line 415...
412
    #
415
    #
413
    foreach  ( @_ )
416
    foreach  ( @_ )
414
    {
417
    {
415
        if ( m~^--disk-blocks=(\d+)$~i ) {
418
        if ( m~^--disk-blocks=(\d+)$~i ) {
416
            $size = $1;
419
            $size = $1;
-
 
420
        } elsif ( m~^--full_image=(\d+)$~i ) {
-
 
421
            $fullfs = $1;
417
        } elsif ( m~^--debug~i ) {
422
        } elsif ( m~^--debug~i ) {
418
            $debug = 1;
423
            $debug = 1;
419
        } else {
424
        } else {
420
            Error ("Day0BuildSdImage: Unknown option: $_");
425
            Error ("Day0BuildSdImage: Unknown option: $_");
421
        }
426
        }
Line 493... Line 498...
493
    #
498
    #
494
    #   Invoke SD build function
499
    #   Invoke SD build function
495
    #   Held in another package to make this one readable
500
    #   Held in another package to make this one readable
496
    #
501
    #
497
    my $name = "${opt_buildname}-${opt_version}-${opt_target}";
502
    my $name = "${opt_buildname}-${opt_version}-${opt_target}";
498
    CreateSdImage( $opt_packagebindir, $name, $WORK, $BUILD, $size );
503
    CreateSdImage( $opt_packagebindir, $name, $WORK, $BUILD, $size, $fullfs );
499
}
504
}
500
 
505
 
501
#-------------------------------------------------------------------------------
506
#-------------------------------------------------------------------------------
502
# Function        : AddInitScript
507
# Function        : AddInitScript
503
#
508
#