Subversion Repositories DevTools

Rev

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

Rev 5649 Rev 5654
Line 3... Line 3...
3 
#
 3 
#
4 
# Module name   : jats.sh
 4 
# Module name   : jats.sh
5 
# Module type   : Makefile system
 5 
# Module type   : Makefile system
6 
# Compiler(s)   : n/a
 6 
# Compiler(s)   : n/a
7 
# Environment(s): jats
 7 
# Environment(s): jats
- 
 
 8 
# Documents     : MASS-00232 Format of the Linux App Upgrade Manifest File
8 
#
 9 
#
9 
# Description   : This package extends the JATS toolset at build time
 10 
# Description   : This package extends the JATS toolset at build time
10 
#                 It provides additional directives to the JATS makefiles
 11 
#                 It provides additional directives to the JATS makefiles
11 
#                 to simplify the directives.
 12 
#                 to simplify the directives.
12 
#
 13 
#
Line 616... Line 617...
616 
            if ( my $file = $fentry->{'file'} )
 617 
            if ( my $file = $fentry->{'file'} )
617 
            {
 618 
            {
618 
                my $base_file = StripDir( $file );
 619 
                my $base_file = StripDir( $file );
619 
                if ($include_md5) {
 620 
                if ($include_md5) {
620 
                    my $md5 = digest_file_hex($file, 'MD5');
 621 
                    my $md5 = digest_file_hex($file, 'MD5');
621 
                    print_mf ('--NoCheckLineWidth', "$name,$tier,$base_file,$md5");
 622 
                    print_mf ('--NoCheckLineWidth', "$name,$tier,$base_file,MD5=$md5");
622 
                } else {
 623 
                } else {
623 
                    print_mf ("$name,$tier,$base_file");
 624 
                    print_mf ("$name,$tier,$base_file");
624 
                }
 625 
                }
625 
                PackageFile ('*', $file, '--Subdir=' . $pkgdir, '--Strip' );
 626 
                PackageFile ('*', $file, '--Subdir=' . $pkgdir, '--Strip' );
626 
                $last_was_comment = 0;
 627 
                $last_was_comment = 0;
Line 661... Line 662...
661 
        {
 662 
        {
662 
            foreach my $file ( glob ($mugdir . '/*.mug' ) )
 663 
            foreach my $file ( glob ($mugdir . '/*.mug' ) )
663 
            {
 664 
            {
664 
                next unless ( -f $file );
 665 
                next unless ( -f $file );
665 
                my $base_file = StripDir($file);
 666 
                my $base_file = StripDir($file);
- 
 
 667 
                if ($include_md5) {
- 
 
 668 
                    my $md5 = digest_file_hex($file, 'MD5');
- 
 
 669 
                    print_mf ('--NoCheckLineWidth', "$name,$tier,$base_file,MD5=$md5");
- 
 
 670 
                } else {
666 
                print_mf ("$name,$tier,$base_file");
 671 
                    print_mf ("$name,$tier,$base_file");
- 
 
 672 
                }
667 
                PackageFile ('*', $file, '--Subdir=mug', '--Strip' );
 673 
                PackageFile ('*', $file, '--Subdir=mug', '--Strip' );
668 
            }
 674 
            }
669 
        }
 675 
        }
670 
    }
 676 
    }
671 
 
 677