Subversion Repositories DevTools

# -*- mode: perl; tabs: 8; indent-width: 4; show-tabs: yes; -*-

#

# Module name   : TOOLSET/KeilC51V41

# Module type   : Makefile system

# Environment(s):

#

# Description:

#   Keil C51 ( Version 4.1) toolset

#   A very simple toolset to support

#       1) C compiliation

#       2) Generation of libaries

#       3) Merging of libraries

#

#   Does not support ( because its not needed yet )

#       a) Shared libraries

#       b) Executables

#       c) Assembler files

#

# Version   Who   Date     Description

#           DDP   04-Jan-05 Created

#............................................................................#

##############################################################################

#   ToolsetInit()

#       Runtime initialisation

#

##############################################################################

ToolsetInit();

sub ToolsetInit

{

    my $KeilVersion = "C51V41";

#.. Parse arguments

#

    foreach $_ ( @args ) {

        Message( "KeilC51V41: unknown option $_ -- ignored\n" );

    }

#.. Standard.rul requirements

#

    $s = 'asm';

    $o = 'o51';

    $a = 'lib';

    $exe = "";

#.. Define environment

#

    Init( "KeilC51V41" );

    ToolsetDefine( "#################################################" );

    ToolsetDefine( "# Compiler version" );

    ToolsetDefine( "#" );

    ToolsetDefine( "KeilC51_Version      = \"$KeilVersion\"" );

    ToolsetDefine( "" );

    ToolsetDefine( "#" );

    ToolsetDefines( "KeilC51V41.def" );

    ToolsetRules  ( "KeilC51V41.rul" );

    ToolsetRules  ( "standard.rul" );

    #

    #   Extend the cleanup rule

    #

    ToolsetGenerate( '*.lst' );

    #

    #   The keil compiler cannot handle long filenames

    #   This is a problem in many VOBS, so attempt to generate

    #   makefiles with a relative GBE_ROOT.

    #

    $::UseRelativeRoot = 1;

}

###############################################################################

#   ToolsetCC( $source, $obj, \@args )

#       This subroutine takes the user options and builds the rule(s)

#       required to compile the source file 'source' to 'obj'

#

###############################################################################

sub ToolsetCC

{

    my( $source, $obj, $pArgs ) = @_;

    Debug( "CC:  $source -> $obj" );

    foreach ( @$pArgs ) {

        Debug( "option:    $_" );

        if ( /--Shared$/ ) {                    # Building a 'shared' object

            $cflags = "$cflags \$(SHCFLAGS)";

            Debug( "CC:    as shared object" );

        } else {                                # unknown option

            Message( "CC: unknown option $_ -- ignored\n" );

        }

    }

    MakePrint( "\n\t\$(CC)\n" );

    MakePrint( "\$(OBJDIR)/$i.${o}:\tCFLAGS +=$cflags\n" )

        if ( $cflags );

}

###############################################################################

#   ToolsetCCDepend( $depend, \@sources )

#       This subroutine takes the user options and builds the

#       rule(s) required to build the dependencies for the source

#       files 'sources' to 'depend'.

#

###############################################################################

sub ToolsetCCDepend

{

    MakePrint( "\t\$(CCDEPEND)\n" );

}

###############################################################################

#   ToolsetAR( $name, \@args, \@objs )

#       This subroutine takes the user options and builds the rules

#       required to build the library 'name'.

#

#   Arguments:

#       n/a

#

#   Output:

#       [ $(BINDIR)/name$.${a}:   .... ]

#           $(AR)

#

###############################################################################

sub ToolsetAR

{

    my( $name, $pArgs, $pObjs ) = @_;

#.. Parse arguments

#

    foreach $_ ( @$pArgs ) 

    {

        Message( "AR: unknown option $_ -- ignored\n" );

    }

#

    MakeEntry( "\$(LIBDIR)/$name\$(GBE_TYPE).${a}:\t", "", " \\\n\t\t", ".${o}", @$pObjs );

#.. Build library rule (just append to standard rule)

#

    MakePrint( "\n\t\$(AR)\n\n" );

}

###############################################################################

#   ToolsetARMerge()

#       Generate the recipe to merge libraries.

#       The dependency list is created by the caller.

#

###############################################################################

sub ToolsetARMerge

{

    MakePrint( "\n\t\$(ARMERGE)\n\n" );

}

#.. Successful termination

1;