statistics.cpp

//
//  statistics.cpp
//  Test Product
//
//  Created by David Brown on 10/06/2017.
//  Copyright © 2017 David Brown. All rights reserved.
//

#include <iomanip>
#include <iostream>
#include <fstream>
#include "statistics.hpp"

Statistics *Statistics::_instance = nullptr;

Statistics *Statistics::Instance()
{
    if (_instance == nullptr) {
        _instance = new Statistics();
    }
    return _instance;
}

Statistics::Statistics()
{
    reg = Register::Instance();
    current = new Fields;
}

// This is called BEFORE the next period is triggered. It dumps current stats
// and creates a new record for the next period, entering BFwd amounts from
// the CFwd amounts from the previous period where appropriate.
void Statistics::next(int period)
{
    Government *gov = Government::Instance();

    stats.push_back(current);
    Fields *previous = stats.back();
    current = new Fields;

    // Gov
    previous->gov.cfwd = gov->getBalance();
    previous->gov.exp = gov->getExpenditure();
    previous->gov.ben = gov->getBenefitsPaid();
    previous->gov.rec = gov->getReceipts();
    previous->gov.num_firms = reg->getNumFirms();
    previous->gov.num_emps = reg->getNumEmployed();
    previous->gov.num_unemps = reg->getNumUnemployed();
    previous->gov.num_gov_emps = gov->getNumEmployees();
    previous->gov.hires = reg->getNumHired();
    previous->gov.fires = reg->getNumFired();
    //
    current->gov.num_emps = reg->getNumEmployed();
    current->gov.bfwd = previous->gov.cfwd;
    
    // Prod
    previous->prod.cfwd = reg->getProdBal();
    previous->prod.grant = reg->getGrantsRecd();
    previous->prod.dedns = reg->getDednsPaid();
    previous->prod.wages = reg->getWagesPaid();
    previous->prod.bonuses = reg->getBonusesPaid();
    previous->prod.sales = reg->getSalesReceipts();
    previous->prod.sales_tax = reg->getSalesTaxPaid();
    //
    current->prod.bfwd = previous->prod.cfwd;
    
    // Dom
    previous->emp.close = reg->getWorkersBal();
    previous->emp.wages = reg->getWagesRecd();
    previous->emp.benefits = reg->getBenefitsRecd();
    previous->emp.inc_tax = reg->getIncTaxPaid();
    previous->emp.purch = reg->getPurchasesMade();
    // *
    current->emp.start = previous->emp.close;
    
}

#include <stdio.h>
#include <unistd.h>
#include <string.h>

void Statistics::report()
{
    // Kludge to get the directory containing the output file
    char the_path[256];
    getcwd(the_path, 255);
    
    std::ofstream myfile;
    std::string fname(Settings::fname + ".csv");
    myfile.open(fname);
    
    if (myfile.is_open()) {
        std::cout << "\nOutput file is " << fname << std::endl;
        myfile << "\"Period\",\"Gov Bal\",\"Prod Bal\",\"Dom Bal\",\"Gov Exp\",\"Benefits Paid\",\"Bonuses Paid\",\"Gov Recpts\",\"Hires\",\"Fires\",\"Num Firms\",\"Employed\",\"Unemployed\",\"Gov Emps\",\"Inc Tax\",\"Sales Tax\",\"Dedns\",\"Wages+Bonus\",\"Benefits Recd\",\"Consumption\"\n";
    } else {
        std::cout << "Cannot open output file\n";
    }

    std::cout << "\nLOG\n";

    int period = 0;
    for (auto it : stats) {

        if (myfile.is_open()) {
            myfile  << period
                    << "," << it->gov.cfwd
                    << "," << it->prod.cfwd
                    << "," << it->emp.close
                    << "," << it->gov.exp
                    << "," << it->gov.ben
                    << "," << it->prod.bonuses
                    << "," << it->gov.rec
            
                    << "," << it->gov.hires
                    << "," << it->gov.fires
            
                    << "," << it->gov.num_firms
                    << "," << it->gov.num_emps
                    << "," << it->gov.num_unemps
                    << "," << it->gov.num_gov_emps
            
                    << "," << it->emp.inc_tax
                    << "," << it->prod.sales_tax
                    << "," << it->prod.dedns
            
                    << "," << it->emp.wages
                    << "," << it->emp.benefits
                    << "," << it->emp.purch
                    << "\n";

        // TO DO: Add new hires, rehires and fires...
        
        }

        std::cout   << "\nPeriod " << ++period << "\n---------\n";
        
        std::cout   << "\nGovernment\n"
                    << "\n\t" << std::setw(21) << "Expenditure: " << std::setw(9) << it->gov.exp
                    << "\n\t" << std::setw(21) << "Benefits Paid: " << std::setw(9) << it->gov.ben << " +"
                    << "\n\t" << std::setw(21) << "Receipts: " << std::setw(9) << it->gov.rec << " -"
                    << "\n\t" << std::setw(21) << " " << std::setw(9)  << "---------"
                    << "\n\t" << std::setw(21) << "Deficit: " << std::setw(9) << (it->gov.exp + it->gov.ben - it->gov.rec) << "\n"
                    << "\n\t" << std::setw(21) << "Sector balance: " << std::setw(9) << it->gov.cfwd
                    << "\n";
        std::cout   << "\nFirms\n"
                    << "\n\t" << std::setw(21) << "Number of firms: " << std::setw(9) << it->gov.num_firms
                    << "\n\t" << std::setw(21) << "Number of employees: " << std::setw(9) << it->gov.num_emps
                    << "\n\t" << std::setw(21) << "Hired this week: " << std::setw(9) << it->gov.hires
                    << "\n\t" << std::setw(21) << "Fired this week: " << std::setw(9) << it->gov.fires << "\n"
        
                    << "\n\t" << std::setw(21) << "Starting balance: " << std::setw(9) << it->prod.bfwd
                    << "\n\t" << std::setw(21) << "Government grant: " << std::setw(9) << it->prod.grant << " +"
                    << "\n\t" << std::setw(21) << "Wages paid: " << std::setw(9) << it->prod.wages << " -"
                    << "\n\t" << std::setw(21) << "Bonuses paid: " << std::setw(9) << it->prod.bonuses << " -"
        
                    << "\n\t" << std::setw(21) << "Dedns paid: " << std::setw(9) << it->prod.dedns << " -"
                    << "\n\t" << std::setw(21) << "Sales: " << std::setw(9) << it->prod.sales << " +"
                    << "\n\t" << std::setw(21) << "Sales tax paid: " << std::setw(9) << it->prod.sales_tax << " -"
                    << "\n\t" << std::setw(21) << "Closing balance: " << std::setw(9) << it->prod.cfwd << " -"
                    << "\n\t" << std::setw(21) << " " << std::setw(9) << "---------"
                    << "\n\t" << std::setw(21) << " " << std::setw(9) << (it->prod.bfwd + it->prod.grant - it->prod.wages - it->prod.bonuses - it->prod.dedns + it->prod.sales - it->prod.sales_tax - it->prod.cfwd) << "\n";
        std::cout   << "\nWorkers\n";
        std::cout   << "\n\t" << std::setw(21) << "Starting balance: " << std::setw(9) << it->emp.start
                    << "\n\t" << std::setw(21) << "Wages recd: " << std::setw(9) << it->emp.wages << " +"
                    << "\n\t" << std::setw(21) << "Income tax paid: " << std::setw(9) << it->emp.inc_tax << " -"
                    << "\n\t" << std::setw(21) << "Benefits Recd: " << std::setw(9)  << it->emp.benefits << " +"
                    << "\n\t" << std::setw(21) << "Purchases: " << std::setw(9)  << it->emp.purch << " -"
                    << "\n\t" << std::setw(21) << "Closing balance: " << std::setw(9)  << it->emp.close << " -"
                    << "\n\t" << std::setw(21) << " " << std::setw(9)  << "========="
                    << "\n\t" << std::setw(21) << " " << std::setw(9)  << (it->emp.start + it->emp.wages + it->emp.benefits - it->emp.inc_tax - it->emp.purch - it->emp.close)
                    << "\n\t" << std::setw(21) << " " << std::setw(9)  << "---------"
                    << "\n";

        int recon = it->gov.cfwd + it->prod.cfwd + it->emp.close;
        
        std::cout   << "\nSectors\n"
                    << "\n\t" << std::setw(21) << "Government: " << std::setw(9) << it->gov.cfwd
                    << "\n\t" << std::setw(21) << "Firms: " << std::setw(9) << it->prod.cfwd
                    << "\n\t" << std::setw(21) << "Workers: " << std::setw(9) << it->emp.close
                    << "\n\t" << std::setw(21) << "  " << std::setw(9) << "---------"
                    << "\n\t" << std::setw(21) << "  " << std::setw(9) << recon
                    << "\n\t" << std::setw(21) << "  " << std::setw(9) << "---------"
                    << "\n";
        
        if (recon != 0) {
            std::cout << "*** Reconciliation fails ***\n";
        }
        
    }

    if (myfile.is_open()) {
        myfile.close();
    }
}