From d3a98cf6cbc3bd0b9efc570f58e8812c03931c18 Mon Sep 17 00:00:00 2001
From: Simon Rettberg
Date: Tue, 16 Oct 2018 10:08:48 +0200
Subject: Original 5.40

---
 OSX/icmp-warning.pl | 69 +++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 69 insertions(+)
 create mode 100755 OSX/icmp-warning.pl

(limited to 'OSX/icmp-warning.pl')

diff --git a/OSX/icmp-warning.pl b/OSX/icmp-warning.pl
new file mode 100755
index 0000000..b022563
--- /dev/null
+++ b/OSX/icmp-warning.pl
@@ -0,0 +1,69 @@
+#!/usr/bin/perl -w
+# Copyright © 2012-2018 Jamie Zawinski <jwz@jwz.org>
+#
+# Permission to use, copy, modify, distribute, and sell this software and its
+# documentation for any purpose is hereby granted without fee, provided that
+# the above copyright notice appear in all copies and that both that
+# copyright notice and this permission notice appear in supporting
+# documentation.  No representations are made about the suitability of this
+# software for any purpose.  It is provided "as is" without express or 
+# implied warranty.
+#
+# Created: 20-Jun-2012.
+
+require 5;
+#use diagnostics;	# Fails on some MacOS 10.5 - 10.7 systems
+use strict;
+
+my $progname = $0; $progname =~ s@.*/@@g;
+my ($version) = ('$Revision: 1.4 $' =~ m/\s(\d[.\d]+)\s/s);
+
+my $verbose = 0;
+
+sub sanity_check() {
+
+  my $fail = '';
+  my $d1 = $ENV{SDK_DIR} || '';
+  my $d2 = '/usr/include/netinet/';
+  my $d3 = $d2;
+
+  if (! $d1) {
+    print STDERR "ERROR: SDK_DIR unset\n";
+    exit 1;
+  }
+
+  if (! -d $d3) {
+    my @dirs = glob ("/Applications/Xcode.app/Contents/Developer/" .
+                     "Platforms/MacOSX.platform/Developer/SDKs/" .
+                     "MacOSX*sdk/usr/include/netinet");
+    @dirs = sort @dirs;
+    $d3 = $dirs[$#dirs] . "/" if @dirs;
+  }
+
+  if (! -d $d3) {
+    print STDERR "ERROR: There is no $d3 on this system!\n";
+    exit 1;
+  }
+
+  foreach my $f ('ip.h', 'in_systm.h', 'ip_icmp.h', 'ip_var.h', 'udp.h') {
+    $fail .= "\tsudo ln -sf $d3$f $d1$d2\n"
+      unless (-f "$d1$d2$f");
+  }
+
+  exit (0) unless $fail;
+
+  print STDERR "ERROR:\t" . join(' ',  # "\n\t",
+     'The "Sonar" module won\'t build properly unless you repair your',
+     'SDK first.  With some versions of Xcode, the ICMP header files',
+     'are present in the iPhone Simulator SDK but are missing from',
+     'the "real device" SDK.  You can fix it by doing this:') .
+       "\n\n$fail\n";
+  exit (1);
+}
+
+if ($#ARGV >= 0) {
+  print STDERR "usage: $progname\n";
+  exit 1;
+}
+
+sanity_check();
-- 
cgit v1.2.3-55-g7522