X-Git-Url: http://git.madism.org/?p=apps%2Fmadmutt.git;a=blobdiff_plain;f=lib-lua%2Flua-token.sh;h=73c6594c9269053a5ef9ca5e882bf984dc136209;hp=4bf256f018eaeb5bc41a6ad17d55d16d1512d986;hb=38fc1689b9f344f253841f5acd7bf79ed2f49b97;hpb=88d22daa9c1316d5ccc4b4bb60d40cc96c767757

diff --git a/lib-lua/lua-token.sh b/lib-lua/lua-token.sh
index 4bf256f..73c6594 100644
--- a/lib-lua/lua-token.sh
+++ b/lib-lua/lua-token.sh
@@ -37,19 +37,28 @@ do_h() {
 #ifndef MUTT_LIB_LUA_LUA_TOKEN_H
 #define MUTT_LIB_LUA_LUA_TOKEN_H
 
-enum lua_token {
-    LTK_UNKNOWN,
-`tr 'a-z-/' 'A-Z__' | sed -e 's/.*/    LTK_&,/'`
-};
+typedef enum mlua_token {
+    LTK_UNKNOWN = -1,
+`grep_self "$0" | tr 'a-z-/' 'A-Z__' | sed -e 's/.*/    LTK_&,/'`
+    LTK_count,
+} mlua_token;
+
+extern const char *__mlua_token[LTK_count];
 
 __attribute__((pure))
-enum lua_token lua_which_token(const char *s, ssize_t len);
+mlua_token mlua_which_token(const char *s, ssize_t len);
 #endif /* MUTT_LIB_LUA_LUA_TOKEN_H */
 EOF
 }
 
+do_tokens() {
+    while read tok; do
+        echo "$tok, LTK_`echo $tok | tr 'a-z-' 'A-Z_'`"
+    done
+}
+
 do_c() {
-    cat <<EOF | gperf -m16 -l -t -C -F",0" -Nlua_which_token_aux
+    cat <<EOF | gperf -m16 -l -t -C -F",0" -Nmlua_which_token_aux
 %{
 `do_hdr`
 
@@ -57,21 +66,25 @@ do_c() {
 #include "lua-token.h"
 
 static const struct tok *
-lua_which_token_aux(const char *str, unsigned int len);
+mlua_which_token_aux(const char *str, unsigned int len);
 
 %}
 struct tok { const char *name; int val; };
 %%
-`awk '{print $0 ", " NR }'`
+`grep_self "$0" | do_tokens`
 %%
 
-enum lua_token lua_which_token(const char *s, ssize_t len)
+const char *__mlua_token[LTK_count] = {
+`grep_self "$0" | sed -e 's/.*/    "&",/'`
+};
+
+mlua_token mlua_which_token(const char *s, ssize_t len)
 {
     if (len < 0)
         len = m_strlen(s);
 
     if (len) {
-        const struct tok *res = lua_which_token_aux(s, len);
+        const struct tok *res = mlua_which_token_aux(s, len);
         return res ? res->val : LTK_UNKNOWN;
     } else {
         return LTK_UNKNOWN;
@@ -88,8 +101,8 @@ trap "rm -f $1" 1 2 3 15
 
 rm -f $1
 case "$1" in
-    *.h) grep_self "$0" | do_h > $1;;
-    *.c) grep_self "$0" | do_c > $1;;
+    *.h) do_h > $1;;
+    *.c) do_c > $1;;
     *)  die "you must ask for the 'h' or 'c' generation";;
 esac
 chmod -w $1
@@ -97,5 +110,63 @@ chmod -w $1
 exit 0
 
 ############ Put tokens here ############
-## shell
+## alias_file
+## alias_format
+## ask-no
+## ask-yes
+## assumed_charset
+## autoencrypt
+## autopgp
+## autosign
+## autosmime
+## beep
+## beep_new
+## bindir
+## ca_certificates_file
+## cert_file
+## charset
+## docdir
+## dotlock
+## dsn_notify
+## dsn_return
+## editor
+## envelope_from_address
+## file_charset
+## force_tls
+## from
+## gecos_mask
+## hcache_backend
+## homedir
+## hostname
+## mailcap_path
+## mailcap_sanitize
+## mail_check
+## min_dh_prime_bits
+## no
+## operating_system
+## pgp_entry_format
+## quit
+## record
+## replyencrypt
+## replysign
+## replysignencrypted
+## send_charset
 ## sendmail
+## sendmail_wait
+## shell
+## shorthost
+## signature
+## smime_is_default
+## spam_separator
+## starttls
+## sysconfdir
+## tmpdir
+## use_8bitmime
+## use_domain
+## use_envelope_from
+## username
+## use_sslv3
+## use_tlsv1
+## verify_sig
+## version
+## yes