<?php


/**
 * @file
 * Tests the functions of the Fedora Repository module.
 */

class FedoraBookTestCase extends DrupalWebTestCase {

  public static function getInfo() {
    return array(
      'name' => 'Fedora Book',
      'description' => t('The Fedora repository book content model.'),
      'group' => t('fedora repository'),
    );
  }

  function setUp() {
    parent::setUp('fedora_repository', 'fedora_ilives', 'tabs');

    module_load_include('inc', 'fedora_repository', 'api/fedora_item');

    // Create and login user.
    $repository_user = $this->drupalCreateFedoraUser(array('add fedora datastreams',
        'edit fedora meta data',
        'edit tags datastream',
        'ingest new fedora objects',
        'purge objects and datastreams',
        'view fedora collection',
        'view detailed list of content'));


    $this->drupalLogin($repository_user);
  }

  public function testBookCModel() {
    // First add a book collection

    $pid_list = array();
    // Create a collection for ingesting book content model objects.

    $ingest_form = array();
    $ingest_form['models'] = 'islandora:collectionCModel/ISLANDORACM';

    $this->drupalPost('fedora/ingestObject/islandora:top/Islandora%20Top-Level%20Collection', $ingest_form, 'Next');

    $ingest_title = $this->randomName(32);
    $ingest_form_step_2['dc:title'] = $ingest_title;
    $ingest_form_step_2['dc:description'] = $this->randomName(256);
    $ingest_form_step_2['files[ingest-file-location]'] = realpath(drupal_get_path('module', 'fedora_ilives') . '/xml/book_collection_policy.xml');
    $this->drupalPost(NULL, $ingest_form_step_2, 'Ingest');
    $this->assertPattern('/Item .* created successfully./', "Verified item created.");

    $pid = $this->getIngestedPid();
    $this->drupalGet("fedora/repository/$pid");
    $pid_list[] = $pid;

    // Now add a book into the new collection
    $this->pass("Create book collection $pid below top-level collection.", 'fedora book');
    $ingest_book_form = array();
    $ingest_book_form['models'] = 'ilives:bookCModel/ISLANDORACM';
    $this->drupalPost("fedora/ingestObject/$pid/", $ingest_book_form, 'Next');
    $ingest_book_form_step_2 = array();

    $ingest_book_form_step_2['mods[mods_record]'] = file_get_contents(drupal_get_path('module', 'fedora_ilives') . '/tests/test_files/mods_record.xml');
    $this->outputScreenContents();
    $this->drupalPost(NULL, $ingest_book_form_step_2, 'Ingest');
    $this->outputScreenContents();
    $book_pid = $this->getIngestedPid();
    $pid_list[] = $book_pid;
    if (!empty($book_pid)) {
      $this->pass("Successfully ingested book object $book_pid.");
    }
    $this->cleanUpRepository($pid_list);
  }

  private function cleanUpRepository($pid_list = array()) {
    $this->pass("This is the PID list to purge: " . implode(", ", $pid_list));
    foreach ($pid_list as $pid) {
      $this->drupalPost("fedora/repository/purgeObject/$pid", array(), 'Purge');
      $this->drupalPost(NULL, array(), 'Delete');
    }
  }

  private function getIngestedPid() {
    $subject = $this->drupalGetContent();
    $pattern = '/">(.*)<\/a> created successfully./';
    $matches = array();
    $res = preg_match($pattern, $subject, $matches);
    return $matches[1];
  }

  private function outputScreenContents($description = '', $basename = '') {
    // This is a hack to get a directory that won't be cleaned up by SimpleTest.
    $file_dir = file_directory_path() . '../simpletest_output_pages';
    if (!is_dir($file_dir)) {
      mkdir($file_dir, 0777, TRUE);
    }
    $output_path = "$file_dir/$basename." . $this->randomName(10) . '.html';
    $rv = file_put_contents($output_path, $this->drupalGetContent());
    $this->pass("$description: Contents of result page are " . l(t('here'), $output_path));
  }

  protected function drupalCreateFedoraUser($permissions = array('access comments', 'access content', 'post comments', 'post comments without approval')) {
    // Create a role with the given permission set.
    if (!($rid = $this->drupalCreateRole($permissions))) {
      return FALSE;
    }

    // Create a user assigned to that role.
    $edit = array();
    $edit['name'] = 'simpletestuser';
    $edit['mail'] = $edit['name'] . '@example.com';
    $edit['roles'] = array($rid => $rid);
    $edit['pass'] = 'simpletestpass';
    $edit['status'] = 1;

    $account = user_save('', $edit);

    $this->assertTrue(!empty($account->uid), t('User created with name %name and pass %pass', array('%name' => $edit['name'], '%pass' => $edit['pass'])), t('User login'));
    if (empty($account->uid)) {
      return FALSE;
    }

    // Add the raw password so that we can log in as this user.
    $account->pass_raw = $edit['pass'];
    return $account;
  }

}