pfSense

<?php

/*

 * you may not use this file except in compliance with the License.

 * You may obtain a copy of the License at

 * distributed under the License is distributed on an "AS IS" BASIS,

 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.

 * See the License for the specific language governing permissions and

 * limitations under the License.

##|+PRIV

##|*MATCH=diag_tables.php*

require_once("guiconfig.inc");

// Set default table

$tablename = "sshlockout";

if (isset($config['aliases']['alias'])) {

	foreach ($config['aliases']['alias'] as $alias) {

		if ( $alias['name'] == $tablename ) {

			$tmp = array();

			$tmp['type'] = $alias['type'];

			$tmp['name'] = $alias['name'];

			$tmp['url']  = $alias['url'];

			$tmp['freq'] = $alias['updatefreq'];

			break;

		}

	}

}

# Determine if selected alias is either a bogons or URL table.

if (($tablename == "bogons") || ($tablename == "bogonsv6")) {

	$bogons = true;

} else if (preg_match('/urltable/i', $tmp['type'])) {

	$urltable = true;

} else {

	$bogons = $urltable = false;

}

	if (is_ipaddr($_REQUEST['delete']) || is_subnet($_REQUEST['delete'])) {

		echo htmlentities($_REQUEST['delete']);

	}

		foreach ($entries as $entryA) {

			exec("/sbin/pfctl -t " . escapeshellarg($tablename) . " -T delete " . escapeshellarg($entry), $delete);

		}

	}

		$mwexec_bg_cmd = '/etc/rc.update_bogons.sh now';

		$table_type = 'bogons';

		$db_name = 'bogons';

	} else if ($urltable) {		//  If selected table is a URL table alias.

		$mwexec_bg_cmd = '/etc/rc.update_urltables now forceupdate ' . $tablename;

		$table_type = 'urltables';

		$db_name = $tablename;

	}

	mwexec_bg($mwexec_bg_cmd);

	$maxtimetowait = 0;

	$loading = true;

	while ($loading == true) {

		$isrunning = `/bin/ps awwwux | /usr/bin/grep -v grep | /usr/bin/grep $table_type`;

		if ($isrunning == "") {

			$loading = false;

		if ($maxtimetowait > 89) {

			$loading = false;

	}

	if ($maxtimetowait < 90) {

}

include("head.inc");

	array_combine($tables, $tables)

	'Aliases become Tables when loaded into the active firewall ruleset. ' .

	'The contents displayed on this page reflect the current addresses inside tables used by the firewall.');

	if ($bogons || $urltable) {

			'Download',

			'fa-refresh'

		))->addClass('btn-success btn-sm');

		$group->add(new Form_Button(

			'clearall',

}

$section->add($group);

print $form;

<div>

		$table_file = '/etc/' . escapeshellarg($tablename);

	} else if ($urltable) {

		$table_file = '/var/db/aliastables/' . escapeshellarg($tablename) . '.txt';

	} else {

		$table_file = '';

	}

	$last_updated = exec('/usr/bin/grep -i -m 1 -E "^# ' . $datelineregex . '" ' . $table_file . '|/usr/bin/grep -i -m 1 -E -o "' . $datestrregex . '"');

	$records_count_msg = sprintf(gettext("%s records."), number_format(count($entries), 0, gettext("."), gettext(",")));

	unset($comment_lines);

	$res = exec('/usr/bin/grep -i -m 10 -E "^#" ' . $table_file, $comment_lines);

	foreach ($comment_lines as $comment_line) {

		$table_comments .= "$comment_line" . "<br />";

	}

	if ($table_comments) {

		'<span style="display:none"   id="showtblcom">' . ' ' . gettext("Show table comments.") . '</span>' .

		'' , 'info', false);

	} else {

		print_info_box($last_update_msg . "    " . $records_count_msg, 'info', false);

	}

	</div>

</div>

<?php

//<![CDATA[

	$('#showtblcom').show();

	$('[id^="showinfo1"]').click(function() {

			$('#showtblcom').toggle();

	});

		$.ajax(

			'/diag_tables.php',

			{

				type: 'post',

				data: {

					type: '<?=htmlspecialchars($tablename)?>',

					delete: $(this).data('entry')

				},

				},

	// Auto-submit the form on table selector change

	$('#type').on('change', function() {

        $('form').submit();

    });

if (empty($entries)) {

	print_info_box(gettext("No entries exist in this table."), 'warning', false);

} else {

?>

	<div class="panel-heading"><h2 class="panel-title"><?=$displayname?></h2></div>

	<div class="panel-body">

		<div class="table-responsive">

			<table class="table table-striped table-hover table-condensed">

				<thead>

					<tr>

						<th><?=gettext("IP Address")?></th>

						<th></th>

					</tr>

				</thead>

				<tbody>

		// This is a band-aid for a yet to be root caused performance issue with large tables.  Suspected is css and/or sorting.

 		if (count($entries) > 3000) {

			print "<tr><td colspan='2'><pre>";

			foreach ($entries as $entry) {

				$entry = trim($entry);

					print $entry . "\n";

			}

			print "</pre></td></tr>";

		} else {

?>

			$entry = trim($entry);

						<td>

							<?=$entry?>

						</td>

						<td>

									<i class="fa fa-trash" title="<?= gettext("Remove this entry") ?>"></i>

								</a>

						</td>

					</tr>

			</table>

		</div>

	</div>