#include "calculator_functions.h" #include "payment_option.h" #include "utilities.h" #include "tariff_log.h" #include "tariff_time_range.h" #include "ticket.h" #include #include #include #include #include double total_duration_min = 0.0f; double total_cost = 0.0f; bool overtime = false; #ifdef _WIN32 inline struct tm* localtime_r(const time_t *clock, struct tm* result){ if(!clock || !result) return NULL; memcpy(result,localtime(clock),sizeof(*result)); return result; } #endif QDateTime Calculator::GetDailyTicketDuration(Configuration* cfg, const QDateTime start_datetime, uint8_t payment_option, bool carry_over) { if(!start_datetime.isValid()) { return QDateTime(); } double day_price = 0.0f; int current_special_day_id = -1; bool is_special_day = Utilities::CheckSpecialDay(cfg, start_datetime.toString(Qt::ISODate).toStdString().c_str(), ¤t_special_day_id, &day_price); QDateTime inputDateTime = start_datetime; QTime worktime_from; QTime worktime_to; int daily_card_price = cfg->PaymentOption.find(payment_option)->second.pop_daily_card_price; if(daily_card_price <= 0) { LOG_ERROR("Calculator::GetDailyTicketDuration(): Daily ticket price zero or less"); return QDateTime(); } if(is_special_day) { worktime_from = QTime::fromString(cfg->SpecialDaysWorktime.find(current_special_day_id)->second.pedwt_time_from.c_str(), Qt::ISODate); worktime_to = QTime::fromString(cfg->SpecialDaysWorktime.find(current_special_day_id)->second.pedwt_time_to.c_str(),Qt::ISODate); if(inputDateTime.time() < worktime_from) inputDateTime.setTime(worktime_from); if(carry_over) inputDateTime.setTime(worktime_from); if(inputDateTime.time() >= worktime_to) { // Go to next day if outside worktime inputDateTime = inputDateTime.addSecs(86400); return GetDailyTicketDuration(cfg,inputDateTime, payment_option,true); } if(day_price <=0) { // Go to next day if special day price is 0 inputDateTime = inputDateTime.addSecs(86400); return GetDailyTicketDuration(cfg,inputDateTime, payment_option,true); } int diff = abs(inputDateTime.time().secsTo(worktime_to)); inputDateTime = inputDateTime.addSecs(diff); //qDebug() << "Ticket is valid until: " << inputDateTime.toString(Qt::ISODate) << "price = " << daily_card_price << ", duration = " << diff / 60; return inputDateTime; } else { // Get day of week int weekdayId = 0; weekdayId = Utilities::ZellersAlgorithm(inputDateTime.date().day(),inputDateTime.date().month(),inputDateTime.date().year()); // If no working day found, skip it (recursively call method again) size_t found = 0; found = cfg->WeekDaysWorktime.count(weekdayId); // When no workday found, go to next available day if(found <=0) { inputDateTime = inputDateTime.addSecs(86400); return GetDailyTicketDuration(cfg,inputDateTime, payment_option,true); } else { worktime_from = QTime::fromString(cfg->WeekDaysWorktime.find(weekdayId)->second.pwd_time_from.c_str(),Qt::ISODate); worktime_to = QTime::fromString(cfg->WeekDaysWorktime.find(weekdayId)->second.pwd_time_to.c_str(),Qt::ISODate); if(inputDateTime.time() < worktime_from) inputDateTime.setTime(worktime_from); if(carry_over) inputDateTime.setTime(worktime_from); if(inputDateTime.time() >= worktime_to) { // Go to next day if outside worktime inputDateTime = inputDateTime.addSecs(86400); return GetDailyTicketDuration(cfg,inputDateTime, payment_option,true); } int diff = abs(inputDateTime.time().secsTo(worktime_to)); inputDateTime = inputDateTime.addSecs(diff); //qDebug() << "Ticket is valid until: " << inputDateTime.toString(Qt::ISODate) << "price = " << daily_card_price << ", duration = " << diff / 60; return inputDateTime; } } return QDateTime(); } /// std::string Calculator::GetDurationFromCost(Configuration* cfg, uint8_t payment_option, char const* start_datetime, // given in local time double price, bool nextDay, bool prepaid) { Q_UNUSED(payment_option); Q_UNUSED(nextDay); // Get input date QDateTime inputDate = QDateTime::fromString(start_datetime,Qt::ISODate); // use tariff with structure as for instance Schnau, Koenigsee: // without given YearPeriod, SpecialDays and SpecialDaysWorktime if (cfg->YearPeriod.size() == 0 && cfg->SpecialDays.size() == 0 && cfg->SpecialDaysWorktime.size() == 0) { inputDate = inputDate.addSecs(GetDurationForPrice(cfg, price) * 60); return inputDate.toString(Qt::ISODate).toStdString(); } Ticket t = private_GetDurationFromCost(cfg, inputDate, price, prepaid); // qCritical().noquote() << t; // TODO: im fehlerfall return t.getValidUntil().toString(Qt::ISODate).toStdString(); } /////////////////////////////////////// /// /// uint32_t Calculator::GetCostFromDuration(Configuration *cfg, QDateTime const &start, quint64 timeStepInMinutes) const { // for instance, a tariff as used in Schoenau, Koenigssee: only steps, no // special days, nonstop. if (cfg->YearPeriod.size() == 0 && cfg->SpecialDays.size() == 0 && cfg->SpecialDaysWorktime.size() == 0) { QDateTime const end = start.addSecs(timeStepInMinutes*60); return GetCostFromDuration(cfg, start, end); } return 0; } uint32_t Calculator::GetCostFromDuration(Configuration * cfg, QDateTime const &start, QDateTime const &end) const { if (cfg->YearPeriod.size() == 0 && cfg->SpecialDays.size() == 0 && cfg->SpecialDaysWorktime.size() == 0) { int const timeStepInMinutes = start.secsTo(end) / 60; return GetPriceForTimeStep(cfg, timeStepInMinutes); } return 0; } /////////////////////////////////////// /// double Calculator::GetCostFromDuration(Configuration* cfg, uint8_t payment_option, const QDateTime start_datetime, QDateTime &end_datetime, int durationMinutes, bool nextDay, bool prepaid) { Q_UNUSED(payment_option); Q_UNUSED(nextDay); if (cfg->YearPeriod.size() == 0 && cfg->SpecialDays.size() == 0 && cfg->SpecialDaysWorktime.size() == 0) { end_datetime = start_datetime.addSecs(durationMinutes*60); return GetCostFromDuration(cfg, start_datetime, end_datetime); } QDateTime start = start_datetime; Ticket t = private_GetCostFromDuration(cfg, start, durationMinutes, prepaid); if (t) { // qCritical().noquote() << t; } end_datetime = t.getValidUntil(); return t.getPrice(); } int Calculator::getMinimalParkingTime(Configuration const *cfg, PaymentMethod methodId) { return std::max((int)cfg->PaymentOption.find(methodId)->second.pop_min_time, 0); } int Calculator::getMaximalParkingTime(Configuration const *cfg, PaymentMethod methodId) { return std::max((int)cfg->PaymentOption.find(methodId)->second.pop_max_time, 0); } uint32_t Calculator::getMinimalParkingPrice(Configuration const *cfg, PaymentMethod methodId) { return std::max((int)cfg->PaymentOption.find(methodId)->second.pop_min_price, 0); } bool Calculator::checkDurationMinutes(int minParkingTime, int maxParkingTime, int durationMinutes) { if (durationMinutes > maxParkingTime) { qWarning() << QString("Total duration >= max_min (%1 >= %2)").arg(durationMinutes).arg(maxParkingTime); return false; } if (durationMinutes < minParkingTime) { qWarning() << QString("Total duration <= minMin (%1 <= %2)").arg(durationMinutes).arg(minParkingTime); return false; } return true; } int Calculator::findWorkTimeRange(QDateTime const &dt, QScopedArrayPointer const &worktime, size_t size) { for (size_t w = 0; w < size; ++w) { QTime const &worktime_from = worktime[w].getTimeFrom(); QTime const &worktime_to = worktime[w].getTimeUntil(); if ((dt.time() >= worktime_from) && (dt.time() < worktime_to)) { return w; } } return -1; } int Calculator::findNextWorkTimeRange(QDateTime const &dt, QScopedArrayPointer const &worktime, size_t size) { int nextWorkTimeRange = -1; for (size_t w = 0; w < size; ++w) { QTime const &worktime_from = worktime[w].getTimeFrom(); if (dt.time() < worktime_from) { nextWorkTimeRange = w; break; } } return nextWorkTimeRange; } uint32_t Calculator::computeWeekDaysPrice(Configuration const *cfg, PaymentMethod id) const { int pop_id = cfg->PaymentOption.find(id)->second.pop_id; return cfg->PaymentRate.find(pop_id)->second.pra_price; } double Calculator::computeWeekDaysDurationUnit(Configuration const *cfg, PaymentMethod id) const { int pop_id = cfg->PaymentOption.find(id)->second.pop_id; int durationId = cfg->PaymentRate.find(pop_id)->second.pra_payment_unit_id; return (double)(cfg->Duration.find(durationId)->second.pun_duration); } using namespace Utilities; Ticket Calculator::private_GetCostFromDuration(Configuration const* cfg, QDateTime const &start, int durationMinutes, // Netto bool prepaid) { static const PaymentMethod paymentMethodId = Utilities::getPaymentMethodId(cfg); static const bool carryOverNotSet = isCarryOverNotSet(cfg, paymentMethodId); static const int minParkingTimeMinutes = getMinimalParkingTime(cfg, paymentMethodId); static const int maxParkingTimeMinutes = getMaximalParkingTime(cfg, paymentMethodId); static const bool checkMinMaxMinutes = (minParkingTimeMinutes < maxParkingTimeMinutes); static const int durationMinutesNetto = durationMinutes; static const uint32_t weekDaysPrice = computeWeekDaysPrice(cfg, paymentMethodId); static const double weekDaysDurationUnit = computeWeekDaysDurationUnit(cfg, paymentMethodId); static const double specialDaysDurationUnit = 60.0; if (!checkMinMaxMinutes) { qCritical() << QString( "ERROR: CONDITION minMin < maxMin (%1 < %2) IS NOT VALID") .arg(minParkingTimeMinutes).arg(maxParkingTimeMinutes); return Ticket(); } if (!checkDurationMinutes(minParkingTimeMinutes, maxParkingTimeMinutes, durationMinutes)) { return Ticket(); } uint32_t price = 0; uint32_t costFromDuration = 0; double durationUnit = 0.0; int specialDayId = -1; bool isSpecialDay = false; Ticket ticket; QDateTime end = start; QDateTime current; int totalTimeRanges = 0; for (current = start; durationMinutes > 0; current = current.addDays(1)) { int const weekdayId = current.date().dayOfWeek(); specialDayId = -1; // find worktime ranges for the current day int const timeRanges = std::max((int)cfg->WeekDaysWorktime.count(weekdayId), 1); QScopedArrayPointer worktime(new TariffTimeRange[timeRanges]); int ranges = 0; if((isSpecialDay = Utilities::CheckSpecialDay(cfg, current, &specialDayId, &price))) { // Set special day price: durationUnit = specialDaysDurationUnit; worktime[ranges].setTimeRange(SpecialDaysWorkTimeFrom(cfg, specialDayId), SpecialDaysWorkTimeUntil(cfg, specialDayId)); ranges = 1; } else { // Set new price for the normal day: do not use a floating-point type // for the price, rather compute with integers. Only at the very end of // the computation the price is divided by durationUnit. price = weekDaysPrice; durationUnit = weekDaysDurationUnit; // If no working day found, skip it (epsecially Sundays!) if (cfg->WeekDaysWorktime.count(weekdayId) <= 0) { qDebug() << "No workday found, trying to find next available day"; end = current; current.setTime(QTime()); // start at midnight on the next day continue; } using WTIterator = std::multimap::const_iterator; std::pair p = cfg->WeekDaysWorktime.equal_range(weekdayId); for (WTIterator itr = p.first; itr != p.second; ++itr) { worktime[ranges].setTimeRange(WeekDaysWorkTimeFrom(itr), WeekDaysWorkTimeUntil(itr)); ranges += 1; } } QTime const &lastWorktimeTo = worktime[ranges-1].getTimeUntil(); // qCritical() << "start" << start.toString(Qt::ISODate) // << "current" << current.toString(Qt::ISODate) << lastWorktimeTo; // find worktime range to start with int currentRange = 0; if (!isSpecialDay) { if (start != current) { // on next day current.setTime(worktime[currentRange].getTimeFrom()); } else { // check if inputDate is located inside a valid worktime-range... if ((currentRange = findWorkTimeRange(current, worktime, ranges)) == -1) { if (!prepaid && carryOverNotSet) { // parking is not allowed return Ticket(start, QDateTime(), durationMinutesNetto, 0, 0, Ticket::s[INVALID_FROM_DATETIME]); } // find the next worktime-range (on the same day), and start from there if ((currentRange = findNextWorkTimeRange(current, worktime, ranges)) == -1) { end = current; continue; } current.setTime(worktime[currentRange].getTimeFrom()); } } } // qCritical() << "current" << current.toString(Qt::ISODate); for (int w = currentRange; w < ranges; ++w, ++totalTimeRanges) { if (durationMinutes > 0) { QTime const &worktime_from = worktime[w].getTimeFrom(); QTime const &worktime_to = worktime[w].getTimeUntil(); if (totalTimeRanges) { // durationMinutes are always meant as netto time and // the time between worktime-ranges are free. current.setTime(worktime_from); } if (price == 0) { end = current; current.setTime(QTime()); continue; } if (current.time() == worktime_to) { end = current; current.setTime(QTime()); continue; } // Check prepaid if (!prepaid) { if ((current.time() < worktime_from) || (current.time() > worktime_to)) { qDebug() << "[STOP] * Ticket is not valid * "; return Ticket(); } } else { //qDebug() << "* PREPAID MODE ACTIVE *"; //qCritical() << "current" << current.toString(Qt::ISODate) << worktime_from << lastWorktimeTo; if (current.time() < worktime_from) { current.setTime(worktime_from); end = current; } else if(current.time() > lastWorktimeTo) { //qDebug() << " *** PREPAID *** Current time is past the time range end, searching for next available day"; end = current; current.setTime(QTime()); continue; } } while(durationMinutes > 0) { // Check for active year period if (!IsYearPeriodActive(cfg, current)) { return Ticket(); } if(current.time() >= lastWorktimeTo) { // Go to next day if minutes not spent if (carryOverNotSet) { // no carry_over, so stop computation break; } current.setTime(QTime()); break; // stop while, and continue in outer loop } else { //qCritical() << "current" << current.toString(Qt::ISODate) << worktime_to; if(current.time() < worktime_to) { // Increment input date minutes for each monetary unit current = current.addSecs(60); end = current; durationMinutes -= 1; //costFromDuration += price_per_unit; costFromDuration += price; //qCritical() << "current" << current.toString(Qt::ISODate); } else break; } } // while(durationMinutes > 0) { } // if (durationMinutes > 0) { } // for (int w = currentRange; w < ranges; ++w, ++totalTimeRanges) { } // for (current = start; durationMinutes > 0; current = current.addDays(1)) { int durationMinutesBrutto = start.secsTo(end) / 60; return Ticket(start, end, durationMinutesNetto, durationMinutesBrutto, ceil(Utilities::CalculatePricePerUnit(costFromDuration, durationUnit)), Ticket::s[VALID]); } Ticket Calculator::private_GetDurationFromCost(Configuration *cfg, QDateTime const &start, uint32_t cost, bool prepaid) { // Get input date QDateTime current = start; // use tariff with structure as for instance Schnau, Koenigsee: // without given YearPeriod, SpecialDays and SpecialDaysWorktime if (cfg->YearPeriod.size() == 0 && cfg->SpecialDays.size() == 0 && cfg->SpecialDaysWorktime.size() == 0) { uint64_t const durationMinutes = GetDurationForPrice(cfg, cost); uint64_t const durationSeconds = durationMinutes * 60; current = current.addSecs(durationSeconds); return Ticket(start, current, durationMinutes, durationMinutes, cost, Ticket::s[VALID]); } static const PaymentMethod paymentMethodId = Utilities::getPaymentMethodId(cfg); static const bool carryOverNotSet = isCarryOverNotSet(cfg, paymentMethodId); static const uint32_t minParkingTimeMinutes = std::max(getMinimalParkingTime(cfg, paymentMethodId), 0); static const uint32_t maxParkingTimeMinutes = std::max(getMaximalParkingTime(cfg, paymentMethodId), 0); static const uint32_t minParkingPrice = getMinimalParkingPrice(cfg, paymentMethodId); // static const bool checkMinMaxMinutes = (minParkingTimeMinutes < maxParkingTimeMinutes); static const uint32_t weekDaysPrice = computeWeekDaysPrice(cfg, paymentMethodId); static const uint32_t weekDaysDurationUnit = computeWeekDaysDurationUnit(cfg, paymentMethodId); static const uint32_t specialDaysDurationUnit = 60; if(cost < minParkingPrice) { uint64_t const durationMinutes = GetDurationForPrice(cfg, cost); return Ticket(start, current, durationMinutes, durationMinutes, cost, Ticket::s[INVALID_PRICE]); } if (minParkingTimeMinutes >= maxParkingTimeMinutes) { // TODO return Ticket(); } if (maxParkingTimeMinutes <= minParkingTimeMinutes) { // TODO return Ticket(); } uint32_t durationMinutesNetto = 0; double moneyLeft = cost; double durationUnit = 1; int specialDayId = -1; bool isSpecialDay = false; QDateTime end = start; int totalTimeRanges = 0; double price = 0; for (current = start; moneyLeft > 0 && moneyLeft >= price; current = current.addDays(1)) { int const weekdayId = current.date().dayOfWeek(); specialDayId = -1; // find worktime ranges for the current day int const timeRanges = std::max((int)cfg->WeekDaysWorktime.count(weekdayId), 1); QScopedArrayPointer worktime(new TariffTimeRange[timeRanges]); int ranges = 0; uint32_t p = 0; if((isSpecialDay = Utilities::CheckSpecialDay(cfg, current, &specialDayId, &p))) { // Set special day price: durationUnit = specialDaysDurationUnit; price = p / durationUnit; price = std::round(price * 1000.0) / 1000.0; worktime[ranges].setTimeRange(SpecialDaysWorkTimeFrom(cfg, specialDayId), SpecialDaysWorkTimeUntil(cfg, specialDayId)); ranges = 1; } else { // Set new price for the normal day: do not use a floating-point type // for the price, rather compute with integers. Only at the very end of // the computation the price is divided by durationUnit. price = weekDaysPrice; durationUnit = weekDaysDurationUnit; price /= durationUnit; price = std::round(price * 1000.0) / 1000.0; // round to 3 decimals // If no working day found, skip it (epsecially Sundays!) if (cfg->WeekDaysWorktime.count(weekdayId) <= 0) { // qDebug() << "No workday found, trying to find next available day"; end = current; current.setTime(QTime()); // start at midnight on the next day continue; } using WTIterator = std::multimap::const_iterator; std::pair p = cfg->WeekDaysWorktime.equal_range(weekdayId); for (WTIterator itr = p.first; itr != p.second; ++itr) { worktime[ranges].setTimeRange(WeekDaysWorkTimeFrom(itr), WeekDaysWorkTimeUntil(itr)); ranges += 1; } } QTime const &lastWorktimeTo = worktime[ranges-1].getTimeUntil(); // find worktime range to start with int currentRange = 0; if (!isSpecialDay) { if (start != current) { // on next day current.setTime(worktime[currentRange].getTimeFrom()); } else { // check if inputDate is located inside a valid worktime-range... if ((currentRange = findWorkTimeRange(current, worktime, ranges)) == -1) { if (!prepaid && carryOverNotSet) { // parking is not allowed return Ticket(start, QDateTime(), durationMinutesNetto, 0, 0, Ticket::s[INVALID_FROM_DATETIME]); } // find the next worktime-range (on the same day), and start from there if ((currentRange = findNextWorkTimeRange(current, worktime, ranges)) == -1) { end = current; continue; } current.setTime(worktime[currentRange].getTimeFrom()); } } } for (int w = currentRange; w < ranges; ++w, ++totalTimeRanges) { if (moneyLeft > 0) { QTime const &worktime_from = worktime[w].getTimeFrom(); QTime const &worktime_to = worktime[w].getTimeUntil(); if (totalTimeRanges) { // durationMinutes are always meant as netto time and // the time between worktime-ranges are free. current.setTime(worktime_from); } if (price == 0) { // inputDate = inputDate.addDays(1); // inputDate.setTime(worktime_from); end = current; current.setTime(QTime()); continue; } if (current.time() == worktime_to) { end = current; current.setTime(QTime()); continue; } // Check prepaid if (!prepaid) { if ((current.time() < worktime_from) || (current.time() > worktime_to)) { qDebug() << "[STOP] * Ticket is not valid * "; return Ticket(); } } else { qDebug() << "* PREPAID MODE ACTIVE *"; if (current.time() < worktime_from) { current.setTime(worktime_from); end = current; } else if(current.time() > lastWorktimeTo) { qDebug() << " *** PREPAID *** Current time is past the time range end, searching for next available day"; end = current; current.setTime(QTime()); continue; } } while(moneyLeft >= price) { // Check for active year period if (!IsYearPeriodActive(cfg, current)) { return Ticket(); } if(durationMinutesNetto > maxParkingTimeMinutes) { durationMinutesNetto = maxParkingTimeMinutes; break; } if(current.time() >= lastWorktimeTo) { // Go to next day if minutes not spent if (carryOverNotSet) { // no carry_over, so stop computation break; } current.setTime(QTime()); break; // stop while, and continue in outer loop } else { if(current.time() < worktime_to) { // Increment input date minutes for each monetary unit durationMinutesNetto +=1; moneyLeft -= price; moneyLeft = std::round(moneyLeft * 1000.0) / 1000.0; current = current.addSecs(60); end = current; } else break; } } // while(durationMinutes > 0) { } // if (durationMinutes > 0) { } // for (int w = currentRange; w < ranges; ++w, ++totalTimeRanges) { } // for (current = start; durationMinutes > 0; current = current.addDays(1)) { int durationMinutesBrutto = start.secsTo(end) / 60; //qCritical() << "start" << start.toString(Qt::ISODate) << "end" // << end.toString(Qt::ISODate) << durationMinutesBrutto; return Ticket(start, end, durationMinutesNetto, durationMinutesBrutto, cost, Ticket::s[VALID]); } QList Calculator::GetTimeSteps(Configuration *cfg) const { QList timeSteps; int const pop_id = cfg->getPaymentOptions().pop_id; for (auto[itr, rangeEnd] = cfg->PaymentRate.equal_range(pop_id); itr != rangeEnd; ++itr) { int const durationId = itr->second.pra_payment_unit_id; int const durationUnit = cfg->Duration.find(durationId)->second.pun_duration; timeSteps << durationUnit; } return timeSteps; } uint32_t Calculator::GetPriceForTimeStep(Configuration *cfg, int timeStep) const { int const pop_id = cfg->getPaymentOptions().pop_id; for (auto[itr, rangeEnd] = cfg->PaymentRate.equal_range(pop_id); itr != rangeEnd; ++itr) { int const payment_unit_id = itr->second.pra_payment_unit_id; int const pun_id = cfg->Duration.find(payment_unit_id)->second.pun_id; Q_ASSERT(pun_id == payment_unit_id); int const pun_duration = cfg->Duration.find(payment_unit_id)->second.pun_duration; if (timeStep == pun_duration) { return (uint32_t)(itr->second.pra_price); } } return 0; } uint32_t Calculator::GetDurationForPrice(Configuration *cfg, int price) const { int const pop_id = cfg->getPaymentOptions().pop_id; uint32_t duration = 0; for (auto[itr, rangeEnd] = cfg->PaymentRate.equal_range(pop_id); itr != rangeEnd; ++itr) { int const durationId = itr->second.pra_payment_unit_id; int const pra_price = itr->second.pra_price; uint32_t const durationUnit = cfg->Duration.find(durationId)->second.pun_duration; if (pra_price == price) { return durationUnit; } if (pra_price < price) { duration = durationUnit; } } return duration; }