TODO: Identificar o porque nao esta considerando o final do arquivo de leitura

unknown · unknown · commit 6e932d0b74e0 · 2016-09-12T14:43:12.000-03:00
diff --git a/sqlscriptparser.lex b/sqlscriptparser.lex
@@ -3,7 +3,6 @@
 %}
 %option noyywrap
 %%
-"("												/*ignore*/
 [ ]*(DAT|COD|DES|IND|JSON|XML|IDT|NUM|FLG|NAM)\_[A-Z0-9\_]+ { yylval.sval = strdup(yytext); return COLUMN;}
 "CREATE TABLE"									{ yylval.sval = strdup(yytext); return CREATE_TABLE;}
 "CREATE INDEX"									{ yylval.sval = strdup(yytext); return CREATE_INDEX;}
@@ -15,17 +14,21 @@
 [ ]+CHECK[ ]*									{ yylval.sval = strdup(yytext); return CHECK;}
 "ADD CONSTRAINT"								{ yylval.sval = strdup(yytext); return ADD_CONSTRAINT;}
 "\n" 											{return FIM_COMANDO;} 
+"("												/*ignore*/
 ")"												{}
 "/"												{}
 "'"												{}
 "-"												{}
+"_"												{}
 ";"												{}
 "="												{}
 ":"												{}
 ">"												{}
 "<"												{}
 "."												{}
 "*"												{}
-[\sA-Z0-9\_a-z\(\)\,]*							/*ignore*/
+","												{}
+[A-Z0-9]*							/*ignore*/
+
 %%
 
diff --git a/sqlscriptparser.y b/sqlscriptparser.y
@@ -50,7 +50,7 @@ instrucao: CREATE_TABLE OWNER_OBJECT FIM_COMANDO  {
 													  //printf("select case count(1) when 1 then 'ok' else 'error' end from dba_tables t where t.owner='%s' and t.table_name='%s';\n",owner,object); 
 													  }
 													  
-	| CREATE_INDEX OWNER_OBJECT OWNER_OBJECT FIM_COMANDO      { 
+	| CREATE_INDEX OWNER_OBJECT OWNER_OBJECT COLUMN FIM_COMANDO      { 
 												  char *owner;
 												  char *object;
 												  owner = strtok ($2,".");
@@ -64,7 +64,7 @@ instrucao: CREATE_TABLE OWNER_OBJECT FIM_COMANDO  {
 												  printf("\n--CREATE INDEX\n%s\n",str);
 												  //printf("select case count(1) when 1 then 'ok' else 'error' end from dba_indexes t where t.owner='%s' and t.index_name='%s';\n",owner,object); 
 												  }
-	| ALTER_TABLE OWNER_OBJECT ADD_CONSTRAINT FK_NAME  FK OWNER_OBJECT FIM_COMANDO { 
+	| ALTER_TABLE OWNER_OBJECT ADD_CONSTRAINT FK_NAME  FK COLUMN OWNER_OBJECT COLUMN FIM_COMANDO { 
 												  char *owner;
 												  char *object;
 												  owner = strtok ($2,".");
@@ -112,7 +112,7 @@ instrucao: CREATE_TABLE OWNER_OBJECT FIM_COMANDO  {
 	| FIM_COMANDO 					{} 
 	| OWNER_OBJECT 					{}
 	| FK_NAME						{}		
-	| COLUMN						{}
+	| COLUMN						{}	
 //
  ;
 
diff --git a/teste.txt b/teste.txt
@@ -1,7 +1,5 @@
 
-ALTER TABLE SAFEPAY_ADM.TRANSACTION_CHECKOUT  ADD CONSTRAINT TRANCHEC_CK01  CHECK( IND_CHECKOUT_TYPE IN ('W',)) ENABLE NOVALIDATE;
 
-ALTER TABLE SAFEPAY_ADM.TRANSACTION_CHECKOUT  ADD CONSTRAINT TRANCHEC_CK01  CHECK (IND_CHECKOUT_TYPE IN ('W', 'L', 'T', 'G', 'M', 'A', 'V')) ENABLE NOVALIDATE;
 
 DECLARE
   RESOURCE_BUSY EXCEPTION;
@@ -98,28 +96,12 @@ END;
 -- INDEX P/ FK
 CREATE INDEX SAFEPAY_ADM.PROM_IDX02 ON SAFEPAY_ADM.PROMOTION (IDT_PAYMENT_REQUEST_MODEL) TABLESPACE TSISAFEPAY01 INITRANS 8 ONLINE;
 
+ALTER TABLE SAFEPAY_ADM.TRANSACTION_CHECKOUT  ADD CONSTRAINT FUCK_CK01  CHECK( IND_CHECKOUT_TYPE IN (''W'', ''L'', ''T'', ''G'', ''M'', ''A'', ''V'')) ENABLE NOVALIDATE;
 
+CREATE INDEX SAFEPAY_ADM.PROM_IDX02 ON SAFEPAY_ADM.PROMOTION (IDT_PAYMENT_REQUEST_MODEL) TABLESPACE TSISAFEPAY01 INITRANS 8 ONLINE;
 
+ALTER TABLE SAFEPAY_ADM.TRANSACTION_CHECKOUT  ADD CONSTRAINT TRANCHEC_CK01  CHECK (IND_CHECKOUT_TYPE IN (''W'', ''L'', ''T'', ''G'', ''M'', ''A'', ''V'')) ENABLE NOVALIDATE;
 
+--aaaaaa teste
 
-
-DECLARE
-  RESOURCE_BUSY EXCEPTION;
-  PRAGMA EXCEPTION_INIT(RESOURCE_BUSY, -00054);
-  NAOEXECUTOU BOOLEAN := TRUE;
-BEGIN
-  WHILE NAOEXECUTOU
-  LOOP
-    BEGIN
-      EXECUTE IMMEDIATE 'ALTER TABLE SAFEPAY_ADM.TRANSACTION_CHECKOUT  ADD CONSTRAINT TRANCHEC_CK01  CHECK (IND_CHECKOUT_TYPE IN (''W'', ''L'', ''T'', ''G'', ''M'', ''A'', ''V'')) ENABLE NOVALIDATE';
-      NAOEXECUTOU := FALSE;
-			DBMS_OUTPUT.PUT_LINE('RECRIADA TRANCHEC_CK01'); 
-    EXCEPTION
-      WHEN RESOURCE_BUSY THEN
-        DBMS_LOCK.SLEEP(SECONDS =>1);
-      WHEN OTHERS THEN
-        RAISE;
-    END;
-  END LOOP;
-END; 
-/
+bbbb
