function get_ip_suggestions($q, $max_results = 10)
{
global $onadb;
$formatted = $results = array();
// Complete the (potentially incomplete) ip address
$ip = ip_complete($q, '0');
$ip_end = ip_complete($q, '255');
// Find out if $ip and $ip_end are valid
$ip = ip_mangle($ip, 'numeric');
$ip_end = ip_mangle($ip_end, 'numeric');
if ($ip == -1 or $ip_end == -1) {
return array();
}
// It's not valid ip addresses
// Now use SQL to look for subnet ip records that match
$table = 'subnets';
$field = 'ip_addr';
$where = "{$field} >= " . $onadb->qstr($ip) . " AND {$field} <= " . $onadb->qstr($ip_end);
$order = "{$field} ASC";
// Search the db for results and put results into $results
list($status, $rows, $records) = db_get_records($onadb, $table, $where, $order, $max_results);
foreach ($records as $record) {
$results[] = $record[$field];
}
// If we need more suggestions, look in the host_subnets table
$max_results -= count($results);
if ($max_results) {
$table = 'interfaces';
list($status, $rows, $records) = db_get_records($onadb, $table, $where, $order, $max_results);
foreach ($records as $record) {
$results[] = $record[$field];
}
}
// Format the ip's in dotted format
sort($results);
foreach ($results as $result) {
// format ipv6 or regular
$format = is_ipv4($result) ? 'dotted' : 'ipv6';
$formatted[] = ip_mangle($result, $format);
}
unset($results, $result, $records, $record);
return $formatted;
}
function ws_display($window_name, $form = '')
{
global $conf, $self, $ona;
global $images, $color, $style;
$html = '';
$js = '';
// If the user supplied an array in a string, build the array and store it in $form
$form = parse_options_string($form);
// Build $ip from $form['ip_block_start']
$form['ip_block_start'] = ip_complete($form['ip_block_start'], '0');
// Since we currently only display /24 (C) class networks, the
//GD Need to call ip_mangle() so we can use is_ipv4()
// last quad needs to be a .0.
$ip = ip_mangle($form['ip_block_start'], 'numeric');
if (is_ipv4($ip)) {
$end = '\\.\\d+$';
$replace_end_by = '.0';
$version = 4;
} else {
$end = ':[0-9A-F]{0,4}$';
// $replace_end_by = ':0000';
$replace_end_by = ':';
$version = 6;
}
$ip = $form['ip_block_start'] = preg_replace("/{$end}/", $replace_end_by, $form['ip_block_start']);
// Find out if $ip is valid
$ip = ip_mangle($ip, 'numeric');
if ($ip == -1) {
$js .= "alert('The IP address specified is invalid!');";
}
// Update History Title
$history = array_pop($_SESSION['ona']['work_space']['history']);
$js .= "xajax_window_submit('work_space', ' ', 'rewrite_history');";
if ($history['title'] == $window_name) {
$history['title'] = 'Map: ' . ip_mangle($ip, 'dotted');
array_push($_SESSION['ona']['work_space']['history'], $history);
}
// Create some javascript to refresh the current page
$refresh = htmlentities(str_replace(array("'", '"'), array("\\'", '\\"'), $history['url']), ENT_QUOTES, $conf['php_charset']);
$refresh = "xajax_window_submit('work_space', '{$refresh}');";
// Define the window's inner html
$html .= <<<EOL
<div id="{$window_name}_content" style="padding: 2px 4px;">
<form id="block_search_form" onsubmit="el('zoom_block_button').onclick(); return false;">
<div id="{$window_name}_tools">
<b>IP Address</b>
<input type="hidden" id="{$window_name}_zoom" name="zoom" value="8">
<input id="{$window_name}_ip_block_start" name="{$window_name}_ip_block_start" value="{$form['ip_block_start']}" class="edit" type="text" size="15" />
<a id="zoom_block_button" title="Zoom block"
class="act"
onClick="xajax_window_submit('work_space', 'xajax_window_submit(\\'{$window_name}\\', \\'ip_block_start=>' + el('{$window_name}_ip_block_start').value + ',zoom=>' + el('{$window_name}_zoom').value + '\\', \\'display\\');');"
><img src="{$images}/silk/bullet_go.png" border="0"></a>
<br><br>
</div>
</form>
<div id="{$window_name}_portal">
<span id="{$window_name}_substrate"></span>
</div>
</div>
EOL;
// Position/size the portal ourselves
$js .= <<<EOL
var _el = el('{$window_name}_portal');
/* Now calculate where we will sit */
var my_height = el('work_space_content').offsetHeight - el('{$window_name}_tools').offsetHeight - 40;
var my_width = el('{$window_name}_tools').offsetWidth - 10;
/* Finally reposition/resize the window */
_el.style.position = 'relative';
_el.style.height = my_height + 'px';
EOL;
// Get javascript to setup the map portal
$js .= get_portal_js($window_name, $ip, $version);
//*** Send a fake mouseup event to draw the initial map view ***
$js .= "el('{$window_name}_portal').myonmouseup('fake event');";
// Insert the new html into the window
// Instantiate the xajaxResponse object
$response = new xajaxResponse();
// GDO need to use Big Int JS
$response->addIncludeScript('include/js/bignumber.js');
$response->addAssign("work_space_content", "innerHTML", $html);
if ($js) {
$response->addScript($js);
}
return $response->getXML();
}
function ws_display_list($window_name, $form = '')
{
global $conf, $self, $onadb;
global $images, $color, $style;
$html = '';
$js = '';
// If the user supplied an array in a string, transform it into an array
$form = parse_options_string($form);
// Find the "tab" we're on
$tab = $_SESSION['ona'][$form['form_id']]['tab'];
// Build js to refresh this list
$refresh = "xajax_window_submit('{$window_name}', xajax.getFormValues('{$form['form_id']}'), 'display_list');";
// If it's not a new query, load the previous query from the session
// into $form and save the current page and filter in the session.
// Also find/set the "page" we're viewing
$page = 1;
if ($form['page'] and is_numeric($form['page'])) {
$form = array_merge($form, (array) $_SESSION['ona'][$form['form_id']][$tab]['q']);
$_SESSION['ona'][$form['form_id']][$tab]['page'] = $page = $form['page'];
$_SESSION['ona'][$form['form_id']][$tab]['filter'] = $form['filter'];
}
printmsg("DEBUG => Displaying records list page: {$page}", 1);
// Calculate the SQL query offset (based on the page being displayed)
$offset = $conf['search_results_per_page'] * ($page - 1);
if ($offset == 0) {
$offset = -1;
}
// Search results go in here
$results = array();
$count = 0;
//
// *** ADVANCED RECORD SEARCH ***
// FIND RESULT SET
//
// Start building the "where" clause for the sql query to find the records to display
$where = "";
$and = "";
$orderby = "";
// enable or disable wildcards
$wildcard = '%';
if ($form['nowildcard']) {
$wildcard = '';
}
// RECORD ID
if ($form['record_id']) {
$where .= $and . "id = " . $onadb->qstr($form['record_id']);
$and = " AND ";
}
// DNS VIEW ID
if ($form['dns_view']) {
if (is_string($form['dns_view'])) {
list($status, $rows, $dnsview) = ona_get_dns_view_record(array('name' => $form['dns_view']));
}
if (is_numeric($form['dns_view'])) {
list($status, $rows, $dnsview) = ona_get_dns_view_record(array('id' => $form['dns_view']));
}
$where .= $and . "dns_view_id = " . $onadb->qstr($dnsview['id']);
$and = " AND ";
}
// INTERFACE ID
if ($form['interface_id']) {
$where .= $and . "interface_id = " . $onadb->qstr($form['interface_id']);
$and = " AND ";
}
// DNS RECORD note
if ($form['notes']) {
$where .= $and . "notes LIKE " . $onadb->qstr($wildcard . $form['notes'] . $wildcard);
$and = " AND ";
}
// DNS RECORD TYPE
if ($form['dnstype']) {
$where .= $and . "type = " . $onadb->qstr($form['dnstype']);
$and = " AND ";
}
// HOSTNAME
if ($form['hostname']) {
$where .= $and . "id IN (SELECT id " . " FROM dns " . " WHERE name LIKE " . $onadb->qstr($wildcard . $form['hostname'] . $wildcard) . " )";
$and = " AND ";
}
// DOMAIN
if ($form['domain']) {
// FIXME: MP test if this clause works correctly? Not sure that anything even uses this?
list($status, $rows, $tmpdomain) = ona_find_domain($form['domain']);
$where .= $and . "domain_id = " . $onadb->qstr($tmpdomain['id']);
$orderby .= "name, domain_id";
$and = " AND ";
}
// DOMAIN ID
if ($form['domain_id']) {
//$where .= $and . "primary_dns_id IN ( SELECT id " .
// " FROM dns " .
// " WHERE domain_id = " . $onadb->qstr($form['domain_id']) . " ) ";
$where .= $and . "domain_id = " . $onadb->qstr($form['domain_id']);
$orderby .= "name, domain_id";
$and = " AND ";
}
// IP ADDRESS
$ip = $ip_end = '';
if ($form['ip']) {
// Build $ip and $ip_end from $form['ip'] and $form['ip_thru']
$ip = ip_complete($form['ip'], '0');
if ($form['ip_thru']) {
$ip_end = ip_complete($form['ip_thru'], '255');
} else {
$ip_end = ip_complete($form['ip'], '255');
}
// Find out if $ip and $ip_end are valid
$ip = ip_mangle($ip, 'numeric');
$ip_end = ip_mangle($ip_end, 'numeric');
if ($ip != -1 and $ip_end != -1) {
// We do a sub-select to find interface id's between the specified ranges
$where .= $and . "interface_id IN ( SELECT id " . " FROM interfaces " . " WHERE ip_addr >= " . $onadb->qstr($ip) . " AND ip_addr <= " . $onadb->qstr($ip_end) . " )";
$and = " AND ";
}
}
// display a nice message when we dont find all the records
if ($where == '' and $form['content_id'] == 'search_results_list') {
$js .= "el('search_results_msg').innerHTML = 'Unable to find DNS records matching your query, showing all records';";
}
// Wild card .. if $while is still empty, add a 'ID > 0' to it so you see everything.
if ($where == '') {
$where = 'id > 0';
}
// If we dont have DNS views turned on, limit data to just the default view.
// Even if there is data associated with other views, ignore it
if (!$conf['dns_views']) {
$where .= ' AND dns_view_id = 0';
}
// Do the SQL Query
$filter = '';
if ($form['filter']) {
// Host names should always be lower case
$form['filter'] = strtolower($form['filter']);
$filter = ' AND name LIKE ' . $onadb->qstr('%' . $form['filter'] . '%');
}
// If we get a specific host to look for we must do the following
// 1. get (A) records that match any interface_id associated with the host
// 2. get CNAMES that point to dns records that are using an interface_id associated with the host
if ($form['host_id']) {
// If we dont have DNS views turned on, limit data to just the default view.
// Even if there is data associated with other views, ignore it
// MP: something strange with this, it should only limit to default view.. sometimes it does not???
if (!$conf['dns_views']) {
$hwhere .= 'dns_view_id = 0 AND ';
}
// Get the host record so we know what the primary interface is
list($status, $rows, $host) = ona_get_host_record(array('id' => $form['host_id']), '');
list($status, $rows, $results) = db_get_records($onadb, 'dns', $hwhere . 'interface_id in (select id from interfaces where host_id = ' . $onadb->qstr($form['host_id']) . ') OR interface_id in (select interface_id from interface_clusters where host_id = ' . $onadb->qstr($form['host_id']) . ')', "type", $conf['search_results_per_page'], $offset);
// If we got less than search_results_per_page, add the current offset to it
// so that if we're on the last page $rows still has the right number in it.
if ($rows > 0 and $rows < $conf['search_results_per_page']) {
$rows += $conf['search_results_per_page'] * ($page - 1);
} else {
if ($rows >= $conf['search_results_per_page']) {
list($status, $rows, $records) = db_get_records($onadb, 'dns', $hwhere . 'interface_id in (select id from interfaces where host_id = ' . $onadb->qstr($form['host_id']) . ') OR interface_id in (select interface_id from interface_clusters where host_id = ' . $onadb->qstr($form['host_id']) . ')' . $filter, "", 0);
}
}
} else {
list($status, $rows, $results) = db_get_records($onadb, 'dns', $where . $filter, $orderby, $conf['search_results_per_page'], $offset);
// If we got less than search_results_per_page, add the current offset to it
// so that if we're on the last page $rows still has the right number in it.
if ($rows > 0 and $rows < $conf['search_results_per_page']) {
$rows += $conf['search_results_per_page'] * ($page - 1);
} else {
if ($rows >= $conf['search_results_per_page']) {
list($status, $rows, $records) = db_get_records($onadb, 'dns', $where . $filter, "", 0);
}
}
}
$count = $rows;
//
// *** BUILD HTML LIST ***
//
$html .= <<<EOL
<!-- dns record Results -->
<table id="{$form['form_id']}_dns_record_list" class="list-box" cellspacing="0" border="0" cellpadding="0">
<!-- Table Header -->
<tr>
<td colspan="2" class="list-header" align="center" style="{$style['borderR']};">Name</td>
<td class="list-header" align="center" style="{$style['borderR']};">Time to Live</td>
<td class="list-header" align="center" style="{$style['borderR']};">Type</td>
<td class="list-header" align="center" style="{$style['borderR']};">Data</td>
<td class="list-header" align="center" style="{$style['borderR']};">Effective</td>
EOL;
if ($conf['dns_views']) {
$html .= "<td class=\"list-header\" align=\"center\" style=\"{$style['borderR']};\">DNS View</td>";
}
$html .= <<<EOL
<td class="list-header" align="center" style="{$style['borderR']};">Notes</td>
<td class="list-header" align="center"> </td>
</tr>
EOL;
// Loop and display each record
// $last_record = array('name' => $results[0]['name'], 'domain_id' => $results[0]['domain_id']);
// $last_record_count = 0;
for ($i = 1; $i <= count($results); $i++) {
$record = $results[$i];
// Get additional info about each host record
$record = $results[$i - 1];
// if the interface is the primary_dns_id for the host then mark it
$primary_record = ' ';
if ($host['primary_dns_id'] == $record['id']) {
$primary_record = '<img title="Primary DNS record" src="' . $images . '/silk/font_go.png" border="0">';
}
// Check for interface records (and find out how many there are)
list($status, $interfaces, $interface) = ona_get_interface_record(array('id' => $record['interface_id']), '');
if ($interfaces) {
// Get the host record so we know what the primary interface is
//list($status, $rows, $inthost) = ona_get_host_record(array('id' => $interface['host_id']), '');
// Make the type correct based on the IP passed in
if (strlen($interface['ip_addr']) > 11 and $record['type'] == 'A') {
$record['type'] = 'AAAA';
}
$record['ip_addr'] = ip_mangle($interface['ip_addr'], 'dotted');
// Subnet description
list($status, $rows, $subnet) = ona_get_subnet_record(array('id' => $interface['subnet_id']));
$record['subnet'] = $subnet['name'];
$record['ip_mask'] = ip_mangle($subnet['ip_mask'], 'dotted');
$record['ip_mask_cidr'] = ip_mangle($subnet['ip_mask'], 'cidr');
// Create string to be embedded in HTML for display
$data = <<<EOL
{$record['ip_addr']}
EOL;
} else {
// Get other DNS records which name this record as parent
list($status, $rows, $dns_other) = ona_get_host_record(array('id' => $record['dns_id']));
// Create string to be embedded in HTML for display
if ($rows) {
$data = <<<EOL
<a title="View host. ID: {$dns_other['id']}"
class="nav"
onClick="xajax_window_submit('work_space', 'xajax_window_submit(\\'display_host\\', \\'host_id=>{$dns_other['id']}\\', \\'display\\')');"
>{$dns_other['name']}</a
>.<a title="View domain. ID: {$dns_other['domain_id']}"
class="domain"
onClick="xajax_window_submit('work_space', 'xajax_window_submit(\\'display_domain\\', \\'domain_id=>{$dns_other['domain_id']}\\', \\'display\\')');"
>{$dns_other['domain_fqdn']}</a>
EOL;
}
}
$record['notes_short'] = truncate($record['notes'], 30);
// Add a dot to the end of record name for display purposes
$record['name'] = $record['name'] . '.';
// Process PTR record
if ($record['type'] == 'PTR') {
list($status, $rows, $pointsto) = ona_get_dns_record(array('id' => $record['dns_id']), '');
list($status, $rows, $pdomain) = ona_get_domain_record(array('id' => $record['domain_id']), '');
// Flip the IP address
$record['name'] = ip_mangle($record['ip_addr'], 'flip');
$record['domain'] = $pdomain['name'];
if ($pdomain['parent_id']) {
list($status, $rows, $parent) = ona_get_domain_record(array('id' => $pdomain['parent_id']));
$parent['name'] = ona_build_domain_name($parent['id']);
$record['domain'] = $pdomain['name'] . '.' . $parent['name'];
unset($parent['name']);
}
// strip down the IP to just the "host" part as it relates to the domain its in
if (strstr($record['domain'], 'in-addr.arpa')) {
$domain_part = preg_replace("/.in-addr.arpa\$/", '', $record['domain']);
} else {
$domain_part = preg_replace("/.ip6.arpa\$/", '', $record['domain']);
}
$record['name'] = preg_replace("/{$domain_part}\$/", '', $record['name']);
$data = <<<EOL
<a title="Edit DNS A record"
class="act"
onClick="xajax_window_submit('edit_record', 'dns_record_id=>{$record['dns_id']}', 'editor');"
>{$pointsto['name']}</a>.<a title="View domain. ID: {$pointsto['domain_id']}"
class="domain"
onClick="xajax_window_submit('work_space', 'xajax_window_submit(\\'display_domain\\', \\'domain_id=>{$pointsto['domain_id']}\\', \\'display\\')');"
>{$pointsto['domain_fqdn']}</a>.
EOL;
}
// Process CNAME record
if ($record['type'] == 'CNAME') {
list($status, $rows, $cname) = ona_get_dns_record(array('id' => $record['dns_id']), '');
$data = <<<EOL
<a title="Edit DNS A record"
class="act"
onClick="xajax_window_submit('edit_record', 'dns_record_id=>{$record['dns_id']}', 'editor');"
>{$cname['name']}</a>.<a title="View domain. ID: {$cname['domain_id']}"
class="domain"
onClick="xajax_window_submit('work_space', 'xajax_window_submit(\\'display_domain\\', \\'domain_id=>{$cname['domain_id']}\\', \\'display\\')');"
>{$cname['domain_fqdn']}</a>.
EOL;
}
// Process NS record
if ($record['type'] == 'NS') {
// clear out the $record['domain'] value so it shows properly in the list
$record['name'] = '';
list($status, $rows, $ns) = ona_get_dns_record(array('id' => $record['dns_id']), '');
$data = <<<EOL
<a title="Edit DNS A record"
class="act"
onClick="xajax_window_submit('edit_record', 'dns_record_id=>{$record['dns_id']}', 'editor');"
>{$ns['name']}</a>.<a title="View domain. ID: {$ns['domain_id']}"
class="domain"
onClick="xajax_window_submit('work_space', 'xajax_window_submit(\\'display_domain\\', \\'domain_id=>{$ns['domain_id']}\\', \\'display\\')');"
>{$ns['domain_fqdn']}</a>.
EOL;
}
// Process MX record
if ($record['type'] == 'MX') {
// show the preference value next to the type
$record['type'] = "{$record['type']} ({$record['mx_preference']})";
list($status, $rows, $mx) = ona_get_dns_record(array('id' => $record['dns_id']), '');
$data = <<<EOL
<a title="Edit DNS A record"
class="act"
onClick="xajax_window_submit('edit_record', 'dns_record_id=>{$record['dns_id']}', 'editor');"
>{$mx['name']}</a>.<a title="View domain. ID: {$mx['domain_id']}"
class="domain"
onClick="xajax_window_submit('work_space', 'xajax_window_submit(\\'display_domain\\', \\'domain_id=>{$mx['domain_id']}\\', \\'display\\')');"
>{$mx['domain_fqdn']}</a>.
EOL;
}
// Process SRV record
if ($record['type'] == 'SRV') {
// show the preference value next to the type
$record['type'] = "{$record['type']} ({$record['srv_port']})";
list($status, $rows, $srv) = ona_get_dns_record(array('id' => $record['dns_id']), '');
$data = <<<EOL
<a title="Edit DNS A record"
class="act"
onClick="xajax_window_submit('edit_record', 'dns_record_id=>{$record['dns_id']}', 'editor');"
>{$srv['name']}</a>.<a title="View domain. ID: {$srv['domain_id']}"
class="domain"
onClick="xajax_window_submit('work_space', 'xajax_window_submit(\\'display_domain\\', \\'domain_id=>{$srv['domain_id']}\\', \\'display\\')');"
>{$srv['domain_fqdn']}</a>.
EOL;
}
// Process TXT record
if ($record['type'] == 'TXT') {
// some records will have an interfaceid and dnsid when associated to another dns name
// some will just be un associated txt records or domain only records. Determine that here and
// display appropriately. This is to ensure associated DNS records match up if the name changes
if ($record['interface_id'] and $record['dns_id']) {
list($status, $rows, $txtmain) = ona_get_dns_record(array('id' => $record['dns_id']), '');
$record['name'] = $txtmain['name'] . '.';
}
$data = truncate($record['txt'], 70);
}
// Get the domain name and domain ttl
$ttl_style = 'title="Time-to-Live"';
list($status, $rows, $domain) = ona_get_domain_record(array('id' => $record['domain_id']));
// Make record['domain'] have the right name in it
if ($record['type'] != 'PTR') {
$record['domain'] = $domain['fqdn'];
}
// clear out the $record['domain'] value so it shows properly in the list for NS records
if ($record['type'] == 'NS') {
$record['domain'] = $domain['fqdn'];
}
// if the ttl is blank, use the one in the domain (minimum)
if ($record['ttl'] == 0) {
$record['ttl'] = $domain['default_ttl'];
$ttl_style = 'style="font-style: italic;" title="Using TTL from domain"';
}
// format the ebegin using the configured date format
$ebegin = '';
// If it is in the future, print the time
if (strtotime($record['ebegin']) > time()) {
$ebegin = '<span title="Active in DNS on: ' . $record['ebegin'] . '">' . date($conf['date_format'], strtotime($record['ebegin'])) . '</span>';
}
// If it is 0 then show as disabled
if (strtotime($record['ebegin']) < 0) {
$ebegin = <<<EOL
<span
style="background-color:#FFFF99;"
title="Disabled: Won't build in DNS"
onClick="var doit=confirm('Are you sure you want to enable this DNS record?');
if (doit == true)
xajax_window_submit('edit_record', xajax.getFormValues('{$form['form_id']}_list_record_{$record['id']}'), 'enablerecord');"
>Disabled</span>
EOL;
}
// If we get this far and the name we have built has a leading . in it then remove the dot.
$record['name'] = preg_replace("/^\\./", '', $record['name']);
// Get the name of the view and the description
if ($conf['dns_views']) {
list($status, $rows, $dnsview) = ona_get_dns_view_record(array('id' => $record['dns_view_id']));
$record['view_name'] = $dnsview['name'];
$record['view_desc'] = $dnsview['description'];
}
// Escape data for display in html
foreach (array_keys($record) as $key) {
$record[$key] = htmlentities($record[$key], ENT_QUOTES, $conf['php_charset']);
}
//$primary_object_js = "xajax_window_submit('work_space', 'xajax_window_submit(\'display_host\', \'host_id=>{$record['id']}\', \'display\')');";
$html .= <<<EOL
<tr onMouseOver="this.className='row-highlight';" onMouseOut="this.className='row-normal';">
<td class="list-row" style="padding-right: 2px; padding-left: 4px;" width="16px">
{$primary_record}
</td>
<td class="list-row">
<span title="Record. ID: {$record['id']}"
onClick=""
>{$record['name']}</span
><a title="View domain. ID: {$domain['id']}"
class="domain"
onClick="xajax_window_submit('work_space', 'xajax_window_submit(\\'display_domain\\', \\'domain_id=>{$domain['id']}\\', \\'display\\')');"
>{$record['domain']}.</a>
</td>
<td class="list-row">
<span
onClick=""
{$ttl_style}
>{$record['ttl']} seconds</span>
</td>
<td class="list-row">
<span title="Record Type"
onClick=""
>{$record['type']}</span>
</td>
<td class="list-row" align="left">
EOL;
// Put the data in!
$html .= $data;
$html .= <<<EOL
</td>
<td class="list-row" align="center">
{$ebegin}
</td>
EOL;
// Display the view we are part of
if ($conf['dns_views']) {
$html .= <<<EOL
<td class="list-row" align="center" title="{$record['view_desc']}">
{$record['view_name']}
</td>
EOL;
}
$html .= <<<EOL
<td class="list-row">
<span title="{$record['notes']}">{$record['notes_short']}</span>
</td>
<!-- ACTION ICONS -->
<td class="list-row" align="right">
<form id="{$form['form_id']}_list_record_{$record['id']}"
><input type="hidden" name="dns_record_id" value="{$record['id']}"
><input type="hidden" name="host_id" value="{$host['id']}"
><input type="hidden" name="js" value="{$refresh}"
></form>
EOL;
if (auth('dns_record_modify')) {
// If it is an A record but not the primary, display an option to make it primary. and only if we are dealing with a specific host
if (($record['type'] == 'A' or $record['type'] == 'AAAA') and $host['primary_dns_id'] != $record['id'] and $form['host_id']) {
$html .= <<<EOL
<a title="Make this the primary DNS record"
class="act"
onClick="var doit=confirm('Are you sure you want to make this the primary DNS record for this host?');
if (doit == true)
xajax_window_submit('edit_record', xajax.getFormValues('{$form['form_id']}_list_record_{$record['id']}'), 'makeprimary');"
><img src="{$images}/silk/font_go.png" border="0"></a>
EOL;
}
}
// display a view host button on the dns record search form list
if ($form['search_form_id'] == 'dns_record_search_form') {
$html .= <<<EOL
<a title="View associated host record: {$interface['host_id']}"
class="act"
onClick="xajax_window_submit('display_host', 'host_id=>{$interface['host_id']}', 'display');"
><img src="{$images}/silk/computer_go.png" border="0"></a>
EOL;
}
if (auth('dns_record_modify')) {
$html .= <<<EOL
<a title="Edit DNS record"
class="act"
onClick="xajax_window_submit('edit_record', xajax.getFormValues('{$form['form_id']}_list_record_{$record['id']}'), 'editor');"
><img src="{$images}/silk/page_edit.png" border="0"></a>
EOL;
}
if (auth('dns_record_del')) {
$html .= <<<EOL
<a title="Delete DNS record"
class="act"
onClick="xajax_window_submit('edit_record', xajax.getFormValues('{$form['form_id']}_list_record_{$record['id']}'), 'delete');"
><img src="{$images}/silk/delete.png" border="0"></a>
EOL;
}
$html .= <<<EOL
</td>
</tr>
EOL;
// reset the record counter before we go back for the next iteration
$last_record = array('name' => $record['name'], 'domain_id' => $record['domain_id']);
$last_record_count = 1;
}
$html .= <<<EOL
</table>
EOL;
// Build page links if there are any
$html .= get_page_links($page, $conf['search_results_per_page'], $count, $window_name, $form['form_id']);
// Insert the new html into the content div specified
// Instantiate the xajaxResponse object
$response = new xajaxResponse();
$response->addAssign("{$form['form_id']}_{$tab}_count", "innerHTML", "({$count})");
$response->addAssign($form['content_id'], "innerHTML", $html);
if ($js) {
$response->addScript($js);
}
return $response->getXML();
}
function ws_display_list($window_name, $form = '')
{
global $conf, $self, $onadb;
global $images, $color, $style;
$html = '';
$js = '';
// If the user supplied an array in a string, build the array and store it in $form
$form = parse_options_string($form);
// Find the "tab" we're on
$tab = $_SESSION['ona'][$form['form_id']]['tab'];
// Build js to refresh this list
$refresh = "xajax_window_submit('{$window_name}', xajax.getFormValues('{$form['form_id']}'), 'display_list');";
// If it's not a new query, load the previous query from the session
// into $form and save the current page and filter in the session.
// Also find/set the "page" we're viewing
$page = 1;
if ($form['page'] and is_numeric($form['page'])) {
$form = array_merge($form, (array) $_SESSION['ona'][$form['form_id']][$tab]['q']);
$_SESSION['ona'][$form['form_id']][$tab]['page'] = $page = $form['page'];
$_SESSION['ona'][$form['form_id']][$tab]['filter'] = $form['filter'];
}
printmsg("DEBUG => Displaying subnets list page: {$page}", 1);
// Calculate the SQL query offset (based on the page being displayed)
$offset = $conf['search_results_per_page'] * ($page - 1);
if ($offset == 0) {
$offset = -1;
}
// Search results go in here
$results = array();
$count = 0;
//
// *** ADVANCED SUBNET SEARCH ***
// FIND RESULT SET
//
// Start building the "where" clause for the sql query to find the subnets to display
$where = "";
$and = "";
// enable or disable wildcards
$wildcard = '%';
if ($form['nowildcard']) {
$wildcard = '';
}
// DISPLAY ALL
if ($form['all_flag']) {
$where .= $and . "id > 0";
$and = " AND ";
}
// SUBNET ID
if ($form['subnet_id']) {
$where .= $and . "id = " . $form['subnet_id'];
$and = " AND ";
}
// VLAN ID
if ($form['vlan_id']) {
$where .= $and . "vlan_id = " . $onadb->qstr($form['vlan_id']);
$and = " AND ";
}
// SUBNET TYPE
if ($form['nettype']) {
$where .= $and . "subnet_type_id = " . $onadb->qstr($form['nettype']);
$and = " AND ";
}
// find subnets that are associated with dhcp server
if ($form['server_id']) {
$where .= $and . "id IN (SELECT subnet_id FROM dhcp_server_subnets WHERE host_id = " . $onadb->qstr($form['server_id']) . ')';
$and = " AND ";
}
// SUBNET NAME
if ($form['subnetname']) {
// This field is always upper case
$form['subnetname'] = strtoupper($form['subnetname']);
$where .= $and . "name LIKE " . $onadb->qstr($wildcard . $form['subnetname'] . $wildcard);
$and = " AND ";
}
// IP ADDRESS
if ($form['ip_subnet']) {
// Build $ip and $ip_end from $form['ip_subnet'] and $form['ip_subnet_thru']
$ip = ip_complete($form['ip_subnet'], '0');
if ($form['ip_subnet_thru']) {
$ip = ip_complete($form['ip_subnet'], '0');
$ip_end = ip_complete($form['ip_subnet_thru'], '255');
// Find out if $ip and $ip_end are valid
$ip = ip_mangle($ip, 'numeric');
$ip_end = ip_mangle($ip_end, 'numeric');
if ($ip != -1 and $ip_end != -1) {
// Find subnets between the specified ranges
$where .= $and . " ip_addr >= " . $ip . " AND ip_addr <= " . $ip_end;
$and = " AND ";
}
} else {
list($status, $rows, $record) = ona_find_subnet($ip);
if ($rows) {
$where .= $and . " id = " . $record['id'];
$and = " AND ";
}
}
}
// tag
if ($form['tag_net']) {
$where .= $and . "id in (select reference from tags where type like 'subnet' and name like " . $onadb->qstr($form['tag_net']) . ")";
$and = " AND ";
}
// custom attribute type
if ($form['custom_attribute_type_net']) {
$where .= $and . "id in (select table_id_ref from custom_attributes where table_name_ref like 'subnets' and custom_attribute_type_id = (SELECT id FROM custom_attribute_types WHERE name = " . $onadb->qstr($form['custom_attribute_type_net']) . "))";
$and = " AND ";
$cavaluetype = "and custom_attribute_type_id = (SELECT id FROM custom_attribute_types WHERE name = " . $onadb->qstr($form['custom_attribute_type_net']) . ")";
}
// custom attribute value
if ($form['ca_value_net']) {
$where .= $and . "id in (select table_id_ref from custom_attributes where table_name_ref like 'subnets' {$cavaluetype} and value like " . $onadb->qstr($wildcard . $form['ca_value_net'] . $wildcard) . ")";
$and = " AND ";
}
// display a nice message when we dont find all the records
if ($where == '' and $form['content_id'] == 'search_results_list') {
$js .= "el('search_results_msg').innerHTML = 'Unable to find subnets matching your query, showing all records';";
}
// Wild card .. if $where is still empty, add a 'ID > 0' to it so you see everything.
if ($where == '') {
$where = 'id > 0';
}
// Do the SQL Query
$filter = '';
if ($form['filter']) {
// Subnet namess are always upper case
$form['filter'] = strtoupper($form['filter']);
$filter = ' AND name LIKE ' . $onadb->qstr('%' . $form['filter'] . '%');
}
list($status, $rows, $results) = db_get_records($onadb, 'subnets', $where . $filter, "ip_addr", $conf['search_results_per_page'], $offset);
// If we got less than search_results_per_page, add the current offset to it
// so that if we're on the last page $rows still has the right number in it.
if ($rows > 0 and $rows < $conf['search_results_per_page']) {
$rows += $conf['search_results_per_page'] * ($page - 1);
} else {
if ($rows >= $conf['search_results_per_page']) {
list($status, $rows, $records) = db_get_records($onadb, 'subnets', $where . $filter, "", 0);
}
}
$count = $rows;
//
// *** BUILD HTML LIST ***
//
$html .= <<<EOL
<!-- Subnet Results -->
<table id="{$form['form_id']}_subnet_list" class="list-box" cellspacing="0" border="0" cellpadding="0">
<!-- Table Header -->
<tr>
<td class="list-header" align="center" style="{$style['borderR']};">Name</td>
<td class="list-header" align="center" style="{$style['borderR']};">Subnet</td>
<td class="list-header" align="center" style="{$style['borderR']};">Usage</td>
<td class="list-header" align="center" style="{$style['borderR']};">Type</td>
<td class="list-header" align="center"> </td>
</tr>
EOL;
// Loop and display each record
foreach ($results as $record) {
// Get additional info about eash subnet record //
// Convert IP and Netmask to a presentable format
$record['ip_addr'] = ip_mangle($record['ip_addr'], 'dotted');
$record['ip_mask'] = ip_mangle($record['ip_mask'], 'dotted');
$record['IP_SUBNET_MASK_CIDR'] = ip_mangle($record['ip_mask'], 'cidr');
list($status, $rows, $type) = ona_get_subnet_type_record(array('id' => $record['subnet_type_id']));
$record['type'] = $type['display_name'];
// Calculate the percentage of the subnet that's used (total size - allocated hosts - dhcp pool size)
$usage_html = get_subnet_usage_html($record['id']);
// Escape data for display in html
foreach (array_keys($record) as $key) {
$record[$key] = htmlentities($record[$key], ENT_QUOTES, $conf['php_charset']);
}
$primary_object_js = "xajax_window_submit('work_space', 'xajax_window_submit(\\'display_subnet\\', \\'subnet_id=>{$record['id']}\\', \\'display\\')');";
$html .= <<<EOL
<tr onMouseOver="this.className='row-highlight'" onMouseOut="this.className='row-normal'">
<td class="list-row">
<a title="View subnet. ID: {$record['id']}"
class="nav"
onClick="{$primary_object_js}"
>{$record['name']}</a>
</td>
<td class="list-row" align="left">
{$record['ip_addr']} <span title="{$record['ip_mask']}">/{$record['IP_SUBNET_MASK_CIDR']}</span>
</td>
<td class="list-row" align="center" style="vertical-align: middle;">
{$usage_html}
</td>
<td class="list-row" align="left">
{$record['type']}
</td>
<td class="list-row" align="right">
<form id="{$form['form_id']}_list_subnet_{$record['id']}"
><input type="hidden" name="subnet_id" value="{$record['id']}"
><input type="hidden" name="js" value="{$refresh}"
></form>
<a title="Display subnet map"
class="act"
onClick="xajax_window_submit('work_space', 'xajax_window_submit(\\'display_block_map\\', \\'ip_block_start=>{$record['ip_addr']}\\', \\'display\\');');"
><img src="{$images}/silk/shape_align_left.png" border="0"></a>
EOL;
if (auth('subnet_modify')) {
$html .= <<<EOL
<a title="Edit subnet"
class="act"
onClick="xajax_window_submit('edit_subnet', xajax.getFormValues('{$form['form_id']}_list_subnet_{$record['id']}'), 'editor');"
><img src="{$images}/silk/page_edit.png" border="0"></a>
EOL;
}
if (auth('subnet_del')) {
$html .= <<<EOL
<a title="Delete subnet"
class="act"
onClick="var doit=confirm('Are you sure you want to delete this subnet?');
if (doit == true)
xajax_window_submit('edit_subnet', xajax.getFormValues('{$form['form_id']}_list_subnet_{$record['id']}'), 'delete');"
><img src="{$images}/silk/delete.png" border="0"></a>
EOL;
}
$html .= <<<EOL
</td>
</tr>
EOL;
}
$html .= <<<EOL
</table>
EOL;
// Build page links if there are any
$html .= get_page_links($page, $conf['search_results_per_page'], $count, $window_name, $form['form_id']);
// If there was only 1 result, and we're about to display results in the "Search Results" window, display it.
if ($count == 1 and $form['content_id'] == 'search_results_list' and $form['filter'] == '') {
$js .= $primary_object_js;
}
// Insert the new html into the content div specified
// Instantiate the xajaxResponse object
$response = new xajaxResponse();
$response->addAssign("{$form['form_id']}_{$tab}_count", "innerHTML", "({$count})");
$response->addAssign($form['content_id'], "innerHTML", $html);
if ($js) {
$response->addScript($js);
}
return $response->getXML();
}
function ws_subnet($window_name, $form = '')
{
global $conf, $self, $onadb;
global $color, $style, $images;
$html = $js = '';
// If the user supplied an array in a string, build the array and store it in $form
$form = parse_options_string($form);
// Set max_results and max_usage_bars if we need to
if (!is_numeric($form['max_results'])) {
$form['max_results'] = 250;
}
if (!is_numeric($form['max_usage_bars'])) {
$form['max_usage_bars'] = 50;
}
//
// *** QF SUBNET SEARCH ***
//
// Search results go in here
$results = array();
$count = 0;
// Start building the "where" clause for the sql query to find the subnets to display
$where = "";
$and = "";
// SUBNET TYPE
if ($form['nettype']) {
$where .= $and . "subnet_type_id = " . $onadb->qstr($form['nettype']);
$and = " AND ";
}
// SUBNET DESCRIPTION
if ($form['netdesc']) {
// This field is always upper case
$form['netdesc'] = strtoupper($form['netdesc']);
$where .= $and . "name LIKE " . $onadb->qstr('%' . $form['netdesc'] . '%');
$and = " AND ";
}
// IP ADDRESS
if ($form['ip_subnet']) {
// Build $ip and $ip_end from $form['ip_subnet'] and $form['ip_subnet_thru']
$ip = ip_complete($form['ip_subnet'], '0');
if ($form['ip_subnet_thru']) {
$ip_end = ip_complete($form['ip_subnet_thru'], '255');
} else {
$ip_end = ip_complete($form['ip_subnet'], '255');
}
// Find out if $ip and $ip_end are valid
$ip = ip_mangle($ip, 'numeric');
$ip_end = ip_mangle($ip_end, 'numeric');
if ($ip != -1 and $ip_end != -1) {
// Find subnets between the specified ranges
$where .= "ip_addr >= " . $onadb->qstr($ip) . " AND ip_addr <= " . $onadb->qstr($ip_end);
}
}
// Do the SQL Query
$filter = '';
if ($form['filter']) {
// Subnet descriptions are always upper case
$form['filter'] = strtoupper($form['filter']);
$filter = $and . ' name LIKE ' . $onadb->qstr('%' . $form['filter'] . '%');
}
list($status, $rows, $results) = db_get_records($onadb, 'subnets', $where . $filter, "ip_addr ASC", $form['max_results']);
// If there were more than $form['max_results'] find out how many records there really are
if ($rows >= $form['max_results']) {
list($status, $rows, $records) = db_get_records($onadb, 'subnets', $where . $filter, "", 0);
}
$count = $rows;
//
// *** BUTILD RESULTS HTML ***
//
$html .= <<<EOL
<table style="cursor: pointer;" width="100%" cellspacing="0" border="0" cellpadding="0">
EOL;
if ($count > $form['max_results']) {
$html .= <<<EOL
<tr><td style="cursor: default; font-size: 12px; background-color: #FFCCCC; color: 000;" colspan="5" align="center">Displaying {$form['max_results']} of {$count} results</td></tr>
EOL;
}
if ($count > $form['max_usage_bars']) {
$too_many_bars_message = <<<EOL
<tr><td style="cursor: default; font-size: 12px; background-color: #FFCCCC; color: 000;" colspan="5" align="center">Usage graph only displayed for the first {$form['max_usage_bars']} subnets</td></tr>
EOL;
}
$i = 0;
foreach ($results as $record) {
$record['ip_addr'] = ip_mangle($record['ip_addr'], 'dotted');
// Calculate the percentage of the subnet that's used (total size - allocated hosts - dhcp pool size)
if ($i++ <= $form['max_usage_bars']) {
$usage_html = get_subnet_usage_html($record['id']);
} else {
if ($i == $form['max_usage_bars'] + 2) {
$html .= $too_many_bars_message;
$usage_html = ' ';
} else {
$usage_html = ' ';
}
}
// The onClick javascript is slightly different if we're looking for a subnet, or a free IP address
if ($form['next_action'] == 'free_ip') {
$onclick = "el('qf_free_ip_subnet_id').value = '{$record['id']}'; xajax_window_submit('{$window_name}', xajax.getFormValues('{$form['form_id']}'), 'free_ip');";
} else {
$onclick = "el('{$form['input_id']}').value = '{$record['name']}'; removeElement('{$form['id']}');";
}
$html .= <<<EOL
<tr onMouseOver="this.className='row-highlight';"
onMouseOut="this.className='row-normal';"
onClick="{$onclick}">
<td style="font-size: 10px; padding: 0px 2px;">{$record['ip_addr']}</td>
<td style="font-size: 10px; padding: 0px 2px;">{$usage_html}</td>
<td style="font-size: 10px; padding: 0px 2px;">{$record['name']}</td>
</tr>
EOL;
}
$html .= <<<EOL
</table>
EOL;
$js .= <<<EOL
el('{$form['content_id']}').style.display = 'block';
/* Reposition the popup if the new content is displayed off the screen */
wwTT_position('{$form['id']}');
EOL;
if ($count == 1) {
$html = "";
$js .= "el('qf_free_ip_subnet_id').value = '{$record['id']}'; xajax_window_submit('{$window_name}', xajax.getFormValues('{$form['form_id']}'), 'free_ip');";
}
// Insert the new html into the window
// Instantiate the xajaxResponse object
$response = new xajaxResponse();
$response->addAssign($form['content_id'], "innerHTML", $html);
if ($js) {
$response->addScript($js);
}
return $response->getXML();
}
function ws_display_list($window_name, $form = '')
{
global $conf, $self, $onadb;
global $images, $color, $style;
$html = '';
$js = '';
// If the user supplied an array in a string, transform it into an array
$form = parse_options_string($form);
// Find the "tab" we're on
$tab = $_SESSION['ona'][$form['form_id']]['tab'];
// Build js to refresh this list
$refresh = "xajax_window_submit('{$window_name}', xajax.getFormValues('{$form['form_id']}'), 'display_list');";
// If it's not a new query, load the previous query from the session
// into $form and save the current page and filter in the session.
// Also find/set the "page" we're viewing
$page = 1;
if ($form['page'] and is_numeric($form['page'])) {
$form = array_merge($form, (array) $_SESSION['ona'][$form['form_id']][$tab]['q']);
$_SESSION['ona'][$form['form_id']][$tab]['page'] = $page = $form['page'];
$_SESSION['ona'][$form['form_id']][$tab]['filter'] = $form['filter'];
}
printmsg("DEBUG => Displaying hosts list page: {$page}", 1);
// Calculate the SQL query offset (based on the page being displayed)
$offset = $conf['search_results_per_page'] * ($page - 1);
if ($offset == 0) {
$offset = -1;
}
// Search results go in here
$results = array();
$count = 0;
//
// *** ADVANCED HOST SEARCH ***
// FIND RESULT SET
//
// Start building the "where" clause for the sql query to find the hosts to display
$where = "";
$and = "";
$orderby = "";
$from = 'hosts h';
// enable or disable wildcards
$wildcard = '%';
if ($form['nowildcard']) {
$wildcard = '';
}
// DISPLAY ALL
// MP: I dont think this is used.. remove it if you can
if ($form['all_flag']) {
$where .= $and . "h.id > 0";
$and = " AND ";
}
// HOST ID
if ($form['host_id']) {
$where .= $and . "h.id = " . $onadb->qstr($form['host_id']);
$and = " AND ";
}
// DEVICE ID
if ($form['device_id']) {
$where .= $and . "h.device_id = " . $onadb->qstr($form['device_id']);
$and = " AND ";
}
// HOSTNAME
if ($form['hostname']) {
// Find the domain name piece of the hostname assuming it was passed in as an fqdn.
// FIXME: MP this was taken from the ona_find_domain function. make that function have the option
// to NOT return a default domain.
// lets test out if it has a / in it to strip the view name portion
$view['id'] = 0;
if (strstr($form['hostname'], '/')) {
list($dnsview, $form['hostname']) = explode('/', $form['hostname']);
list($status, $viewrows, $view) = db_get_record($onadb, 'dns_views', array('name' => strtoupper($dnsview)));
if (!$viewrows) {
$view['id'] = 0;
}
}
// Split it up on '.' and put it in an array backwards
$parts = array_reverse(explode('.', $form['hostname']));
// Find the domain name that best matches
$name = '';
$domain = array();
foreach ($parts as $part) {
if (!$rows) {
if (!$name) {
$name = $part;
} else {
$name = "{$part}.{$name}";
}
list($status, $rows, $record) = ona_get_domain_record(array('name' => $name));
if ($rows) {
$domain = $record;
}
} else {
list($status, $rows, $record) = ona_get_domain_record(array('name' => $part, 'parent_id' => $domain['id']));
if ($rows) {
$domain = $record;
}
}
}
$withdomain = '';
$hostname = $form['hostname'];
// If you found a domain in the query, add it to the search, and strip the domain from the host portion.
if (array_key_exists('id', $domain) and !$form['domain']) {
$withdomain = "AND b.domain_id = {$domain['id']}";
// Now find what the host part of $search is
$hostname = str_replace(".{$domain['fqdn']}", '', $form['hostname']);
}
// If we have a hostname and a domain name then use them both
if ($form['domain']) {
list($status, $rows, $record) = ona_find_domain($form['domain']);
if ($record['id']) {
$withdomain = "AND b.domain_id = {$record['id']}";
}
// Now find what the host part of $search is
$hostname = trim($form['hostname']);
}
// MP: Doing the many select IN statements was too slow.. I did this kludge:
// 1. get a list of all the interfaces
// 2. loop through the array and build a list of comma delimited host_ids to use in the final select
list($status, $rows, $tmp) = db_get_records($onadb, 'interfaces a, dns b', "a.id = b.interface_id and b.name LIKE '{$wildcard}{$hostname}{$wildcard}' {$withdomain}");
$commait = '';
$hostids = '';
foreach ($tmp as $item) {
$hostids .= $commait . $item['host_id'];
$commait = ',';
}
// Just look for the host itself
list($status, $rows, $r) = ona_find_host($form['hostname']);
if ($rows) {
$hostids .= ',' . $r['id'];
}
// MP: this is the old, slow query for reference.
//
// TODO: MP this seems to be kinda slow (gee I wonder why).. look into speeding things up somehow.
// This also does not search for CNAME records etc. only things with interface_id.. how to fix that issue.......?
// $where .= $and . "id IN (select host_id from interfaces where id in (SELECT interface_id " .
// " FROM dns " .
// " WHERE name LIKE '%{$hostname}%' {$withdomain} ))";
// Trim off extra commas
$hostids = trim($hostids, ",");
// If we got a list of hostids from interfaces then use them
if ($hostids) {
$idqry = "h.id IN ({$hostids})";
} else {
$idqry = "";
}
$where .= $and . $idqry;
$and = " AND ";
}
// DOMAIN
if ($form['domain'] and !$form['hostname']) {
// FIXME: does this clause work correctly?
printmsg("FIXME: => Does \$form['domain'] work correctly in list_hosts.inc.php?", 2);
// Find the domain name piece of the hostname.
// FIXME: MP this was taken from the ona_find_domain function. make that function have the option
// to NOT return a default domain.
// Split it up on '.' and put it in an array backwards
$parts = array_reverse(explode('.', $form['domain']));
// Find the domain name that best matches
$name = '';
$domain = array();
foreach ($parts as $part) {
if (!$rows) {
if (!$name) {
$name = $part;
} else {
$name = "{$part}.{$name}";
}
list($status, $rows, $record) = ona_get_domain_record(array('name' => $name));
if ($rows) {
$domain = $record;
}
} else {
list($status, $rows, $record) = ona_get_domain_record(array('name' => $part, 'parent_id' => $domain['id']));
if ($rows) {
$domain = $record;
}
}
}
if (array_key_exists('id', $domain)) {
// Crappy way of writing the query but it makes it fast.
$from = "(\nSELECT distinct a.*\nfrom hosts as a, interfaces as i, dns as d\nwhere a.id = i.host_id\nand i.id = d.interface_id\nand d.domain_id = " . $onadb->qstr($domain['id']) . "\n) h";
$and = " AND ";
}
}
// DOMAIN ID
if ($form['domain_id'] and !$form['hostname']) {
$where .= $and . "h.primary_dns_id IN ( SELECT id " . " FROM dns " . " WHERE domain_id = " . $onadb->qstr($form['domain_id']) . " ) ";
$and = " AND ";
}
// MAC
if ($form['mac']) {
// Clean up the mac address
$form['mac'] = strtoupper($form['mac']);
$form['mac'] = preg_replace('/[^%0-9A-F]/', '', $form['mac']);
// We do a sub-select to find interface id's that match
$where .= $and . "h.id IN ( SELECT host_id " . " FROM interfaces " . " WHERE mac_addr LIKE " . $onadb->qstr($wildcard . $form['mac'] . $wildcard) . " ) ";
$and = " AND ";
}
// IP ADDRESS
$ip = $ip_end = '';
if ($form['ip']) {
// Build $ip and $ip_end from $form['ip'] and $form['ip_thru']
$ip = ip_complete($form['ip'], '0');
if ($form['ip_thru']) {
$ip_end = ip_complete($form['ip_thru'], '255');
} else {
$ip_end = ip_complete($form['ip'], '255');
}
// Find out if $ip and $ip_end are valid
$ip = ip_mangle($ip, 'numeric');
$ip_end = ip_mangle($ip_end, 'numeric');
if ($ip != -1 and $ip_end != -1) {
// We do a sub-select to find interface id's between the specified ranges
$where .= $and . "h.id IN ( SELECT host_id " . " FROM interfaces " . " WHERE ip_addr >= " . $onadb->qstr($ip) . " AND ip_addr <= " . $onadb->qstr($ip_end) . " )";
$and = " AND ";
}
}
// NOTES
if ($form['notes']) {
$where .= $and . "h.notes LIKE " . $onadb->qstr($wildcard . $form['notes'] . $wildcard);
$and = " AND ";
}
// DEVICE MODEL
if ($form['model_id']) {
$where .= $and . "h.device_id in (select id from devices where device_type_id in (select id from device_types where model_id = {$form['model_id']}))";
$and = " AND ";
}
if ($form['model']) {
$where .= $and . "h.device_id in (select id from devices where device_type_id in (select id from device_types where model_id in (select id from models where name like '{$form['model']}')))";
$and = " AND ";
}
// DEVICE TYPE
if ($form['role']) {
// Find model_id's that have a device_type_id of $form['role']
list($status, $rows, $records) = db_get_records($onadb, 'roles', array('name' => $form['role']));
// If there were results, add each one to the $where clause
if ($rows > 0) {
$where .= $and . " ( ";
$and = " AND ";
$or = "";
foreach ($records as $record) {
// Yes this is one freakin nasty query but it works.
$where .= $or . "h.device_id in (select id from devices where device_type_id in (select id from device_types where role_id = " . $onadb->qstr($record['id']) . "))";
$or = " OR ";
}
$where .= " ) ";
}
}
// DEVICE MANUFACTURER
if ($form['manufacturer']) {
// Find model_id's that have a device_type_id of $form['manufacturer']
if (is_numeric($form['manufacturer'])) {
list($status, $rows, $records) = db_get_records($onadb, 'models', array('manufacturer_id' => $form['manufacturer']));
} else {
list($status, $rows, $manu) = db_get_record($onadb, 'manufacturers', array('name' => $form['manufacturer']));
list($status, $rows, $records) = db_get_records($onadb, 'models', array('manufacturer_id' => $manu['id']));
}
// If there were results, add each one to the $where clause
if ($rows > 0) {
$where .= $and . " ( ";
$and = " AND ";
$or = "";
foreach ($records as $record) {
// Yes this is one freakin nasty query but it works.
$where .= $or . "h.device_id in (select id from devices where device_type_id in (select id from device_types where model_id = " . $onadb->qstr($record['id']) . "))";
$or = " OR ";
}
$where .= " ) ";
}
}
// tag
if ($form['tag_host']) {
$where .= $and . "h.id in (select reference from tags where type like 'host' and name like " . $onadb->qstr($form['tag_host']) . ")";
$and = " AND ";
}
// custom attribute type
if ($form['custom_attribute_type']) {
$where .= $and . "h.id in (select table_id_ref from custom_attributes where table_name_ref like 'hosts' and custom_attribute_type_id = (SELECT id FROM custom_attribute_types WHERE name = " . $onadb->qstr($form['custom_attribute_type']) . "))";
$and = " AND ";
$cavaluetype = "and custom_attribute_type_id = (SELECT id FROM custom_attribute_types WHERE name = " . $onadb->qstr($form['custom_attribute_type']) . ")";
}
// custom attribute value
if ($form['ca_value']) {
$where .= $and . "h.id in (select table_id_ref from custom_attributes where table_name_ref like 'hosts' {$cavaluetype} and value like " . $onadb->qstr($wildcard . $form['ca_value'] . $wildcard) . ")";
$and = " AND ";
}
// LOCATION No.
if ($form['location']) {
list($status, $rows, $loc) = ona_find_location($form['location']);
$where .= $and . "h.device_id in (select id from devices where location_id = " . $onadb->qstr($loc['id']) . ")";
$and = " AND ";
}
// subnet ID
if (is_numeric($form['subnet_id'])) {
// We do a sub-select to find interface id's that match
$from = "(\nSELECT distinct a.*\nfrom hosts as a, interfaces as b\nwhere a.id = b.host_id\nand b.subnet_id = " . $onadb->qstr($form['subnet_id']) . "\norder by b.ip_addr) h";
$and = " AND ";
}
// display a nice message when we dont find all the records
if ($where == '' and $form['content_id'] == 'search_results_list') {
$js .= "el('search_results_msg').innerHTML = 'Unable to find hosts matching your query, showing all records';";
}
// Wild card .. if $while is still empty, add a 'ID > 0' to it so you see everything.
if ($where == '') {
$where = 'h.id > 0';
}
// Do the SQL Query
$filter = '';
if ($form['filter']) {
// Host names should always be lower case
$form['filter'] = strtolower($form['filter']);
// FIXME (MP) for now this uses primary_dns_id, this will NOT find multiple A records or other record types. Find a better way some day
$filter = " AND h.primary_dns_id IN (SELECT id " . " FROM dns " . " WHERE name LIKE " . $onadb->qstr('%' . $form['filter'] . '%') . " ) ";
}
list($status, $rows, $results) = db_get_records($onadb, $from, $where . $filter, $orderby, $conf['search_results_per_page'], $offset);
// If we got less than serach_results_per_page, add the current offset to it
// so that if we're on the last page $rows still has the right number in it.
if ($rows > 0 and $rows < $conf['search_results_per_page']) {
$rows += $conf['search_results_per_page'] * ($page - 1);
} else {
if ($rows >= $conf['search_results_per_page']) {
list($status, $rows, $records) = db_get_records($onadb, $from, $where . $filter, "", 0);
}
}
$count = $rows;
//
// *** BUILD HTML LIST ***
//
$html .= <<<EOL
<!-- Host Results -->
<table id="{$form['form_id']}_host_list" class="list-box" cellspacing="0" border="0" cellpadding="0">
<!-- Table Header -->
<tr>
<td class="list-header" align="center" style="{$style['borderR']};">Name</td>
<td class="list-header" align="center" style="{$style['borderR']};">Subnet</td>
<td class="list-header" align="center" style="{$style['borderR']};">Interface</td>
<td class="list-header" align="center" style="{$style['borderR']};">Device Type</td>
<td class="list-header" align="center" style="{$style['borderR']};">Location</td>
<td class="list-header" align="center" style="{$style['borderR']};">Notes</td>
<td class="list-header" align="center"> </td>
</tr>
EOL;
// Loop and display each record
foreach ($results as $record) {
// Get additional info about eash host record
// If a subnet_id was passed use it as part of the search. Used to display the IP of the subnet you searched
if (is_numeric($form['subnet_id'])) {
list($status, $interfaces, $interface) = ona_get_interface_record(array('host_id' => $record['id'], 'subnet_id' => $form['subnet_id']), '');
// Count how many rows and assign it back to the interfaces variable
list($status, $rows, $records) = db_get_records($onadb, 'interfaces', 'host_id = ' . $onadb->qstr($record['id']), "ip_addr", 0);
$interfaces = $rows;
} else {
if (is_numeric($ip)) {
list($status, $interfaces, $interface) = db_get_record($onadb, 'interfaces', 'host_id = ' . $onadb->qstr($record['id']) . ' AND ip_addr >= ' . $onadb->qstr($ip) . ' AND ip_addr <= ' . $onadb->qstr($ip_end), "ip_addr", 0);
// Count how many rows and assign it back to the interfaces variable
list($status, $rows, $records) = db_get_records($onadb, 'interfaces', 'host_id = ' . $onadb->qstr($record['id']), "ip_addr", 0);
$interfaces = $rows;
} else {
// Interface (and find out how many there are)
list($status, $interfaces, $interface) = ona_get_interface_record(array('host_id' => $record['id']), '');
}
}
// bz: why did someone add this?? You especially want to show hosts with no interfaces so you can fix them!
// if (!$interfaces) {$count -1; continue;}
// get interface cluster info
$clusterhtml = '';
list($status, $intclusterrows, $intcluster) = db_get_records($onadb, 'interface_clusters', "interface_id = {$interface['id']}");
if ($intclusterrows > 0) {
$clusterscript = "onMouseOver=\"wwTT(this, event,\n 'id', 'tt_interface_cluster_list_{$record['id']}',\n 'type', 'velcro',\n 'styleClass', 'wwTT_niceTitle',\n 'direction', 'south',\n 'javascript', 'xajax_window_submit(\\'tooltips\\', \\'tooltip=>interface_cluster_list,id=>tt_interface_cluster_list_{$record['id']},interface_id=>{$interface['id']}\\');'\n );\"";
$clusterhtml .= <<<EOL
<img src="{$images}/silk/sitemap.png" {$clusterscript} />
EOL;
}
$record['ip_addr'] = ip_mangle($interface['ip_addr'], 'dotted');
$interface_style = '';
if ($interfaces > 1) {
$interface_style = 'font-weight: bold;';
}
// DNS A record
list($status, $rows, $dns) = ona_get_dns_record(array('id' => $record['primary_dns_id']));
$record['name'] = $dns['name'];
// Domain Name
list($status, $rows, $domain) = ona_get_domain_record(array('id' => $dns['domain_id']));
$record['domain'] = $domain['fqdn'];
// Subnet description
list($status, $rows, $subnet) = ona_get_subnet_record(array('id' => $interface['subnet_id']));
$record['subnet'] = $subnet['name'];
$record['ip_mask'] = ip_mangle($subnet['ip_mask'], 'dotted');
$record['ip_mask_cidr'] = ip_mangle($subnet['ip_mask'], 'cidr');
// Device Description
list($status, $rows, $device) = ona_get_device_record(array('id' => $record['device_id']));
list($status, $rows, $device_type) = ona_get_device_type_record(array('id' => $device['device_type_id']));
list($status, $rows, $model) = ona_get_model_record(array('id' => $device_type['model_id']));
list($status, $rows, $role) = ona_get_role_record(array('id' => $device_type['role_id']));
list($status, $rows, $manufacturer) = ona_get_manufacturer_record(array('id' => $model['manufacturer_id']));
$record['devicefull'] = "{$manufacturer['name']}, {$model['name']} ({$role['name']})";
$record['device'] = str_replace('Unknown', '?', $record['devicefull']);
$record['notes_short'] = truncate($record['notes'], 40);
// Get location_number from the location_id
list($status, $rows, $location) = ona_get_location_record(array('id' => $device['location_id']));
// Escape data for display in html
foreach (array_keys($record) as $key) {
$record[$key] = htmlentities($record[$key], ENT_QUOTES, $conf['php_charset']);
}
$primary_object_js = "xajax_window_submit('work_space', 'xajax_window_submit(\\'display_host\\', \\'host_id=>{$record['id']}\\', \\'display\\')');";
$html .= <<<EOL
<tr onMouseOver="this.className='row-highlight';" onMouseOut="this.className='row-normal';">
<td class="list-row">
<a title="View host. ID: {$record['id']}"
class="nav"
onClick="{$primary_object_js}"
>{$record['name']}</a
>.<a title="View domain. ID: {$domain['id']}"
class="domain"
onClick="xajax_window_submit('work_space', 'xajax_window_submit(\\'display_domain\\', \\'domain_id=>{$domain['id']}\\', \\'display\\')');"
>{$record['domain']}</a>
</td>
<td class="list-row">
<a title="View subnet. ID: {$subnet['id']}"
class="nav"
onClick="xajax_window_submit('work_space', 'xajax_window_submit(\\'display_subnet\\', \\'subnet_id=>{$subnet['id']}\\', \\'display\\')');"
>{$record['subnet']}</a>
</td>
<td class="list-row" align="left">
<span style="{$interface_style}"
EOL;
if ($interfaces > 1) {
$html .= <<<EOL
onMouseOver="wwTT(this, event,
'id', 'tt_host_interface_list_{$record['id']}',
'type', 'velcro',
'styleClass', 'wwTT_niceTitle',
'direction', 'south',
'javascript', 'xajax_window_submit(\\'tooltips\\', \\'tooltip=>host_interface_list,id=>tt_host_interface_list_{$record['id']},host_id=>{$record['id']}\\');'
);"
EOL;
}
$html .= <<<EOL
>{$record['ip_addr']}</span>
<span title="{$record['ip_mask']}">/{$record['ip_mask_cidr']}</span>
<span>{$clusterhtml}</span>
</td>
<td class="list-row" title="{$record['devicefull']}">{$record['device']} </td>
<td class="list-row" align="right">
<span onMouseOver="wwTT(this, event,
'id', 'tt_location_{$device['location_id']}',
'type', 'velcro',
'styleClass', 'wwTT_niceTitle',
'direction', 'south',
'javascript', 'xajax_window_submit(\\'tooltips\\', \\'tooltip=>location,id=>tt_location_{$device['location_id']},location_id=>{$device['location_id']}\\');'
);"
>{$location['reference']}</span>
</td>
<td class="list-row">
<span title="{$record['notes']}">{$record['notes_short']}</span>
</td>
<!-- ACTION ICONS -->
<td class="list-row" align="right">
<form id="{$form['form_id']}_list_host_{$record['id']}"
><input type="hidden" name="host_id" value="{$record['id']}"
><input type="hidden" name="js" value="{$refresh}"
></form>
EOL;
if (auth('host_modify')) {
$html .= <<<EOL
<a title="Edit host"
class="act"
onClick="xajax_window_submit('edit_host', xajax.getFormValues('{$form['form_id']}_list_host_{$record['id']}'), 'editor');"
><img src="{$images}/silk/page_edit.png" border="0"></a>
EOL;
}
if (auth('host_del')) {
$html .= <<<EOL
<a title="Delete host"
class="act"
onClick="xajax_window_submit('edit_host', xajax.getFormValues('{$form['form_id']}_list_host_{$record['id']}'), 'delete');"
><img src="{$images}/silk/delete.png" border="0"></a>
EOL;
}
$html .= <<<EOL
</td>
</tr>
EOL;
}
if ($count == 0 and $form['subnet_id'] and !$form['filter']) {
$html .= <<<EOL
<tr><td colspan="99" align="center" style="color: red;">Please add the gateway host (router) to this subnet</td></tr>
EOL;
}
$html .= <<<EOL
</table>
EOL;
// Build page links if there are any
$html .= get_page_links($page, $conf['search_results_per_page'], $count, $window_name, $form['form_id']);
// If there was only 1 result, and we're about to display results in the "Search Results" window, display it.
if ($count == 1 and $form['content_id'] == 'search_results_list' and $form['filter'] == '') {
$js .= $primary_object_js;
}
// Insert the new html into the content div specified
// Instantiate the xajaxResponse object
$response = new xajaxResponse();
$response->addAssign("{$form['form_id']}_{$tab}_count", "innerHTML", "({$count})");
$response->addAssign($form['content_id'], "innerHTML", $html);
if ($js) {
$response->addScript($js);
}
return $response->getXML();
}
