modules/multidomain/multidomain.module

<?php
// $Id: multidomain.module,v 1.3 2008/11/04 04:47:27 betz Exp $

/**
 * Don't rewrite node SQL to filter by taxonomy.
 */
define('MULTIDOMAIN_TAXONOMY_REWRITE_NONE', 0);

/**
 * Rewrite node SQL to filter by taxonomy for non-default domains.
 */
define('MULTIDOMAIN_TAXONOMY_REWRITE_NON_DEFAULT', 1);

/**
 * Rewrite node SQL to filter by taxonomy for all domains.
 */
define('MULTIDOMAIN_TAXONOMY_REWRITE_ALL', 2);

/**
 * Implementation of hook_help().
 */
function multidomain_help($section) {
  switch ($section) {
    case 'admin/settings/multidomain':
      return t('The multi-domain module allows you to configure multiple domains for your content to be hosted on. You can configure several different domains, and the rules for matching them.');
      break;
  }
}

/**
 * Implementation of hook_perm().
 */
function multidomain_perm() {
  return array('administer multidomain');
}

/**
 * Implementation of hook_menu().
 */
function multidomain_menu($may_cache = true) {
  global $user;
  $items = array();
  if ($may_cache) {
  } else {
    $domains = variable_get('multidomain_sites', array());

    $items[] = array(
      'path' => 'admin/settings/multidomain', 'title' => t('Multiple domains'),
      'callback' => 'drupal_get_form',
      'callback arguments' => array('multidomain_settings'),
      'access' => user_access('administer multidomain'),
      'description' => t('Configure which domains your site will be hosted on.'),
    );

    $items[] = array(
      'path' => 'admin/settings/multidomain/list',
      'title' => t('List'),
      'callback' => 'drupal_get_form',
      'callback arguments' => array('multidomain_settings'),
      'access' => user_access('administer multidomain'),
      'description' => t('Configure which domains your site will be hosted on.'),
      'type' => MENU_DEFAULT_LOCAL_TASK,
      'weight' => -10
    );
    $items[] = array(
      'path' => 'admin/settings/multidomain/settings',
      'title' => t('Configure'),
      'description' => t('The description of the menu item. It is used as title attribute and on the administration overview page.'),
      'callback' => 'drupal_get_form',
      'callback arguments' => array('multidomain_default_domain_settings'),
      'access' => user_access('administer multidomain'),
      'type' => MENU_LOCAL_TASK,
    );
    $items[] = array(
      'path' => 'admin/settings/multidomain/settings/default',
      'title' => t('Default domain'),
      'callback' => 'drupal_get_form',
      'callback arguments' => array('multidomain_default_domain_settings'),
      'access' => user_access('administer multidomain'),
      'type' => MENU_DEFAULT_LOCAL_TASK,
    );

    foreach ($domains as $url => $data) {
      $items[] = array(
        'path' => 'admin/settings/multidomain/settings/'. str_replace('://', '_', $url),
        'title' => t('@domain', array('@domain' => $url)),
        'callback' => 'drupal_get_form',
        'callback arguments' => array('multidomain_domain_settings', $url),
        'access' => user_access('administer multidomain'),
        'type' => MENU_LOCAL_TASK,
      );
      $items[] = array(
        'path' => 'admin/settings/multidomain/delete/'. str_replace('://', '_', $url),
        'title' => t('@domain', array('@domain' => $url)),
        'callback' => 'drupal_get_form',
        'callback arguments' => array('multidomain_domain_delete', $url),
        'access' => user_access('administer multidomain'),
        'type' => MENU_CALLBACK,
      );
    }
  }
  return $items;
}

/**
 * Implementation of hook_term_path().
 *
 * Link to the home page of the relevant domain.
 * Because of the hook_nodeapi() implementation, these links shouldn't
 * normally show up in any case in regular node views.
 */
function multidomain_term_path($term) {
  return $term->name;
}

/**
 * Implementation of hook_nodeapi().
 *
 * Remove terms in the multiple domain vocabulary from the node's
 * array before viewing.
 */
function multidomain_nodeapi(&$node, $op, $teaser = NULL, $page = NULL) {
  switch($op) {
    case 'view':
      if (isset($node->taxonomy)) {
        $vid = variable_get('multidomain_vocabulary', '');
        foreach ($node->taxonomy as $index => $term) {
          if ($term->vid == $vid) {
            unset($node->taxonomy[$index]);
          }
        }
      }
      break;
  }
}

function multidomain_default_domain_settings() {
  $form = array();
  $form['singlesignon_master_url'] = array(
    '#type' => 'textfield',
    '#title' => t('Primary domain name'),
    '#description' => t('The domain name for content to be hosted on, provided no other settings are found. This is the same value as the single signon primary domain.'),
    '#default_value' => variable_get('singlesignon_master_url', 'http://'),
    '#validate' => array('multidomain_valid_domain' => array()),
    '#weight' => -10,
    '#size' => 40,
    '#maxlength' => 255,
  );

  $form['multidomain_force_default_domain'] = array(
    '#type' => 'checkbox',
    '#title' => t('Force default domain'),
    '#default_value' => variable_get('multidomain_force_default_domain', true),
    '#description' => t("Always use this domain if no matching domains were found? This option is recommended, but it might be necessary to disable this for certain configurations of shared tables.")
  );

  $form['taxonomy'] = array(
    '#type' => 'fieldset',
    '#title' => t('Taxonomy settings'),
  );

  $vid = variable_get('multidomain_vocabulary', '');
  $vocabulary = taxonomy_get_vocabulary($vid);

  $form['taxonomy']['multidomain_taxonomy_rewrite_sql'] = array(
    '#type' => 'radios',
    '#title' => t('Content filtering by domain'),
    '#default_value' => variable_get('multidomain_taxonomy_rewrite_sql', MULTIDOMAIN_TAXONOMY_REWRITE_NONE),
    '#options' => array(MULTIDOMAIN_TAXONOMY_REWRITE_NONE => t('None: all domains see all content'), MULTIDOMAIN_TAXONOMY_REWRITE_NON_DEFAULT => t('All except default: the default domain sees all content while other domains see only their own content'), MULTIDOMAIN_TAXONOMY_REWRITE_ALL => t('All: all domains, including the default, see only their own content')),
    '#description' => t('Content may be assigned to a domain by category. Select whether you want each domain to see only content assigned to itself.'),
  );

  $form['taxonomy']['multidomain_nodes'] = array(
    '#type' => 'checkboxes',
    '#title' => t('Domain vocabulary node types'),
    '#default_value' => $vocabulary->nodes,
    '#options' => node_get_types('names'),
    '#description' => t('A list of node types you want to be associated with domains.'),
    '#required' => TRUE,
  );

  $form = system_settings_form($form);
  // Don't use the default form handling.
  unset($form['#base']);
  return $form;
}

/**
 * Form submit callback. Save additional data not saved by default.
 */
function multidomain_default_domain_settings_submit($form_id, $form_values) {
  $op = isset($form_values['op']) ? $form_values['op'] : '';
  if ($op != t('Reset to defaults')) {
    $vid = variable_get('multidomain_vocabulary', '');
    $vocabulary = (array) taxonomy_get_vocabulary($vid);
    $vocabulary['nodes'] = array_filter($form_values['multidomain_nodes']);
    taxonomy_save_vocabulary($vocabulary);
    // Create or update a term associated with this domain.
    if ($form_values['singlesignon_master_url'] != variable_get('singlesignon_master_url', 'http://')) {     
      if ($tid = variable_get('multidomain_master_domain_tid', 0)) {
        $term = (array) taxonomy_get_term($tid);
      }
      else {
        $term = array(
          'description' => '',
          'vid' => $vid,
          // Set a low weigth as this is the primary domain.
          'weight' => -10,
        );
      }
      // In either case, set the new name.
      $term['name'] = $form_values['singlesignon_master_url'];
      taxonomy_save_term($term);
      variable_set('multidomain_master_domain_tid', $term['tid']);
    }
  }
  // We don't want this saved as a variable.
  unset($form_values['multidomain_nodes']);
  // Save the remaining settings.
  system_settings_form_submit($form_id, $form_values);
}

function multidomain_domain_delete($url) {
  $form = array();
  $form['url'] = array('#type' => 'hidden', '#value' => $url);
  return confirm_form($form, t('Do you want to delete the @domain domain?', array('@domain' => $url)), 'admin/settings/multidomain');
}

/**
 * Menu callback. Delete a domain.
 *
 * %todo Delete the taxonomy term associated with this domain?
 */
function multidomain_domain_delete_submit($form_id, $values) {
  $domains = variable_get('multidomain_sites', array());
  unset($domains[$values['url']]);
  variable_set('multidomain_sites', $domains);
}

function multidomain_valid_domain($element) {
  if (!(preg_match('/^https:\/\//i', $element['#value']) || preg_match('/^http:\/\//i', $element['#value']))) {
    form_error($element, t('Domains must be preceded by http:// or https://.'));
  }
}

function multidomain_domain_settings($url = 'default') {
  $domains = variable_get('multidomain_sites', array());
  $edit = $domains[$url];

  $form = array();
  $form['tid'] = array('#type' => 'value', '#value' => isset($edit['tid']) ? $edit['tid'] : '');
  $form['url'] = array('#type' => 'hidden', '#value' => $url);
  $form['domain'] = array(
    '#type' => 'textfield',
    '#title' => t('Domain name'),
    '#description' => t('The domain name of this url. The http:// is required.'),
    '#default_value' =>  $url,
    '#size' => 40,
    '#maxlength' => 255,
    '#validate' => array('multidomain_valid_domain' => array()),
  );

  $form['weight'] = array(
    '#type' => 'weight',
    '#title' => t('Weight'),
    '#description' => t('The weight defines which domain will get used. Domains with lower weights get matched first.'),
    '#delta' => 10,
    '#default_value' => $edit['weight'],
  );

  // Add variables that can be set for this domain.
  $form['variables'] = array(
    '#type' => 'fieldset',
    '#title' => t('Site configuration options'),
    '#collapsible' => TRUE,
    '#tree' => TRUE,
  );

  $forms = array(
    // Key is form_id.
    'system_site_information_settings' => array(
      // Values are keys of form elements.
      array('site_name'),
      array('site_mail'),
      array('site_slogan'),
      array('site_mission'),
      array('site_footer'),
      array('site_frontpage'),
    ),
    'menu_configure' => array(
      array('settings_links', 'menu_primary_menu'),
      array('settings_links', 'menu_secondary_menu'),
    ),
  );

  $form['variables'] += multidomain_get_form_bits($forms);

  // Add default theme select.
  $options = array();
  foreach (list_themes() as $theme) {
    if ($theme->status) {
      $options[$theme->name] = $theme->name;
    }
  }
  $form['variables']['theme_default'] = array(
    '#type' => 'select',
    '#title' => t('Default theme'),
    '#options' => $options,
    '#default_value' => variable_get('theme_default', 'garland'),
  );

  $types = node_get_types();
  $form['page_vis_settings']['types'] = array(
    '#type' => 'checkboxes',
    '#title' => t('Use this domain for the following types of posts'),
    '#options' => drupal_map_assoc(array_keys($types)),
    '#default_value' => $edit['types'],
  );

  $access = user_access('use PHP for block visibility');
  if ($edit['visibility'] == 2 && !$access) {
    $form['page_vis_settings'] = array();
    $form['page_vis_settings']['visibility'] = array('#type' => 'value', '#value' => 2);
    $form['page_vis_settings']['pages'] = array('#type' => 'value', '#value' => $edit['pages']);
  }
  else {
    $options = array(t('Match every page except the listed pages.'), t('Match only the listed pages.'));
    $description = t("Enter one page per line as Drupal paths. The '*' character is a wildcard. Example paths are %blog for the blog page and %blog-wildcard for every personal blog. %front is the front page.", array('%blog' => 'blog', '%blog-wildcard' => 'blog/*', '%front' => '<front>'));

    if ($access) {
      $options[] = t('Show if the following PHP code returns <code>TRUE</code> (PHP-mode, experts only).');
      $description .= ' '. t('If the PHP-mode is chosen, enter PHP code between %php. Note that executing incorrect PHP-code can break your Drupal site.', array('%php' => '<?php ?>'));
    }
    $form['page_vis_settings']['visibility'] = array(
      '#type' => 'radios',
      '#title' => t('Use this domain for specific pages'),
      '#options' => $options,
      '#default_value' => $edit['visibility'],
    );
    $form['page_vis_settings']['pages'] = array(
      '#type' => 'textarea',
      '#title' => t('Pages'),
      '#default_value' => $edit['pages'],
      '#description' => $description,
    );
  }

  $form['init'] = array(
    '#type' => 'textarea',
    '#title' => t('Initialization code'),
    '#description' => t('Code to run during initialization of pages on this domain. Remember the <em>&lt;?php</em> and <em>?></em> tags.'),
    '#default_value' => $edit['init'],
  );

  $form['submit'] = array(
    '#type' => 'submit',
    '#value' => t('Submit'),
  );

  return $form;
}

function multidomain_domain_settings_validate($form_id, $form_values) {
  $domains = variable_get('multidomain_sites', array());
  if (isset($domains[$form_values['domain']]) && ($form_values['url'] != $form_values['domain'])) {
    form_set_error('domain', t('This domain has already been created.'));
  }
}

function multidomain_domain_settings_submit($form_id, $form_values) {
  $domains = variable_get('multidomain_sites', array());
  $vid = variable_get('multidomain_vocabulary', '');
  // Load an existing term by id.
  if (isset($form_values['tid']) && $form_values['tid']) {
    $term = (array) taxonomy_get_term($form_values['tid']);
  }
  // Or by name.
  else {
    $result = db_query("SELECT * FROM {term_data} WHERE name = '%s' AND vid = %d", $form_values['url'], $vid);
    if (db_num_rows($result)) {
      $term = db_fetch_array($result);
      $form_values['tid'] = $term['tid'];
    }
  }
  // If no existing term, create one.
  if (!isset($term)) {
    $term = array(
      'name' => $form_values['domain'],
      'description' => '',
      'vid' => $vid,
      'weight' => $form_values['weight'],
    );
    taxonomy_save_term($term);
    $form_values['tid'] = $term['tid'];
    drupal_set_message(t('Domain term created.'));
  }
  // If domain or weight has changed, update the term tied to this domain.
  elseif (($form_values['domain'] != $form_values['url']) || ($form_values['weight'] != $domains[$form_values['url']]['weight'])) {
    $term['name'] = $form_values['domain'];
    $term['weight'] = $form_values['weight'];
    taxonomy_save_term($term);
    drupal_set_message(t('Domain term updated.'));
  }
  // If the domain has been changed, unset the previous data.
  if ($form_values['domain'] != $form_values['url']) {
    unset($domains[$form_values['url']]);
  }

  // If the value is the same as the main domain's default, don't save it.
  // This ensures that later changes to the main domain's settings will
  // apply also to other domains, unless that other domain has already
  // had a custom value set.
  foreach ($form_values['variables'] as $name => $value) {
    // Determine if there is an existing value.
    if ($existing_value = db_result(db_query("SELECT value FROM {variable} WHERE name = '%s'", $name))) {
      // If so, unserialize it and compare it to the value submitted.
      if ($value == unserialize($existing_value)) {
        unset($form_values['variables'][$name]);
      }
    }
  }

  $domains[$form_values['domain']] = $form_values;
  uasort($domains, '_multidomain_domain_sort');
  variable_set('multidomain_sites', $domains);
  return 'admin/settings/multidomain';
}

/**
 * Function used by uasort to sort domains by weight.
 */
function _multidomain_domain_sort($a, $b) {
  $a_weight = (is_array($a) && isset($a['weight'])) ? $a['weight'] : 0;
  $b_weight = (is_array($b) && isset($b['weight'])) ? $b['weight'] : 0;
  if ($a_weight == $b_weight) {
    return 0;
  }
  return ($a_weight < $b_weight) ? -1 : 1;
}

function multidomain_settings() {
  $sites = variable_get('multidomain_sites', array());
  $form['sites']['default']['name'] = array(
    '#value' => t('@default <strong>(default)</strong>', array( '@default' =>  variable_get('singlesignon_master_url', t('Not defined')))),
  );
  $form['sites']['default']['settings'] = array(
    '#value' => l(t('Configure'), 'admin/settings/multidomain/settings'),
  );
  foreach ($sites as $url => $site) {
    $form['sites'][$url]['name'] = array(
      '#value' => $url,
    );
    $links = array(
      l('Configure', 'admin/settings/multidomain/settings/'. str_replace('://', '_', $url)),
      l('Delete', 'admin/settings/multidomain/delete/'. str_replace('://', '_', $url)),
    );
    $form['sites'][$url]['settings'] = array(
      '#value' => implode(' | ', $links),
    );
  }
  $form['new']['new_domain'] = array(
    '#type' => 'textfield',
    '#size' => 40,
    '#maxlength' => 255,
    '#validate' => array('multidomain_valid_domain' => array()),
  );
  $form['new']['submit'] = array(
    '#type' => 'submit',
    '#value' => t('Add domain'),
  );
  return $form;
}

function multidomain_settings_validate($form_id, $form_values) {
  $domains = variable_get('multidomain_sites', array());
  if (isset($domains[$form_values['new_domain']])) {
    form_set_error('new][new_domain', t('This domain has already been created.'));
  }
}

function multidomain_settings_submit($form_id, $form_values) {
  $domains = variable_get('multidomain_sites', array());
  // Create a term for the new domain.
  $term = array(
    'name' => $form_values['new_domain'],
    'description' => '',
    'vid' => variable_get('multidomain_vocabulary', ''),
    'weight' => 0,
  );
  taxonomy_save_term($term);
  $domains[$form_values['new_domain']] = array('tid' => $term['tid']);
  variable_set('multidomain_sites', $domains);
}

function theme_multidomain_settings($form) {
  $rows = array();

  if (sizeof(element_children($form['sites']))) {
    foreach ($form['sites'] as $url => $elements) {
      if (!element_child($url)) {
        continue;
      }

      $row = array();
      $row[] = drupal_render($form['sites'][$url]['name']);
      $row[] = drupal_render($form['sites'][$url]['settings']);
      $rows[] = $row;
    }
  }

  $rows[] = array(
    drupal_render($form['new']['new_domain']),
    drupal_render($form['new']['submit']),
  );
  $form['table'] = array(
    '#value' => theme('table', array(t('Domain'),t('Operations')), $rows),
  );

  return drupal_render($form);
}

/**
 * Implementation of hook_init().
 */
function multidomain_init() {
  global $conf;

  $domains = variable_get('multidomain_sites', array());
  $protocol = ( $_SERVER['HTTPS'] ) ? 'https://' : 'http://' ;
  if ($domain = $domains[$protocol . $_SERVER['HTTP_HOST']]) {
    // Determine if we are currently on the home page.
    $front = drupal_is_front_page();

    // Set any variables specific to this domain.
    if(isset($domain['variables']) && is_array($domain['variables'])) {
      foreach($domain['variables'] as $name => $value) {
        $conf[$name] = $value;
      }
    }
    if ($domain['init']) {
      drupal_eval($domain['init']);
    }

    // If we are on the home page, reinitiate the $_GET['q'] value.
    if ($front) {
      unset($_GET['q']);
      drupal_init_path();
    }
  }
}

/**
 * Implementation of hook_db_rewrite_sql().
 *
 * Limit nodes returned by domain term.
 */
function multidomain_db_rewrite_sql($query, $primary_table, $primary_field) {
  static $domains;
  static $rewrite;
  static $default;
  $return = array();
  if ($primary_field == 'nid') {
    if ($domains === NULL) {
      $domains = variable_get('multidomain_sites', array());
      $rewrite = variable_get('multidomain_taxonomy_rewrite_sql', MULTIDOMAIN_TAXONOMY_REWRITE_NONE);
      $default = variable_get('singlesignon_master_url', 'http://');
      // The domains array doesn't include the default domain. Add it if needed.
      if ($rewrite == MULTIDOMAIN_TAXONOMY_REWRITE_ALL) {
        $domains[$default] = array(
          'tid' => variable_get('multidomain_master_domain_tid', 0),
        );
      }
    }
    $current = ($_SERVER['HTTPS'] ? 'https://' : 'http://') . $_SERVER['HTTP_HOST'];
    switch ($rewrite) {
      // If we are not rewriting, simply return.
      case MULTIDOMAIN_TAXONOMY_REWRITE_NONE:
        return $return;
      // If we are are rewriting all but the default, return if this is the default.
      case MULTIDOMAIN_TAXONOMY_REWRITE_NON_DEFAULT:
        if ($current == $default) {
          return $return;
        }
        // Fall through.
      case MULTIDOMAIN_TAXONOMY_REWRITE_ALL:
        // Determine if we are on a registered domain.
        if ($domain = $domains[$current]) {
          if (isset($domain['tid'])) {
            $return['join'] = 'INNER JOIN {term_node} multidomain_tn ON multidomain_tn.nid = '. $primary_table .'.nid';
            $return['where'] = 'multidomain_tn.tid = '. $domain['tid'];
          }
        }
    }
  }
  return $return;
}

/**
 * Return specified elements from an array of forms.
 */
function multidomain_get_form_bits($forms) {
  $form = array();
  foreach ($forms as $form_id => $elements) {
    if (function_exists($form_id)) {
      $source_form = $form_id();
      foreach ($elements as $element) {
        $return = $source_form;
        foreach ($element as $key) {
          if (isset($return[$key])) {
            $return = $return[$key];
          }
          else {
            break;
          }
        }
        if ($return !== $source_form) {
          $form[$key] = $return;
        }
      }
    }
  }
  return $form;
}

if (!function_exists('custom_url_rewrite')) {
  function custom_url_rewrite($type, $alias, $real_path) {
    static $default = null;
    static $force_default = null;
    static $domains = null;
    static $protocol = null;
    static $clean_url = null;

    $path = ( $alias ) ? $alias : $real_path;
    // Don't rewrite fully qualified URLs or singlesignon redirects.
    if (strpos($path, '://') !== FALSE || strpos($path, 'singlesignon/') === 0) {
      return $path;
    }

    if (is_null($default)) {
      // initialise defaults
      $default = variable_get('singlesignon_master_url','');
      $force_default = variable_get('multidomain_force_default_domain', false);
      $domains = variable_get('multidomain_sites', array());
      $clean_url = (bool)variable_get('clean_url', '0');
      $protocol = $_SERVER['HTTPS'] ? 'https://' : 'http://' ;
    }
    $base = $force_default ? $default : NULL;
    foreach ($domains as $domain => $info) {
      $source = $type == 'alias' ? $real_path : drupal_lookup_path($path);
      $arg = explode('/', $source);
      // Determine if this is a node.
      $is_node = ($arg[0] == 'node' && is_numeric($arg[1]));
      $page_match = FALSE;

      // If this is a link to the configuration of this domain, match it.
      // This is needed because we need the variables to be set to this domain's
      // versions, so that the form elements load with the correct defaults.
      if ($path == 'admin/settings/multidomain/settings/'. str_replace('://', '_', $domain)) {
        $page_match = TRUE;
      }
      // Match path by taxonomy.
      if (!$page_match && $is_node) {
        $page_match = db_num_rows(db_query('SELECT tn.* FROM {term_node} tn WHERE tn.nid = %d AND tn.tid = %d', $arg[1], $info['tid'])) ? TRUE : FALSE;
      }
      // Match path if necessary.
      if (!$page_match && $info['pages']) {
        if ($info['visibility'] < 2) {
          $regexp = '/^('. preg_replace(array('/(\r\n?|\n)/', '/\\\\\*/', '/(^|\|)\\\\<front\\\\>($|\|)/'), array('|', '.*', '\1'. preg_quote(variable_get('site_frontpage', 'node'), '/') .'\2'), preg_quote($info['pages'], '/')) .')$/';
          // Compare with the internal and path alias (if any).
          $page_match = preg_match($regexp, $alias);
          if ($path != $real_path) {
            $page_match = $page_match || preg_match($regexp, $real_path);
          }
          // When $block->visibility has a value of 0, the block is displayed on
          // all pages except those listed in $block->pages. When set to 1, it
          // is displayed only on those pages listed in $block->pages.
          $page_match = !($info['visibility'] xor $page_match);
        }
        else {
          $page_match = drupal_eval($info['pages']);
        }
      }

      if (!$page_match && !empty($info['types']) && $is_node) {
        $node = node_load($arg[1]);
        $page_match = array_key_exists($node->type, $info['types']) && $info['types'][$node->type];
      }
      if ($page_match) {
        $base = $domain;
        break;
      }
    }
    if ($type == 'alias') {
      if (($protocol . $_SERVER['HTTP_HOST'] != $base) && !is_null($base) && (strpos($path, '://') === FALSE)) {
        $path = $base .'/'. (!$clean_url ? '?q=' : '') . $path;
      }
    }
    else {
      // Permanent redirect on old pages.
      #if ($protocol . $_SERVER['HTTP_HOST'] != $base) {
      #  header("HTTP/1.1 301 Moved Permanently");
      #  header("Location: " . $base .'/'. (!$clean_url ? '?q=' : '') . $path;);
      #  exit();
      #}
    }
    return $path;
  }
}
else {
  drupal_set_message(t('The multi domain module has found a custom_url_rewrite function that is already defined. This conflicts with the module\'s operations, and as such the multi domain module will not work.'), 'error');
}