Generate simple build test files

[openssl.git] / test / generate_buildtest.pl

diff --git a/test/generate_buildtest.pl b/test/generate_buildtest.pl
new file mode 100644 (file)
index 0000000..7921021
--- /dev/null
+++ b/test/generate_buildtest.pl
@@ -0,0 +1,27 @@
+#! /usr/bin/env perl
+# Copyright 2016 The OpenSSL Project Authors. All Rights Reserved.
+#
+# Licensed under the OpenSSL license (the "License").  You may not use
+# this file except in compliance with the License.  You can obtain a copy
+# in the file LICENSE in the source distribution or at
+# https://www.openssl.org/source/license.html
+
+use strict;
+use warnings;
+
+# First argument is name;
+my $name = shift @ARGV;
+# All other arguments are ignored for now
+
+print <<"_____";
+/*
+ * Generated with test/generate_buildtest.pl, to check that such a simple
+ * program builds.
+ */
+#include <openssl/$name.h>
+
+int main()
+{
+    return 0;
+}
+_____