diff --git a/bin/netdisco-daemon b/bin/netdisco-daemon new file mode 100755 index 00000000..7591827e --- /dev/null +++ b/bin/netdisco-daemon @@ -0,0 +1,19 @@ +#!/usr/bin/env perl + +use strict; +use warnings; + +use File::Spec; +use Cwd 'realpath'; + +use FindBin; +FindBin::again(); + +my $backend = + File::Spec->catfile( + (File::Spec->splitpath( + realpath(File::Spec->catfile( $FindBin::RealBin, $FindBin::RealScript )) + ))[1], + 'netdisco-backend'); + +exec {$backend} 'netdisco-backend', @ARGV; diff --git a/bin/netdisco-daemon-fg b/bin/netdisco-daemon-fg new file mode 100755 index 00000000..fefbe258 --- /dev/null +++ b/bin/netdisco-daemon-fg @@ -0,0 +1,19 @@ +#!/usr/bin/env perl + +use strict; +use warnings; + +use File::Spec; +use Cwd 'realpath'; + +use FindBin; +FindBin::again(); + +my $backend = + File::Spec->catfile( + (File::Spec->splitpath( + realpath(File::Spec->catfile( $FindBin::RealBin, $FindBin::RealScript )) + ))[1], + 'netdisco-backend-fg'); + +exec {$backend} 'netdisco-backend-fg', @ARGV;