1    | /***************************************
2    | 
3    |   Functions for handling serials  
4    | 
5    |   Status: NOT REVUED, NOT TESTED
6    | 
7    |  Author(s):       Andrei Robachevsky
8    | 
9    |   ******************/ /******************
10   |   Modification History:
11   |         andrei (08/02/2000) Created.
12   |   ******************/ /******************
13   |   Copyright (c) 2000                              RIPE NCC
14   |  
15   |   All Rights Reserved
16   |   
17   |   Permission to use, copy, modify, and distribute this software and its
18   |   documentation for any purpose and without fee is hereby granted,
19   |   provided that the above copyright notice appear in all copies and that
20   |   both that copyright notice and this permission notice appear in
21   |   supporting documentation, and that the name of the author not be
22   |   used in advertising or publicity pertaining to distribution of the
23   |   software without specific, written prior permission.
24   |   
25   |   THE AUTHOR DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
26   |   ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS; IN NO EVENT SHALL
27   |   AUTHOR BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY
28   |   DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN
29   |   AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
30   |   OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
31   |  ***************************************/
32   | #include "ud.h"
33   | #include "ud_int.h"
34   | #include "ud_tr.h"
35   | 
36   | /************************************************************
37   | * int UD_lock/unlock_serial()                               *
38   | *                                                           *
39   | * Performs lockind/unlocking of the relevant tables         *
40   | *                                                           *
41   | * Returns:                                                  *
42   | * 0 - success                                               *
43   | * Non-zero if error occured (XXX dies now)                  *
44   | *                                                           *
45   | ************************************************************/
46   | int UD_lock_serial(Transaction_t *tr)
47   | {
48   | int sql_err;
49   | 
50   | /* lock all tables we are going to update and commit */	
51   | /* this also includes transaction_rec table, as we update the status */
52   |    sql_err=SQ_execute_query(tr->sql_connection, "LOCK TABLES serials WRITE, failed_transaction WRITE, transaction_rec WRITE ", NULL);
53   |    if (sql_err) { 
54   | 	ER_perror(FAC_UD, UD_SQL, "%s[%s]\n", SQ_error(tr->sql_connection), "LOCK TABLES serials WRITE, failed_transaction WRITE, transaction_rec WRITE ");
55   |         die;
56   |     }
57   |  return(sql_err);
58   | }
59   | 
60   | int UD_unlock_serial(Transaction_t *tr)
61   | {
62   | int sql_err;
63   | 	
64   |    sql_err=SQ_execute_query(tr->sql_connection, "UNLOCK TABLES ", NULL);
65   |    if (sql_err) { 
66   | 	ER_perror(FAC_UD, UD_SQL, "%s[%s]\n", SQ_error(tr->sql_connection), "UNLOCK TABLES");
67   |         die;
68   |     }
69   |  return(sql_err);
70   | }
71   | 
72   | 
73   | /************************************************************
74   | * UD_create_serial()                                        *     
75   | *                                                           *
76   | * Creates a serial record for given transaction             *
77   | *                                                           *
78   | * Important fields of transaction are:                      *
79   | * tr->action        TR_CREATE/TR_UPDATE/TR_DELETE           *
80   | * tr->object_id     should be filled in                     *
81   | * tr->sequence_id   should be set to object updated         *
82   | *                                                           *
83   | * So given object with id=k and seq=n                       *
84   | * Create:  ADD(k,n)                                         *
85   | * Update:  ~S(k,n), ADD(k,n+1)                              *
86   | * Delete:  ~S(k,n), DEL(k,n)                                *
87   | *                                                           *
88   | * Returns:                                                  *
89   | *  current serial number.                                    *
90   | *  -1 in case of an error                                   *
91   | *                                                           *
92   | *************************************************************/
93   | 
94   | long UD_create_serial(Transaction_t *tr)
95   | {
96   | GString *query;
97   | long current_serial=0;
98   | int sql_err;
99   | int operation;
100  | long timestamp;
101  | long sequence_id;
102  |    
103  |    if ((query = g_string_sized_new(STR_XL)) == NULL){ 
104  |       tr->succeeded=0;
105  |       tr->error |= ERROR_U_MEM;
106  |       ER_perror(FAC_UD, UD_MEM, "cannot allocate gstring\n");
107  |       die;
108  |    }
109  |    
110  |    /* Calculate the object_id - should be max+1 */
111  | //   tr->serial_id = get_minmax_id(tr->sql_connection, "serial_id", "serials", 1) +1;
112  | //   TR_update_id(tr);
113  | 
114  | /* fprintf(stderr, "creating serial\n"); */
115  |   /* if the transaction failed store it in transaction table */
116  |   if(tr->succeeded==0){
117  |     if(ACT_DELETE(tr->action))operation=OP_DEL; else operation=OP_ADD;
118  |     
119  |     g_string_sprintf(query, "INSERT serials SET "
120  |                    "thread_id=%d, object_id=%ld, sequence_id=0, "
121  | 		   "atlast=2, "
122  | 		   "operation=%d ", tr->thread_ins, tr->object_id, operation);
123  |     
124  |     sql_err = SQ_execute_query(tr->sql_connection, query->str, (SQ_result_set_t **)NULL);
125  | 
126  |     if (sql_err) { 
127  | 	ER_perror(FAC_UD, UD_SQL, "%s[%s]\n", SQ_error(tr->sql_connection), query->str);
128  | 	current_serial=-1;
129  | 	die;
130  |     }
131  |     else {
132  |        current_serial=SQ_get_insert_id(tr->sql_connection);
133  |        timestamp=time(NULL);
134  | //       if(tr->serial_id!=current_serial) die; /* may be the implementation changed */
135  |        g_string_sprintf(query, "INSERT failed_transaction SET "
136  |                    "thread_id=%d, serial_id=%ld, timestamp=%ld, "
137  | 		   "object='%s' ", tr->thread_ins, current_serial, timestamp, tr->object->object->str);
138  |        /* make a record in transaction table */
139  |        sql_err = SQ_execute_query(tr->sql_connection, query->str, (SQ_result_set_t **)NULL);
140  |        if (sql_err) { 
141  | 	 ER_perror(FAC_UD, UD_SQL, "%s[%s]\n", SQ_error(tr->sql_connection), query->str);
142  |          current_serial=-1;
143  | 	 die;
144  |        }
145  |     }
146  |     g_string_free(query, TRUE);   
147  |     return(current_serial);
148  |   }  
149  | 
150  | 
151  |   /* if the transaction has succeeded */
152  |   sequence_id=tr->sequence_id;
153  |   /* If this is an update or delete */    
154  |   if(!ACT_CREATE(tr->action)) { 
155  |     /* Increase the sequence_id so we insert correct ADD serial in case of Update */
156  |     sequence_id=tr->sequence_id + 1;
157  |     /* set the atlast field of the latest record for this object to 0 */
158  |     /* because it is moved to history */
159  |     g_string_sprintf(query, "UPDATE serials SET atlast=0, thread_id=%d "
160  |                    "WHERE object_id=%ld "
161  |                    "AND sequence_id=%ld ", tr->thread_upd, tr->object_id, sequence_id-1);
162  |     
163  |     sql_err = SQ_execute_query(tr->sql_connection, query->str, (SQ_result_set_t **)NULL);
164  |     if (sql_err) { // we can have empty updates, but not errors
165  | 	ER_perror(FAC_UD, UD_SQL, "%s[%s]\n", SQ_error(tr->sql_connection), query->str);
166  |         current_serial=-1;
167  | 	die;
168  |     }
169  |   }  
170  |   /* XXX below is a code for protocol v2, where updates are atomic */
171  |   /* XXX this is fine (and should always be used) for NRTM, since we */
172  |   /* XXX store failed transactions and playback stream exactly as it comes */
173  |   /* XXX However, for update this may be configurable option */
174  |   /* XXX In case v1 protocol both sections (DEL + ADD) should be executed */
175  |   /* if this a DEL */ 
176  |   if(ACT_DELETE(tr->action)) {   
177  |     /* generate DEL serial */
178  |     g_string_sprintf(query, "INSERT serials SET "
179  |                    "thread_id=%d, object_id=%ld, "
180  |                    "sequence_id=%ld, "
181  |                    "atlast=0, "
182  |                    "operation=%d ", tr->thread_ins, tr->object_id, sequence_id-1, OP_DEL);
183  |     
184  |     sql_err = SQ_execute_query(tr->sql_connection, query->str, (SQ_result_set_t **)NULL);
185  |     if (sql_err) {
186  | 	ER_perror(FAC_UD, UD_SQL, "%s[%s]\n", SQ_error(tr->sql_connection), query->str);
187  |         current_serial=-1;
188  | 	die;
189  |     }    
190  |     else current_serial=SQ_get_insert_id(tr->sql_connection); 
191  |     
192  |   }
193  |   else { /* otherwise this is an ADD */
194  | 
195  |    /* now insert creation serial */
196  |    g_string_sprintf(query, "INSERT serials SET "
197  |                   "thread_id=%d, object_id=%ld, "
198  |                   "sequence_id=%ld, "
199  |                   "atlast=1, "
200  |                   "operation=%d ", tr->thread_ins, tr->object_id, sequence_id, OP_ADD);
201  |     
202  |    sql_err = SQ_execute_query(tr->sql_connection, query->str, (SQ_result_set_t **)NULL);
203  |    if (sql_err) {
204  | 	ER_perror(FAC_UD, UD_SQL, "%s[%s]\n", SQ_error(tr->sql_connection), query->str);
205  |         current_serial=-1;
206  | 	die;
207  |    }    
208  |    else current_serial=SQ_get_insert_id(tr->sql_connection); 
209  | 
210  |   }
211  |   g_string_free(query, TRUE);        
212  | return(current_serial);
213  | }
214  | /************************************************************
215  | * UD_comrol_serial()                                        *     
216  | *                                                           *
217  | * Commits/Rollbacks a serial record for given transaction   *
218  | * Returns:                                                  *
219  | * 0 in success                                              *
220  | *  -1 in case of an error                                   *
221  | *                                                           *
222  | *************************************************************/
223  | 
224  | char *Q_rollback_serial1="DELETE FROM serials WHERE thread_id=%ld ";
225  | char *Q_rollback_serial2="UPDATE serials SET atlast=1, thread_id=0 WHERE thread_id=%ld ";
226  | char *Q_rollback_transaction="DELETE FROM failed_transaction WHERE thread_id=%ld ";
227  | char *Q_commit_serial="UPDATE serials SET thread_id=0 WHERE thread_id=%ld OR thread_id=%ld ";
228  | char *Q_commit_transaction="UPDATE failed_transaction SET thread_id=0 WHERE thread_id=%ld ";
229  | 
230  | 
231  | 
232  | int UD_comrol_serial(Transaction_t *tr, int commit)
233  | {
234  | GString *query;
235  | int sql_err;
236  | char *Q_transaction;
237  | 
238  |    /* check if something is left in serials from the crash */
239  |    
240  |    if ((query = g_string_sized_new(STR_XL)) == NULL){ 
241  |       ER_perror(FAC_UD, UD_MEM, "cannot allocate gstring\n"); 
242  |       tr->succeeded=0;
243  |       tr->error |= ERROR_U_MEM;
244  |       return(ERROR_U_MEM); 
245  |    }
246  |    
247  |    /* compose the appropriate query depending on operation (commit/rollback) */
248  |    if(commit) {
249  | 	   /* commit changes to serials table */
250  | 	   g_string_sprintf(query, Q_commit_serial, tr->thread_ins, tr->thread_upd);
251  | 	   sql_err = SQ_execute_query(tr->sql_connection, query->str, (SQ_result_set_t **)NULL);
252  |            if (sql_err) {
253  | 	     ER_perror(FAC_UD, UD_SQL, "%s[%s]\n", SQ_error(tr->sql_connection), query->str);
254  |              die;
255  |            }
256  | 	   Q_transaction=Q_commit_transaction;
257  |    } else {
258  | 	   /* delete new insertions */
259  | 	   g_string_sprintf(query, Q_rollback_serial1, tr->thread_ins);
260  | 	   sql_err = SQ_execute_query(tr->sql_connection, query->str, (SQ_result_set_t **)NULL);
261  |            if (sql_err) {
262  | 	     ER_perror(FAC_UD, UD_SQL, "%s[%s]\n", SQ_error(tr->sql_connection), query->str);
263  |              die;
264  |            }
265  | 	   /* restore modified atlast */ 
266  |            g_string_sprintf(query, Q_rollback_serial2, tr->thread_upd);
267  | 	   sql_err = SQ_execute_query(tr->sql_connection, query->str, (SQ_result_set_t **)NULL);
268  |            if (sql_err) {
269  | 	     ER_perror(FAC_UD, UD_SQL, "%s[%s]\n", SQ_error(tr->sql_connection), query->str);
270  |              die;
271  |            } 
272  | 	   Q_transaction=Q_rollback_transaction;
273  |    }
274  |    
275  |     /* clean up transaction  table */
276  |     g_string_sprintf(query, Q_transaction, tr->thread_ins);
277  |     sql_err = SQ_execute_query(tr->sql_connection, query->str, (SQ_result_set_t **)NULL);
278  |     if (sql_err) {
279  | 	ER_perror(FAC_UD, UD_SQL, "%s[%s]\n", SQ_error(tr->sql_connection), query->str);
280  |         die;
281  |     }
282  |  g_string_free(query, TRUE);        
283  |  return(0);
284  | } 
285  |     
286  |