From eab58c6977285c7c7c1e262e79853a101dd4e07e Mon Sep 17 00:00:00 2001
From: Daniil Baturin <daniil@baturin.org>
Date: Wed, 8 Oct 2014 15:49:37 +0200
Subject: Add ex2-check script.

---
 scripts/ec2-check.pl | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)
 create mode 100755 scripts/ec2-check.pl

(limited to 'scripts')

diff --git a/scripts/ec2-check.pl b/scripts/ec2-check.pl
new file mode 100755
index 00000000..03448ff5
--- /dev/null
+++ b/scripts/ec2-check.pl
@@ -0,0 +1,40 @@
+#!/usr/bin/env perl
+# **** License ****
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License version 2 or later as
+# published by the Free Software Foundation.
+#
+# This program is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+# General Public License for more details.
+#
+# This code was originally developed by VyOS Development Group
+# All Rights Reserved.
+#
+# Author:       Daniil Baturin <daniil@baturin.org>
+# Description:  Check if we are running on an EC2 instance.
+#               If both system UUID and system serial number start with "EC2",
+#               most likely we are.
+#
+# **** End License ****
+
+
+use strict;
+use warnings;
+
+my $DMIDECODE = "/usr/sbin/dmidecode";
+
+my $UUID = `$DMIDECODE -s system-uuid`;
+my $SN = `$DMIDECODE -s system-serial-number`;
+
+if( ($UUID =~ /^ec2.*/i) &&
+    ($SN =~ /^ec2.*/i) )
+{
+    exit(0);
+}
+else
+{
+    exit(1);
+}
+
-- 
cgit v1.2.3