#!/usr/bin/env rakudo
use v6.d;
use lib 'inst#local','file#lib';
use Config::TOML;
use Vlc::Client;
use Lirc::Client;
use Lirc::Commands;
use App::MediaControl;

my $config = from-toml(file=>'config.toml');

my Vlc::Client $vlc .= new(
    password => $config<vlc><password>,
    base-uri => $config<vlc><base-uri>,
);

my Lirc::Client $lirc-client .= new();
my Lirc::Commands $lirc .= new(client=>$lirc-client);

my App::MediaControl $app .= new(
    port => $config<server><port>,
    :$vlc, :$lirc,
);

$app.start;

say "listening";

react whenever signal(SIGINT) {
    $app.stop;
    exit;
}