source: svn/newcon3bcm2_21bu/BSEAV/api/build/nexus/bapi_build.pl

#!/usr/bin/perl
#############################################################################
#
#               Copyright (c) 2003-2008, Broadcom Corporation.
#               All rights reserved.
#               Confidential Property of Broadcom Corporation.
#
#  THIS SOFTWARE MAY ONLY BE USED SUBJECT TO AN EXECUTED SOFTWARE LICENSE
#  AGREEMENT  BETWEEN THE USER AND BROADCOM.  YOU HAVE NO RIGHT TO USE OR
#  EXPLOIT THIS MATERIAL EXCEPT SUBJECT TO THE TERMS OF SUCH AN AGREEMENT.
#
# $brcm_Workfile: bapi_build.pl $
# $brcm_Revision: 1 $
# $brcm_Date: 3/25/08 10:13a $
#
# File Description:
#
# Revision History:
#
# $brcm_Log: /BSEAV/api/build/nexus/bapi_build.pl $
# 
# 1   3/25/08 10:13a jgarrett
# PR 40857: Adding shim thunk layer
# 
#############################################################################
use strict;

use bapi_parse_c;
use bapi_thunks;

my $file;
my @funcs;

if ($#ARGV == -1) {
        print "You must run autogen to build proxy layer\n";
        return 1;
}

# Process all files on the command line
for $file (@ARGV) {
        push @funcs, bapi_parse_c::get_func_prototypes $file;
}

# Build the perl datastructure
my @funcrefs = bapi_parse_c::parse_funcs @funcs;

# Print out the perl datastructure
#bapi_parse_c::print_api @funcrefs;

print "Autogenerating code...\n";

# Build thunk layer for Settop API
bapi_thunks::build_thunks "bsettop_autogen_thunks.c", @funcrefs;
bapi_thunks::build_remapping "bsettop_autogen_thunks.h", @funcrefs;

print "Done\n";