<?php
// $Id: share.module,v 1.23.2.1 2008-01-03 19:56:32 greenskin Exp $

/**
 * Implementation of hook_perm().
 */
function share_perm() {
  return array('administer share');
}

/**
 * Implementation of hook_menu().
 */
function share_menu($may_cache) {
  $items = array();
  if (!$may_cache) {
    if (is_numeric($arg1 = arg(1))) {
      $items[] = array(
        'path' => 'share',
        'title' => t("Share"),
        'description' => t("Share this page"),
        'callback' => 'share_page',
        'callback arguments' => array($arg1),
        'type' => MENU_CALLBACK,
        'access' => node_access('view', node_load($arg1))
      );
    }
  } else {
    $items[] = array(
      'path' => 'admin/settings/share',
      'title' => t('Share'),
      'callback' => 'drupal_get_form',
      'callback arguments' => array('share_settings'),
      'access' => user_access('administer share')
    );
  }
  return $items;
}

function share_settings() {
  $form['share_tab_names'] = array(
    '#type' => 'fieldset',
    '#title' => t("Tab Names"),
    '#description' => t("Set names for the tabs provided in the Share popup."),
    '#collapsible' => TRUE,
    '#collapsed' => FALSE
  );
  $form['share_tab_names']['share_tab_social'] = array(
    '#type' => 'textfield',
    '#title' => t("Service Links Tab"),
    '#default_value' => variable_get('share_tab_social', t("Social Web")),
    '#required' => FALSE
  );
  $form['share_tab_names']['share_tab_email'] = array(
    '#type' => 'textfield',
    '#title' => t("E-mail Tab"),
    '#default_value' => variable_get('share_tab_email', t("E-mail")),
    '#required' => FALSE
  );
  $form['share_name'] = array(
    '#type' => 'textfield',
    '#title' => t("Share Link Name"),
    '#description' => t("Enter the name you would like to give your share link."),
    '#default_value' => variable_get('share_name', 'Share')
  );
  $form['share_effects'] = array(
    '#type' => 'checkbox',
    '#title' => t("Effects"),
    '#description' => t("Add animation to the opening and closing of the Share popup."),
    '#default_value' => variable_get('share_effects', 0)
  );
  
  // Link Codes
  $form['share_link_codes'] = array(
    '#type' => 'checkboxes',
    '#title' => t("Link Codes"),
    '#description' => t("Provide generated link code(s) that points to the node."),
    '#default_value' => variable_get('share_link_codes', array()),
    '#options' => array('direct' => t("Direct Url"), 'html' => t("HTML Code"), 'forum' => t("Forum Code"))
  );
  
  return system_settings_form($form);
}

/**
 * Implementation of hook_form_alter().
 */
function share_form_alter($form_id, &$form) {
  if ($form_id == 'service_links_admin_settings') {
    drupal_add_js(drupal_get_path('module', 'share').'/js/settings.js');
    $form['how_to_show_the_links']['service_links_in_node']['#default_value'] = variable_get('service_links_in_node', 0);
    
    $form['how_to_show_the_links']['share'] = array(
      '#type' => 'fieldset',
      '#title' => t("Share"),
      '#description' => t("If Share is used, only one way of showing service links is allowed."),
      '#collapsible' => TRUE,
      '#collapsed' => FALSE,
      '#weight' => -1
    );
    $form['how_to_show_the_links']['share']['service_links_in_share_node'] = array(
      '#type' => 'select',
      '#title' => t('Share service links in nodes'),
      '#default_value' => variable_get('service_links_in_share_node', 2),
      '#options' => array(0 => t('Disabled'), 1 => t('Teaser view'), 2 => t('Full-page view'), 3 => t('Teasers and full-page view')),
      '#description' => t('When to display the services after the node text.')
    );
    $form['how_to_show_the_links']['share']['service_links_in_share_links'] = array(
      '#type' => 'select',
      '#title' => t('Share service links in links'),
      '#default_value' => variable_get('service_links_in_share_links', 0),
      '#options' => array(0 => t('Disabled'), 1 => t('Teaser view'), 2 => t('Full-page view'), 3 => t('Teasers and full-page view')),
      '#description' => t('When to display the services after the node text.')
    );
    $form['how_to_show_the_links']['share_message'] = array(
      '#type' => 'item',
      '#value' => '<div id="share_settings_item"></div>'
    );
    $form['how_to_show_the_links']['service_links_style']['#weight'] = 1;
    $form['#validate']['share_service_links_validate'] = array();
  }
  if ($form_id == 'forward_admin_settings') {
    $form['forward_options']['forward_form_type']['#options']['share_link'] = 'Link in Share';
    $form['forward_options']['forward_form_type']['#options']['share_form'] = 'Form in Share';
    
    $form['share']['share_forward'] = array(
      '#type' => 'checkbox',
      '#title' => t("Share Forward Form"),
      '#description' => t("Always show Forward form as a tab in the Share popup."),
      '#default_value' => variable_get('share_forward', 0)
    );
    $form['buttons']['#weight'] = 2;
  }
}

function share_service_links_validate($form_id, $form_values) {
  if ($form_values['service_links_in_share_node'] > 0) {
    if ($form_values['service_links_in_links'] > 0) {
      form_set_error('service_links_in_links', "'Share service links in node' cannot be enabled if 'Service links in links' is also enabled.");
    }
    if ($form_values['service_links_in_node'] > 0) {
      form_set_error('service_links_in_node', "'Share service links in node' cannot be enabled if 'Service links in node' is also enabled.");
    }
    if ($form_values['service_links_in_share_links'] > 0) {
      form_set_error('service_links_in_share_links', "'Share service links in node' cannot be enabled if 'Share service links in links' is also enabled.");
    }
  }
  if ($form_values['service_links_in_share_links'] > 0) {
    if ($form_values['service_links_in_links'] > 0) {
      form_set_error('service_links_in_links', "'Share service links in links' cannot be enabled if 'Service links in links' is also enabled.");
    }
    if ($form_values['service_links_in_node'] > 0) {
      form_set_error('service_links_in_node', "'Share service links in links' cannot be enabled if 'Service links in node' is also enabled.");
    }
    if ($form_values['service_links_in_share_node'] > 0) {
      form_set_error('service_links_in_share_node', "'Share service links in links' cannot be enabled if 'Share service links in node' is also enabled.");
    }
  }
}

/**
 * Implementation of hook_nodeapi().
 */
function share_nodeapi(&$node, $op, $teaser, $page) {
  switch ($op) {
    case 'view':
      if (variable_get('service_links_in_share_node', 2) > 0) {
        $links_show = _service_links_show($node->type, $node->nid);
        if ($links_show && user_access('use service links')) {
          $share_view = variable_get('service_links_in_share_node', 2);
          switch ($share_view) {
            case "1":
              if ($teaser) {
                $node = share_display('node', $node);
              }
              break;
            case "2":
              if ($page) {
                $node = share_display('node', $node);
              }
              break;
            case "3":
              if ($teaser) {
                $node = share_display('node', $node);
              }
              if ($page) {
                $node = share_display('node', $node);
              }
              break;
          }
        }
      }
      break;
  }
}

/**
 * Implementation of hook_link().
 */
function share_link($type, $node = NULL, $teaser = FALSE) {
  if (variable_get('service_links_in_share_links', 0) > 0) {
    $links_show = _service_links_show($node->type, $node->nid);
    if ($links_show && user_access('use service links')) {
      $links = array();
      $share_view = variable_get('service_links_in_share_links', 0);
      switch ($share_view) {
        case "1":
          if ($teaser) {
            $links['share_group_'.$node->nid.' share'] = share_display('link', $node);
          }
          break;
        case "2":
          if (!$teaser) {
            $links['share_group_'.$node->nid.' share'] = share_display('link', $node);
          }
          break;
        case "3":
          $links['share_group_'.$node->nid.' share'] = share_display('link', $node);
          break;
      }
      return $links;
    }
  }
}

/**
 * Implementation of hook_block().
 */
function share_block($op = 'list', $delta = 0, $edit = array()) {
  switch ($op) {
    case 'list':
      $blocks[0]['info'] = t('Share');
      return $blocks;
    case 'configure':
      switch ($delta) {
        case 0:
          $form['share_block_collapsible'] = array(
            '#type' => 'checkbox',
            '#title' => t('Share Block Collapsible'),
            '#description' => t('Whether the Share block is collapsible.'),
            '#default_value' => variable_get('share_block_collapsible', 1)
          );
          $form['share_block_collapsed'] = array(
            '#type' => 'checkbox',
            '#title' => t('Share Block Collapsed'),
            '#description' => t('Whether the Share block is initially collapsed or not.'),
            '#default_value' => variable_get('share_block_collapsed', 0)
          );
      }
      return $form;
    case 'save':
      switch ($delta) {
        case 0:
          variable_set('share_block_collapsible', $edit['share_block_collapsible']);
          variable_set('share_block_collapsed', $edit['share_block_collapsed']);
      }
      return;
    case 'view':
    default:
      switch ($delta) {
        case 0:
          if (user_access('use service links')) {
            if (arg(0) == 'node' && is_numeric(arg(1)) && !arg(2)) {
              theme('share_css', TRUE);
              $node = node_load(arg(1));
              $links_show = _service_links_show($node->type, $node->nid);
              if ($links_show) {
                $block['content'] = $content = share_display('block', $node);
              }
            }
          }
          break;
      }
      return $block;
  }
}

function share_display($type,$node) {
  switch ($type) {
    case 'node':
      $node->content['service_links'] = array(
        '#value' => '<div class="share">'.share_render($node).'</div>',
        '#weight' => 10
      );
      return $node;
    case 'link':
      $link = array(
        'title' => share_render($node, TRUE),
        'html' => TRUE,
        'attributes' => array('id' => 'share_'.$node->nid)
      );
      return $link;
    case 'block':
      $share = array(
        'collapsible' => variable_get('share_block_collapsible', 1),
        'collapsed' => variable_get('share_block_collapsed', 0)
      );
      drupal_add_js(array('share' => $share), 'setting');
      return '<div class="share_block">'.share_render($node, FALSE, TRUE).'</div>';
  }
}

function share_render($node, $is_link = FALSE, $is_block = FALSE) {
  $service_links = service_links_render($node, FALSE);
  $links = '';
  foreach ($service_links as $service) {
    if (!is_array($service)) {
      $links.= $service;
    }
  }
  $output = '';
  if (!empty($links)) {
    theme('share_css');
    if (variable_get('share_effects', 0)) {
      drupal_add_js(drupal_get_path('module', 'share').'/js/share_effects.js');
    } else {
      drupal_add_js(drupal_get_path('module', 'share').'/js/share.js');
    }
    $nid = $node->nid;
    if ($is_block) {
      $nid = 'block';
    }
    if (!$is_link) {
      $output.= '<div id="share_'.$nid.'">';
    }
    $output.= l(t('Share'), 'share/'.$node->nid, array('class' => 'share_link', 'onclick' => 'return false;'));
    $output.= '<div class="share_popup" style="display: none;"';
      $output.= _share_get_tabs();
      $output.= _share_get_content($links, $node->nid);
    $output.= '</div>';
    if (!$is_link) {
      $output.= '</div>';
    }
  }
  return $output;
}

function _share_get_tabs() {
  $codes = NULL;
  $count = array_count_values(variable_get('share_link_codes', array()));
  if ($count[0] < 3 || !isset($count[0])) {
    $codes = '<li class="share_codes share_tab">'.l(t('Link Codes'), '', array('onclick' => 'return false;')).'</li>';
  }
  $forward = NULL;
  $form_type = variable_get('forward_form_type', 'link');
  if (module_exists('forward') && user_access('access forward') && ($form_type = 'share_form' || variable_get('share_forward', 0))) {
    $forward = '<li class="share_forward share_tab">'.l(t('E-Mail'), '', array('onclick' => 'return false;')).'</li>';
  }
  if (variable_get('share_forward', 0)) {
    $close = NULL;
    if (variable_get('share_block_collapsible', 1)) {
      $close = l(t('Close'), '', array('class' => 'share_close', 'onclick' => 'return false;'));
    }
    return $close.
      '<ul class="share_menu">'.
      '<li class="share_service_links share_tab selected">'.l(t('Social Web'), '', array('onclick' => 'return false;')).'</li>'.
      $forward.
      $codes.
      '</ul>';
  }
}

function _share_get_content($links, $nid) {
  $output = '<div class="share_content">';
    $output.= '<div class="share_service_links" style="display: block;">'.$links.'</div>';
    $output.= '<div class="clear"></div>';
    $form_type = variable_get('forward_form_type', 'link');
    if (module_exists('forward') && user_access('access forward') && ($form_type == 'share_form' || variable_get('share_forward', 0))) {
      $output.= '<div class="share_forward" style="display: none;">'.drupal_get_form('share_form_'.$nid, $nid).'</div>';
    }
    $link_codes = variable_get('share_link_codes', array());
    $count = array_count_values($link_codes);
    if ($count[0] < 3 || !isset($count[0])) {
      drupal_add_js(drupal_get_path('module', 'share').'/js/link_codes.js');
      $output.= '<div class="share_codes" style="display: none;">';
      foreach ($link_codes as $code => $value) {
        if ($value != '0') {
          $output.= _share_get_link_codes($code, $nid);
        }
      }
      $output.= '</div>';
    }
  $output.= '</div>';
  return $output;
}

function _share_get_link_codes($op, $nid) {
  $node = node_load($nid);
  switch ($op) {
    case "direct":
      return '<div class="share_link_code form-item"><label for="direct_url">Direct Url</label><input id="direct_url" name="direct_url" type="text" onClick="highlight(this);" value="http://www.example.com/node/'.$nid.'" size="40" /></div>';
    case "html":
      return '<div class="share_link_code form-item"><label for="html_code">HTML Code</label><input id="html_code" name="html_code" type="text" onClick="highlight(this);" value="&lt;a href=&quot; http://www.example.com/node/'.$nid.'&quot;&gt;Click Here To view '.$node->title.'!&lt;/a&gt;" size="40" /></div>';
    case "forum":
      return '<div class="share_link_code form-item"><label for="forum_code">Forum Code</label><input id="forum_code" name="forum_code" type="text" onClick="highlight(this);" value="[url= http://www.example.com/node/'.$nid.']Click Here To view '.$node->title.'![/url]" size="40" /></div>';
  }
}

function share_form($nid = null) {
  global $base_url, $user;

  $form = array();

  if ($nid != '') {
    $emailtype = 'email';
    $form['node'] = array('#type' => 'value', '#value' => node_load((int)$nid));
  }
  else {
    $emailtype = 'postcard';
  }
  
  $form['yemail'] = array(
    '#type' => 'textfield',
    '#title' => t('Your Email'),
    '#default_value' => $user->mail,
    '#size' => 30,
    '#maxlength' => 256,
    '#description' => null,
    '#attributes' => null,
    '#required' => true,
  );
  $form['yname'] = array(
    '#type' => 'textfield',
    '#title' => t('Your Name'),
    '#default_value' => $user->name,
    '#size' => 30,
    '#maxlength' => 256,
    '#description' => null,
    '#attributes' => null,
    '#required' => true,
  );
  $form['recipients'] = array(
    '#type' => 'textfield',
    '#title' => t('Send To'),
    '#default_value' => str_replace(', ', "\n", $recipients),
    '#size' => 30,
    '#description' => t('Enter one address or multiple addresses separated with commas.'),
    '#attributes' => null,
    '#required' => true,
  );
  $form['message'] = array(
    '#type' => 'hidden',
    '#value' => ' ',
  );
  $form['nid'] = array(
    '#type' => 'hidden',
    '#value' => $nid,
  );
  $form['forward_footer'] = array(
    '#type' => 'hidden',
    '#value' => variable_get('forward_footer', ''),
  );
  $form['submit'] = array(
    '#type' => 'submit',
    '#value' => t('Send'),
  );
  $form['#validate'] = array(
    'forward_form_validate' => array()
  );
  $form['#submit'] = array(
    'forward_form_submit' => array()
  );

  return $form;
}

function share_forms() {
  # get the form id
  $args = func_get_args();
  $form_id = $args[0][0];

  # Ensure we map a callback for our form and not something else
  $forms = array();
  if (strpos($form_id, "share_form") === 0) {

    # Let the forms API know where to get the form data corresponding
    # to this form id.
    $forms[$form_id] = array('callback' => 'share_form');
  }
  
  return $forms;
}

function share_page($nid) {
  $node = node_load($nid);
  $data->description = t("From this page you can share %title to a social bookmarking site or email a link to the page.", array('%title' => $node->title));
  if (variable_get('service_links_in_share_node', 2) > 0 || variable_get('service_links_in_share_links', 0) > 0) {
    $links_show = _service_links_show($node->type, $node->nid);
    if ($links_show && user_access('use service links')) {
      $data->social['title'] = t("Social Web");
      $data->social['links'] = service_links_render($node, TRUE);
      if (function_exists('forward_form')) {
        $data->forward['title'] = t("E-mail");
        $data->forward['form'] = drupal_get_form('forward_form', $nid);
      }
      $data->node = node_view($node);

      return theme('share_page',$data);
    }
  }
  drupal_not_found();
}

function theme_share_page($data) {
  $links = '<ul style="width: 100px">';
  foreach ($data->social['links'] as $v) {
    $html = isset($v['html']) && $v['html'];
    $links .= "<li>".l($v['title'],$v['href'],$v['attributes'],$v['query'],$v['fragment'],FALSE,$html)."</li>";
  }
  $links .= '</ul>';
  $output = $data->description;
  $output .= "<table><thead><tr><th>".$data->social['title']."</th>";
  if ($data->forward['title']) {
    $output .= "<th>".$data->forward['title']."</th>";
  }
  $output .= "</tr></thead>";
  $output .= "<tbody><tr><td valign='top'>".$links."</td>";
  if ($data->forward['form']) {
    $output .= "<td>".$data->forward['form']."</td>";
  }
  $output .= "</tr>";
  $colspan = $data->forward?" colspan='2'":NULL;
  $output .= "<tr><td$colspan>".$data->node."</td></tr></tbody></table>";
  
  return $output;
}

function theme_share_css($block = FALSE) {
  if (!$block) {
    drupal_add_css(drupal_get_path('module', 'share'). '/share.css', 'theme', 'screen');
  } else {
    drupal_add_css(drupal_get_path('module', 'share'). '/share_block.css', 'theme', 'screen');
  }
}