<?php

// $Id: page.inc,v 1.10.2.21 2009/02/20 00:44:05 ufku Exp $

/**

 * q = imce.

 */

function imce_page() {

  $jsop = isset($_GET['jsop']) ? $_GET['jsop'] : NULL;

  print theme('imce_page', imce_content($GLOBALS['user'], $jsop));

  exit();

}

/**

 * q = user/x/imce.

 */

function imce_user_page($account) {

  drupal_set_title($account->name);

  $jsop = isset($_GET['jsop']) ? $_GET['jsop'] : NULL;

  return imce_content($account, $jsop);

}

/**

 * Content of the file browser.

 */

function imce_content($user, $jsop = '') {

  //execute ajax calls.

  if ($jsop) {

    return imce_js($user, $jsop);

  }

  //initiate configuration profile

  if (!$imce = imce_initiate_profile($user)) {

    return '';

  }

  imce_process_profile($imce);//get active directory content

  //Before creating the content let's add main files required for imce to function properly.

  drupal_add_js('misc/jquery.form.js');

  drupal_add_js(drupal_get_path('module', 'imce') .'/js/imce.js');

  //process forms.

  //reference imce inside an array so it will stay referenced during argument copy of drupal_get_form

  //when php4-support drops(dr7?), use an object with no reference.

  $imce_ref = array('imce' => &$imce);

  $forms = '';

  if (!$imce['error']) {

    //process file upload.

    if (imce_perm_exists($imce, 'upload')) {

      $forms .= drupal_get_form('imce_upload_form', $imce_ref);

    }

    //process file operations.

    $forms .= drupal_get_form('imce_fileop_form', $imce_ref);

  }

  //run custom content functions. possible to insert extra forms. content is invisible when js is enabled.

  foreach (variable_get('imce_custom_content', array()) as $func => $state) {

    if ($state && function_exists($func) && $output = $func($imce)) {

      $forms .= $output;

    }

  }

  $content = theme('imce_content', imce_create_tree($imce), $forms, $imce_ref);

  //make necessary changes for js conversion

  $imce['dir'] = str_replace('%2F', '/', rawurlencode($imce['dir']));

  unset($imce['files'], $imce['name'], $imce['directories'], $imce['subdirectories'], $imce['filesize'], $imce['quota'], $imce['tuquota'], $imce['thumbnails'], $imce['uid']);

  drupal_add_js($imce_ref, 'setting');

  return $content;

}

/**

 * Ajax operations. q=imce&jsop={op}

 */

function imce_js($user, $jsop = '') {

  $response = array();

  //data

  if ($imce = imce_initiate_profile($user)) {

    imce_process_profile($imce);

    if (!$imce['error']) {

      include_once './'. drupal_get_path('module', 'imce') .'/inc/js.inc';

      if (function_exists($func = 'imce_js_'. $jsop)) {

        $response['data'] = $func($imce);

      }

    }

  }

  //messages

  $response['messages'] = drupal_get_messages();

  //for upload we must return plain text header.

  drupal_set_header('Content-Type: text/'. ($jsop == 'upload' ? 'html' : 'javascript') .'; charset=utf-8');

  print drupal_to_js($response);

  exit();

}

/**

 * Upload form.

 */

function imce_upload_form(&$form_state, $ref) {

  $imce =& $ref['imce'];

  $form['imce'] = array(

    '#type' => 'file',

    '#title' => t('File'),

    '#size' => 30,

    '#prefix' => '<div class="container-inline">',

  );

  $form['upload'] = array(

    '#type' => 'submit',

    '#value' => t('Upload'),

    '#submit' => $imce['perm']['upload'] ? array('imce_upload_submit') : NULL,//permission for submission

    '#suffix' => '</div>',

  );

  if (!empty($imce['thumbnails'])) {

    $form['thumbnails'] = array(

      '#type' => 'checkboxes',

      '#title' => t('Create thumbnails'),

      '#options' => imce_thumbnail_options($imce['thumbnails']),

    );

  }

  $form = array('fset_upload' => array('#type' => 'fieldset', '#title' => t('Upload file')) + $form);

  $form['#attributes']['enctype'] = 'multipart/form-data';

  $form['#action'] = $imce['url'];

  return $form;

}

/**

 * File operations form.

 */

function imce_fileop_form(&$form_state, $ref) {

  $imce =& $ref['imce'];

  $form['filenames'] = array(

    '#type' => 'textfield',

    '#title' => t('Selected files'),

    '#maxlength' => $imce['filenum'] ? $imce['filenum']*255 : NULL,

  );

  //thumbnail

  if (!empty($imce['thumbnails']) && imce_perm_exists($imce, 'thumb')) {

    $form['fset_thumb'] = array(

      '#type' => 'fieldset',

      '#title' => t('Thumbnails'),

    ) + imce_thumb_form($imce);

  }

  //delete

  if (imce_perm_exists($imce, 'delete')) {

    $form['fset_delete'] = array(

      '#type' => 'fieldset',

      '#title' => t('Delete'),

    ) + imce_delete_form($imce);

  }

  //resize

  if (imce_perm_exists($imce, 'resize')) {

    $form['fset_resize'] = array(

      '#type' => 'fieldset',

      '#title' => t('Resize'),

    ) + imce_resize_form($imce);

  }

  $form['#action'] = $imce['url'];

  return $form;

}

/**

 * Thumbnail form.

 */

function imce_thumb_form(&$imce) {

  $form['thumbnails'] = array(

    '#type' => 'checkboxes',

    '#title' => t('Thumbnails'),

    '#options' => imce_thumbnail_options($imce['thumbnails']),

  );

  $form['thumb'] = array(

    '#type' => 'submit',

    '#value' => t('Create thumbnails'),

    '#submit' => $imce['perm']['thumb'] ? array('imce_thumb_submit') : NULL,//permission for submission

  );

  return $form;

}

/**

 * Delete form.

 */

function imce_delete_form(&$imce) {

  $form['delete'] = array(

    '#type' => 'submit',

    '#value' => t('Delete'),

    '#submit' => $imce['perm']['delete'] ? array('imce_delete_submit') : NULL,//permission for submission

  );

  return $form;

}

/**

 * Resizing form.

 */

function imce_resize_form(&$imce) {

  $form['width'] = array(

    '#type' => 'textfield',

    '#title' => t('Width x Height'),

    '#size' => 5,

    '#maxlength' => 4,

    '#prefix' => '<div class="container-inline">',

  );

  $form['height'] = array(

    '#type' => 'textfield',

    '#size' => 5,

    '#maxlength' => 4,

    '#prefix' => 'x',

  );

  $form['resize'] = array(

    '#type' => 'submit',

    '#value' => t('Resize'),

    '#submit' => $imce['perm']['resize'] ? array('imce_resize_submit') : NULL,//permission for submission

    '#suffix' => '</div>',

  );

  $form['copy'] = array(

    '#type' => 'checkbox',

    '#title' => t('Create a new image'),

    '#default_value' => 1,

  );

  return $form;

}

/**

 * Validate file operations form.

 */

function imce_fileop_form_validate($form, &$form_state) {

  $imce =& $form['#parameters'][2]['imce'];

  //check if the filenames is empty

  if ($form_state['values']['filenames'] == '') {

    return form_error($form['filenames'], t('Please select a file.'));

  }

  //filenames come seperated by colon

  $filenames = explode(':', $form_state['values']['filenames']);

  $cnt = count($filenames);

  //check the number of files.

  if ($imce['filenum'] && $cnt > $imce['filenum']) {

    return form_error($form['filenames'], t('You are not allowed to operate on more than %num files.', array('%num' => $imce['filenum'])));

  }

  //check if there is any illegal choice

  for ($i = 0; $i < $cnt; $i++) {

    $filenames[$i] = $filename = rawurldecode($filenames[$i]);

    if (!isset($imce['files'][$filename])) {

      watchdog('imce', 'Illegal choice %choice in !name element.', array('%choice' => $filename, '!name' => t('directory (%dir)', array('%dir' => file_directory_path() . ($imce['dir'] == '.' ? '' : '/'. $imce['dir'])))), WATCHDOG_ERROR);

      return form_error($form['filenames'], t('An illegal choice has been detected. Please contact the site administrator.'));

    }

  }

  $form_state['values']['filenames'] = $filenames;

}

/**

 * Submit upload form.

 */

function imce_upload_submit($form, &$form_state) {

  $form_state['redirect'] = FALSE;

  $imce =& $form['#parameters'][2]['imce'];

  $validators = array('imce_validate_all' => array(&$imce));

  $dirpath = file_directory_path() . ($imce['dir'] == '.' ? '' : '/'. $imce['dir']);

  //save uploaded file.

  $replace = variable_get('imce_settings_replace', FILE_EXISTS_RENAME);

  if ($file = file_save_upload('imce', $validators, $dirpath, $replace)) {

    //core bug #203204.

    @chmod($file->filepath, 0664);

    //core bug #54223.

    if ($replace == FILE_EXISTS_RENAME) {

      $name = basename($file->filepath);

      if ($name != $file->filename) {

        $file->filename = $name;

        drupal_set_message(t('The file is renamed to %filename.', array('%filename' => $file->filename)));

      }

    }

    else if ($replace == FILE_EXISTS_REPLACE) {//check duplicates

      if ($_file = db_fetch_object(db_query("SELECT fid FROM {files} WHERE filepath = '%s' AND fid <> %d", $file->filepath, $file->fid))) {

        db_query("DELETE FROM {files} WHERE fid = %d", $file->fid);

        $file->fid = $_file->fid;

      }

    }

    $file->uid = $imce['uid'];//global user may not be the owner.

    $file->status = FILE_STATUS_PERMANENT;//make permanent

    drupal_write_record('files', $file, array('fid'));//update

    drupal_set_message(t('%filename is uploaded.', array('%filename' => $file->filename)));

    //update file list

    $img = imce_image_info($file->filepath);

    $file->width = $img ? $img['width'] : 0;

    $file->height = $img ? $img['height'] : 0;

    imce_add_file($file, $imce);

    //create thumbnails

    if (isset($form_state['values']['thumbnails']) && $img) {

      imce_create_thumbnails($file->filename, $imce, $form_state['values']['thumbnails']);

    }

  }

  else {

    drupal_set_message(t('Upload failed.'), 'error');

  }

}

/**

 * Submit thumbnail form.

 */

function imce_thumb_submit($form, &$form_state) {

  $form_state['redirect'] = FALSE;

  $imce =& $form['#parameters'][2]['imce'];

  //create thumbnails

  imce_process_files($form_state['values']['filenames'], $imce, 'imce_create_thumbnails', array($form_state['values']['thumbnails']));

}

/**

 * Submit delete form.

 */

function imce_delete_submit($form, &$form_state) {

  $form_state['redirect'] = FALSE;

  $imce =& $form['#parameters'][2]['imce'];

  $deleted = imce_process_files($form_state['values']['filenames'], $imce, 'imce_delete_file');

  if (!empty($deleted)) {

    drupal_set_message(t('File deletion successful: %files.', array('%files' => utf8_encode(implode(', ', $deleted)))));

  }

}

/**

 * Submit resize form.

 */

function imce_resize_submit($form, &$form_state) {

  $form_state['redirect'] = FALSE;

  $imce =& $form['#parameters'][2]['imce'];

  //check dimensions

  $width = (int) $form_state['values']['width'];

  $height = (int) $form_state['values']['height'];

  list($maxw, $maxh) = explode('x', $imce['dimensions']);

  if ($width < 1 || $height < 1 || ($maxw && ($width > $maxw || $height > $maxh))) {

    drupal_set_message(t('Please specify dimensions within the allowed range that is from 1x1 to @dimensions.', array('@dimensions' => $imce['dimensions'] ? $imce['dimensions'] : t('unlimited'))), 'error');

    return;

  }

  $resized = imce_process_files($form_state['values']['filenames'], $imce, 'imce_resize_image', array($width, $height, $form_state['values']['copy']));

  if (!empty($resized)) {

    drupal_set_message(t('File resizing successful: %files.', array('%files' => utf8_encode(implode(', ', $resized)))));

  }

}

/**

 * Do batch operations on files.

 * Used by delete, resize, create thumbnail submissions.

 */

function imce_process_files($filenames, &$imce, $function, $args = array()) {

  $args = array_merge(array('', &$imce), $args);

  $processed = array();

  foreach ($filenames as $filename) {

    $args[0] = $filename;

    if (call_user_func_array($function, $args)) {

      $processed[] = $filename;

    }

  }

  return $processed;

}

/**

 * Delete a file in the file list.

 */

function imce_delete_file($filename, &$imce) {

  $filepath = file_directory_path() . ($imce['dir'] == '.' ? '' : '/'. $imce['dir']) .'/'. $filename;

  if (!file_delete($filepath)) {

    return FALSE;

  }

  db_query("DELETE FROM {files} WHERE filepath = '%s'", $filepath);

  imce_remove_file($filename, $imce);

  return TRUE;

}

/**

 * Create all selected thumbnails.

 */

function imce_create_thumbnails($filename, &$imce, $values) {

  $created = array();

  foreach ($imce['thumbnails'] as $thumbnail) {