]> git.stg.codes - stg.git/blob - projects/stargazer/plugins/store/firebird/firebird_store_tariffs.cpp
Verbose BLOWFISH_CTX failures.
[stg.git] / projects / stargazer / plugins / store / firebird / firebird_store_tariffs.cpp
1 /*
2  *    This program is free software; you can redistribute it and/or modify
3  *    it under the terms of the GNU General Public License as published by
4  *    the Free Software Foundation; either version 2 of the License, or
5  *    (at your option) any later version.
6  *
7  *    This program is distributed in the hope that it will be useful,
8  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
9  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
10  *    GNU General Public License for more details.
11  *
12  *    You should have received a copy of the GNU General Public License
13  *    along with this program; if not, write to the Free Software
14  *    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
15  */
16
17 /*
18  *    Author : Maxim Mamontov <faust@stargazer.dp.ua>
19  */
20
21 /*
22  *  Tariffs manipulation methods
23  *
24  *  $Revision: 1.5 $
25  *  $Date: 2007/12/23 13:39:59 $
26  *
27  */
28
29 #include "firebird_store.h"
30
31 #include "stg/ibpp.h"
32 #include "stg/tariff.h"
33 #include "stg/tariff_conf.h"
34 #include "stg/common.h"
35
36 #include <cmath>
37
38 namespace
39 {
40
41 const int pt_mega = 1024 * 1024;
42
43 }
44
45 //-----------------------------------------------------------------------------
46 int FIREBIRD_STORE::GetTariffsList(std::vector<std::string> * tariffsList) const
47 {
48 STG_LOCKER lock(&mutex);
49
50 IBPP::Transaction tr = IBPP::TransactionFactory(db, IBPP::amRead, til, tlr);
51 IBPP::Statement st = IBPP::StatementFactory(db, tr);
52
53 try
54     {
55     tr->Start();
56     st->Execute("select name from tb_tariffs");
57     while (st->Fetch())
58         {
59         std::string name;
60         st->Get(1, name);
61         tariffsList->push_back(name);
62         }
63     tr->Commit();
64     }
65
66 catch (IBPP::Exception & ex)
67     {
68     tr->Rollback();
69     strError = "IBPP exception";
70     printfd(__FILE__, ex.what());
71     return -1;
72     }
73
74 return 0;
75 }
76 //-----------------------------------------------------------------------------
77 int FIREBIRD_STORE::AddTariff(const std::string & name) const
78 {
79 STG_LOCKER lock(&mutex);
80
81 IBPP::Transaction tr = IBPP::TransactionFactory(db, IBPP::amWrite, til, tlr);
82 IBPP::Statement st = IBPP::StatementFactory(db, tr);
83
84 try
85     {
86     tr->Start();
87     st->Prepare("execute procedure sp_add_tariff(?, ?)");
88     st->Set(1, name);
89     st->Set(2, DIR_NUM);
90     st->Execute();
91     tr->Commit();
92     }
93
94 catch (IBPP::Exception & ex)
95     {
96     tr->Rollback();
97     strError = "IBPP exception";
98     printfd(__FILE__, ex.what());
99     return -1;
100     }
101
102 return 0;
103 }
104 //-----------------------------------------------------------------------------
105 int FIREBIRD_STORE::DelTariff(const std::string & name) const
106 {
107 STG_LOCKER lock(&mutex);
108
109 IBPP::Transaction tr = IBPP::TransactionFactory(db, IBPP::amWrite, til, tlr);
110 IBPP::Statement st = IBPP::StatementFactory(db, tr);
111
112 try
113     {
114     tr->Start();
115     st->Prepare("execute procedure sp_delete_tariff(?)");
116     st->Set(1, name);
117     st->Execute();
118     tr->Commit();
119     }
120
121 catch (IBPP::Exception & ex)
122     {
123     tr->Rollback();
124     strError = "IBPP exception";
125     printfd(__FILE__, ex.what());
126     return -1;
127     }
128
129 return 0;
130 }
131 //-----------------------------------------------------------------------------
132 int FIREBIRD_STORE::SaveTariff(const STG::TariffData & td,
133                                const std::string & tariffName) const
134 {
135 STG_LOCKER lock(&mutex);
136
137 IBPP::Transaction tr = IBPP::TransactionFactory(db, IBPP::amWrite, til, tlr);
138 IBPP::Statement st = IBPP::StatementFactory(db, tr);
139
140 try
141     {
142     tr->Start();
143     st->Prepare("select pk_tariff from tb_tariffs where name = ?");
144     st->Set(1, tariffName);
145     st->Execute();
146     if (!st->Fetch())
147     {
148     tr->Rollback();
149     strprintf(&strError, "Tariff \"%s\" not found in database", tariffName.c_str());
150     printfd(__FILE__, "Tariff '%s' not found in database\n", tariffName.c_str());
151     return -1;
152     }
153     int32_t id;
154     st->Get(1, id);
155     st->Close();
156
157     std::string query = "update tb_tariffs set \
158                             fee = ?, \
159                             free = ?, \
160                             passive_cost = ?, \
161                             traff_type = ?";
162
163     if (schemaVersion > 0)
164         query += ", period = ?";
165     if (schemaVersion > 1)
166         query += ", change_policy = ?, \
167                     change_policy_timeout = ?";
168
169     query += " where pk_tariff = ?";
170
171     unsigned num = 5;
172     st->Prepare(query);
173     st->Set(1, td.tariffConf.fee);
174     st->Set(2, td.tariffConf.free);
175     st->Set(3, td.tariffConf.passiveCost);
176     st->Set(4, td.tariffConf.traffType);
177
178     if (schemaVersion > 0)
179         {
180         st->Set(5, STG::Tariff::toString(td.tariffConf.period));
181         ++num;
182         }
183
184     if (schemaVersion > 1)
185         {
186         st->Set(6, STG::Tariff::toString(td.tariffConf.changePolicy));
187         IBPP::Timestamp policyTimeout;
188         time_t2ts(td.tariffConf.changePolicyTimeout, &policyTimeout);
189         st->Set(7, policyTimeout);
190         num += 2;
191         }
192
193     st->Set(num, id);
194     st->Execute();
195     st->Close();
196
197     IBPP::Time tb;
198     IBPP::Time te;
199
200     for(int i = 0; i < DIR_NUM; i++)
201         {
202
203         tb.SetTime(td.dirPrice[i].hDay, td.dirPrice[i].mDay, 0);
204         te.SetTime(td.dirPrice[i].hNight, td.dirPrice[i].mNight, 0);
205
206         double pda = td.dirPrice[i].priceDayA * 1024 * 1024;
207         double pdb = td.dirPrice[i].priceDayB * 1024 * 1024;
208         double pna = 0;
209         double pnb = 0;
210
211         if (td.dirPrice[i].singlePrice)
212             {
213             pna = pda;
214             pnb = pdb;
215             }
216         else
217             {
218             pna = td.dirPrice[i].priceNightA;
219             pnb = td.dirPrice[i].priceNightB;
220             }
221
222         int threshold = 0;
223         if (td.dirPrice[i].noDiscount)
224             {
225             threshold = 0xffFFffFF;
226             }
227         else
228             {
229             threshold = td.dirPrice[i].threshold;
230             }
231
232         st->Prepare("update tb_tariffs_params set \
233                 price_day_a = ?, \
234                 price_day_b = ?, \
235                 price_night_a = ?, \
236                 price_night_b = ?, \
237                 threshold = ?, \
238                 time_day_begins = ?, \
239                 time_day_ends = ? \
240                 where fk_tariff = ? and dir_num = ?");
241         st->Set(1, pda);
242         st->Set(2, pdb);
243         st->Set(3, pna);
244         st->Set(4, pnb);
245         st->Set(5, threshold);
246         st->Set(6, tb);
247         st->Set(7, te);
248         st->Set(8, id);
249         st->Set(9, i);
250         st->Execute();
251         st->Close();
252         }
253     tr->Commit();
254     }
255
256 catch (IBPP::Exception & ex)
257     {
258     tr->Rollback();
259     strError = "IBPP exception";
260     printfd(__FILE__, ex.what());
261     return -1;
262     }
263
264 return 0;
265 }
266 //-----------------------------------------------------------------------------
267 int FIREBIRD_STORE::RestoreTariff(STG::TariffData * td,
268                                   const std::string & tariffName) const
269 {
270 STG_LOCKER lock(&mutex);
271
272 IBPP::Transaction tr = IBPP::TransactionFactory(db, IBPP::amRead, til, tlr);
273 IBPP::Statement st = IBPP::StatementFactory(db, tr);
274
275
276 td->tariffConf.name = tariffName;
277
278 try
279     {
280     tr->Start();
281     st->Prepare("select * from tb_tariffs where name = ?"); // TODO: explicit field order!
282     st->Set(1, tariffName);
283     st->Execute();
284     if (!st->Fetch())
285         {
286         strError = "Tariff \"" + tariffName + "\" not found in database";
287     printfd(__FILE__, "Tariff '%s' not found in database\n", tariffName.c_str());
288         tr->Rollback();
289         return -1;
290         }
291     int32_t id;
292     st->Get(1, id);
293     st->Get(3, td->tariffConf.fee);
294     st->Get(4, td->tariffConf.free);
295     st->Get(5, td->tariffConf.passiveCost);
296     td->tariffConf.traffType = STG::Tariff::fromInt(Get<int>(st, 6));
297     if (schemaVersion > 0)
298         td->tariffConf.period = STG::Tariff::parsePeriod(Get<std::string>(st, 7));
299     if (schemaVersion > 1)
300         {
301         td->tariffConf.changePolicy = STG::Tariff::parseChangePolicy(Get<std::string>(st, 8));
302         td->tariffConf.changePolicyTimeout = ts2time_t(Get<IBPP::Timestamp>(st, 9));
303         }
304     st->Close();
305     st->Prepare("select * from tb_tariffs_params where fk_tariff = ?");
306     st->Set(1, id);
307     st->Execute();
308     int i = 0;
309     while (st->Fetch())
310     {
311     i++;
312     if (i > DIR_NUM)
313         {
314         strError = "Too mach params for tariff \"" + tariffName + "\"";
315         printfd(__FILE__, "Too mach params for tariff '%s'\n", tariffName.c_str());
316         tr->Rollback();
317         return -1;
318         }
319     int16_t dir;
320     st->Get(3, dir);
321     st->Get(4, td->dirPrice[dir].priceDayA);
322     td->dirPrice[dir].priceDayA /= 1024*1024;
323     st->Get(5, td->dirPrice[dir].priceDayB);
324     td->dirPrice[dir].priceDayB /= 1024*1024;
325     st->Get(6, td->dirPrice[dir].priceNightA);
326     td->dirPrice[dir].priceNightA /= 1024*1024;
327     st->Get(7, td->dirPrice[dir].priceNightB);
328     td->dirPrice[dir].priceNightB /= 1024*1024;
329     st->Get(8, td->dirPrice[dir].threshold);
330     if (std::fabs(td->dirPrice[dir].priceDayA - td->dirPrice[dir].priceNightA) < 1.0e-3 / pt_mega &&
331         std::fabs(td->dirPrice[dir].priceDayB - td->dirPrice[dir].priceNightB) < 1.0e-3 / pt_mega)
332         {
333         td->dirPrice[dir].singlePrice = true;
334         }
335     else
336         {
337         td->dirPrice[dir].singlePrice = false;
338         }
339     if (td->dirPrice[dir].threshold == (int)0xffFFffFF)
340         {
341         td->dirPrice[dir].noDiscount = true;
342         }
343     else
344         {
345
346         td->dirPrice[dir].noDiscount = false;
347         }
348     IBPP::Time tb;
349     st->Get(9, tb);
350     IBPP::Time te;
351     st->Get(10, te);
352     int h, m, s;
353     tb.GetTime(h, m, s);
354     td->dirPrice[dir].hDay = h;
355     td->dirPrice[dir].mDay = m;
356     te.GetTime(h, m, s);
357     td->dirPrice[dir].hNight = h;
358     td->dirPrice[dir].mNight = m;
359     }
360     tr->Commit();
361     }
362
363 catch (IBPP::Exception & ex)
364     {
365     tr->Rollback();
366     strError = "IBPP exception";
367     printfd(__FILE__, ex.what());
368     return -1;
369     }
370
371 return 0;
372 }
373 //-----------------------------------------------------------------------------
374