<?php
// $Id: flashvideo.module,v 1.36 2007-05-16 16:49:03 travist Exp $

/**
 * @file
 * Enables the ability to attach a Flash video to a node.
 */

require_once(drupal_get_path('module', 'flashvideo') . '/flashvideo_objects.inc');
include_once(drupal_get_path('module', 'flashvideo') . '/flashvideo_views.inc');

/**
 * Implementation of hook_help()
 */
function flashvideo_help($section = 'admin/help#flashvideo') {
  switch ($section) {
    case 'admin/help#flashvideo':
      $output = '<p>' . t('The FlashVideo module for Drupal 5.x is an easy to use module that expands the Upload module by allowing users to upload videos and attach those videos to any content.  Even more exciting, is that FlashVideo automatically performs the very common Flash format conversion as well as create an image thumbnail of any newly uploaded video for every cron cycle.  Once the video is in Flash format, the video can then be embedded in that node using the very simple <b>[video]</b> tag.') . '</p>';
      $output .= '<p>' . t('To enable this module for a certain node type, you must first go to the ' . l(t('FlashVideo Settings'), 'admin/settings/flashvideo') . ' and select the FlashVideo settings for any available node type in the Drupal system.  Once the FlashVideo module has been enabled for that node type, you will then notice the modified Upload form when you add new content for that node type.') . '</p>';
      $output .= '<p>' . t('Once a video has been uploaded, it will then have to wait for the next Cron cycle for the conversion to Flash format to begin.  You can manually run the cron operation by going to <b>Administer->Logs->Status Report</b> and then click on the link that says <b>run cron manually</b>.  After the video has been converted, it will then be available to any node referencing that video.  That node can then reference the video by using the <b>[video]</b> tag, and also reference the video thumbnail by providing the <b>[thumbnail]</b> tag.') . '</p>';
      $output .= '<p>' . t('Parameters for these tags are provided by using a "<b>:</b>" to indicate a new parameter is being provided.  The following format should be used for both the <b>[video]</b> and <b>[thumbnail]</b> tags.  <b>[video: param=value ]</b> where <b>param</b> is the name of the parameter being passed, and <b>value</b> is the value of the parameter.') . '</p>';
      $output .= '<p>' . t('The following parameters can be used...') . '</p>';
      $output .= t('<ul>
                  <li><b>index</b> (For both <em>video</em> and <em>thumbnail</em> tags) - This is used to reference a video when muliple videos have been provided for each node.  If no <b>node</b> parameter is specified, then this will reference the node in which the tag resides.  Example: <em>[video: index=0]</em> would reference the first video uploaded to that node, while <em>[video: index=1]</em> would reference the second video uploaded to that node.</li>
                  <li><b>node</b> (For both <em>video</em> and <em>thumbnail</em> tags) - This is used to reference a video in another node.  Example: <em>[video: node=10: index=0]</em> would reference the first video uploaded to node 10.</li>
                  <li><b>fids</b> (For both <em>video</em> and <em>thumbnail</em> tags) - File ID\'s:  This parameter can specify a single File ID, or many File ID\'s separated by a "-".  If many File ID\'s are specified then those videos will play in that order.  Example: <em>[video: fids=6]</em> would play the video for file ID 6, while <em>[video: fids:5-3-34]</em> would play files 5 followed by 3 followed by 34.</li>
                  <li><b>id</b> (For <em>video</em> tags only) - The <b>id</b> tags are used to play YouTube and Google videos.  For YouTube video\'s simply just place the ID after the tag.  For Google Videos, you will need to place <b>google-</b> at the beginning of the tag.  Example:  <em>[video:id=google-3754293779500828561]</em> will play video 3754293779500828561 from video.google.com, and <em>[video:id=SmVAWKfJ4Go]</em> will play a video from YouTube with the ID SmVAWKfJ4Go.</li>
                  <li><b>width</b> (For <em>video</em> tags only) - This parameter will override the default width of the video with the value given from this parameter.</li>
                  <li><b>height</b> (For <em>video</em> tags only) - This parameter will overide the default height of the video with the value given from this paramter.</li>
                  <li><b>autostart</b> (Values are true or false, and only used for <em>video</em> tags) - This parameter indicates if the video should start automatically.</li>
               </ul>');
     $output .= '<p>' . t('The following are examples of using the [video] and [thumbail] tag system...') . '</p>';
      $output .= t('<ul>
                  <li><b>[video]</b> - The first video uploaded to this node, with all parameters using their defaults.</li>
                  <li><b>[video: index=2 : width=320 : height:240]</b> - The third video uploaded to this node with dimensions of 320x240</li>
                  <li><b>[thumbnail: index=1]</b> - The thumbnail for the 2nd video uploaded to this node.</li>
                  <li><b>[video: autostart=false]</b> - The first video uploaded to this node will not start automatically.</li>
               </ul>');   
      return $output;
    case 'admin/settings/modules#description':  
      return t('Allows you to insert videos into nodes.');
  }

}

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

/**
 * Implements play callback function from node menu
 */
function flashvideo_play($video) {
    // include video.js file for Internet Explorer fixes
    theme('flashvideo_get_script');
   
    switch (_flashvideo_get_filetype($video['file'])) {
      case 'mpeg':
      case 'mpg':
      case 'mov':
      case 'mp4':
      case '3gp':
      case '3g2':
        return theme('flashvideo_play_quicktime', $video);
      case 'rm':
        return theme('flashvideo_play_realmedia', $video);
      case 'flv':
        return theme('flashvideo_play_flash', $video);
      case 'swf':
        return theme('flashvideo_play_swf', $video);
      case 'dir':
      case 'dcr':
        return theme('flashvideo_play_dcr', $video);
      case 'wmv':
      case 'avi':
        return theme('flashvideo_play_windowsmedia', $video);
      case 'ogg':
        return theme('flashvideo_play_ogg_theora', $video);
      case 'youtube':
        return theme('flashvideo_play_youtube', $video);
      case 'googlevideo':
        return theme('flashvideo_play_googlevideo', $video);
      default:
        return _flashvideo_get_filetype($video['file']) . ' filetypes are not supported';
        break;
    }
}

/**
 * Implementation of hook_form_alter()
 */
function flashvideo_form_alter($form_id, &$form) {

  if (isset($form['type'])) {
   $node_type = $form['type']['#value'];
   
   //We want to move the File attachments to the top and also change a couple of parameters.
   if(variable_get('flashvideo_'. $node_type .'_enable', 0)) {
      if( isset($form['attachments']) ) {
         $form['attachments']['#title'] = variable_get('flashvideo_'. $node_type .'_upload_title', t('Video Upload'));
         $form['attachments']['#collapsed'] = FALSE;
         $form['attachments']['#weight'] = variable_get('flashvideo_'. $node_type .'_weight', -10);
         $form['attachments']['#required'] = variable_get('flashvideo_'. $node_type .'_require', 0); 
      }
   }
  }
}

/**
 * Implementation of hook_menu().
 */
function flashvideo_menu($may_cache) {
  $items = array();

  if ($may_cache) {
    $items[] = array(
      'path' => 'admin/settings/flashvideo',
         'title' => t('FlashVideo Settings'),
         'description' => t('Administer the FlashVideo module.'),
         'callback' => 'flashvideo_settings',
         'access' => user_access('administer flashvideo'),
         'type' => MENU_NORMAL_ITEM
    );    
  }
  else  {
  
    $items[] = array(
         'path' => 'admin/settings/flashvideo/edit',
       'title' => t('Edit FlashVideo'),
       'callback' => 'flashvideo_settings_main',
       'access' => user_access('administer flashvideo'),
       'type' => MENU_CALLBACK
    );
  
  }

  return $items;
}

function flashvideo_settings() {
  
  //Must have "administer site configuration" and "administer flashvideo" privilages.
  if (!user_access('administer flashvideo') || !user_access('administer site configuration')) {
    drupal_access_denied();
  }
  
  // We need to change the max upload size, and also add the extensions to the file uploads.
  $size = variable_get('upload_uploadsize_default', 1);
  $user_size = variable_get('upload_usersize_default', 1);
  
  if($size == 1)
   variable_set('upload_uploadsize_default', 100);
   
  if($user_size == 1)
   variable_set('upload_usersize_default', 1000);
  
  $extensions = variable_get('upload_extensions_default', 'jpg jpeg gif png txt html doc xls pdf ppt pps');
  $new_exts = array('avi', 'mpeg', 'mpg', 'mov', 'rm', 'flv', 'wmv', '3gp', 'mp4', 'dir', 'dcr');
  foreach($new_exts as $new_ext) {
   if(strpos($extensions, $new_ext) === FALSE)
      $extensions .= ' ' . $new_ext;
  }

  variable_set('upload_extensions_default', $extensions);
  
  $header = array(t('NodeType'), t('Status'), t('Operations'));
  
  // Create a list of all node types.
  $types = node_get_types();
  
  foreach($types as $type)
  {
   $status = variable_get('flashvideo_'. $type->type .'_enable', 0) ? '(Enabled)' : '(Disabled)';
   $rows[] = array($type->name, $status, l(t('FlashVideo Settings for this node type.'), "admin/settings/flashvideo/edit/$type->type"));
  }
  
  return theme('table', $header, $rows);    
}

function flashvideo_settings_main() {
  
  //Must have "administer site configuration" and "administer flashvideo" privilages.
  if (!user_access('administer flashvideo') || !user_access('administer site configuration')) {
    drupal_access_denied();
  }

  $args = func_get_args();
  $node_type = $args[0];

  if($node_type)
      return drupal_get_form('flashvideo_settings_form', $node_type);
}

function flashvideo_settings_form($node_type) {
     
     $form['flashvideo_' . $node_type . '_enable'] = array(
       '#type' => 'checkbox',
       '#title' => t('Enable the FlashVideo for this Node Type'),
       '#default_value' => variable_get('flashvideo_' . $node_type . '_enable', 0),
       '#description' => t("Enable the FlashVideo for this Node Type.")
     );

     $form['flashvideo_' . $node_type . '_require'] = array(
       '#type' => 'checkbox',
       '#title' => t('Require the FlashVideo for this node type.'),
       '#default_value' => variable_get('flashvideo_' . $node_type . '_require', 0),
       '#description' => t("If checked, the video will be required to submit this node type.")
     );

     $form['flashvideo_' . $node_type . '_upload_title'] = array(
       '#title' => t('FlashVideo Upload Title'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type . '_upload_title', t('Video Upload')),
       '#maxlength' =>  128,
       '#description' => t('The title for the Video Upload for this node.')
     );

     $form['flashvideo_' . $node_type . '_weight'] = array(
       '#title' => t('FlashVideo Upload Weight'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type . '_weight', -10),
       '#maxlength' =>  10,
       '#description' => t('Determines how high in the submit form you would like to have the video upload. The lower the value, the higher the placement.')
     );

     $form['flashvideo_' . $node_type . '_player_download'] = array(
       '#type' => 'checkbox',
       '#title' => t('Attach Video Player Download Link'),
       '#default_value' => variable_get('flashvideo_' . $node_type . '_player_download', 0),
       '#description' => t("Add a link to download the player at the bottom of the Video object.")
     );
     
     $form['flashvideo_' . $node_type . '_attachment_links'] = array(
       '#type' => 'checkbox',
       '#title' => t('Show Videos as Attachments'),
       '#default_value' => variable_get('flashvideo_' . $node_type . '_attachment_links', 0),
       '#description' => t("Checking this box will show all videos in the attachments section of this node type.")
     );    

     $form['performance'] = array('#type' => 'fieldset', '#title' => t('Performance'), '#collapsible' => TRUE, '#collapsed' => TRUE);
     $form['performance']['flashvideo_' . $node_type . '_search_thumbnails'] = array(
       '#type' => 'checkbox',
       '#title' => t('Search for thumbnails in the Node Body.'),
       '#default_value' => variable_get('flashvideo_' . $node_type . '_search_thumbnails', 0),
       '#description' => t("Checking this box will allow you to have video thumbnails in the Node body, at a performance cost.")
     );
     
     $form['performance']['flashvideo_' . $node_type . '_search_video'] = array(
       '#type' => 'checkbox',
       '#title' => t('Search for videos in the Node Teaser.'),
       '#default_value' => variable_get('flashvideo_' . $node_type . '_search_video', 0),
       '#description' => t("Checking this box will allow you to have video objects in the Node Teasers, at a slight performance cost.")
     );

     $form['player'] = array('#type' => 'fieldset', '#title' => t('Flash Player Settings'), '#description' => t('Settings for the Flash Player'), '#collapsible' => TRUE, '#collapsed' => TRUE);
     $form['player']['flashvideo_' . $node_type . '_flash_player'] = array(
       '#title' => t('Flash Player Name'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type . '_flash_player', 'Player.swf'),
       '#maxlength' =>  128,
       '#description' => t('The name of the Flash Player.  Note:  This player MUST reside in the output directory to work.'),
       '#required' => TRUE
     );

     $form['player']['flashvideo_' . $node_type .'_player_logo'] = array(
       '#title' => t('Flash Player Logo'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type .'_player_logo', ''),
       '#maxlength' =>  128,
       '#description' => t('The name of the logo file to place as a watermark in the bottom right of the Flash Player.  Example: <b>logo.png</b>  Note:  This logo MUST reside in the same directory as the player.'),
       '#required' => FALSE
     );

     $form['player']['flashvideo_' . $node_type .'_player_logo_link'] = array(
       '#title' => t('Watermark (Logo) Link'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type .'_player_logo_link', ''),
       '#maxlength' =>  128,
       '#description' => t('The URL in which you would like your watermark (logo) to link too.'),
       '#required' => FALSE
     );

     $form['player']['flashvideo_' . $node_type .'_player_intro'] = array(
       '#title' => t('Flash Player Intro Video'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type .'_player_intro', ''),
       '#maxlength' =>  128,
       '#description' => t('The name of an intro video file to play at the beginning of all video files.  Example: <b>intro.flv</b>  Note:  This logo MUST be a *.flv file and MUST reside in the same directory as the player.'),
       '#required' => FALSE
     );

     $form['player']['flashvideo_' . $node_type .'_player_intro_image'] = array(
       '#title' => t('Flash Player Intro Image'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type .'_player_intro_image', ''),
       '#maxlength' =>  128,
       '#description' => t('If your intro does not need to be a video, you can just specify an intro image here.  This dramatically saves on bandwidth.  Example: <b>intro.png</b>  Note:  This logo MUST reside in the same directory as the player.'),
       '#required' => FALSE
     );

     $form['player']['flashvideo_' . $node_type .'_player_intro_image_time'] = array(
       '#title' => t('Intro Image Time'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type .'_player_intro_image_time', '3'),
       '#maxlength' =>  128,
       '#description' => t('The amount of time to show the intro image in seconds.'),
       '#required' => FALSE
     );

     $form['player']['flashvideo_' . $node_type . '_default_autostart'] = array(
       '#title' => t('Default AutoStart'),
       '#type' => 'select',
       '#options' => array('true' => 'true', 'false' => 'false'),
       '#default_value' => variable_get('flashvideo_' . $node_type . '_default_autostart', 'true'),
       '#maxlength' =>  128,
       '#description' => t('If the player should default to play automatically or not.'),
       '#required' => TRUE
     );

     $form['ffmpeg'] = array('#type' => 'fieldset', '#title' => t('FFMPEG settings'), '#collapsible' => TRUE, '#collapsed' => TRUE);
     $form['ffmpeg']['flashvideo_' . $node_type .'_use_ffmpeg_php'] = array(
       '#type' => 'checkbox',
       '#title' => t('Use FFMPEG-PHP to extract video information.'),
       '#default_value' => variable_get('flashvideo_' . $node_type .'_use_ffmpeg_php', 0),
       '#description' => t("Checking this box will extract the uploaded video information, but is not essential to making this module work.")
     );

     $form['ffmpeg']['flashvideo_' . $node_type .'_ffmpeg_cmd'] = array(
       '#title' => t('ffmpeg Command'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type .'_ffmpeg_cmd', '-i @input -f flv -acodec mp3 -ar 22050 -ab 64k -ac 1 @output'),
       '#maxlength' =>  256,
       '#description' => t('This is the command to give to the ffmpeg executable. Refer to the <a href="http://ffmpeg.mplayerhq.hu/ffmpeg-doc.html">FFMPEG Online Documentation</a> for more information.<br/>The following parameters can be used: 
               <ul>
                  <li><b>@input</b> - <em>The input file will replace this tag.</em></li>
                  <li><b>@output</b> - <em>The output file will replace this tag.</em></li>
               </ul>'),
       '#required' => TRUE
     );

     $form['ffmpeg']['flashvideo_' . $node_type .'_ffmpeg_path'] = array(
       '#title' => t('ffmpeg Path'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type .'_ffmpeg_path', '/usr/bin/ffmpeg'),
       '#maxlength' =>  128,
       '#description' => t('The path to the ffmpeg binary.'),
       '#required' => TRUE
     );

     $form['ffmpeg']['flashvideo_' . $node_type .'_output_dir'] = array(
       '#title' => t('Output Directory'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type .'_output_dir', ''),
       '#maxlength' =>  128,
       '#description' => t('The output directory to contain the thumbnail and video.'),
       '#required' => FALSE
     );

     $form['ffmpeg']['flashvideo_' . $node_type .'_video_default_size'] = array(
       '#title' => t('Video Default Size'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type .'_video_default_size', '450x337'),
       '#maxlength' =>  10,
       '#description' => t('The default size of the video, if none is given in the [video] tag.  Width x Height.  Example "450x337"'),
       '#required' => TRUE
     );

     $form['ffmpeg']['flashvideo_' . $node_type .'_thumbnail_size'] = array(
       '#title' => t('Thumbnail Size'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type .'_thumbnail_size', '130x100'),
       '#maxlength' =>  10,
       '#description' => t('The size of the thumnail.  Width x Height.  Example "130x100"'),
       '#required' => TRUE
     );

     $form['ffmpeg']['flashvideo_' . $node_type .'_thumbnail_time'] = array(
       '#title' => t('Thumbnail Time'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type .'_thumbnail_time', '00:00:02'),
       '#maxlength' =>  10,
       '#description' => t('The amount of time to move from the beginning of the video before taking a snapshot.  Example "00:00:02" is 2 seconds.'),
       '#required' => TRUE
     );

     $form['ffmpeg']['flashvideo_' . $node_type .'_thumbnail_link'] = array(
       '#title' => t('Make Thumbnails a Link?'),
       '#type' => 'select',
       '#options' => array('yes' => 'yes', 'no' => 'no'),
       '#default_value' => variable_get('flashvideo_' . $node_type . '_thumbnail_link', 'yes'),
       '#maxlength' =>  128,
       '#description' => t('If yes, the thumbnails will be a link to the node that has the video.'),
       '#required' => TRUE
     );

     $form['ffmpeg']['flashvideo_' . $node_type .'_max_num_failures'] = array(
       '#title' => t('Maximum Failures'),
       '#type' => 'textfield',
       '#default_value' => variable_get('flashvideo_' . $node_type .'_max_num_failures', 5),
       '#maxlength' =>  10,
       '#description' => t('The maximum amount of conversion failures, before it reverts to using standard (non-Flash) video display.  If you wish to disable the ffmpeg conversions then just enter <b>0</b>.'),
       '#required' => TRUE
     );

     $form['ffmpeg']['flashvideo_' . $node_type .'_log_data'] = array(
       '#type' => 'checkbox',
       '#title' => t('Log Conversion Data.'),
       '#default_value' => variable_get('flashvideo_' . $node_type .'_log_data', 0),
       '#description' => t("Logs all conversion information in the <b>ffmpeg_data</b> table.  Good for debugging.")
     );

     return system_settings_form($form);
}

/**
 * Pull the file extension from a filename
 *
 * @param $vidfile
 *   string filename to get the filetype from.
 *
 * @return
 *   string value of file type or boolean FALSE on error
 */
function _flashvideo_get_filetype($vidfile) {
    //If the filename doesn't contain a ".", "/", or "\" and is exactly 11 characters then consider it a youtube video ID.
    if (!strpos($vidfile, '.') and !strpos($vidfile, '/') and !strpos($vidfile, '\\') and strlen($vidfile) == 11) {
      $file_type = 'youtube';
    }
    else if (strpos($vidfile, 'google-') === 0) {
      $file_type = 'googlevideo';
    }
    else if (strstr($vidfile, '.')) { //If file contains a "." then get the file extension after the "."
      $file_type = substr($vidfile, strrpos($vidfile, '.') + 1);
    }
    else {
      $file_type = FALSE;
    }
    return strtolower($file_type);
}

/**
 * Returns the correct mime-type for the video. Returns false if the
 * mime-type cannot be detected.
 */
function _flashvideo_get_mime_type($filename, $extension = FALSE) {
   $file_type = $extension ? $filename : _flashvideo_get_filetype($filename);

  switch ($file_type) {
    case 'avi':
       return 'video/avi';
    case 'mpeg':
    case 'mpg':
    case 'mov':
      return 'video/quicktime';
    case 'rm':
      return 'application/vnd.rn-realmedia';
    case 'flv':
      return 'flv-application/octet-stream';
    case 'wmv':
      return 'video/x-ms-wmv';
    case '3gp':
      return 'video/3gpp';
    case 'mp4':
      return 'video/mp4';
    case 'dir':
    case 'dcr':
      return 'application/x-director';
    // We can't support this sources properly, so return false.
    case 'youtube':
    case 'googlevideo':
      return false;
    case 'ogg':
      return 'application/ogg';
    default:
      // We couldn't detect the mime-type, so return false.
      return false;
  }
}

/**
 * Returns an absolute url which references
 * to the video file
 *
 * @param $video_file
 *   string containing absolute or relative URL to video.
 *
 * @return
 *   string containing absolute URL path to video file.
 */
function _flashvideo_get_fileurl($video_file) {
  global $base_url;
  
  //creation of absolute url
  if (preg_match("/^(http|ftp|mm|rstp)(s?):\/\//", $video_file)) { //If path is absolute
    return check_plain($video_file);
  }
  else { // path is relative to drupal install
    return check_plain($base_url . '/' . $video_file);
  }
}

/**
 * Performs the conversion using FFMPEG.
 *
 * @param $file
 *   File object that contains the CWD relative path, extension, etc.   (CWD - Current Working Directory)
 *
 * @param $output_dir
 *   The system output directory for this FlashVideo node type.  Contains leading and trailing "/"
 *
 * @param $ffmpeg_path
 *   The CWD relative path to the FFMPEG executable.
 *
 * @param $node_type
 *   The node type of the node which we are converting for.
 *
 * @param $thumbsize
 *   Object whose members are "height" and "width" for the dimensions of our thumbnail.
 *
 * @param $thumbtime
 *   string containing the amount of time to delay before taking a snapshot.
 *
 * @return
 *   string containing the base filename that was created.  Without extension.  FALSE on failure.
 */
 
function _perform_ffmpeg($file, $output_dir, $ffmpeg_path, $node_type, $thumbsize = NULL, $thumbtime = '') {
   $base_name = basename($file->filepath, "." . $file->extension);
   $new_extension = $thumbsize ? ".jpg" : ".flv";
   $output_path = getcwd() . $output_dir . $base_name . $new_extension;    // Get's the relative Current Working Directory path.
   
   // Only convert if the input file exists, and the output file does not exists.
   if((file_exists($file->filepath) && filesize($file->filepath) > 0) && !(file_exists($output_path) && filesize($output_path) > 0)) {
      // Ok... LET'S DO THIS!!!     
      db_query('UPDATE {flashvideo} SET status=1 WHERE fid='.$file->fid);  // Status = 1 - File is converting.
      
      if($thumbsize) {
         $command = "$ffmpeg_path -y -i \"{$file->filepath}\" -vframes 1 -ss $thumbtime -an -vcodec mjpeg -f rawvideo -s " . $thumbsize->width . "x" . $thumbsize->height ." \"{$output_path}\"";
      }
      else if($file->extension == 'flv') {
      	// If it is an flv file, then we will just move it to the output directory.  No conversion necessary.
       	$command = 'mv -f "' . $file->filepath . '" "' . $output_path . '"';
      }
      else {
         $command = variable_get('flashvideo_' . $node_type .'_ffmpeg_cmd', '-i @input -f flv -acodec mp3 -ar 22050 -ab 64k -ac 1 @output');
         $command = str_replace('@input', '"'. $file->filepath .'"', $command);
         $command = str_replace('@output', '"'. $output_path .'"', $command);
         $command = $ffmpeg_path . ' ' . $command;
      }
      
      $ffmpeg_data = shell_exec($command);  // Execute the command.
         
      // Check if the file exists.
      if(file_exists($output_path) && filesize($output_path) > 0) {
         $new_filepath = substr($output_dir, 1) . basename($output_path);
         $new_filename = (basename($file->filename, "." . $file->extension) . $new_extension);
         $fid = db_next_id('{files}_fid');
         db_query('INSERT INTO {files} (fid, nid, filename, filepath, filemime, filesize) VALUES (%d, %d, \'%s\', \'%s\', \'%s\', %d)',
                                    $fid, $file->nid, $new_filename, $new_filepath, ($thumbsize ? 'jpg' : 'flv-application/octet-stream'), filesize($output_path));
   
         $params = db_fetch_object(db_query("SELECT video_index, width, height FROM {flashvideo} WHERE fid = %d", $file->fid));
         db_query("INSERT INTO {flashvideo} (fid, nid, oid, status, video_index, width, height) VALUES (%d, %d, %d, 3, %d, %d, %d)", $fid, $file->nid, $file->fid, $params->video_index, $params->width, $params->height);
         
         if(!$thumbsize) {
            db_query('UPDATE {flashvideo} SET status=2 WHERE fid='.$file->fid);  // Status = 2 - File is pending.
         }
         
         return $base_name;
      }
      
      if(!$thumbsize) {
         db_query('UPDATE {flashvideo} SET status=0 WHERE fid='.$file->fid);   // So that it will try again later.   
         if(variable_get('flashvideo_' . $node_type .'_log_data', 0)) {
            $data = "Command: $command";
            $data .= "\n";
            $data .= "Data: $ffmpeg_data";
            db_query('INSERT INTO {ffmpeg_data} (fid, created, input_file, output_file, status, data) VALUES (%d, NOW(), \'%s\', \'%s\', %d, \'%s\')',
                 $file->fid, $file->filepath, $output_path, 0, $data);
         }
         else {
            db_query('INSERT INTO {ffmpeg_data} (fid, created, input_file, output_file, status) VALUES (%d, NOW(), \'%s\', \'%s\', %d)',
                 $file->fid, $file->filepath, $output_path, 0);         
         }
      }
   }
      
   return FALSE;
}

/**
 *  Implementation of hook_cron
 */

function flashvideo_cron() {
   global $base_url;
   // I will use the Cron task to convert all uploaded video's to Flash file format.
 
   $types = node_get_types();
  
   foreach($types as $type){
      if(variable_get('flashvideo_' . $type->type . '_enable', 0)) {
         $output_dir = '/' . file_create_path(variable_get('flashvideo_' . $type->type .'_output_dir', '')) . '/';    // The output directory
         $max_num_failures = variable_get('flashvideo_' . $type->type .'_max_num_failures', 5);                       // The maximum number of conversion failures.
         $ffmpeg_path = variable_get('flashvideo_' . $type->type .'_ffmpeg_path', '/usr/bin/ffmpeg');                 // The path to our ffmpeg executable.
         $size = explode('x', strtolower(variable_get('flashvideo_' . $type->type .'_thumbnail_size', '130x100')));   // The video size as "width x height"
         $thumbsize = (object)array('width' => $size[0], 'height' => $size[1]);                                      // The thumbnail size as "width x height
         $thumbtime = variable_get('flashvideo_' . $type->type .'_thumbnail_time', '00:00:02');                       // The amount of time to delay before taking a picture snapshot.
 
         // First we will want to grab all files that have not been processed yet.
         $sql = 'SELECT f.* FROM {files} f LEFT JOIN {flashvideo} fv ON f.fid = fv.fid LEFT JOIN {node} n ON f.nid = n.nid ';
         $sql .= 'WHERE ((n.type = \''.$type->type.'\') AND (fv.status = 0) AND (n.moderate != 1))';
         $files = db_query($sql);
         $playlist_data = array();
         
         while($file = db_fetch_object($files)) {
            $failures = db_result(db_query('SELECT COUNT(*) FROM {ffmpeg_data} data LEFT JOIN {files} files ON data.fid = files.fid WHERE (data.fid = %d) AND (data.status = 0)', $file->fid));
            if(!strpos($file->filename, 'NOCONVERT') && ($failures < $max_num_failures)) {
               $fid = $file->fid;
               $file->filepath = getcwd() . '/' . $file->filepath;                                                         // Normalize the filepath to the base of the system.
               $file->extension = _flashvideo_get_filetype($file->filepath);                                               // Get the file extension.

               if(_flashvideo_get_mime_type($file->extension, TRUE))  {                       											// Make sure it is a video file.
                  $new_thumb_name = _perform_ffmpeg($file, $output_dir, $ffmpeg_path, $type->type, $thumbsize, $thumbtime); 	// Create a thumbnail of the video.
                  if($new_file_name = _perform_ffmpeg($file, $output_dir, $ffmpeg_path, $type->type))  {                    	// Convert the video to flash.
                                               
                     $sql = 'UPDATE {node} SET status = 1 WHERE nid='. $file->nid;                                         	// update the status of the node.
                     db_query($sql);

                     $sql = 'TRUNCATE {cache}';                                                                            	// Delete the cache so that our node will update.
                     db_query($sql);

                     db_query('INSERT INTO {ffmpeg_data} (fid, created, input_file, output_file, status) VALUES (%d, NOW(), \'%s\', \'%s\', %d)', $file->fid, $file->filepath, $output_path, 1);      
                  }
               }
            }
            else {
            
               // We are unable to convert the video... Not all is lost.  We will just use the original video.
               // update the status of the file.
               $sql = 'UPDATE {flashvideo} SET status=3 WHERE fid='. $file->fid;
               db_query($sql);         
            }
         }
      }
   }
}

function flashvideo_get_size($node, $file = NULL) {
   if($file && variable_get('flashvideo_' . $node->type .'_use_ffmpeg_php', 0)) {
      $extension = "ffmpeg";
      $extension_soname = $extension . "." . PHP_SHLIB_SUFFIX;
      $extension_fullname = PHP_EXTENSION_DIR . "/" . $extension_soname;
   
      // load extension
      if (!extension_loaded($extension)) {
         dl($extension_soname);
         $filepath = getcwd() . '/' . $file->filepath;
         $movie = new ffmpeg_movie($filepath);     // ffmpeg-PHP : used to get video information.
      }
   }
                     
   if($file && $movie) {
      $width = $movie->getFrameWidth();
      $height = $movie->getFrameHeight();
   }
   else {
      $size = explode('x', strtolower(variable_get('flashvideo_' . $node->type .'_video_default_size', '450x337')));      // The video size as "width x height"
      $width = trim($size[0]);
      $height = trim($size[1]);
   }
   
   return array('width' => $width, 'height' => $height);
}

// Link into the operations of the upload module for file insertion and deletion.
function _flashvideo_update_files($node) {

   $video_index = 0;
   
   if(count($node->files)) {
      foreach ($node->files as $file) {
         $file = (object)$file;
      
         if ($file->remove) {
            $files = db_query("SELECT * FROM {files} f LEFT JOIN {flashvideo} fv ON f.fid = fv.fid WHERE fv.oid = %d", $file->fid);
            db_query('DELETE FROM {flashvideo} WHERE oid = %d', $file->fid);
            while($oldfile = db_fetch_object($files)) {
               db_query('DELETE FROM {files} WHERE fid = %d', $oldfile->fid);
               file_delete($oldfile->filepath);
            }           
         }
         else {
            $found = db_result(db_query("SELECT count(*) FROM {flashvideo} WHERE fid=%d", $file->fid));  
            $file->extension = _flashvideo_get_filetype($file->filepath);
            if(_flashvideo_get_mime_type($file->extension, TRUE)) {  // Only add if the file is a video and is not already in our flashvideo table.
               if(!$found) {
                  $size = flashvideo_get_size($node, $file);
                  
                  // Rename the original file.
                  $filepath = substr( $file->filepath, 0, (strrpos($file->filepath, '/') + 1) );
                  $base_name = preg_replace("/[^a-zA-Z0-9_\.]/", "_", $node->nid . "_" . basename($file->filepath, "." . $file->extension));
                  $filepath .= $base_name . "." . $file->extension;
         
                  if(rename( (getcwd() . '/' . $file->filepath),  (getcwd() . '/' . $filepath) )) {
                     db_query('UPDATE {files} SET filepath=\'' . $filepath . '\' WHERE fid='.$file->fid);
                  }
                  
                  db_query("INSERT INTO {flashvideo} (fid, nid, oid, status, video_index, width, height) VALUES (%d, %d, %d, 0, %d, %d, %d)", $file->fid, $node->nid, $file->fid, $video_index, $size['width'], $size['height']);
               }
         
               $video_index++;
            }
         }
      }
   }

}

/*
 *		For reverse compatability
 */
 
function flashvideo_get_thumb_object($node, $index) {
	$params['index'] = $index;
	return flashvideo_get_thumbnail($node, $params);
}

/**
 *  Given a node variable, and index, this will return a video thumbnail.
 */

function flashvideo_get_thumbnail($node, $params = array(), $file_only = false) {
   global $base_url;
   
   $index = isset($params['index']) ? $params['index'] : 0;          								// Set our Video Index
   $nid = (isset($params['node']) && $params['node'] != 0) ? $params['node'] : $node->nid;   // Set our Video Node
   $fids = (isset($params['fids'])) ? $params['fids'] : '';          								// Set the File ID's
   
   $nid = ($nid == 'all') ? '' : $nid;      // For reverse compatability
   $fids = ($fids == 'all') ? '' : $fids;   // For reverse compatability

   $thumb = array();
   
   if($fids == '') {
      // They didn't provide any File ID's.  We will use the node, and index to find their video.
      $thumb_file = db_fetch_object(db_query("SELECT f.filepath FROM {flashvideo} fv LEFT JOIN {files} f ON f.fid = fv.fid WHERE (f.nid = %d) AND (f.filemime='jpg') AND (fv.video_index=%d)", $nid, $index));
      if($thumb_file) {
         $thumb['file'] = file_create_url($thumb_file->filepath);
      }
   }
   else {
      $fids = explode("-", $fids);
      array_walk($fids, create_function('&$n', '$n = trim($n);'));    // Trim all the elements

      if(count($fids) == 1) {
         $thumb_file = db_fetch_object(db_query("SELECT filepath FROM {files} WHERE (f.fid = %d) AND (f.filemime='jpg')", $fid));
         if($thumb_file) {
            $thumb['file'] = file_create_url($thumb_file->filepath);            
         }
      }
   }
   
   $node_type = ($node->type) ? $node->type : db_result(db_query("SELECT * FROM {node} WHERE (nid = %d)", $nid));
   $thumb_link = variable_get('flashvideo_' . $node_type . '_thumbnail_link', 'yes');
   
   $image = ($thumb_link == 'yes') ? '<a href="'. $base_url . '/node/' . $nid .'">' : '';
   
   if($thumb['file']) {
   	$url = _flashvideo_get_fileurl($thumb['file']);
      $image .= '<img src="'. $url .'" alt="Watch this video!" />';
   }
   else {
      $url = $base_url . '/' .drupal_get_path('module', 'flashvideo') . '/thumbnail_MIA.png';
      $image .= '<img src="'. $url .'" alt="Sorry..." />'; 
   }
   
   $image .= ($thumb_link == 'yes') ? '</a>' : '';
   
   if($file_only) {
   	return $url;
   }
   else {
   	return $image;
   }
}

/*
 *		For reverse compatability
 */
function flashvideo_get_video_object($node, $index, $params) {
	$params['index'] = $index;
	return flashvideo_get_video($node, $params);
}

/*
 * Given a node and some parameters, this will return a video object.
 * 
 * @param stdObject $node
 *   A node object.
 * @param array $params
 *   An array of optional parameters:
 *     index => Integer video index
 *     node => stdObject video node
 *     fids => String of File ID's to play in the format '34-21-35'
 *     autostart => String 'true' or 'false' to automatically play the video
 *     width => Integer video width in pixels
 *     height => Integer video height in pixels
 *     id => String YouTube or Google Video ID
 * @param boolean $file_only
 *   Determine the type of output returned (see below).
 * @return String
 *   If $file_only is TRUE, return path to video file.
 *   If $file_only is FALSE, return HTML code.
 *
 */

function flashvideo_get_video($node, $params = array(), $file_only = false) {
   global $base_url;
   
   $index = isset($params['index']) ? $params['index'] : 0;          								// Set our Video Index
   $nid = (isset($params['node']) && $params['node'] && $params['node'] != 'all') ? $params['node'] : $node->nid;   
   $fids = (isset($params['fids']) && $params['fids'] != 'all') ? $params['fids'] : '';      // Set the File ID's
   
	$video = array();
	$video['nodetype'] = ($node->type) ? $node->type : db_result(db_query("SELECT * FROM {node} WHERE (nid = %d)", $nid));
   $video['autostart'] = (isset($params['autostart'])) ? $params['autostart'] : variable_get('flashvideo_' . $video['nodetype'] . '_default_autostart', 'true');
   $video['width'] = (isset($params['width']) && $params['width'] > 0) ? $params['width'] : '';
   $video['height'] = (isset($params['height']) && $params['height'] > 0) ? $params['height'] : ''; 

   if(isset($params['id']) && $params['id'] != '') {
      // They provided an ID, which means they just want to show a Google or YouTube Video.
      $size = flashvideo_get_size($node);
      $video['width'] = ($video['width'] == '') ? $size['width'] : $video['width'];
      $video['height'] = ($video['height'] == '') ? $size['height'] : $video['height'];
      $video['file'] = $params['id'];
   }
   else if($fids == '') {
      // They didn't provide any File ID's.  We will use the node, and index to find their video.
      $video_file = db_fetch_object(db_query("SELECT f.filepath, fv.width, fv.height FROM {flashvideo} fv LEFT JOIN {files} f ON f.fid = fv.fid WHERE (f.nid = %d) AND (f.filemime='flv-application/octet-stream') AND (fv.status=3) AND (fv.video_index=%d)", $nid, $index));
	}
   else {
      $fids = explode("-", $fids);
      array_walk($fids, create_function('&$n', '$n = trim($n);'));    // Trim all the elements

      if(count($fids) == 1) {
         $video_file = db_fetch_object(db_query("SELECT f.filepath, fv.width, fv.height FROM {flashvideo} fv LEFT JOIN {files} f ON f.fid = fv.fid WHERE (f.fid = %d) AND (f.filemime='flv-application/octet-stream') AND (fv.status=3))", $fid));
      }
      else {
         if(file_exists(getcwd() . '/flashvideo_playlist.php')) {
            $video['file'] = $base_url . '/flashvideo_playlist.php';         
   	      $video['file'] .= (count($fids) == 0) ? '' : '?fids='. implode("-", $fids); 
 	      }    
      }
   }
 
   if($video_file) {
   	$video['width'] = ($video['width'] == '') ? $video_file->width : $video['width'];
      $video['height'] = ($video['height'] == '') ? $video_file->height : $video['height'];
      $video['file'] = file_create_url($video_file->filepath);            
   }
   
   if($video['file']) {
      return ($file_only ? _flashvideo_get_fileurl($video['file']) : flashvideo_play($video));   
   }
   else {
      $url = $base_url . '/' .drupal_get_path('module', 'flashvideo') . '/video_MIA.png';
      return ($file_only ? $url : '<img src="'. $url .'" alt="Sorry..." />');    
   }
}

/**
 *  Parses a single tag, and places all parameters in an array.
 */

function _flashvideo_parse_param($body, &$pos, &$params, $max_size = 50) {

   $string = '';
   $size = 0;
   
   while(($size < $max_size) && substr($body, $pos, 1) == ' ') {  // Ignore white space.
      $pos++;
      $size++;
   }

   if(substr($body, $pos++, 1) == ':') { 
      while(($size < $max_size) && (substr($body, $pos, 1) != ':') && (substr($body, $pos, 1) != ']')) {
         $string .= substr($body, $pos++, 1);      // Extract the data
         $size++;
      }
      
      $parts = explode('=', $string);
      
      if((strlen($parts[0]) > 0) && (strlen($parts[1]) > 0))
         $params[strtolower(trim($parts[0]))] = trim($parts[1]);
         
      return TRUE;   // A parameter was provided and parsed.  Return true.
   }

   return FALSE;
}

/**
 *  Search and Replace routine.  Scans the body of a node and replaces every tag and its parameters with an object.
 */
 
function _flashvideo_replace_tags(&$node, $tag) {
   $max_num_params = 4; // The maximum number of parameters allowed.  All others will be ignored.
   $body = ($node->body == '') ? $node->teaser : $node->body;
   for($pos = 0; (($pos = $startpos = strpos($body, $tag, $pos)) !== FALSE); $pos++) {    // Search for tags
      // We need to check to see if this tag has "!" in front of it, if it does, then we will ignore this tag.
      if(substr($body, $pos - 1, 1) == '!') {
         $body = substr_replace($body, $tag, $pos - 1, strlen($tag) + 1);
      }
      else { 
         $pos += strlen($tag);
         $params = array();                                                      // Initialize the params array
         while(_flashvideo_parse_param($body, $pos, $params));                   // Parse all the parameters.
         $object = ($tag == '[thumbnail') ? flashvideo_get_thumbnail($node, $params) : flashvideo_get_video($node, $params);
         $body = substr_replace($body, $object, $startpos, ($pos - $startpos));  // Replace this tag.
      }
   }
   
   if($node->body == '')
      $node->teaser = $body;
   else
      $node->body = $body;
}
/**
 * Implementation of hook_link()
 */
function flashvideo_link($type, $node = NULL, $teaser = FALSE) {
   $links = array();
   // Display a link with the number of attachments
   if (!variable_get('flashvideo_' . $node->type . '_attachment_links', 0) && $teaser && $type == 'node' && isset($node->files) && user_access('view uploaded files')) {
      $num_files = 0;
      if(count($node->files)) {
         foreach ($node->files as $file) {
            if (!_flashvideo_get_mime_type($file->filepath) && $file->list) {
               $num_files++;
            }
         }
      }
      
      if ($num_files) {
            $links['upload_attachments'] = array(
            'title' => format_plural($num_files, '1 attachment', '@count attachments'),
            'href' => "node/$node->nid",
            'attributes' => array('title' => t('Read full article to view attachments.')),
            'fragment' => 'attachments'
            );
      }
      else {
            $links['upload_attachments'] = '';
      }
   }
   return $links;
}


/**
 * Implementation of hook_nodeapi()
 */
function flashvideo_nodeapi(&$node, $op, $teaser) {
  global $base_url;
  
  // Only if the node type is enabled.
  if(variable_get('flashvideo_' . strtolower($node->type) . '_enable', 0)) {
  
    switch ($op) {
      case 'insert':
      case 'update':
         _flashvideo_update_files($node);
         break;
         
      case 'load':
         $node->play_counter = db_result(db_query("SELECT play_counter FROM {flashvideo} WHERE nid = %d", $node->nid));
         break;
         
      case 'view':
         // If they uploaded a video, we don't want to see those video's in the attachments.
         if (!variable_get('flashvideo_' . $node->type . '_attachment_links', 0) && !$teaser && isset($node->files) && user_access('view uploaded files')) {
            $files = array();
            if (count($node->files) ) {
               foreach ($node->files as $file) {
                  $file = (object)$file;
                  if(!_flashvideo_get_mime_type($file->filepath))
                     $files[] = $file;
               }
            }

            if (count($files)) {
               $node->content['files'] = array(
                  '#value' => theme('upload_attachments', $files),
                  '#weight' => 50,
               );
            }
            else {
               $node->content['files']['#value'] = '';
            }
         }        
         break;
      case 'alter':
         // Here we will do a search and replace for anyone who is using the video and thumbnail tags.
         if(!$teaser) {
            db_query("UPDATE {flashvideo} SET play_counter = play_counter + 1 WHERE nid = %d", $node->nid); //Increment play counter.
         }
         
         if(!$teaser || variable_get('flashvideo_' . $node->type . '_search_video', 0))
            _flashvideo_replace_tags($node, '[video');
         
         if($teaser || variable_get('flashvideo_' . $node->type . '_search_thumbnails', 0))
            _flashvideo_replace_tags($node, '[thumbnail');

         break;
  
      case 'rss item':
         $filepath = db_query("SELECT f.filepath FROM {flashvideo} fv LEFT JOIN {files} f ON f.fid = fv.fid WHERE (f.nid = %d) AND (fv.status = 3) AND (fv.video_index = 0)", $node->nid);
         $attributes['url'] = _flashvideo_get_fileurl(file_create_url($filepath));  // Only show the first video
         $attributes['length'] = $node->size;
         $mime_type = _flashvideo_get_mime_type($filepath);
         if ($mime_type) {
         $attributes['type'] = $mime_type;
         }
         $media['url'] = $attributes['url'];
         $media['fileSize'] = $attributes['length'];
         $media['type'] = $attributes['type'];
         return array(array('key' => 'enclosure', 'attributes' => $attributes), array('key' => 'media', 'value' => '', 'attributes' => $media));
  
      case 'delete':
      case 'delete revision':
         foreach ($node->files as $file) {
            $file = (object)$file;
            db_query('DELETE FROM {flashvideo} WHERE fid = %d', $file->fid);
            db_query('DELETE FROM {ffmpeg_data} WHERE fid = %d', $file->fid);
         }
         break;
   }
  }
}

/**
 * Generates the HTML for any object parameters in an embedded video.
 *
 * @param $video the node which is being played
 *
 * @return
 *   string with the parameters in HTML form.
 */
function _flashvideo_get_parameters(&$video) {

  // call hook_v_get_params
  $param_value = module_invoke_all('v_get_params', $video);

  $output = '';
  foreach ($param_value as $param => $value) {
    $output .= '<param name="' . check_plain($param) . '" value="' . check_plain($value) . '" />';
  }
  return $output;
}