os/ossrv/genericopenlibs/liboil/src/build_trampolines.c
changeset 0 bde4ae8d615e
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/os/ossrv/genericopenlibs/liboil/src/build_trampolines.c	Fri Jun 15 03:10:57 2012 +0200
     1.3 @@ -0,0 +1,150 @@
     1.4 +/*
     1.5 + * LIBOIL - Library of Optimized Inner Loops
     1.6 + * Copyright (c) 2004 David A. Schleef <ds@schleef.org>
     1.7 + * All rights reserved.
     1.8 + *
     1.9 + * Redistribution and use in source and binary forms, with or without
    1.10 + * modification, are permitted provided that the following conditions
    1.11 + * are met:
    1.12 + * 1. Redistributions of source code must retain the above copyright
    1.13 + *    notice, this list of conditions and the following disclaimer.
    1.14 + * 2. Redistributions in binary form must reproduce the above copyright
    1.15 + *    notice, this list of conditions and the following disclaimer in the
    1.16 + *    documentation and/or other materials provided with the distribution.
    1.17 + * 
    1.18 + * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
    1.19 + * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
    1.20 + * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
    1.21 + * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
    1.22 + * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
    1.23 + * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
    1.24 + * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
    1.25 + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
    1.26 + * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
    1.27 + * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
    1.28 + * POSSIBILITY OF SUCH DAMAGE.
    1.29 + */
    1.30 +
    1.31 +
    1.32 +#include <stdio.h>
    1.33 +#include <liboil/liboil.h>
    1.34 +#include <ctype.h>
    1.35 +#include <stdlib.h>
    1.36 +#include <string.h>
    1.37 +
    1.38 +#include <liboil/liboilprototype.h>
    1.39 +
    1.40 +static char * xstrdup (const char *s);
    1.41 +
    1.42 +void print_header (void);
    1.43 +void print_footer (void);
    1.44 +
    1.45 +int main (int argc, char *argv[])
    1.46 +{
    1.47 +  OilFunctionClass *klass;
    1.48 +  OilPrototype *proto;
    1.49 +  int i;
    1.50 +  int n;
    1.51 +  char *string;
    1.52 +  char *arg_string;
    1.53 +
    1.54 +  oil_init_no_optimize ();
    1.55 +
    1.56 +  print_header ();
    1.57 +
    1.58 +  n = oil_class_get_n_classes ();
    1.59 +  for (i=0;i<n; i++ ){
    1.60 +    klass = oil_class_get_by_index (i);
    1.61 +
    1.62 +    if(klass->prototype) {
    1.63 +      proto = oil_prototype_from_string (klass->prototype);
    1.64 +      if (proto) {
    1.65 +        string = oil_prototype_to_string (proto);
    1.66 +        if (strlen (string) == 0) {
    1.67 +          free (string);
    1.68 +          string = xstrdup("void");
    1.69 +        }
    1.70 +        arg_string = oil_prototype_to_arg_string (proto);
    1.71 +
    1.72 +        printf ("#undef oil_%s\n", klass->name);
    1.73 +        printf ("void\n");
    1.74 +        printf ("oil_%s (%s)\n", klass->name, string);
    1.75 +        printf ("{\n");
    1.76 +        printf ("  if (_oil_function_class_%s.func == NULL) {\n", klass->name);
    1.77 +        printf ("    oil_class_optimize (&_oil_function_class_%s);\n", klass->name);
    1.78 +        printf ("  }\n");
    1.79 +        printf ("  ((void (*)(%s))(_oil_function_class_%s.func))(%s);\n",
    1.80 +            string, klass->name, arg_string);
    1.81 +        printf ("}\n");
    1.82 +        printf ("\n");
    1.83 +
    1.84 +        oil_prototype_free (proto);
    1.85 +        free (string);
    1.86 +        free (arg_string);
    1.87 +      } else {
    1.88 +        printf("/* ERROR: could not parse %s(%s) */\n", klass->name, klass->prototype);
    1.89 +      }
    1.90 +    }
    1.91 +  }
    1.92 +
    1.93 +  print_footer ();
    1.94 +
    1.95 +  return 0;
    1.96 +}
    1.97 +
    1.98 +void print_header (void)
    1.99 +{
   1.100 +  printf ("/*\n");
   1.101 +  printf (" * LIBOIL - Library of Optimized Inner Loops\n");
   1.102 +  printf (" * Copyright (c) 2004 David A. Schleef <ds@schleef.org>\n");
   1.103 +  printf (" * All rights reserved.\n");
   1.104 +  printf (" *\n");
   1.105 +  printf (" * Redistribution and use in source and binary forms, with or without\n");
   1.106 +  printf (" * modification, are permitted provided that the following conditions\n");
   1.107 +  printf (" * are met:\n");
   1.108 +  printf (" * 1. Redistributions of source code must retain the above copyright\n");
   1.109 +  printf (" *    notice, this list of conditions and the following disclaimer.\n");
   1.110 +  printf (" * 2. Redistributions in binary form must reproduce the above copyright\n");
   1.111 +  printf (" *    notice, this list of conditions and the following disclaimer in the\n");
   1.112 +  printf (" *    documentation and/or other materials provided with the distribution.\n");
   1.113 +  printf (" * \n");
   1.114 +  printf (" * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR\n");
   1.115 +  printf (" * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED\n");
   1.116 +  printf (" * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE\n");
   1.117 +  printf (" * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,\n");
   1.118 +  printf (" * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES\n");
   1.119 +  printf (" * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR\n");
   1.120 +  printf (" * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)\n");
   1.121 +  printf (" * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,\n");
   1.122 +  printf (" * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING\n");
   1.123 +  printf (" * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE\n");
   1.124 +  printf (" * POSSIBILITY OF SUCH DAMAGE.\n");
   1.125 +  printf (" */\n");
   1.126 +  printf ("\n");
   1.127 +  printf ("/* This file is automatically generated.  Do not edit. */\n");
   1.128 +  printf ("\n");
   1.129 +  printf ("#include <liboil/liboil.h>\n");
   1.130 +  printf ("#include <liboil/liboilclasses.h>\n");
   1.131 +  printf ("#include <liboil/liboilfunction.h>\n");
   1.132 +  printf ("\n");
   1.133 +}
   1.134 +
   1.135 +void print_footer (void)
   1.136 +{
   1.137 +  printf ("\n");
   1.138 +}
   1.139 +
   1.140 +static char *
   1.141 +xstrdup (const char *s)
   1.142 +{
   1.143 +  int n = strlen(s);
   1.144 +  char *t;
   1.145 +
   1.146 +  n = strlen(s);
   1.147 +  t = malloc(n + 1);
   1.148 +  memcpy (t, s, n);
   1.149 +  t[n] = 0;
   1.150 +
   1.151 +  return t;
   1.152 +}
   1.153 +