// file: main_02_MENT.cpp
// THIS IS C++, use clang++

#include <iostream>

#include "../../helpers/println.hpp"

struct PascalString{
	int length;            // number of chars used
	char characters[256];  // chars of some character string
};

char cStringArea[1024];

int hexDigitToInt(char hexDigit) {
int value = 0;

if(hexDigit > 47 && hexDigit < 58)
    value = hexDigit - 48;

if(hexDigit > 96 && hexDigit < 103)
    value = hexDigit - 97 + 10;

return value;
}

int hexStringToInt(PascalString binaryDigits) {
    int returnValue = 0;

    for(int i = 0; i <= binaryDigits.length; ++i) {
        returnValue += binaryDigits.characters[i];
    }

    return returnValue;
}

void printPascalString(PascalString s) {
    for(int i = 0; i <= s.length; i++) {
        print(s.characters[i]);
    }
    println("");
}

PascalString intToDual(int n) {
    int i = std::to_string(n).length() * 4;
    PascalString string = {i};
    while(n >= 1) {
        string.characters[i] = (n % 2) + '0';
        n = n / 2;
        i--;
    }
    return string;
}

char intToHexChar(int n) {
        switch(n) {
            case 0: return '0';
            case 1: return '1';
            case 2: return '2';
            case 3: return '3';
            case 4: return '4';
            case 5: return '5';
            case 6: return '6';
            case 7: return '7';
            case 8: return '8';
            case 9: return '9';
            case 10: return 'A';
            case 11: return 'B';
            case 12: return 'C';
            case 13: return 'D';
            case 14: return 'E';
            case 15: return 'F';
            default: return 'X';
        }
}

PascalString intToHex(int n) {
    int i = std::to_string(n).length();
    PascalString string = {i};
    while(n >= 1) {
        string.characters[i] = intToHexChar(n % 16);
        n = n / 16;
        i--;
    }
    return string;

}

int getInt(char character) {
    if(character == '0') return 0;
    else return 1;
}

PascalString bitwiseDualAnd(PascalString a, PascalString b) {
    PascalString result = {b.length};

    for(int i = 0; i <= b.length; ++i) {
        result.characters[i] = a.characters[i] & b.characters[i];
    }
    return result;
}

PascalString bitwiseOctalAnd(PascalString a, PascalString b) {
    PascalString result = {b.length, '0'};

    for(int i = 0; i <= b.length; ++i) {
        result.characters[i] = a.characters[i] & b.characters[i];
    }
    return result;
}



PascalString bitwiseHexAnd(PascalString a, PascalString b) {
    a = intToDual(hexStringToInt(a));
    b = intToDual(hexStringToInt(b));
    PascalString result = bitwiseDualAnd(a, b);
    
    return result;
}

int to_c_string(PascalString s) {

}

void line() {
println("===================================");
}

int main(int argc, char** argv, char** envp) {
    
  PascalString s = {3, '1', '0', '0'};
  PascalString s2 = {4, 'f', 'f', 'f', 'f'};
  println(hexStringToInt(s));
  line();
  println(hexStringToInt(s2));
  line();
  println(hexDigitToInt('d'));
  line();
  println(hexDigitToInt('9'));
  line();
  println(hexDigitToInt('2'));

  printPascalString(s2);
  line();

  int controlRegister = 128;
  controlRegister |= 64+32;
  controlRegister ^=16;
  controlRegister &= 128+64;
  controlRegister <<= 1;

  println(controlRegister);
  line();
  println(intToHexChar(6));
  line();
  println(intToHexChar(10));
  line();
  printPascalString(intToDual(4106));
  line();
  printPascalString(intToHex(965));
  line();
  printPascalString(intToHex(1956));

  line();
  printPascalString(bitwiseDualAnd({3, '1', '1', '0'}, {3, '1', '1', '1'}));
  line();
  printPascalString(bitwiseDualAnd({3, '1', '1', '1'}, {3, '1', '1', '1'}));
  line();
  printPascalString(bitwiseDualAnd({3, '0', '1', '0'}, {3, '1', '0', '1'}));
  line();
  printPascalString(bitwiseDualAnd({3, '1', '0', '0'}, {3, '1', '1', '1'}));
  line();
  printPascalString(bitwiseOctalAnd({2, '6', '3'}, {2, '1', '2'}));
  
  
  line();
  printPascalString(bitwiseHexAnd({2, 'A', '1'}, {2, 'C', '2'}));

  return 0;
}