Chris@19: #! /bin/sh
Chris@19: 
Chris@19: if test "x$1" = "x--help" || test "x$1" = "x-h"; then
Chris@19:     cat <<EOF
Chris@19: Usage: fftw-wisdom-to-conf [OPTIONS] [< INPUT] [> OUTPUT]
Chris@19: Convert wisdom (stdin) to C configuration routine (stdout).
Chris@19: 
Chris@19: Options:
Chris@19:         -h, --help: print this help
Chris@19:      -V, --version: print version/copyright info
Chris@19: EOF
Chris@19:     exit 0
Chris@19: fi
Chris@19: 
Chris@19: if test "x$1" = "x--version" || test "x$1" = "x-V"; then
Chris@19:     cat <<EOF
Chris@19: fftw-wisdom-to-conf from FFTW version @VERSION@
Chris@19: 
Chris@19: Copyright (c) 2003, 2007-14 Matteo Frigo
Chris@19: Copyright (c) 2003, 2007-14 Massachusetts Institute of Technology
Chris@19: 
Chris@19: This program is free software; you can redistribute it and/or modify
Chris@19: it under the terms of the GNU General Public License as published by
Chris@19: the Free Software Foundation; either version 2 of the License, or
Chris@19: (at your option) any later version.
Chris@19: 
Chris@19: This program is distributed in the hope that it will be useful,
Chris@19: but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@19: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Chris@19: GNU General Public License for more details.
Chris@19: 
Chris@19: You should have received a copy of the GNU General Public License
Chris@19: along with this program; if not, write to the Free Software
Chris@19: Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA    
Chris@19: EOF
Chris@19:     exit 0
Chris@19: fi
Chris@19: 
Chris@19: read preamble fftw_wisdom
Chris@19: 
Chris@19: case "$preamble $fftw_wisdom" in
Chris@19: 	\(@PACKAGE@-@VERSION@\ *_wisdom*)
Chris@19: 		prefix=`echo $fftw_wisdom | cut -d_ -f1`_
Chris@19: 		;;
Chris@19: 	*)
Chris@19: 		echo "fftw-wisdom-to-conf: invalid wisdom" 1>&2
Chris@19: 		exit 1
Chris@19: 		;;
Chris@19: esac
Chris@19: 
Chris@19: cat <<EOF
Chris@19: /* Automatically generated by fftw-wisdom-to-conf from @PACKAGE@ @VERSION@.
Chris@19:    DO NOT EDIT!  (Unless you really, really want to.  Then it's okay.) */
Chris@19: void ${prefix}configure_planner(void *plnr)
Chris@19: {
Chris@19:     struct solvtab_s { void (*reg)(void *); const char *reg_nam; };
Chris@19:     extern void ${prefix}solvtab_exec(const struct solvtab_s s[], void *);
Chris@19: 
Chris@19: #define DECLARE(name) extern void name(void *);
Chris@19: #define STRINGIZEx(x) #x
Chris@19: #define STRINGIZE(x) STRINGIZEx(x)
Chris@19: #define SOLVTAB(s) { s, STRINGIZE(s) },
Chris@19: #define DO(X) \\
Chris@19: EOF
Chris@19: 
Chris@19: sed 's/ *(//' | cut -d" " -f1 | grep -v -- - | egrep -v '^ *\)*$' | sort | uniq | while read reg_nam; do
Chris@19:     printf '    X(%s)\\\n' "$reg_nam"
Chris@19: done
Chris@19: 
Chris@19: cat <<EOF
Chris@19:     /* end DO(X) */
Chris@19: 
Chris@19:     DO(DECLARE)
Chris@19: 
Chris@19:     const struct solvtab_s s[] = {
Chris@19:         DO(SOLVTAB)
Chris@19:         { 0, 0 }
Chris@19:     };
Chris@19: 
Chris@19:     ${prefix}solvtab_exec(s, plnr);
Chris@19: }
Chris@19: EOF