Truncate identifiers at NAMEDATALEN length.

diff --git a/src/backend/parser/scan.l b/src/backend/parser/scan.l
index bf18df010c2f7779ae2c6993b9d7ed1a69704b82..ac4c78a3d0a7055b4d3cd6490ec2403d0e1985fa 100644 (file)
--- a/src/backend/parser/scan.l
+++ b/src/backend/parser/scan.l
@@ -8,7 +8,7 @@
  *
  *
  * IDENTIFICATION
- *       $Header: /cvsroot/pgsql/src/backend/parser/scan.l,v 1.40 1998/06/16 07:29:27 momjian Exp $
+ *       $Header: /cvsroot/pgsql/src/backend/parser/scan.l,v 1.41 1998/08/29 02:36:18 momjian Exp $
  *
  *-------------------------------------------------------------------------
  */
@@ -323,6 +323,8 @@ other                       .
                                                if (isascii((unsigned char)yytext[i]) &&
                                                        isupper(yytext[i]))
                                                        yytext[i] = tolower(yytext[i]);
+                                       if (i > NAMEDATALEN)
+                                               yytext[NAMEDATALEN] = '\0';
 
                                        keyword = ScanKeywordLookup((char*)yytext);
                                        if (keyword != NULL) {
@@ -400,6 +402,8 @@ other                       .
                                                if (isascii((unsigned char)yytext[i]) &&
                                                        isupper(yytext[i]))
                                                        yytext[i] = tolower(yytext[i]);
+                                       if (i > NAMEDATALEN)
+                                               yytext[NAMEDATALEN] = '\0';
 
                                        keyword = ScanKeywordLookup((char*)yytext);
                                        if (keyword != NULL) {