view dist/gen_inc.awk @ 0:a1985f14b030

Initial load
author chegar
date Fri, 11 May 2012 10:42:02 +0100
parents
children
line wrap: on
line source

# This awk script parses C input files looking for lines marked "PUBLIC:"
# "EXTERN:", and "DB_LOG_RECSPEC".  (PUBLIC lines are DB internal function
# prototypes and #defines, EXTERN lines are DB external function prototypes
# and #defines, and DB_LOG_RECSPEC lines are the definition of log record
# templates.)
#
# PUBLIC lines are put into two versions of per-directory include files:
# one file that contains the prototypes, and one file that contains a
# #define for the name to be processed during configuration when creating
# unique names for every global C-language symbol in the DB library.
#
# The EXTERN lines are put into two files: one of which contains prototypes
# which are always appended to the db.h file, and one of which contains a
# #define list for use when creating unique symbol names.
#
# DB_LOG_RECSPEC lines are put into PUBLIC's internal #define file.
#
# Four arguments:
#	e_dfile		list of EXTERN #defines
#	e_pfile		include file that contains EXTERN prototypes
#	i_dfile		list of internal (PUBLIC) #defines
#	i_pfile		include file that contains internal (PUBLIC) prototypes
#
# Copyright (c) 1996, 2012 Oracle and/or its affiliates.  All rights reserved.
# 
#  DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
# 
#  This code is free software; you can redistribute it and/or modify it
#  under the terms of the GNU General Public License version 2 only, as
#  published by the Free Software Foundation.  Oracle designates this
#  particular file as subject to the "Classpath" exception as provided
#  by Oracle in the LICENSE file that accompanied this code.
# 
#  This code is distributed in the hope that it will be useful, but WITHOUT
#  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
#  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
#  version 2 for more details (a copy is included in the LICENSE file that
#  accompanied this code).
# 
#  You should have received a copy of the GNU General Public License version
#  2 along with this work; if not, write to the Free Software Foundation,
#  Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
# 
#  Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
#  or visit www.oracle.com if you need additional information or have any
#  questions.
#
/PUBLIC:/ {
	sub(/^.*PUBLIC:[	 ][	 ]*/, "")
	if ($0 ~ /^#if|^#ifdef|^#ifndef|^#else|^#endif/) {
		print $0 >> i_pfile
		print $0 >> i_dfile
		next
	}
	pline = sprintf("%s %s", pline, $0)
	if (pline ~ /\)\);/) {
		sub(/^[	 ]*/, "", pline)
		print pline >> i_pfile
		if (pline !~ db_version_unique_name) {
			gsub(/[	 ][	 ]*__P.*/, "", pline)
			sub(/^.*[	 ][*]*/, "", pline)
			printf("#define	%s %s@DB_VERSION_UNIQUE_NAME@\n",
			    pline, pline) >> i_dfile
		}
		pline = ""
	}
}

/EXTERN:/ {
	sub(/^.*EXTERN:[	 ][	 ]*/, "")
	if ($0 ~ /^#if|^#ifdef|^#ifndef|^#else|^#endif/) {
		print $0 >> e_pfile
		print $0 >> e_dfile
		next
	}
	eline = sprintf("%s %s", eline, $0)
	if (eline ~ /\)\);/) {
		sub(/^[	 ]*/, "", eline)
		print eline >> e_pfile
		if (eline !~ db_version_unique_name) {
			gsub(/[	 ][	 ]*__P.*/, "", eline)
			sub(/^.*[	 ][*]*/, "", eline)
			printf("#define	%s %s@DB_VERSION_UNIQUE_NAME@\n",
			    eline, eline) >> e_dfile
		}
		eline = ""
	}
}

/^DB_LOG_RECSPEC.*_desc\[\]/ {
    sub(/DB_LOG_RECSPEC[ 	]*/, "");
    sub(/\[][ 	]*=[ 	]*{.*$/, "");
    printf("#define\t%s %s@DB_VERSION_UNIQUE_NAME@\n", $0, $0) >> i_dfile
}