#! /usr/bin/perl
# PODNAME: tapper-mcp-messagereceiver-daemon (hypnotoad)
# ABSTRACT: daemon for Tapper::MCP::MessageReceiver

(my $msgreceiver = $0) =~ s!/tapper-mcp-messagereceiver-daemon!/tapper-mcp-messagereceiver!;
(my $hypnotoad   = $^X) =~ s!/perl[\d.]*$!/hypnotoad!;

use 5.010;
use strict;
use warnings;

if ($ARGV[0] eq 'start') {
        system($hypnotoad, $msgreceiver);
}
elsif ($ARGV[0] eq 'stop') {
        system($hypnotoad, '--stop', $msgreceiver);
}

__END__
=pod

=encoding utf-8

=head1 NAME

tapper-mcp-messagereceiver-daemon (hypnotoad) - daemon for Tapper::MCP::MessageReceiver

=head1 AUTHOR

AMD OSRC Tapper Team <tapper@amd64.org>

=head1 COPYRIGHT AND LICENSE

This software is Copyright (c) 2012 by Advanced Micro Devices, Inc..

This is free software, licensed under:

  The (two-clause) FreeBSD License

=cut