build-utils/gperf.sh

   1 #!/bin/sh
   2 #
   3 # Copyright © 2008 Pierre Habouzit <madcoder@debian.org>
   4 #
   5 # This program is free software; you can redistribute it and/or modify
   6 # it under the terms of the GNU General Public License as published by
   7 # the Free Software Foundation; either version 2 of the License, or
   8 # (at your option) any later version.
   9 #
  10 # This program is distributed in the hope that it will be useful,
  11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 # GNU General Public License for more details.
  14 #
  15 # You should have received a copy of the GNU General Public License along
  16 # with this program; if not, write to the Free Software Foundation, Inc.,
  17 # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18 #
  19
  20
  21 die() {
  22     echo "$@" 1>&2
  23     exit 2
  24 }
  25
  26 do_hdr() {
  27     cat <<EOF
  28 /* This file is autogenerated by $(basename $0) */
  29
  30 EOF
  31 }
  32
  33 out=
  34 type_t=
  35
  36 while true; do
  37     test $# -gt 2 || break
  38     case "$1" in
  39         -o) shift; out="$1"; shift;;
  40         -t) shift; type_t="$1"; shift;;
  41         *)  break;;
  42     esac
  43 done
  44
  45 do_h() {
  46     cat <<EOF
  47 `do_hdr`
  48 #ifndef AWESOME_TOKENIZE_H
  49 #define AWESOME_TOKENIZE_H
  50
  51 typedef enum awesome_token_t {
  52     A_TK_UNKNOWN,
  53 `tr '[:lower:]' '[:upper:]' | sed -e "s/^[^/].*/    A_TK_&,/"`
  54 } awesome_token_t;
  55
  56 __attribute__((pure)) enum awesome_token_t a_tokenize(const char *s, int len);
  57 #endif
  58 EOF
  59 }
  60
  61 do_tokens() {
  62     while read tok; do
  63         case "$tok" in
  64             "") continue;;
  65             *)
  66                 echo "$tok, A_TK_`echo $tok | tr '[:lower:]' '[:upper:]'`"
  67                 ;;
  68         esac
  69     done
  70 }
  71
  72 do_c() {
  73     which gperf > /dev/null
  74     if test $? = 1 ; then
  75         echo "gperf not found. You need to install gperf." > /dev/stderr;
  76         exit 1;
  77     fi;
  78
  79     gperf -l -t -C -F",0" \
  80         --language=ANSI-C -Na_tokenize_aux <<EOF \
  81         | sed -e '/__gnu_inline__/d;s/\<\(__\|\)inline\>//g'
  82 %{
  83 `do_hdr`
  84
  85 #include <string.h>
  86 #include "common/tokenize.h"
  87
  88 static const struct tok *a_tokenize_aux(const char *str, unsigned int len);
  89
  90 %}
  91 struct tok { const char *name; int val; };
  92 %%
  93 `do_tokens`
  94 %%
  95
  96 awesome_token_t a_tokenize(const char *s, int len)
  97 {
  98     if (len < 0)
  99         len = (int)strlen(s);
 100
 101     if (len) {
 102         const struct tok *res = a_tokenize_aux(s, len);
 103         return res ? res->val : A_TK_UNKNOWN;
 104     } else {
 105         return A_TK_UNKNOWN;
 106     }
 107 }
 108 EOF
 109 }
 110
 111 extract_tokens() {
 112     grep '^### ' "$1" | cut -d ' ' -f 2
 113 }
 114
 115
 116 TOKENS_FILE="$1"
 117 TARGET="$2"
 118
 119 trap "rm -f ${TARGET}" 0
 120
 121 rm -f "${TARGET}"
 122 case "${TARGET}" in
 123     *.h) do_h > "${TARGET}" < "${TOKENS_FILE}" ;;
 124     *.c) do_c > "${TARGET}" < "${TOKENS_FILE}" ;;
 125     *)  die "you must ask for the 'h' or 'c' generation";;
 126 esac
 127 chmod -w "${TARGET}"
 128
 129 trap - 0
 130 exit 0