MonetDB: default - Enable MAL directed transaction rollback.

[Martin Kersten]

Changeset: 39a0d3f52d7e for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=39a0d3f52d7e
Modified Files:
        sql/backends/monet5/sql.mx
Branch: default
Log Message:

Enable MAL directed transaction rollback.


diffs (42 lines):

diff --git a/sql/backends/monet5/sql.mx b/sql/backends/monet5/sql.mx
--- a/sql/backends/monet5/sql.mx
+++ b/sql/backends/monet5/sql.mx
@@ -61,6 +61,10 @@ pattern commit()
 address SQLcommit
 comment "Trigger the commit operation for a MAL block";
 
+pattern abort()
+address SQLabort
+comment "Trigger the abort operation for a MAL block";
+
 pattern catalog(type:int,sname:str,name:str,action:int):void
 address SQLcatalog
 comment "a catalog statement";
@@ -1278,6 +1282,7 @@ extern BAT *mvc_bind_idxbat(mvc *m, char
 sql5_export str SQLmvc(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr 
pci);
 sql5_export str SQLtransaction(Client cntxt, MalBlkPtr mb, MalStkPtr stk, 
InstrPtr pci);
 sql5_export str SQLcommit(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr 
pci);
+sql5_export str SQLabort(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr 
pci);
 sql5_export str SQLtransaction2(Client cntxt, MalBlkPtr mb, MalStkPtr stk, 
InstrPtr pci);
 sql5_export str SQLcatalog(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr 
pci);
 
@@ -1871,6 +1876,19 @@ SQLcommit(Client cntxt, MalBlkPtr mb, Ma
 }
 
 str
+SQLabort(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci)
+{
+       mvc *sql = NULL;
+       str msg = getSQLContext(cntxt, mb, &sql, NULL);
+       (void) stk;
+       (void) pci;
+
+       if (sql->session->active)
+               mvc_rollback(sql, 0, NULL);
+       return msg;
+}
+
+str
 SQLtransaction2(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci)
 {
        mvc *sql = NULL;
_______________________________________________
Checkin-list mailing list
Checkin-list@monetdb.org
http://mail.monetdb.org/mailman/listinfo/checkin-list