You are here

function _biblio_ris_parse_line in Bibliography Module 6.2

Same name and namespace in other branches
  1. 7 modules/RIS/biblio_ris.module \_biblio_ris_parse_line()
  2. 7.2 modules/RIS/biblio_ris.module \_biblio_ris_parse_line()
2 calls to _biblio_ris_parse_line()
_biblio_ris_import in modules/RIS/biblio_ris.module
_biblio_ris_import_string in modules/RIS/biblio_ris.module

File

modules/RIS/biblio_ris.module, line 307

Code

function _biblio_ris_parse_line($tag, $data, $node, &$unmapped) {
  switch ($tag) {
    case 'TY':
      $node->biblio_type = _biblio_ris_type_map($data);
      break;
    case 'A1':
    case 'AU':
      $node->biblio_contributors[1][] = array(
        'name' => $data,
        'auth_type' => _biblio_get_auth_type(1, $node->biblio_type),
      );
      break;
    case 'DA':
      if (!isset($node->biblio_year) || empty($node->biblio_year)) {
        $node->biblio_year = ($end = strpos($data, "/")) ? substr($data, 0, $end) : $data;
      }
      $node->biblio_date = $data;
      break;
    case 'Y1':
    case 'PY':
      if (!isset($node->biblio_year) || empty($node->biblio_year)) {
        $node->biblio_year = ($end = strpos($data, "/")) ? substr($data, 0, $end) : $data;
      }
      if (!isset($node->biblio_date) || empty($node->biblio_date)) {
        $node->biblio_date = $data;
      }
      break;
    case 'A2':
    case 'ED':
      $node->biblio_contributors[2][] = array(
        'name' => $data,
        'auth_type' => _biblio_get_auth_type(2, $node->biblio_type),
      );
      break;
    case 'KW':
      $node->biblio_keywords[] = $data;
      break;
    case 'SP':
    case 'EP':
      $node->biblio_pages .= $tag == "SP" ? $data : " - " . $data;
      break;
    case 'A3':
      $node->biblio_contributors[5][] = array(
        'name' => $data,
        'auth_type' => _biblio_get_auth_type(5, $node->biblio_type),
      );
      break;
    case 'BT':
      if ($node->biblio_type == 100) {
        $node->title = $data;
      }
      else {
        $node->biblio_secondary_title = $data;
      }
      break;
    default:
      if ($field = _biblio_ris_field_map($tag)) {
        $node->{$field} .= $data;
      }
      else {
        if (!in_array($tag, $unmapped)) {
          $unmapped[] = $tag;
        }
      }
  }
}