invoice templateing work

1 files changed, 152 insertions, 0 deletions

diff --git a/src/administration_writer.cpp b/src/administration_writer.cpp
index 00543af..40fcd25 100644
--- a/src/administration_writer.cpp
+++ b/src/administration_writer.cpp
@@ -6,7 +6,9 @@
 #include <threads.h>
 
 #include "ui.hpp"
+#include "strops.hpp"
 #include "administration_writer.hpp"
+#include "file_templates.hpp"
 
 mtx_t _save_file_mutex;
 
@@ -80,6 +82,155 @@ static bool administration_writer_write_to_zip(char* entry_to_replace, char* ori
 }
 
 /////////////////////////////
+//// Invoices
+/////////////////////////////
+static char* administration_writer_get_eas_id_for_contact(contact contact)
+{
+    // https://docs.peppol.eu/poacc/billing/3.0/codelist/eas/
+    char* country_code = contact.address.country_code;
+
+    // Countries using tax identification numbers.
+    if (strcmp(country_code, "AT") == 0) return contact.taxid; // Austria
+    if (strcmp(country_code, "BE") == 0) return contact.taxid; // Belgium
+    if (strcmp(country_code, "BG") == 0) return contact.taxid; // Bulgaria
+    if (strcmp(country_code, "CY") == 0) return contact.taxid; // Cyprus
+    if (strcmp(country_code, "CZ") == 0) return contact.taxid; // Czech Republic
+    if (strcmp(country_code, "DE") == 0) return contact.taxid; // Germany  
+    if (strcmp(country_code, "EE") == 0) return contact.taxid; // Estonia
+    if (strcmp(country_code, "FR") == 0) return contact.taxid; // France
+    if (strcmp(country_code, "GR") == 0) return contact.taxid; // Greece
+    if (strcmp(country_code, "HR") == 0) return contact.taxid; // Croatia
+    if (strcmp(country_code, "HU") == 0) return contact.taxid; // Hungary
+    if (strcmp(country_code, "IE") == 0) return contact.taxid; // Ireland
+    if (strcmp(country_code, "LU") == 0) return contact.taxid; // Luxembourg
+    if (strcmp(country_code, "LV") == 0) return contact.taxid; // Latvia
+    if (strcmp(country_code, "MT") == 0) return contact.taxid; // Malta
+    if (strcmp(country_code, "NL") == 0) return contact.taxid; // Netherlands
+    if (strcmp(country_code, "PL") == 0) return contact.taxid; // Poland
+    if (strcmp(country_code, "PT") == 0) return contact.taxid; // Portugal
+    if (strcmp(country_code, "RO") == 0) return contact.taxid; // Romania
+    if (strcmp(country_code, "SI") == 0) return contact.taxid; // Slovenia
+    if (strcmp(country_code, "SK") == 0) return contact.taxid; // Slovakia
+    if (strcmp(country_code, "ES") == 0) return contact.taxid; // Spain
+    
+    // Countries using business identification numbers.
+    if (strcmp(country_code, "SE") == 0) return contact.businessid; // Sweden
+    if (strcmp(country_code, "LT") == 0) return contact.businessid; // Lithuania
+    if (strcmp(country_code, "IT") == 0) return contact.businessid; // Italy
+    if (strcmp(country_code, "FI") == 0) return contact.businessid; // Finland
+    if (strcmp(country_code, "DK") == 0) return contact.businessid; // Denmark
+    return NULL; // Unknown country code
+}
+
+static char* administration_writer_get_eas_scheme_for_address(address addr)
+{
+    // https://docs.peppol.eu/poacc/billing/3.0/codelist/eas/
+    char* country_code = addr.country_code;
+    if (strcmp(country_code, "AT") == 0) return "9914"; // Austria
+    if (strcmp(country_code, "BE") == 0) return "9925"; // Belgium
+    if (strcmp(country_code, "BG") == 0) return "9926"; // Bulgaria
+    if (strcmp(country_code, "CY") == 0) return "9928"; // Cyprus
+    if (strcmp(country_code, "CZ") == 0) return "9929"; // Czech Republic
+    if (strcmp(country_code, "DE") == 0) return "9930"; // Germany
+    if (strcmp(country_code, "DK") == 0) return "0096"; // Denmark
+    if (strcmp(country_code, "EE") == 0) return "9931"; // Estonia
+    if (strcmp(country_code, "FR") == 0) return "9957"; // France
+    if (strcmp(country_code, "GR") == 0) return "9933"; // Greece
+    if (strcmp(country_code, "HR") == 0) return "9934"; // Croatia
+    if (strcmp(country_code, "HU") == 0) return "9910"; // Hungary
+    if (strcmp(country_code, "IE") == 0) return "9935"; // Ireland
+    if (strcmp(country_code, "FI") == 0) return "0212"; // Finland
+    if (strcmp(country_code, "IT") == 0) return "0208"; // Italy
+    if (strcmp(country_code, "LT") == 0) return "0200"; // Lithuania
+    if (strcmp(country_code, "LU") == 0) return "9938"; // Luxembourg
+    if (strcmp(country_code, "LV") == 0) return "9939"; // Latvia
+    if (strcmp(country_code, "MT") == 0) return "9943"; // Malta
+    if (strcmp(country_code, "NL") == 0) return "9944"; // Netherlands
+    if (strcmp(country_code, "PL") == 0) return "9945"; // Poland
+    if (strcmp(country_code, "PT") == 0) return "9946"; // Portugal
+    if (strcmp(country_code, "RO") == 0) return "9947"; // Romania
+    if (strcmp(country_code, "SE") == 0) return "0007"; // Sweden
+    if (strcmp(country_code, "SI") == 0) return "9949"; // Slovenia
+    if (strcmp(country_code, "SK") == 0) return "9950"; // Slovakia
+    if (strcmp(country_code, "ES") == 0) return "9920"; // Spain
+    return NULL; // Unknown country code
+}
+
+bool administration_writer_save_invoice_blocking(invoice inv)
+{
+    #define APPEND(_txt, ...) file_content += sprintf(file_content, _txt, __VA_ARGS__);
+
+    bool result = 1;
+    int buf_length = 15000;  // Ballpark file content size.
+    char* file_content = (char*)malloc(buf_length);
+    memset(file_content, 0, buf_length);
+    memcpy(file_content, peppol_invoice_template, strlen(peppol_invoice_template));
+
+    struct tm *tm_info = 0;
+    char date_buffer[11]; // "YYYY-MM-DD" + null terminator
+
+    strops_replace(file_content, buf_length, "{{INVOICE_ID}}", inv.sequential_number);
+    strops_replace(file_content, buf_length, "{{CURRENCY}}", inv.currency);
+
+    // Supplier data
+    strops_replace(file_content, buf_length, "{{SUPPLIER_ENDPOINT_SCHEME}}", administration_writer_get_eas_scheme_for_address(inv.supplier.address));
+    strops_replace(file_content, buf_length, "{{SUPPLIER_ENDPOINT_ID}}", administration_writer_get_eas_id_for_contact(inv.supplier));
+    strops_replace(file_content, buf_length, "{{SUPPLIER_NAME}}",       inv.supplier.name);
+    strops_replace(file_content, buf_length, "{{SUPPLIER_STREET}}",     inv.supplier.address.address1);
+    strops_replace(file_content, buf_length, "{{SUPPLIER_STREET2}}",    inv.supplier.address.address2);
+    strops_replace(file_content, buf_length, "{{SUPPLIER_CITY}}",       inv.supplier.address.city);
+    strops_replace(file_content, buf_length, "{{SUPPLIER_POSTAL}}",     inv.supplier.address.postal);
+    strops_replace(file_content, buf_length, "{{SUPPLIER_REGION}}",     inv.supplier.address.region);
+    strops_replace(file_content, buf_length, "{{SUPPLIER_COUNTRY}}",    inv.supplier.address.country_code);
+    strops_replace(file_content, buf_length, "{{SUPPLIER_VAT_ID}}",     inv.supplier.taxid);
+
+    // Customer data
+    strops_replace(file_content, buf_length, "{{CUSTOMER_ENDPOINT_SCHEME}}", administration_writer_get_eas_scheme_for_address(inv.customer.address));
+    strops_replace(file_content, buf_length, "{{CUSTOMER_ENDPOINT_ID}}", administration_writer_get_eas_id_for_contact(inv.customer));
+    strops_replace(file_content, buf_length, "{{CUSTOMER_NAME}}",       inv.customer.name);
+    strops_replace(file_content, buf_length, "{{CUSTOMER_STREET}}",     inv.customer.address.address1);
+    strops_replace(file_content, buf_length, "{{CUSTOMER_STREET2}}",    inv.customer.address.address2);
+    strops_replace(file_content, buf_length, "{{CUSTOMER_CITY}}",       inv.customer.address.city);
+    strops_replace(file_content, buf_length, "{{CUSTOMER_POSTAL}}",     inv.customer.address.postal);
+    strops_replace(file_content, buf_length, "{{CUSTOMER_REGION}}",     inv.customer.address.region);
+    strops_replace(file_content, buf_length, "{{CUSTOMER_COUNTRY}}",    inv.customer.address.country_code);
+    strops_replace(file_content, buf_length, "{{CUSTOMER_VAT_ID}}",     inv.customer.taxid);
+
+    // Dates
+    tm_info = localtime(&inv.issued_at);
+    strftime(date_buffer, sizeof(date_buffer), "%Y-%m-%d", tm_info);
+    strops_replace(file_content, buf_length, "{{ISSUE_DATE}}", date_buffer);
+
+    //// Write to Disk.
+    char final_path[50];
+    snprintf(final_path, 50, "%s.xml", inv.id);
+    
+    int final_length = (int)strlen(file_content);
+    if (!xml_parse_document((uint8_t*)file_content, final_length)) result = 0;
+    else if (!administration_writer_write_to_zip(final_path, file_content, final_length)) result = 0;
+
+    free(file_content);
+    return result;
+}
+
+static bool administration_writer_save_all_invoices_blocking()
+{
+    bool result = 1;
+    u32 num_invoices = administration_invoice_count();
+    u32 buffer_size = sizeof(invoice) * num_invoices;
+    invoice* invoice_buffer = (invoice*)malloc(buffer_size);
+    num_invoices = administration_invoice_get_all(invoice_buffer);
+    
+    for (u32 i = 0; i < num_invoices; i++) {
+        invoice c = invoice_buffer[i];
+        if (!administration_writer_save_invoice_blocking(c)) result = 0;
+    }
+  
+    free(invoice_buffer);
+    return result;
+}
+
+/////////////////////////////
 //// Projects
 /////////////////////////////
 bool administration_writer_save_project_blocking(project project)
@@ -326,6 +477,7 @@ static int administration_writer_write_all_t(void *arg) {
 
     mtx_lock(&_save_file_mutex);
 
+    if (!administration_writer_save_all_invoices_blocking()) result = 0;
     if (!administration_writer_save_all_projects_blocking()) result = 0;
     if (!administration_writer_save_all_administration_info_blocking()) result = 0;
     if (!administration_writer_save_all_tax_brackets_blocking()) result = 0;