From e6bf4cacb10f86077fe898349485f5c7ab9fb4b6 Mon Sep 17 00:00:00 2001 From: Dylan William Hardison Date: Thu, 30 Jun 2016 23:32:40 -0400 Subject: Bug 1283930 - Add Makefile.PL & local/lib/perl5 support to bmo/master + local symlink to data/ directory --- t/013remote_ip.t | 82 -------------------------------------------------------- 1 file changed, 82 deletions(-) delete mode 100644 t/013remote_ip.t (limited to 't/013remote_ip.t') diff --git a/t/013remote_ip.t b/t/013remote_ip.t deleted file mode 100644 index 4bba7c95e..000000000 --- a/t/013remote_ip.t +++ /dev/null @@ -1,82 +0,0 @@ -#!/usr/bin/perl -# This Source Code Form is subject to the terms of the Mozilla Public -# License, v. 2.0. If a copy of the MPL was not distributed with this -# file, You can obtain one at http://mozilla.org/MPL/2.0/. -# -# This Source Code Form is "Incompatible With Secondary Licenses", as -# defined by the Mozilla Public License, v. 2.0. - -use strict; -use lib qw(. lib t); -use Test::More qw(no_plan); -use Bugzilla; -use Bugzilla::Util qw(remote_ip); - -my $params = Bugzilla->params; -local Bugzilla->localconfig->{param_override}{inbound_proxies} = undef; - -{ - local $params->{inbound_proxies} = '10.0.0.1,10.0.0.2'; - local $ENV{REMOTE_ADDR} = '10.0.0.2'; - local $ENV{HTTP_X_FORWARDED_FOR} = '10.42.42.42'; - - is(remote_ip(), '10.42.42.42', "from proxy 2"); -} - -{ - local $params->{inbound_proxies} = '10.0.0.1,10.0.0.2'; - local $ENV{REMOTE_ADDR} = '10.0.0.1'; - local $ENV{HTTP_X_FORWARDED_FOR} = '10.42.42.42'; - - is(remote_ip(), '10.42.42.42', "from proxy 1"); -} - -{ - local $params->{inbound_proxies} = '10.0.0.1,10.0.0.2'; - local $ENV{REMOTE_ADDR} = '10.0.0.3'; - local $ENV{HTTP_X_FORWARDED_FOR} = '10.42.42.42'; - - is(remote_ip(), '10.0.0.3', "not a proxy"); -} - -{ - local $params->{inbound_proxies} = '*'; - local $ENV{REMOTE_ADDR} = '10.0.0.3'; - local $ENV{HTTP_X_FORWARDED_FOR} = '10.42.42.42,1.4.9.2'; - - is(remote_ip(), '10.42.42.42', "always proxy"); -} - -{ - local $params->{inbound_proxies} = ''; - local $ENV{REMOTE_ADDR} = '10.9.8.7'; - local $ENV{HTTP_X_FORWARDED_FOR} = '10.42.42.42,1.4.9.2'; - - is(remote_ip(), '10.9.8.7', "never proxy"); -} - - -{ - local $params->{inbound_proxies} = '10.0.0.1,2600:cafe::cafe:ffff:bf42:4998'; - local $ENV{REMOTE_ADDR} = '2600:cafe::cafe:ffff:bf42:4998'; - local $ENV{HTTP_X_FORWARDED_FOR} = '2600:cafe::cafe:ffff:bf42:BEEF'; - - is(remote_ip(), '2600:cafe::cafe:ffff:bf42:BEEF', "from proxy ipv6"); -} - -{ - local $params->{inbound_proxies} = '10.0.0.1,2600:cafe::cafe:ffff:bf42:4998'; - local $ENV{REMOTE_ADDR} = '2600:cafe::cafe:ffff:bf42:DEAD'; - local $ENV{HTTP_X_FORWARDED_FOR} = '2600:cafe::cafe:ffff:bf42:BEEF'; - - is(remote_ip(), '2600:cafe::cafe:ffff:bf42:DEAD', "invalid proxy ipv6"); -} - - -{ - local $params->{inbound_proxies} = '*'; - local $ENV{REMOTE_ADDR} = '2600:cafe::cafe:ffff:bf42:DEAD'; - local $ENV{HTTP_X_FORWARDED_FOR} = ''; - - is(remote_ip(), '2600:cafe::cafe:ffff:bf42:DEAD', "always proxy ipv6"); -} -- cgit v1.2.3-24-g4f1b