<?php
// $Header: /cvsroot/phpldapadmin/phpldapadmin/htdocs/search.php,v 1.71.2.2 2005/11/08 08:09:41 wurley Exp $

/**
 * Perform LDAP searches and draw the advanced/simple search forms
 *
 * Variables that come in as GET vars:
 *  - server_id (handled in common.php)
 *  - search (true if performing a search, empty to just draw form)
 *  For simple searches:
 *  - attribute, criterion, filter
 *  For advanced searches:
 *  - base_dn, scope, filter
 *
 * @package phpLDAPadmin
 * @todo Search is probably broken, since base_dn is now an array
 */
/**
 */

require './common.php';

if( isset($ldapserver) && ! $ldapserver->haveAuthInfo())
	pla_error( $lang['not_enough_login_info'] );

// Output format, table or list?
$result_formats = array( 'list', 'table' );
$format = isset( $_GET['format'] ) ? $_GET['format'] : $config->GetValue('search','display');

if( ! in_array( $format, $result_formats ) )
	$format = 'list';

// build the server drop-down html and JavaScript array (for base_dns)
$js_on_change_string = '';
if( isset( $_GET['form'] ) && $_GET['form'] == 'advanced' )
	$js_on_change_string =
		'onChange="document.forms[0].base_dn.value=servers[document.forms[0].server_id.value].base_dn"';

if (isset($ldapserver)) {
$server_menu_html = server_select_list($ldapserver->server_id,true,'server_id',$js_on_change_string);
$server_info_list = server_info_list();
}

$filter = isset( $_GET['filter'] ) ? clean_search_vals($_GET['filter']) : null;
$attr = isset( $_GET['attribute'] ) ? $_GET['attribute'] : null;

// grab the base dn for the search
if( isset( $_GET['base_dn'] ) && $_GET['base_dn'] ) {
	$base_dn = $_GET['base_dn'];
	$base_dn_is_invalid = false;
	$base_dn_does_not_exist = false;

	if( trim( $base_dn ) )
		if( ! is_dn_string( $base_dn ) )
			$base_dn_is_invalid = true;

	elseif( ! dn_exists( $ldapserver, $base_dn ) )
		$base_dn_does_not_exist = true;

	$base_dns = array($base_dn);
} else
	if (isset($ldapserver))
		$base_dns = $ldapserver->getBaseDN();

$criterion = isset( $_GET['criterion'] ) ? $_GET['criterion'] : null;
if (isset($_GET['form']))
	$_SESSION['form'] = $_GET['form'];
$form = isset( $_SESSION['form'] ) ? $_SESSION['form']  : null;
$scope = isset( $_GET['scope'] ) ? $_GET['scope'] : 'sub';

include './header.php';
?>

<body>
<center>

<?php
if( $form == 'advanced' ) {
	require LIBDIR.'search_form_advanced.php';

} elseif( $form == 'predefined' ) {
	require LIBDIR.'search_form_predefined.php';

} else /* Draw simple search form */ {

//	process_config();

	require LIBDIR.'search_form_simple.php';
}
?>

</center>

<?php

flush();

if( isset( $_GET['search'] ) ) {
	if( $form == 'advanced'  ) {
		if (isset( $_GET['display_attrs'])) {
			$search_result_attributes = explode(',',rawurldecode(preg_replace('/\s+/','',rawurldecode($_GET['display_attrs']))));
		} else {
			$search_result_attributes = $config->GetValue('search','result_attributes');
		}
//		$search_result_attributes = isset( $_GET['display_attrs'] ) ?
//			rawurldecode( $_GET['display_attrs'] ) : ( isset( $search_result_attributes ) ?
//				$search_result_attributes : "dn, cn" );

		//process_config();
	} else {
		$search_result_attributes = $config->GetValue('search','result_attributes');
	}

	// do we have enough authentication information for the specified server_id
	if( ! $ldapserver->haveAuthInfo() ) {
		$login_url = sprintf('login_form.php?server_id=%s&amp;redirect=%s',
			$ldapserver->server_id,rawurlencode($_SERVER['REQUEST_URI'])); ?>
		<center>
		<br />
		<?php echo $lang['you_have_not_logged_into_server']; ?><br />
		<a href="<?php echo $login_url; ?>"><?php echo $lang['click_to_go_to_login_form']; ?></a>.
		</center>

		<?php
		exit;
	}

	if( isset( $_GET['predefined'] ) ) {
		$predefined = $_GET['predefined'];

		if( is_numeric( $predefined ) ) {
			$query = get_cleaned_up_predefined_search( $predefined );

			$search_result_attributes = explode(', ',$query['attributes']);
			$search_attributes_display = $search_result_attributes;
			$search_attributes = $search_result_attributes;

			//process_config();

			$filter = $query['filter'];
			$scope = $query['scope'];
			if (is_array($query['base']))
				$base_dns = $query['base'];
			else
				$base_dns = array($query['base']);

			$ldapserver = $ldapservers->Instance($query['server']);
		}

	} else {
		$predefined = '';
	}

	if( $filter ) {
		// if they are using the simple search form, build an LDAP search filter from their input
		if( $form == 'simple' & ! is_numeric( $predefined ) ) {

			switch( $criterion ) {
				case 'starts with':
					// to fix bug 789113
					if( $filter == "*" )
						$filter = "";

					$filter = "($attr=$filter*)";
					break;

				case 'contains':
					// to fix bug 789113
					if( $filter == "*" )
						$filter = "($attr=*)";

					else
						$filter = "($attr=*$filter*)";

					break;

				case 'ends with':
					// to fix bug 789113
					if( $filter == "*" )
						$filter = "";

					$filter = "($attr=*$filter)";
					break;

				case 'equals':
					$filter = "($attr=$filter)";
					break;

				case 'sounds like':
					$filter = "($attr~=$filter)";
					break;

				default:
					pla_error( $lang['unrecognized_criteria_option'] .
						htmlspecialchars( $criterion ) .
						$lang['if_you_want_to_add_criteria'] );
			}
		}

		echo "<center>" . $lang['searching'] . "</center>\n";
		flush();

		// prevent script from bailing early on a long delete
		@set_time_limit( 0 );

		$size_limit = $config->GetValue('search','size_limit');
		// Sanity check
		if( $size_limit < 1 )
			$size_limit = 1;

		$page = isset( $_GET['page'] ) ? $_GET['page'] : 0;

		$time_start = utime();
		$time_elapsed = 0;

		foreach ($base_dns as $base_dn) {
			if (! dn_exists( $ldapserver, $base_dn ) ) {
			        if (DEBUG_ENABLED)
					debug_log('BaseDN [%s] skipped as it doesnt exist in [%s].',1,
						$base_dn,$ldapserver->server_id);

				continue;
			} else {
			        if (DEBUG_ENABLED) 
					debug_log('Search with base DN [%s]',9,$base_dn);
			}

		if( $scope == 'base' )
			$results = @ldap_read( $ldapserver->connect(false), $base_dn, $filter, $search_result_attributes,
					       0, 0, 0, $config->GetValue('deref','search') );

		elseif( $scope == 'one' )
			$results = @ldap_list( $ldapserver->connect(false), $base_dn, $filter, $search_result_attributes,
					       0, 0, 0, $config->GetValue('deref','search') );

		else // scope == 'sub'
			$results = @ldap_search( $ldapserver->connect(false), $base_dn, $filter, $search_result_attributes,
				0, 0, 0, $config->GetValue('deref','search') );

		$errno = @ldap_errno( $ldapserver->connect(false) );

		if( ! $results ) {
			pla_error(  $lang['error_performing_search'],
				    $ldapserver->error(), $ldapserver->errno() );
		}

		$time_end = utime();
		$time_elapsed += round( $time_end - $time_start, 2 );
		$count = @ldap_count_entries( $ldapserver->connect(), $results );

		$start_entry = $page * $size_limit;
		$end_entry = min( $start_entry + $size_limit + 1, $count+1 );
		?>

        <table class="search_header">
        <tr>
        <td style="vertical-align: top">
			<nobr><?php echo $lang['entries_found'] . ' &nbsp;<b>' . number_format( $count ) ?></b>&nbsp;</nobr>
			<small><nobr>(<?php echo $time_elapsed; ?> <?php echo $lang['seconds']; ?>)</nobr></small>
        </td>
        <td style="text-align: right">

        <small>
        <nobr>
        <?php
		printf('[ <a href="export_form.php?server_id=%s&amp;scope=%s&amp;dn=%s&amp;filter=%s&amp;attributes=%s" /><img src="images/save.png" /> %s</a> ]',
			$ldapserver->server_id,$scope,urlencode($base_dn),urlencode($filter),urlencode(join(', ',$search_result_attributes)),$lang['export_results']);

		printf('[ <img src="images/rename.png" /> %s:',$lang['format']);

		foreach( $result_formats as $f ) {
			echo '&nbsp;';

			if( $format == $f ) {
				echo '<b>' . $lang[$f] . '</b>';

			} else {
				$php_self = $_SERVER['PHP_SELF'];
				$query_string = array_to_query_string( $_GET, array( 'format' ) );
				$query_string .= "&amp;format=$f";
				echo "<a href=\"$php_self?$query_string\">" . $lang[$f] . "</a>";
			}
		} ?>

        ]
        </small>
        </nobr>
		<?php if( $form == 'simple' || $form == 'predefined' ) { ?>
			<br /><nobr><small><?php echo $lang['filter_performed']; ?>
			<?php echo htmlspecialchars( $filter ); ?></small></nobr>
		<?php } ?>
        </td>
        </tr>
        </table>

        <?php

	        // The LDAP error code for the size limit exceeded error.
		define( 'SIZE_LIMIT_EXCEEDED', 4 );
		if( $errno && $errno == SIZE_LIMIT_EXCEEDED ) {
			echo "<br /><center><small style=\"color:red; white-space: nowrap\">" . $lang['size_limit_exceeded'] . "</small></center><br />\n";
		}

		// Draw the paging links
		$pager_html = '';
		$total_pages = $count / $size_limit;
		$results_per_page = $size_limit;

		if( $count > $size_limit ) {
			echo sprintf( $lang['showing_results_x_through_y'], "<b>" . number_format($start_entry+1) . "</b>", "<b>" . number_format($end_entry-1) . "</b>" ) . "<br />\n";

			$php_self = $_SERVER['PHP_SELF'];
			if( $page != 0 ) {
				$query_string = array_to_query_string( $_GET, array( 'page' ) );
				$query_string .= '&page=' . ($page-1);
				$pager_html .= "<a title=\"" . sprintf( $lang['page_n'],$page ) . "\" href=\"$php_self?$query_string\">&lsaquo;&lsaquo;</a>";

			} else {
				$pager_html .= "&lsaquo;&lsaquo;";
			}

			$pager_html .= '&nbsp;&nbsp;';

			// for large search results where we page beyone the first 20 pages,
			// print elipsis instead of making the pager be super wide.
			$elipsis_printed = false;
			for( $i=0; $i<$count; $i+=$size_limit ) {
				$page_num = $i/$size_limit;

				if( $count > $size_limit * 20 && abs( $page_num - $page ) > 10 ) {

					if( ! $elipsis_printed ) {
						$pager_html .= '...&nbsp;&nbsp;';
						$elipsis_printed = true;
					}

				} else if( $page == $page_num ) {
					$pager_html .= '<b>' . ($page_num + 1) . '</b>';
					$pager_html .= '&nbsp;&nbsp;';
					$elipsis_printed = false;

				} else {
					$query_string = array_to_query_string( $_GET, array( 'page' ) );
					$query_string .= '&page=' . $page_num;
					$pager_html .= "<a href=\"$php_self?$query_string\">" . ($page_num+1) . "</a>";
					$pager_html .= '&nbsp;&nbsp;';
					$elipsis_printed = false;
				}
			}

			if( $page+1 < $total_pages )  {
				$query_string = array_to_query_string( $_GET, array( 'page' ) );
				$query_string .= '&page=' . ($page+1);
				$pager_html .= "<a title=\"" . sprintf( $lang['page_n'],($page+2) ) . "\" href=\"$php_self?$query_string\">&rsaquo;&rsaquo;</a>";

			} else {
				$pager_html .= "&rsaquo;&rsaquo;";
			}

		}

	        if( 0 == $count )
			echo '<center><h2>' . $lang['no_results'] . '</h2></center>';

		else {
			echo '<center>' . $pager_html . '</center><br />';
			flush();

			if( $format == 'list' )
				// $lang['list'] - this is here so check_lang_files doesnt prompt us to remove this $lang variable.
				require LIBDIR.'search_results_list.php';

			elseif( $format == 'table' )
				// $lang['table'] - this is here so check_lang_files doesnt prompt us to remove this $lang variable.
				require LIBDIR.'search_results_table.php';

			else
				pla_error( sprintf( $lang['unrecoginzed_search_result_format'], htmlspecialchars( $format ) ) );
				echo '<br /><center>' . $pager_html . '</center>';
		}
		} ?>

		<br /><br />
		<div class="search_result"><center><span style="font-weight:normal;font-size:75%;">
			<?php echo $lang['search_duration']; ?>
			<b><?php echo $time_elapsed; ?></b> <?php echo $lang['seconds'];?>.</small></center></div>

	<?php }
} ?>
</body>
</html>