c++/rgb-assembler/rgb-assembler.cpp
author František Kučera <franta-hg@frantovo.cz>
Sun, 24 Dec 2017 00:30:54 +0100
changeset 29 10d6964e7b4a
parent 28 2b2f8a17d63a
child 30 f049c3d3244d
permissions -rw-r--r--
license: GNU GPLv3+
     1 /**
     2  * RGB assembler
     3  * Copyright © 2017 František Kučera (frantovo.cz)
     4  *
     5  * This program is free software: you can redistribute it and/or modify
     6  * it under the terms of the GNU General Public License as published by
     7  * the Free Software Foundation, either version 3 of the License, or
     8  * (at your option) any later version.
     9  *
    10  * This program is distributed in the hope that it will be useful,
    11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
    13  * GNU General Public License for more details.
    14  *
    15  * You should have received a copy of the GNU General Public License
    16  * along with this program. If not, see <http://www.gnu.org/licenses/>.
    17  */
    18 
    19 #include <cstdlib>
    20 #include <iostream>
    21 #include <wchar.h>
    22 #include <locale.h>
    23 #include <cstring>
    24 #include <unordered_map>
    25 
    26 #include "types.h"
    27 #include "memory.h"
    28 #include "Command.h"
    29 #include "commands.h"
    30 #include "commands/Goto.h"
    31 #include "commands/GotoCompare.h"
    32 #include "commands/Sleep.h"
    33 #include "commands/End.h"
    34 #include "commands/Color.h"
    35 #include "commands/IncrementDecrement.h"
    36 
    37 using namespace std;
    38 
    39 int main(int argc, char* argv[]) {
    40 
    41 	setlocale(LC_ALL, "");
    42 
    43 	octet_t * memory = (octet_t*) malloc(MEMORY_SIZE);
    44 
    45 	// Sample program / data:
    46 	// TODO: load bytes from file, stdin, serial port, network…
    47 	{
    48 		address_t a = 0;
    49 		write<command_t>(memory, a, CMD_SLEEP);
    50 		write<sleep_t>(memory, a, 255);
    51 		write<command_t>(memory, a, CMD_SLEEP);
    52 		write<sleep_t>(memory, a, 10);
    53 		write<command_t>(memory, a, CMD_SLEEP);
    54 		write<sleep_t>(memory, a, 255);
    55 		write<command_t>(memory, a, CMD_GOTO);
    56 		write<address_t>(memory, a, a + sizeof (address_t) + 2 * sizeof (command_t));
    57 		write<command_t>(memory, a, CMD_INVALID);
    58 		write<command_t>(memory, a, CMD_INVALID);
    59 		write<command_t>(memory, a, CMD_SLEEP);
    60 		write<sleep_t>(memory, a, 255);
    61 		write<command_t>(memory, a, CMD_COLOR);
    62 		write<led_t>(memory, a, 23);
    63 		write<color_t>(memory, a, 0);
    64 		write<color_t>(memory, a, 200);
    65 		write<color_t>(memory, a, 255);
    66 		write<command_t>(memory, a, CMD_INCREMENT);
    67 		write<address_t>(memory, a, 0);
    68 		write<command_t>(memory, a, CMD_DECREMENT);
    69 		write<address_t>(memory, a, 0);
    70 		write<command_t>(memory, a, CMD_GOTO_COMPARE);
    71 		write<address_t>(memory, a, 0);
    72 		write<address_t>(memory, a, 0 + sizeof (command_t) + sizeof (sleep_t));
    73 		write<address_t>(memory, a, a - 3 * sizeof (address_t) - 2 * sizeof (command_t));
    74 		write<address_t>(memory, a, 0);
    75 		write<address_t>(memory, a, a + sizeof (address_t));
    76 		write<command_t>(memory, a, CMD_END);
    77 	}
    78 
    79 	unordered_map<command_t, shared_ptr < Command>> commands = {
    80 		{CMD_GOTO, make_shared<commands::Goto>()},
    81 		{CMD_GOTO_COMPARE, make_shared<commands::GotoCompare>()},
    82 		{CMD_SLEEP, make_shared<commands::Sleep>()},
    83 		{CMD_END, make_shared<commands::End>()},
    84 		{CMD_COLOR, make_shared<commands::Color>()},
    85 		{CMD_INCREMENT, make_shared < commands::IncrementDecrement>(true, 1)},
    86 		{CMD_DECREMENT, make_shared < commands::IncrementDecrement>(false, 1)},
    87 	};
    88 
    89 
    90 	for (address_t i = 0; i < MEMORY_SIZE;) {
    91 		wprintf(L"command %*d = ", 4, i);
    92 		command_t commandCode = read<command_t>(memory, i);
    93 		wprintf(L"%02X  ", commandCode);
    94 
    95 		shared_ptr<Command> command = commands[commandCode];
    96 
    97 		if (command) {
    98 			command->process(memory, i);
    99 		} else {
   100 			wprintf(L"invalid command\n");
   101 		}
   102 	}
   103 
   104 	free(memory);
   105 	memory = nullptr;
   106 	wprintf(L"all done\n");
   107 	return 0;
   108 }