Subversion Repositories DevTools

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

# Copyright (c) VIX TECHNOLOGY (AUST) LTD

#

# Module name   : ANDROID.PL

# Module type   : Makefile system

# Compiler(s)   : Perl

# Environment(s): jats

#

# Description:

#       This file provides Toolset initialisation and plugin functions

#       to makelib.pl2

#

# Contents:     Basic (very basic) Android support

#

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

#

#   Globals

#

my $androidBuilder;

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

#   ToolsetInit()

#       Runtime initialisation

#

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

ToolsetInit();

sub ToolsetInit

{

#.. Toolset configuration

#

    $::ScmToolsetVersion = "1.0.0";               # our version

    $::ScmToolsetGenerate = 0;                    # generate optional

#.. Standard.rul requirements

#

    $s =   'java';          # Assembler source file

    $o =   '';              # Object file

    $a =   'class';         # Library file

    $so =  'jar';           # Shared library

    $exe = '.apk';          # Linked binary images

#.. Toolset specific definitions

#

    Init( "android_sdk" );

    ToolsetDefines( 'ANDROID.DEF' );

#

#.. Locate the AndroidBuilder.pl script

#   This will be delivered by a package

#

    my $program = 'androidBuilder.pl';

    Verbose("Locate extension Program: $program");

    $androidBuilder = ToolExtensionProgram( $program );

    Error( "Tool program(s) required by toolset not found:", $program)

        unless ($androidBuilder);

    ToolsetDefine ('#   Android Builder Support Tool');

    ToolsetDefine ('ANDROIDBUILDER=' . $androidBuilder);

}

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

#

#   Generate a project from the provided build.xml

#

#   Arguments   : $name             - Base name of the project

#                 $androidxml       - Path to the AndroidManifest.xml file

#                 $pArgs            - Project specific options

#                 $auto_test        - Unit Test Target (optional)

#                 $unit_test        - Unit Test Target (optional)

#                 $pGenerated       - Ref to an array of Generated Files (optional)

#

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

our $ToolsetPROJECT_type = 'android';

sub ToolsetPROJECT

{

    my( $name, $androidxml ,$pArgs, $auto_test, $unit_test, $pGenerated ) = @_;

    my $io = ToolsetPrinter::New();

    #

    #   Generate the recipe to create the project

    #   Add names of co-generated targets.

    #

    $io->Label( "Build project", $name );

    $io->Entry( "Project_$name",": $androidxml\n", " \\\n", "" , @{$pGenerated} );

    $io->PrtLn( "\t\$(XX_PRE)\$(call ProjectDefine_$name,)" );

    $io->Newline();

    #

    #   Generate the recipe to clean the project

    #

    $io->Label( "Clean project", $name );

    $io->PrtLn( "ProjectClean_$name: $androidxml" );

    $io->PrtLn( "\t\$(XX_PRE)\$(call ProjectDefine_$name,-clean)" );

    $io->Newline();

    #

    #   Generate the recipe to run unit tests on the project

    #   This is optional

    #

    if ( $auto_test )

    {

        $io->Label( "Auto Test project", $name );

        $io->PrtLn( "ProjectATest_$name: $androidxml" );

        $io->PrtLn( "\t\$(XX_PRE)\$(call ProjectDefine_$name,$auto_test)" );

        $io->Newline();

    }

    if ( $unit_test )

    {

        $io->Label( "Unit Test project", $name );

        $io->PrtLn( "ProjectUTest_$name: $androidxml" );

        $io->PrtLn( "\t\$(XX_PRE)\$(call ProjectDefine_$name,$unit_test)" );

        $io->Newline();

    }

    #

    #   Generate macro to contain the project invocation

    #   The first argument will be a 'build target' argument

    #

    $io->Label( "Macro to invoke project", $name );

    $io->PrtLn( "define ProjectDefine_$name" );

    $io->PrtLn( "\t\$(GBE_PERL) \$(ANDROIDBUILDER) -f $androidxml -i=\$(PWD)/\$(INTERFACEDIR) -t=\$(GBE_TYPE) -pn=\$(GBE_PBASE) -pv=\$(BUILDVER) @{$pArgs} \$1" );

    $io->PrtLn( "endef");

    $io->Newline();

}

1;