ncurses 5.6 - patch 20080203
[ncurses.git] / ncurses / base / MKunctrl.awk
index 5d187a8cfb7e790cbce25253d7a27f0465331950..1ba511d72323bf2ffcffe39293c2f8cde1ca99c5 100644 (file)
@@ -1,6 +1,6 @@
-# $Id: MKunctrl.awk,v 1.14 2007/07/28 21:13:21 tom Exp $
+# $Id: MKunctrl.awk,v 1.21 2008/02/03 20:24:30 tom Exp $
 ##############################################################################
-# Copyright (c) 1998-2006,2007 Free Software Foundation, Inc.                #
+# Copyright (c) 1998-2007,2008 Free Software Foundation, Inc.                #
 #                                                                            #
 # Permission is hereby granted, free of charge, to any person obtaining a    #
 # copy of this software and associated documentation files (the "Software"), #
 # authorization.                                                             #
 ##############################################################################
 #
-# Author: Thomas E. Dickey <dickey@clark.net> 1997
+# Author: Thomas E. Dickey (1997-on)
 #
 
 BEGIN  {
                print "/* generated by MKunctrl.awk */"
                print ""
                print "#include <curses.priv.h>"
+               print "#include <ctype.h>"
+               print ""
+               print "#if USE_WIDEC_SUPPORT"
+               print "#if HAVE_WCTYPE_H"
+               print "#include <wctype.h>"
+               print "#endif"
+               print "#endif"
                print ""
                print "#undef unctrl"
                print ""
@@ -69,6 +76,12 @@ END  {
                        } else if (ch >= 128 && ch < 160) {
                                part = sprintf("~\\%03o", ch - 64);
                                offset = offset + 3;
+                       } else if (ch == 255) {
+                               part = "~?";
+                               offset = offset + 3;
+                       } else if (ch >= 160) {
+                               part = sprintf("M-\\%03o", ch - 128);
+                               offset = offset + 4;
                        } else {
                                gap = gap " "
                                part = sprintf("\\%03o", ch);
@@ -88,14 +101,13 @@ END        {
                blob = blob "\"";
 
                print ""
-               print "#if NCURSES_EXT_FUNCS"
                if (bigstrings) {
-                       blob = blob "\n#if NCURSES_EXT_FUNCS"
+                       blob = blob "\n/* printable values in 128-255 range */"
                        printf "static const short unctrl_c1[] = {"
                } else {
                        printf "static const char* const unctrl_c1[] = {"
                }
-               for ( ch = 128; ch < 160; ch++ ) {
+               for ( ch = 128; ch < 256; ch++ ) {
                        gap = ","
                        if ((ch % 8) == 0) {
                                if (ch != 128)
@@ -111,7 +123,7 @@ END {
                                if (((ch + 1) % 8) != 0)
                                        gap = gap " "
                        } else {
-                               if (ch >= 128 && ch < 160) {
+                               if (ch >= 128) {
                                        printf "\"\\%03o\"", ch
                                        gap = gap " "
                                }
@@ -123,8 +135,7 @@ END {
                        }
                }
                print "};"
-               print "#endif /* NCURSES_EXT_FUNCS */"
-               blob = blob "\"\n#endif /* NCURSES_EXT_FUNCS */\n"
+               blob = blob "\"\n"
 
                print ""
                if (bigstrings) {
@@ -134,22 +145,41 @@ END       {
                } else {
                        stringname = "unctrl"
                }
-               print "\tint check = ChCharOf(ch);"
-               print "\tconst char *result;"
-               print ""
-               print "\tif (check >= 0 && check < (int)SIZEOF(unctrl_table)) {"
-               print "#if NCURSES_EXT_FUNCS"
-               print "\t\tif ((SP != 0)"
-               print "\t\t && (SP->_legacy_coding > 1)"
-               print "\t\t && (check >= 128)"
-               print "\t\t && (check < 160))"
+               print  "\tint check = ChCharOf(ch);"
+               print  "\tconst char *result;"
+               print  ""
+               print  "\tif (check >= 0 && check < (int)SIZEOF(unctrl_table)) {"
+               print  "#if NCURSES_EXT_FUNCS"
+               print  "\t\tif ((SP != 0)"
+               print  "\t\t && (SP->_legacy_coding > 1)"
+               print  "\t\t && (check >= 128)"
+               print  "\t\t && (check < 160))"
+               printf "\t\t\tresult = %s_c1[check - 128];\n", stringname;
+               print  "\t\telse"
+               print  "#if USE_WIDEC_SUPPORT"
+               print  "\t\tif ((check >= 160)"
+               print  "\t\t && (check < 256)"
+               print  "\t\t && ((SP != 0)"
+               print  "\t\t  && ((SP->_legacy_coding > 0)"
+               print  "\t\t   || (SP->_legacy_coding == 0"
+               print  "\t\t       && (isprint(check) || iswprint(check))))))"
+               printf "\t\t\tresult = %s_c1[check - 128];\n", stringname;
+               print  "\t\telse"
+               print  "#else"
+               print  "\t\tif ((check >= 160)"
+               print  "\t\t && (check < 256)"
+               print  "\t\t && ((SP != 0)"
+               print  "\t\t  && ((SP->_legacy_coding > 0)"
+               print  "\t\t   || (SP->_legacy_coding == 0"
+               print  "\t\t       && isprint(check)))))"
                printf "\t\t\tresult = %s_c1[check - 128];\n", stringname;
-               print "\t\telse"
-               print "#endif /* NCURSES_EXT_FUNCS */"
+               print  "\t\telse"
+               print  "#endif /* USE_WIDEC_SUPPORT */"
+               print  "#endif /* NCURSES_EXT_FUNCS */"
                printf "\t\t\tresult = %s_table[check];\n", stringname;
-               print "\t} else {"
-               print "\t\tresult = 0;"
-               print "\t}"
-               print "\treturn (NCURSES_CONST char *)result;"
-               print "}"
+               print  "\t} else {"
+               print  "\t\tresult = 0;"
+               print  "\t}"
+               print  "\treturn (NCURSES_CONST char *)result;"
+               print  "}"
        }