View source
<?php
function _biblio_get_auth_types($auth_category, $biblio_type) {
static $auth_types = array();
if (empty($auth_types)) {
$db_res = db_query("SELECT * FROM {biblio_contributor_type}");
while ($row = db_fetch_object($db_res)) {
$auth_types[$row->auth_category][$row->biblio_type][] = $row->auth_type;
}
}
$result = isset($auth_types[$auth_category][$biblio_type]) ? $auth_types[$auth_category][$biblio_type] : null;
if (empty($result)) {
$result = $auth_types[$auth_category][0];
}
return $result;
}
function _biblio_get_auth_type($auth_category, $biblio_type) {
$result = (array) _biblio_get_auth_types($auth_category, $biblio_type);
return empty($result) ? NULL : current($result);
}
function _biblio_get_field_information($biblio_type, $only_visible = FALSE) {
$fields = array();
$visible = $only_visible ? ' AND (bt.common = 1 OR bt.visible=1) ' : '';
$result = db_query("SELECT b.*, btd.*, btt.name AS type_name\n FROM {biblio_fields} AS b\n INNER JOIN {biblio_field_type} AS bt ON bt.fid = b.fid\n INNER JOIN {biblio_field_type_data} AS btd ON btd.ftdid = bt.ftdid\n INNER JOIN {biblio_types} as btt ON btt.tid = bt.tid\n WHERE bt.tid = %d {$visible}\n ORDER BY bt.weight ASC", $biblio_type);
while ($row = db_fetch_array($result)) {
$fields[$row['fid']] = $row;
}
return $fields;
}
function _biblio_localize_fields(&$fields) {
if (module_exists('i18nstrings')) {
foreach ($fields as $key => $row) {
$fields[$key]['title'] = tt("biblio:field:{$row['ftdid']}:title", $fields[$key]['title']);
$fields[$key]['hint'] = tt("biblio:field:{$row['ftdid']}:hint", $fields[$key]['hint']);
}
}
}
function _biblio_localize_type($tid, $value, $field = 'name') {
if (module_exists('i18nstrings')) {
return tt("biblio:type:{$tid}:{$field}", $value);
}
return $value;
}
function biblio_locale($op = 'groups', $group = NULL) {
switch ($op) {
case 'groups':
return array(
'biblio' => t('Biblio'),
);
case 'refresh':
if ($group == 'biblio') {
biblio_locale_refresh_fields();
biblio_locale_refresh_types();
}
break;
}
}
function biblio_locale_refresh_fields($tid = NULL) {
if (module_exists('i18nstrings')) {
if (isset($tid)) {
$result = db_query('SELECT d.* FROM {biblio_field_type} b INNER JOIN {biblio_field_type_data} d ON b.ftdid = d.ftdid WHERE tid = %d', $tid);
}
else {
$result = db_query('SELECT * FROM {biblio_field_type_data}');
}
while ($row = db_fetch_array($result)) {
tt("biblio:field:{$row['ftdid']}:title", $row['title'], NULL, TRUE);
tt("biblio:field:{$row['ftdid']}:hint", $row['hint'], NULL, TRUE);
}
}
}
function biblio_locale_refresh_types($tid = NULL) {
if (module_exists('i18nstrings')) {
if (isset($tid)) {
$result = db_query('SELECT * FROM {biblio_types} WHERE tid = %d', $tid);
}
else {
$result = db_query('SELECT * FROM {biblio_types} WHERE tid > 0');
}
while ($row = db_fetch_array($result)) {
tt("biblio:type:{$row['tid']}:name", $row['name'], NULL, TRUE);
tt("biblio:type:{$row['tid']}:description", $row['description'], NULL, TRUE);
}
}
}
function biblio_init() {
global $user, $conf;
drupal_add_css(drupal_get_path('module', 'biblio') . '/biblio.css');
if ($user->uid === 0) {
$base = variable_get('biblio_base', 'biblio');
if (drupal_match_path($_GET['q'], "{$base}\n{$base}/*")) {
$conf['cache'] = FALSE;
}
}
}
function biblio_cron() {
require_once drupal_get_path('module', 'biblio') . '/biblio.contributors.inc';
require_once drupal_get_path('module', 'biblio') . '/biblio.keywords.inc';
$interval = variable_get('biblio_orphan_clean_interval', 24 * 60 * 60);
if (time() >= variable_get('biblio_orphan_clean_next_execution', 0)) {
biblio_delete_orphan_authors();
biblio_delete_orphan_keywords();
variable_set('biblio_orphan_clean_next_execution', time() + $interval);
}
}
function biblio_theme() {
$path = drupal_get_path('module', 'biblio');
return array(
'biblio_alpha_line' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'type',
),
),
'biblio_admin_author_types_form' => array(
'file' => 'biblio.admin.inc',
'arguments' => array(
'form',
),
),
'biblio_admin_type_mapper_form' => array(
'file' => 'biblio.admin.inc',
'arguments' => array(
'form',
),
),
'biblio_admin_field_mapper_form' => array(
'file' => 'biblio.admin.inc',
'arguments' => array(
'form',
),
),
'biblio_admin_types_edit_form' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'form',
),
),
'biblio_admin_author_edit_form' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'form',
),
),
'biblio_admin_orphans_form' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'form',
),
),
'biblio_admin_keyword_orphans_form' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'form',
),
),
'biblio_coin_button' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'element',
),
),
'biblio_openurl' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'openURL',
),
),
'biblio_style' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'node',
'base' => 'biblio',
'style_name' => 'classic',
'inline' => FALSE,
),
),
'biblio_long' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'node',
'base' => 'biblio',
'style_name' => 'classic',
),
),
'biblio_tabular' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'node',
'base' => 'biblio',
'teaser' => FALSE,
),
),
'biblio_entry' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'node',
'base' => 'biblio',
'style_name' => 'classic',
'inline' => FALSE,
),
),
'biblio_authors' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'contributors',
'style' => 'classic',
'inline' => FALSE,
'glue' => ', ',
),
),
'biblio_format_authors' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'contributors',
'options' => array(),
'inline' => FALSE,
),
),
'biblio_author_link' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'author',
'authorID',
'base' => 'biblio',
'inline' => FALSE,
),
),
'biblio_filters' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'form',
),
),
'form_filter' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'form',
),
),
'biblio_export_links' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'node',
),
),
'biblio_download_links' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'node',
),
),
'biblio_contributors' => array(
'file' => 'biblio_theme.inc',
'arguments' => array(
'form',
),
),
);
}
function biblio_autocomplete($field, $string = '') {
$matches = array();
if ($field == 'contributor') {
$result = db_query_range("SELECT * FROM {biblio_contributor_data} WHERE LOWER(lastname) LIKE LOWER('%s%%') OR LOWER(firstname) LIKE LOWER('%s%%') ORDER BY lastname ASC ", array(
$string,
$string,
), 0, 10);
while ($data = db_fetch_object($result)) {
$matches[$data->name] = check_plain($data->name);
}
}
elseif ($field == 'biblio_keywords') {
$sep = check_plain(variable_get('biblio_keyword_sep', ','));
$sep_pos = strrpos($string, $sep);
$start = trim(drupal_substr($string, 0, $sep_pos));
$end_sep = $sep_pos ? $sep_pos + 1 : $sep_pos;
$end = trim(drupal_substr($string, $end_sep));
$result = db_query_range("SELECT * FROM {biblio_keyword_data} WHERE LOWER(word) LIKE LOWER('%s%%') ORDER BY word ASC ", array(
$end,
), 0, 10);
while ($data = db_fetch_object($result)) {
$keywords = $sep_pos ? $start . ', ' . check_plain($data->word) : check_plain($data->word);
$matches[$keywords] = $keywords;
}
}
else {
$result = db_query_range("SELECT %s FROM {biblio} WHERE LOWER(%s) LIKE LOWER('%s%%') ORDER BY %s ASC", array(
$field,
$field,
$string,
$field,
), 0, 10);
while ($data = db_fetch_object($result)) {
$matches[$data->{$field}] = check_plain($data->{$field});
}
}
print drupal_to_js($matches);
exit;
}
function biblio_help_page() {
$base = variable_get('biblio_base', 'biblio');
$text = "<h3>" . t('General:') . "</h3>";
$text .= "<p>" . t('By default, the !url page will list all of the entries in the database sorted by Year in descending order. If you wish to sort by "Title" or "Type", you may do so by clicking on the appropriate links at the top of the page. To reverse the sort order, simply click the link a second time.', array(
'!url' => l('', $base),
)) . "</p>";
$text .= "<h3>" . t('Filtering Search Results:') . "</h3>";
$text .= "<p>" . t('If you wish to filter the results, click on the "Filter" tab at the top of the page. To add a filter, click the radio button to the left of the filter type you wish to apply, then select the filter criteria from the drop down list on the right, then click the filter button.') . "</p>";
$text .= "<p>" . t('It is possible to create complex filters by returning to the <i>Filter</i> tab and adding additional filters. Simply follow the steps outlined above and press the "Refine" button.') . "</p>";
$text .= "<p>" . t('All filters can be removed by clicking the <i>Clear All Filters</i> link at the top of the result page, or on the <i>Filter</i> tab they can be removed one at a time using the <i>Undo</i> button, or you can remove them all using the <i>Clear All</i> button.') . "</p>";
$text .= "<p>" . t('You may also construct URLs which filter. For example, /biblio/year/2005 will show all of the entries for 2005. /biblio/year/2005/author/smith will show all of entries from 2005 for smith.') . "</p>";
$text .= "<h3>" . t('Exporting Search Results:') . "</h3>";
$text .= "<p>" . t('Assuming this option has been enabled by the administrator, you can export search results directly into EndNote. The link at the top of the result page will export all of the search results, and the links on individual entries will export the information related to that single entry.') . "</p>";
$text .= "<p>" . t('The information is exported in EndNote "Tagged" format similar to this...') . "<pre>" . t('
%0 Book
%A John Smith
%D 1959
%T The Works of John Smith
...') . '</pre></p>';
$text .= "<p>" . t('Clicking on one of the export links should cause your browser to ask you whether you want to Open, or Save To Disk, the file endnote.enw. If you choose to open it, Endnote should start and ask you which library you would like store the results in. Alternatively, you can save the file to disk and manually import it into EndNote.') . "</p>";
return $text;
}
function biblio_help($path, $arg) {
switch ($path) {
case 'admin/help#biblio':
return biblio_help_page();
case 'admin/modules#description':
return t('Manages a list of scholarly papers on your site');
case 'node/add#biblio':
return t('This allows you to add a bibliographic entry to the database');
}
}
function biblio_node_info() {
return array(
'biblio' => array(
'name' => t('Biblio'),
'module' => 'biblio',
'description' => t('Manages bibliographies'),
),
);
}
function biblio_access($op, $node = '', $user = '') {
switch ($op) {
case 'create':
return user_access('create biblio');
case 'delete':
case 'update':
if (user_access('edit all biblio entries')) {
return TRUE;
}
if (user_access('edit own biblio entries') && $user->uid == $node->uid) {
return TRUE;
}
if (user_access('edit own biblio entries') && $user->uid != $node->uid) {
return;
}
break;
case 'view':
if (variable_get('biblio_view_only_own', 0) && $user->uid != $node->uid) {
return FALSE;
}
break;
case 'admin':
return user_access('administer biblio');
case 'import':
return user_access('import from file');
case 'export':
return user_access('show export links');
case 'edit_author':
if (user_access('administer biblio') || user_access('edit biblio authors')) {
return TRUE;
}
break;
case 'download':
if (user_access('show download links') || user_access('show own download links') && $user->uid == $node->uid) {
return TRUE;
}
break;
case 'rss':
return variable_get('biblio_rss', 0);
default:
}
return;
}
function biblio_perm() {
return array(
'administer biblio',
'access biblio content',
'create biblio',
'edit all biblio entries',
'edit own biblio entries',
'edit biblio authors',
'import from file',
'show export links',
'show download links',
'show own download links',
'show filter tab',
'show sort links',
'view full text',
);
}
function biblio_link($type, $node = NULL, $teaser = FALSE) {
$links = array();
$base = variable_get('biblio_base', 'biblio');
if ($type == 'node' && $node->type == 'biblio') {
if (biblio_access('update', $node) && !user_access('administer nodes')) {
$links['biblio_edit'] = array(
'title' => t('edit this entry'),
'href' => "node/{$node->nid}/edit",
);
}
if (biblio_access('export', $node)) {
module_load_include('inc', 'biblio', 'biblio_theme');
$show_link = variable_get('biblio_export_links', array(
'tagged' => TRUE,
'xml' => TRUE,
'bibtex' => TRUE,
));
$show_link['google'] = variable_get('biblio_google_link', 1);
if ($show_link['tagged']) {
$links['biblio_tagged'] = _build_biblio_tagged_link($base, $node->nid);
}
if ($show_link['xml']) {
$links['biblio_xml'] = _build_biblio_xml_link($base, $node->nid);
}
if ($show_link['bibtex']) {
$links['biblio_bibtex'] = _build_biblio_bibtex_link($base, $node->nid);
}
if ($show_link['google']) {
$links['biblio_google_scholar'] = _build_google_scholar_link($node);
}
}
}
return $links;
}
function biblio_user($type, &$edit, &$account, $category = NULL) {
global $user;
if ($type == 'form' && $category == 'account') {
$form = array();
include_once drupal_get_path('module', 'biblio') . '/biblio.admin.inc';
$show_form = variable_get('biblio_show_user_profile_form', '1') || variable_get('biblio_show_crossref_profile_form', '1') || variable_get('biblio_show_openurl_profile_form', '1');
$admin_show_form = $user->uid == 1 || user_access('administer users') && user_access('administer biblio') ? TRUE : FALSE;
if ($admin_show_form || $show_form) {
$form['biblio_fieldset'] = array(
'#type' => 'fieldset',
'#title' => t('Biblio settings'),
'#weight' => 5,
'#collapsible' => TRUE,
'#collapsed' => TRUE,
);
if ($admin_show_form || variable_get('biblio_show_user_profile_form', '1')) {
_biblio_get_user_profile_form($form['biblio_fieldset'], $account);
}
if ($admin_show_form || variable_get('biblio_show_openurl_profile_form', '1')) {
_biblio_get_user_openurl_form($form['biblio_fieldset'], $account);
}
if ($admin_show_form || variable_get('biblio_show_crossref_profile_form', '1')) {
_biblio_get_user_doi_form($form['biblio_fieldset'], $account);
}
}
return $form;
}
if ($type == 'validate' && $category == 'account') {
if (($edit['biblio_my_pubs_menu'] || $edit['biblio_show_profile']) && $edit['biblio_contributor_id'] == 0) {
$message = t('You did not supply an associated biblio author.');
drupal_set_message($message, 'warning');
}
}
if ($type == 'after_update' && $category == 'account') {
menu_rebuild();
}
if ($type == 'update' && $category == 'account') {
if (isset($edit['biblio_contributor_id'])) {
db_query("UPDATE {biblio_contributor_data} SET drupal_uid = 0 WHERE drupal_uid = %d", $account->uid);
db_query('UPDATE {biblio_contributor_data} set drupal_uid = %d WHERE cid = %d ', $account->uid, $edit['biblio_contributor_id']);
}
}
if ($type == 'categories') {
}
}
function biblio_forms() {
$forms['biblio_admin_author_types_form_new'] = array(
'callback' => 'biblio_admin_author_types_form',
);
$forms['biblio_admin_author_types_form_edit'] = array(
'callback' => 'biblio_admin_author_types_form',
);
return $forms;
}
function biblio_user_to_arg($arg) {
return empty($arg) || $arg == '%' ? $GLOBALS['user']->uid : $arg;
}
function biblio_user_load($uid) {
return user_load($uid);
}
function biblio_menu() {
global $user;
$items = array();
$base = variable_get('biblio_base', 'biblio');
$base_title = check_plain(variable_get('biblio_base_title', 'Biblio'));
$items["{$base}"] = array(
'title' => $base_title,
'page callback' => 'biblio_db_search',
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'file' => 'biblio.pages.inc',
);
$items["{$base}/authors"] = array(
'title' => 'Authors',
'page callback' => 'biblio_author_page',
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'file' => 'biblio.pages.inc',
'weight' => 1,
);
$items["{$base}/keywords"] = array(
'title' => 'Keywords',
'page callback' => 'biblio_keyword_page',
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'file' => 'biblio.pages.inc',
'weight' => 2,
);
$items["{$base}/import"] = array(
'title' => 'Import',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_import_form',
),
'file' => 'biblio.import.export.inc',
'access callback' => 'user_access',
'access arguments' => array(
'import from file',
),
'weight' => 10,
);
$items["{$base}/user/%biblio_user"] = array(
'title' => 'My publications',
'page callback' => 'biblio_get_user_pubs',
'page arguments' => array(
2,
),
'access callback' => '_biblio_profile_access',
'access arguments' => array(
2,
'menu',
),
'parent' => '',
'file' => 'biblio.pages.inc',
);
$items["{$base}/pot"] = array(
'title' => '',
'page callback' => 'biblio_dump_db_data_for_pot',
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'type' => MENU_CALLBACK,
);
$wildcard = 2 + (count(explode("/", $base)) - 1);
$items["{$base}/authors/%/edit"] = array(
'title' => 'Edit author information',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_author_edit_form',
$wildcard,
),
'access callback' => 'biblio_access',
'access arguments' => array(
'edit_author',
),
'file' => 'biblio.admin.inc',
'type' => MENU_CALLBACK,
);
$items["{$base}/keywords/%/edit"] = array(
'title' => '',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_keyword_edit_form',
$wildcard,
),
'access callback' => 'user_access',
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_CALLBACK,
);
$items["{$base}/keyword/%/delete"] = array(
'title' => 'Delete',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_keyword_delete_confirm',
$wildcard,
),
'access callback' => 'user_access',
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'weight' => 1,
'type' => MENU_CALLBACK,
);
$items["{$base}/view/%"] = array(
'page callback' => 'biblio_view_node',
'page arguments' => array(
$wildcard,
),
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'file' => 'biblio.pages.inc',
'type' => MENU_CALLBACK,
);
$items["user/%user/{$base}"] = array(
'title' => 'Publications',
'page callback' => 'biblio_get_user_pubs',
'page arguments' => array(
1,
'profile',
'no_filters',
),
'access callback' => '_biblio_profile_access',
'access arguments' => array(
1,
'profile',
),
'file' => 'biblio.pages.inc',
'type' => MENU_LOCAL_TASK,
);
$items['admin/settings/biblio'] = array(
'title' => 'Biblio settings',
'description' => 'Configure default behavior of the biblio module.',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_settings',
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
);
$items['admin/settings/biblio/ahah'] = array(
'title' => '',
'page callback' => 'biblio_admin_ahah',
'file' => 'biblio.admin.inc',
'access arguments' => array(
'administer biblio',
),
'type' => MENU_CALLBACK,
);
$items['admin/settings/biblio/basic'] = array(
'title' => 'Preferences',
'type' => MENU_DEFAULT_LOCAL_TASK,
'weight' => -10,
);
$items['admin/settings/biblio/import'] = array(
'title' => 'Import',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_import_form',
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.import.export.inc',
'type' => MENU_LOCAL_TASK,
'weight' => 1,
);
$items['admin/settings/biblio/export'] = array(
'title' => 'Export',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_export_form',
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.import.export.inc',
'type' => MENU_LOCAL_TASK,
'weight' => 2,
);
$items['admin/settings/biblio/fields'] = array(
'title' => 'Fields',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_types_edit_form',
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -9,
);
$items['admin/settings/biblio/fields/common'] = array(
'title' => 'Common',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_types_edit_form',
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_DEFAULT_LOCAL_TASK,
'weight' => -9,
);
$items['admin/settings/biblio/fields/type'] = array(
'title' => 'Publication Types',
'page callback' => 'biblio_admin_types_form',
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -8,
);
$items['admin/settings/biblio/fields/typemap'] = array(
'title' => 'Type Mapping',
'page callback' => 'biblio_admin_type_mapper_page',
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -1,
);
$items['admin/settings/biblio/fields/typemap/%'] = array(
'title' => 'Type Mapping',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_type_mapper_form',
5,
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_CALLBACK,
'weight' => -1,
);
$items['admin/settings/biblio/fields/fieldmap/%'] = array(
'title' => 'Field Mapping',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_field_mapper_form',
5,
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_CALLBACK,
'weight' => -1,
);
$items['admin/settings/biblio/fields/type/edit'] = array(
'title' => '',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_types_edit_form',
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_CALLBACK,
);
$items['admin/settings/biblio/fields/type/delete'] = array(
'title' => '',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_types_delete_form',
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_CALLBACK,
);
$items['admin/settings/biblio/fields/type/new'] = array(
'title' => 'Add New Type',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_types_add_form',
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -9,
);
$items['admin/settings/biblio/fields/type/reset'] = array(
'title' => 'Reset all types to defaults',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_types_reset_form',
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
);
$items['admin/settings/biblio/fields/type/hide'] = array(
'title' => '',
'page callback' => 'biblio_admin_types_hide',
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_CALLBACK,
);
$items['admin/settings/biblio/fields/type/show'] = array(
'title' => '',
'page callback' => 'biblio_admin_types_show',
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_CALLBACK,
);
$items['admin/settings/biblio/author'] = array(
'title' => 'Authors',
'page callback' => 'biblio_author_page',
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'file' => 'biblio.pages.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -7,
);
$items['admin/settings/biblio/author/list'] = array(
'title' => 'List',
'page callback' => 'biblio_author_page',
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'file' => 'biblio.pages.inc',
'type' => MENU_DEFAULT_LOCAL_TASK,
'weight' => -7,
);
$items['admin/settings/biblio/author/%/edit'] = array(
'title' => 'Edit author information',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_author_edit_form',
4,
),
'access callback' => 'biblio_access',
'access arguments' => array(
'edit_author',
),
'file' => 'biblio.admin.inc',
'type' => MENU_CALLBACK,
'weight' => -6,
);
$items['admin/settings/biblio/author/orphans'] = array(
'title' => 'Orphaned Authors',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_orphans_form',
),
'access arguments' => array(
'administer biblio',
),
'description' => 'Delete orphaned biblio authors.',
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -6,
);
$items['admin/settings/biblio/author/type'] = array(
'title' => 'Author Types',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_author_types_form',
6,
5,
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -5,
);
$items['admin/settings/biblio/author/type/new'] = array(
'title' => 'Add New Author Type',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_author_types_form_new',
'new',
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -9,
);
$items['admin/settings/biblio/author/type/%/edit'] = array(
'title' => 'Add New Author Type',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_author_types_form_edit',
'edit',
5,
),
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_CALLBACK,
'weight' => -9,
);
$items['admin/settings/biblio/author/type/%/delete'] = array(
'title' => 'Delete',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_author_type_delete_confirm',
5,
),
'access callback' => 'user_access',
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'weight' => 1,
'type' => MENU_CALLBACK,
);
$items['admin/settings/biblio/keywords'] = array(
'title' => 'Keywords',
'page callback' => 'biblio_keyword_page',
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'file' => 'biblio.pages.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -7,
);
$items['admin/settings/biblio/keywords/list'] = array(
'title' => 'List',
'page callback' => 'biblio_keyword_page',
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'file' => 'biblio.pages.inc',
'type' => MENU_DEFAULT_LOCAL_TASK,
'weight' => -7,
);
$items['admin/settings/biblio/keywords/%/edit'] = array(
'title' => 'Edit keyword information',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_keyword_edit_form',
4,
),
'access callback' => 'user_access',
'access arguments' => array(
'administer biblio',
),
'file' => 'biblio.admin.inc',
'type' => MENU_CALLBACK,
'weight' => -6,
);
$items['admin/settings/biblio/keywords/orphans'] = array(
'title' => 'Orphaned Keywords',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_admin_keyword_orphans_form',
),
'access arguments' => array(
'administer biblio',
),
'description' => 'Delete orphaned biblio keywords.',
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -6,
);
$items['biblio/autocomplete'] = array(
'title' => 'Autocomplete ',
'page callback' => 'biblio_autocomplete',
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'type' => MENU_CALLBACK,
);
$items['biblio/js'] = array(
'title' => 'Javascript Contributors Form',
'page callback' => 'biblio_contributors_js',
'access arguments' => array(
'access biblio content',
),
'type' => MENU_CALLBACK,
);
$items["{$base}/list"] = array(
'title' => 'List',
'type' => MENU_DEFAULT_LOCAL_TASK,
'weight' => -10,
);
$items["{$base}/filter"] = array(
'title' => 'Filter',
'page callback' => 'drupal_get_form',
'page arguments' => array(
'biblio_form_filter',
),
'access callback' => 'user_access',
'access arguments' => array(
'show filter tab',
),
'type' => MENU_LOCAL_TASK,
'file' => 'biblio.pages.inc',
'weight' => -9,
);
$items["{$base}/filter/clear"] = array(
'title' => '',
'page callback' => 'biblio_filter_clear',
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'type' => MENU_CALLBACK,
);
$items["{$base}/help"] = array(
'title' => 'Help',
'page callback' => 'biblio_help_page',
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'type' => MENU_CALLBACK,
);
$items["{$base}/export"] = array(
'title' => '',
'page callback' => 'biblio_export',
'access callback' => 'user_access',
'access arguments' => array(
'show export links',
),
'file' => 'biblio.import.export.inc',
'type' => MENU_CALLBACK,
);
$items["{$base}/citekey"] = array(
'title' => '',
'page callback' => 'biblio_citekey_view',
'access arguments' => array(
'access biblio content',
),
'file' => 'biblio.pages.inc',
'type' => MENU_CALLBACK,
);
$items["{$base}/viewinline/%node"] = array(
'title' => '',
'page callback' => 'biblio_view_inline',
'page arguments' => array(
2,
),
'access callback' => 'user_access',
'access arguments' => array(
'access biblio content',
),
'file' => 'biblio.pages.inc',
'type' => MENU_CALLBACK,
);
$items["{$base}/recent/rss.xml"] = array(
'title' => 'RSS feed',
'page callback' => 'biblio_recent_feed',
'access callback' => 'biblio_access',
'access arguments' => array(
'rss',
),
'type' => MENU_CALLBACK,
);
return $items;
}
function biblio_filter_clear() {
$_SESSION['biblio_filter'] = array();
$base = variable_get('biblio_base', 'biblio');
if (isset($_GET['sort'])) {
$options .= "sort=" . $_GET['sort'];
}
if (isset($_GET['order'])) {
$options .= $options['query'] ? "&" : "";
$options .= "order=" . $_GET['order'];
}
drupal_goto($base, $options);
}
function biblio_remove_brace($title_string) {
$matchpattern = '/\\{\\$(?:(?!\\$\\}).)*\\$\\}|(\\{[^}]*\\})/';
$output = preg_replace_callback($matchpattern, 'biblio_remove_brace_callback', $title_string);
return $output;
}
function biblio_remove_brace_callback($match) {
if (isset($match[1])) {
$braceless = str_replace('{', '', $match[1]);
$braceless = str_replace('}', '', $braceless);
return $braceless;
}
return $match[0];
}
function biblio_nodeapi(&$node, $op, $a3, $a4) {
if ($node->type == 'biblio') {
switch ($op) {
case 'delete revision':
db_query('DELETE FROM {biblio} WHERE vid = %d', $node->vid);
db_query('DELETE FROM {biblio_contributor} WHERE nid = %d AND vid = %d', array(
$node->nid,
$node->vid,
));
db_query('DELETE FROM {biblio_keyword} WHERE nid = %d AND vid = %d', array(
$node->nid,
$node->vid,
));
break;
case 'insert':
if (variable_get('biblio_index', 0)) {
_node_index_node($node);
search_update_totals();
}
break;
case 'update':
if (variable_get('biblio_index', 0)) {
$mynode = node_load($node->nid, NULL, TRUE);
_node_index_node($mynode);
search_update_totals();
}
break;
case 'view':
if ($node->type == 'biblio' && variable_get('biblio_hide_bibtex_braces', 0) && !empty($a4)) {
drupal_set_title(filter_xss($node->title, biblio_get_allowed_tags()));
}
break;
}
}
}
function biblio_form_alter(&$form, $form_state, $form_id) {
if ($form_id == "biblio_node_form") {
if (!isset($form_state['values']['biblio_type']) && empty($form['biblio_type']['#default_value']) && empty($form_state['post']['biblio_type']) && empty($form_state['submitted']) && empty($form['vid']['#value'])) {
foreach (element_children($form) as $form_element) {
if (strstr($form_element, 'biblio_')) {
continue;
}
if ($form[$form_element]['#type'] == 'value' || $form[$form_element]['#type'] == 'hidden' || $form[$form_element]['#type'] == 'token') {
continue;
}
$form[$form_element]['#access'] = FALSE;
}
}
else {
if (isset($form['menu']['#weight']) && $form['menu']['#weight'] < 20) {
$form['menu']['#weight'] = 20;
}
if (isset($form['book']['#weight']) && $form['book']['#weight'] < 20) {
$form['book']['#weight'] = 20;
}
if (isset($form['taxonomy'])) {
if (!isset($form['taxonomy']['#title'])) {
$form['taxonomy'] += array(
'#type' => 'fieldset',
'#title' => t('Vocabularies'),
'#collapsible' => TRUE,
'#collapsed' => FALSE,
);
}
$form['taxonomy']['#description'] = t('Select taxonomy terms which will be related to this %biblio_base_title entry.', array(
'%biblio_base_title' => variable_get('biblio_base_title', 'Biblio'),
));
$form['taxonomy']['copy_to_biblio'] = array(
'#type' => 'checkbox',
'#title' => t('Copy these terms to the biblio keyword database'),
'#return_value' => 1,
'#default_value' => variable_get('biblio_copy_taxo_terms_to_keywords', 0),
'#description' => t('If this option is selected, the selected taxonomy terms will be copied to the %biblio_base_title keyword database and be displayed as keywords (as well as taxonomy terms) for this entry.', array(
'%biblio_base_title' => variable_get('biblio_base_title', 'Biblio'),
)),
);
}
$kw_vocab = variable_get('biblio_keyword_vocabulary', 0);
$freetagging = variable_get('biblio_keyword_freetagging', 0);
if ($freetagging && $kw_vocab && isset($form['taxonomy']['tags'][$kw_vocab])) {
unset($form['taxonomy']['tags'][$kw_vocab]);
}
}
}
return $form;
}
function biblio_form($node, $form_state) {
global $user;
$fields = array();
$tid = isset($form_state['storage']['biblio_type']) ? $form_state['storage']['biblio_type'] : (isset($node->biblio_type) ? $node->biblio_type : '');
$show_fields = !empty($tid);
$form['#validate'][] = 'biblio_form_validate';
$form['#cache'] = TRUE;
$param['options'] = array(
"enctype" => "multipart/form-data",
);
$result = db_query('SELECT t.* FROM {biblio_types} as t WHERE tid > -2 AND visible = 1');
while ($option = db_fetch_object($result)) {
$options[$option->tid] = _biblio_localize_type($option->tid, $option->name);
}
if (!isset($node->nid) && !isset($form_state['storage']['biblio_type'])) {
if ($user->uid > 0 && phpversion() > 5 && !isset($form_state['storage'])) {
$form['biblio_doi_lookup'] = array(
'#type' => 'fieldset',
'#title' => t('DOI Lookup'),
'#weight' => -20,
'#collapsible' => TRUE,
'#collapsed' => TRUE,
);
$pid = '';
if (isset($user->biblio_crossref_pid) && !empty($user->biblio_crossref_pid) && variable_get('biblio_show_crossref_profile_form', '1')) {
$pid = $user->biblio_crossref_pid;
}
else {
$pid = variable_get('biblio_crossref_pid', '');
}
if (empty($pid)) {
$form['biblio_doi_lookup']['doi_register'] = array(
'#prefix' => '<p><b>',
'#suffix' => '</b></p>',
'#value' => t('You need to register with CrossRef (!crossrefurl) and then enter your CrossRef UserID in the "<i>CrossRef Login Information</i>" section of your account profile(!profilelink).', array(
'!crossrefurl' => l('http://www.crossref.org/requestaccount/', 'http://www.crossref.org/requestaccount/', array(
'attributes' => array(
'target' => '_blank',
),
'absolue' => TRUE,
)),
'!profilelink' => l(t('here'), 'user/' . $user->uid . '/edit'),
)),
);
}
$form['biblio_doi_lookup']['doi_data'] = array(
'#type' => 'textfield',
'#title' => t('DOI'),
'#required' => FALSE,
'#default_value' => '',
'#description' => t('Enter a DOI name in the form: <b>10.1000/123456</b>'),
'#disabled' => $have_pid,
'#size' => 60,
'#maxlength' => 255,
'#weight' => -4,
);
$form['biblio_doi_lookup']['doi_submit'] = array(
'#type' => 'submit',
'#disabled' => $have_pid,
'#value' => t('Populate using DOI'),
);
}
if (!isset($form_state['storage'])) {
$form['biblio_cut_paste'] = array(
'#type' => 'fieldset',
'#title' => t('Paste'),
'#weight' => -20,
'#collapsible' => TRUE,
'#collapsed' => TRUE,
);
$form['biblio_cut_paste']['paste_data'] = array(
'#type' => 'textarea',
'#title' => t('BibTex'),
'#required' => FALSE,
'#default_value' => '',
'#description' => t('Paste a BibTex entry here'),
'#size' => 60,
'#maxlength' => 2048,
'#weight' => -4,
);
$form['biblio_cut_paste']['paste_submit'] = array(
'#type' => 'submit',
'#value' => t('Populate using BibTex'),
);
}
}
$form['biblio_type'] = array(
'#type' => 'select',
'#title' => t('Publication Type'),
'#default_value' => $tid,
'#options' => $options,
'#description' => NULL,
'#weight' => -15,
'#attributes' => array(
'onchange' => 'document.getElementById(\'node-form\').submit()',
),
'#multiple' => FALSE,
'#required' => TRUE,
);
if ($show_fields) {
$form['title'] = array(
'#type' => 'textfield',
'#title' => t('Title'),
'#required' => TRUE,
'#default_value' => trim($form_state['values']['title'] ? $form_state['values']['title'] : $node->title),
'#size' => 60,
'#maxlength' => 255,
'#weight' => -4,
);
$result = db_query("SELECT * FROM {biblio_fields} b\n \t\t\t\t\tINNER JOIN {biblio_field_type} bt ON b.fid = bt.fid\n \t\t\t\t\tINNER JOIN {biblio_field_type_data} btd ON btd.ftdid=bt.ftdid\n \t\t\t\t\tWHERE bt.tid=%d ORDER BY bt.weight ASC", $tid);
while ($row = db_fetch_array($result)) {
$fields[$row['name']] = $row;
}
_biblio_localize_fields($fields);
if (!variable_get('biblio_hide_other_fields', 0)) {
$form['other_fields'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => t('Other Biblio Fields'),
'#description' => '',
'#weight' => 0,
);
}
$max_visible_weight = -5;
foreach ($fields as $key => $fld) {
$options = '';
$main_area = $fld['common'] || $fld['visible'];
if ($fld['type'] == 'contrib_widget') {
$auth_category = $fld['fid'];
if ($main_area) {
if (isset($form_state['values'])) {
$form += _biblio_contributor_widget($form_state['values'], $fld, $auth_category, $tid);
}
else {
$form += _biblio_contributor_widget($node, $fld, $auth_category, $tid);
}
}
else {
if (isset($form_state['values']) && !variable_get('biblio_hide_other_fields', 0)) {
$form['other_fields'] += _biblio_contributor_widget($form_state['values'], $fld, $auth_category, $tid, TRUE);
}
elseif (!variable_get('biblio_hide_other_fields', 0)) {
$form['other_fields'] += _biblio_contributor_widget($node, $fld, $auth_category, $tid, TRUE);
}
}
}
else {
if ($key == 'biblio_keywords') {
$sep = check_plain(variable_get('biblio_keyword_sep', ','));
if (isset($form_state['values']['biblio_keywords']) && is_array($form_state['values']['biblio_keywords'])) {
require_once drupal_get_path('module', 'biblio') . '/biblio.keywords.inc';
$form_state['values']['biblio_keywords'] = biblio_implode_keywords($form_state['values']['biblio_keywords']);
}
if (isset($node->{$key}) && is_array($node->{$key})) {
require_once drupal_get_path('module', 'biblio') . '/biblio.keywords.inc';
$node->{$key} = biblio_implode_keywords($node->{$key});
}
if (empty($fld['hint'])) {
$fld['hint'] = t('Separate keywords using the " @sep " character', array(
'@sep' => $sep,
));
}
}
$field_widget = array(
'#default_value' => $form_state['values'][$key] ? $form_state['values'][$key] : $node->{$key},
'#type' => $fld['type'],
'#title' => check_plain($fld['title']),
'#size' => $fld['size'],
'#required' => $fld['required'],
'#maxlength' => $fld['maxsize'],
'#weight' => $fld['weight'] / 10,
'#autocomplete_path' => $fld['autocomplete'] ? 'biblio/autocomplete/' . $fld['name'] : '',
'#description' => check_plain($fld['hint']),
);
if ($key == 'biblio_refereed') {
$field_widget['#options'] = array(
'' => t('None'),
'Refereed' => t('Refereed'),
'Non-Refereed' => t('Non-Refereed'),
'Does Not Apply' => t('Does Not Apply'),
'Unknown' => t('Unknown'),
);
$field_widget['#description'] = t('If you are not sure, set this to Unknown or Does Not Apply');
}
if ($main_area && $fld['type'] == 'textarea') {
$field_widget = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => check_plain($fld['title']),
'#description' => '',
'#weight' => $fld['weight'] / 10,
$key => $field_widget,
);
$key = $fld['name'] . '_field';
}
if ($main_area) {
$form[$key] = $field_widget;
$max_visible_weight = max($max_visible_weight, $field_widget['#weight']);
}
elseif (!variable_get('biblio_hide_other_fields', 0)) {
$form['other_fields'][$key] = $field_widget;
}
}
}
$form['other_fields']['#weight'] = $max_visible_weight + 0.1;
$form['body_field'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => t('Full Text'),
'#description' => '',
'#weight' => $max_visible_weight + 0.2,
);
$form['body_field']['body'] = array(
'#type' => 'textarea',
'#title' => t('Full Text'),
'#default_value' => $node->body,
'#rows' => 10,
'#required' => FALSE,
'#description' => t('You may enter a full text or HTML version of the publication here.'),
'#weight' => 19,
);
$form['body_field']['format'] = filter_form($node->format, 20);
}
return $form;
}
function _biblio_contributor_widget($node, $fld, $auth_category, $biblio_type, $other_fieldset = FALSE) {
$init_count = variable_get('biblio_init_auth_count', 4);
$fldname = $fld['name'];
$type = str_replace('_', '-', $fldname);
if (is_object($node)) {
$contributors = (array) $node->biblio_contributors[$auth_category];
}
else {
$contributors = $node['biblio_contributors'][$auth_category];
}
$contributor_count = max($init_count, count($contributors));
$ctypes = _biblio_get_auth_types($auth_category, $biblio_type);
if (!isset($ctypes)) {
return array();
}
$ctypes = db_query('SELECT * FROM {biblio_contributor_type_data}
WHERE auth_type IN (' . implode(',', $ctypes) . ')');
while ($ctype = db_fetch_object($ctypes)) {
$options[$ctype->auth_type] = $ctype->title;
}
$wrapper = array(
'#tree' => TRUE,
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => !$fld['required'] && count($contributors) == 0,
'#title' => check_plain($fld['title']),
'#weight' => $fld['weight'] / 10,
'#description' => t('Enter a single name per line using a format such as "Smith, John K" or "John K Smith" or "J.K. Smith"'),
'#prefix' => '<div class="clear-block" id="' . $type . '-wrapper">',
'#suffix' => '</div>',
);
$wrapper['biblio_contributors'][$auth_category] = array(
'#prefix' => '<div id="' . $type . '">',
'#suffix' => '</div>',
'#theme' => 'biblio_contributors',
'#id' => $fldname,
'#hideRole' => count($options) <= 1,
);
$default_values = array(
'name' => '',
'cid' => '',
'auth_type' => key($options),
);
for ($delta = 0; $delta < $contributor_count; $delta++) {
if (isset($contributors[$delta])) {
$values = $contributors[$delta];
}
else {
$values = $default_values;
}
$values['rank'] = $delta;
$wrapper['biblio_contributors'][$auth_category][$delta] = _biblio_contributor_form($delta, $auth_category, $values, $options, $fld['autocomplete']);
}
$path = 'biblio/js/' . $biblio_type . '/' . $auth_category . '/' . $fld['autocomplete'];
if ($other_fieldset) {
$path .= '/1';
}
$wrapper[$fldname . '_more'] = array(
'#type' => 'submit',
'#value' => t('More @title', array(
'@title' => $fld['title'],
)),
'#description' => t("If there aren't enough boxes above, click here to add more."),
'#weight' => 1,
'#submit' => array(
'biblio_more_contributors_submit',
),
'#ahah' => array(
'path' => $path,
'wrapper' => $type,
'method' => 'replace',
'effect' => 'fade',
),
);
$form['contributors' . $auth_category . '_wrapper'] = $wrapper;
return $form;
}
function _biblio_contributor_form($delta, $auth_category, $values, $types = NULL, $autocomplete = TRUE) {
$form = array(
'#tree' => TRUE,
);
$form['name'] = array(
'#type' => 'textfield',
'#title' => t('Name'),
'#autocomplete_path' => $autocomplete ? 'biblio/autocomplete/contributor' : '',
'#default_value' => $values['name'],
'#parents' => array(
'biblio_contributors',
$auth_category,
$delta,
'name',
),
);
if (count($types) > 1) {
$form['auth_type'] = array(
'#type' => 'select',
'#title' => t('Type'),
'#default_value' => $values['auth_type'],
'#options' => $types,
'#multiple' => FALSE,
'#parents' => array(
'biblio_contributors',
$auth_category,
$delta,
'auth_type',
),
);
}
else {
$form['auth_type'] = array(
'#type' => 'hidden',
'#value' => $values['auth_type'],
'#parents' => array(
'biblio_contributors',
$auth_category,
$delta,
'auth_type',
),
);
}
$form['cid'] = array(
'#type' => 'hidden',
'#default_value' => $values['cid'],
'#parents' => array(
'biblio_contributors',
$auth_category,
$delta,
'cid',
),
);
$form['rank'] = array(
'#type' => 'textfield',
'#size' => 6,
'#default_value' => $values['rank'],
'#parents' => array(
'biblio_contributors',
$auth_category,
$delta,
'rank',
),
);
return $form;
}
function biblio_contributors_js($tid, $auth_category, $auto_complete, $other_fields = FALSE) {
$delta = count($_POST['biblio_contributors'][$auth_category]);
$ctypes = _biblio_get_auth_types($auth_category, $tid);
$ctypes = db_query('SELECT * FROM {biblio_contributor_type_data}
WHERE auth_type IN (' . implode(',', $ctypes) . ')');
while ($ctype = db_fetch_object($ctypes)) {
$options[$ctype->auth_type] = $ctype->title;
}
$default_values = array(
'name' => '',
'cid' => '',
'auth_type' => key($options),
'rank' => $delta,
);
$form_element = _biblio_contributor_form($delta, $auth_category, $default_values, $options, $auto_complete);
drupal_alter('form', $form_element, array(), 'biblio_contributors_js');
$form_state = array(
'submitted' => FALSE,
);
$form_build_id = $_POST['form_build_id'];
$form = form_get_cache($form_build_id, $form_state);
if ($other_fields) {
$form['other_fields']['contributors' . $auth_category . '_wrapper']['biblio_contributors'][$auth_category][$delta] = $form_element;
}
else {
$form['contributors' . $auth_category . '_wrapper']['biblio_contributors'][$auth_category][$delta] = $form_element;
}
form_set_cache($form_build_id, $form, $form_state);
$form += array(
'#post' => $_POST,
'#programmed' => FALSE,
);
$form = form_builder('biblio_node_form', $form, $form_state);
if ($other_fields) {
$contributor_form = $form['other_fields']['contributors' . $auth_category . '_wrapper']['biblio_contributors'][$auth_category];
}
else {
$contributor_form = $form['contributors' . $auth_category . '_wrapper']['biblio_contributors'][$auth_category];
}
unset($contributor_form['#prefix'], $contributor_form['#suffix']);
$contributor_form[$delta]['#attributes']['class'] = empty($contributor_form[$delta]['#attributes']['class']) ? 'ahah-new-content' : $contributor_form[$delta]['#attributes']['class'] . ' ahah-new-content';
$output = theme('status_messages') . drupal_render($contributor_form);
print drupal_json(array(
'status' => TRUE,
'data' => $output,
));
exit;
}
function biblio_form_validate($form, &$form_state) {
$op = isset($form['#post']['op']) ? $form['#post']['op'] : ($form['#post']['biblio_type'] > 0 ? t('Save') : '');
switch ($op) {
case t('Populate using DOI'):
module_load_include('inc', 'biblio', 'biblio.import.export');
if ($op == t('Populate using DOI') && ($doi_start = strpos($form_state['values']['doi_data'], '10.')) !== FALSE) {
$doi = substr($form_state['values']['doi_data'], $doi_start);
$node_data = biblio_crossref_xml_import($doi);
if (isset($node_data['error'])) {
unset($form_state['values']['biblio_type']);
unset($form_state['post']['biblio_type']);
form_set_error('doi_data', $node_data['error']);
return;
}
}
else {
form_set_error('doi_data', t('This does not appear to be a valid DOI name, it should start with "10." '));
return;
}
break;
case t('Populate using BibTex'):
module_load_include('inc', 'biblio', 'biblio.import.export');
if (strlen($form_state['values']['paste_data'])) {
$node_data = biblio_bibtex_import($form_state['values']['paste_data'], array(), FALSE, NULL, FALSE, TRUE);
}
else {
form_set_error('bibtex_data', t('There does not appear to be any bibtex data to work with '));
return;
}
break;
case t('Save'):
if ($form_state['storage']['biblio_type'] == $form_state['values']['biblio_type'] || !empty($form['#node']->biblio_type) && $form['#node']->biblio_type == $form_state['values']['biblio_type']) {
unset($form_state['storage']);
}
else {
form_set_error(NULL, '', TRUE);
drupal_get_messages('error');
$form_state['storage']['biblio_type'] = $form_state['values']['biblio_type'];
$form_state['submitted'] = TRUE;
$form_state['rebuild'] = TRUE;
return;
}
}
if (!empty($node_data)) {
$form_state['values'] = array_merge($form_state['values'], $node_data[0]);
$form_state['storage']['biblio_type'] = $node_data[0]['biblio_type'];
return;
}
if (isset($form_state['values']['biblio_keywords'])) {
require_once drupal_get_path('module', 'biblio') . '/biblio.keywords.inc';
if (!is_array($form_state['values']['biblio_keywords'])) {
$form_state['values']['biblio_keywords'] = biblio_explode_keywords($form_state['values']['biblio_keywords']);
}
foreach ($form_state['values']['biblio_keywords'] as $keyword) {
if (strlen($keyword) > 255) {
form_set_error('biblio_keywords', t('No single keyword can be greater than 255 characters in length, the word: @kw exceeds this length', array(
'@kw' => $keyword,
)));
}
}
}
}
function _biblio_numeric_year($year) {
if (!is_numeric($year)) {
if (drupal_strtoupper($year) == drupal_strtoupper(t("In Press"))) {
return 9998;
}
if (drupal_strtoupper($year) == drupal_strtoupper(t("Submitted"))) {
return 9999;
}
}
else {
return $year;
}
}
function _biblio_text_year($year) {
if ($year == 9998) {
return check_plain(variable_get('biblio_inpress_year_text', t('In Press')));
}
if ($year == 9999) {
return check_plain(variable_get('biblio_no_year_text', t('Submitted')));
}
return $year;
}
function _biblio_prepare_submit(&$node) {
require_once drupal_get_path('module', 'biblio') . '/biblio.contributors.inc';
$node->biblio_contributors = biblio_parse_contributors($node->biblio_contributors);
$node->biblio_year = _biblio_numeric_year($node->biblio_year);
$node->biblio_coins = biblio_coins($node);
if (variable_get('biblio_auto_citekey', 1) && empty($node->biblio_citekey)) {
$node->biblio_citekey = biblio_citekey_generate($node);
}
$duplicate = biblio_hash($node);
if (isset($duplicate) && $duplicate != $node->nid) {
$dup_map = array(
'vid' => $duplicate,
'did' => $node->nid,
);
drupal_write_record('biblio_duplicates', $dup_map);
}
}
function biblio_insert($node) {
require_once drupal_get_path('module', 'biblio') . '/biblio.keywords.inc';
_biblio_prepare_submit($node);
drupal_write_record('biblio', $node);
biblio_insert_contributors($node);
biblio_insert_keywords($node);
}
function biblio_update($node) {
require_once drupal_get_path('module', 'biblio') . '/biblio.keywords.inc';
_biblio_prepare_submit($node);
if ($node->revision) {
drupal_write_record('biblio', $node);
}
else {
drupal_write_record('biblio', $node, 'vid');
}
biblio_update_contributors($node);
biblio_update_keywords($node);
}
function biblio_delete($node) {
require_once drupal_get_path('module', 'biblio') . '/biblio.contributors.inc';
require_once drupal_get_path('module', 'biblio') . '/biblio.keywords.inc';
db_query('DELETE FROM {biblio} WHERE nid = %d', $node->nid);
biblio_delete_contributors($node);
biblio_delete_keywords($node);
}
function biblio_load($node) {
require_once drupal_get_path('module', 'biblio') . '/biblio.contributors.inc';
require_once drupal_get_path('module', 'biblio') . '/biblio.keywords.inc';
$additions = db_fetch_object(db_query('SELECT b.*, bt.name as biblio_type_name
FROM {biblio} b
LEFT JOIN {biblio_types} bt on b.biblio_type = bt.tid
WHERE b.vid = %d', $node->vid));
$additions->biblio_year = _biblio_text_year($additions->biblio_year);
$additions->biblio_contributors = biblio_load_contributors($node->vid, $additions->biblio_type);
$additions->biblio_keywords = biblio_load_keywords($node->vid);
return $additions;
}
function biblio_citekey_generate($node) {
$php = check_plain(variable_get('biblio_citekey_phpcode', ''));
if (empty($php)) {
$prefix = variable_get('biblio_citekey_prefix', '');
$primary_field = variable_get('biblio_citekey_field1', 'nid');
$secondary_field = variable_get('biblio_citekey_field2', 'nid');
$citekey = !empty($node->{$primary_field}) ? $node->{$primary_field} : (!empty($node->{$secondary_field}) ? $node->{$secondary_field} : $node->nid);
return check_plain($prefix . $citekey);
}
else {
ob_start();
$return = eval($php);
ob_end_clean();
return check_plain(strip_tags((string) $return));
}
}
function biblio_view(&$node, $teaser = FALSE, $page = FALSE) {
if (strlen(trim($node->body))) {
$node = node_prepare($node, $teaser);
}
$style = biblio_get_style();
$base = variable_get('biblio_base', 'biblio');
$base_title = check_plain(variable_get('biblio_base_title', 'Biblio'));
if (variable_get('biblio_fix_isi_links', 0)) {
biblio_fix_isi_links($node);
}
if ($teaser) {
$node->content['teaser']['#value'] = theme('biblio_style', $node, $base, $style);
}
else {
switch (variable_get('biblio_node_layout', '0')) {
case 'orig':
case 'ft':
$node->content['body']['#value'] = theme('biblio_long', $node, $base, $style);
break;
case 'tabular':
default:
$node->content['body']['#value'] = theme('biblio_tabular', $node, $base, $teaser);
break;
}
}
if ($page) {
drupal_set_breadcrumb(array(
l(t('Home'), NULL),
l(drupal_ucfirst($base_title), $base),
));
if (variable_get('biblio_hide_bibtex_braces', 0) && !isset($node->view)) {
$node->title = biblio_remove_brace($node->title);
drupal_set_title(filter_xss($node->title, biblio_get_allowed_tags()));
}
}
return $node;
}
function biblio_block($op = 'list', $delta = 0) {
global $user;
if (user_access('access content')) {
if ($op == 'list') {
$blocks[0]['info'] = t('Most recent publications');
return $blocks;
}
else {
if ($op == 'view') {
$num_in_block = variable_get('biblio_rowsperblock', 4);
$block_order = variable_get('biblio_block_order', 'n.created');
if (variable_get('biblio_view_only_own', 0)) {
$limit .= " AND n.uid = {$user->uid} ";
}
$query = "SELECT n.nid, n.title\n FROM {node} n\n LEFT JOIN {biblio} b on n.vid=b.vid\n WHERE n.type = 'biblio' AND n.status=1 " . $limit . "ORDER BY {$block_order} DESC";
$result = db_query_range(db_rewrite_sql($query), 0, $num_in_block);
$base = variable_get('biblio_base', 'biblio');
$block['subject'] = t('Recent Publications');
$block['content'] = '<div class="item-list"><ul>';
$options['html'] = TRUE;
while ($pub = db_fetch_object($result)) {
if (variable_get('biblio_hide_bibtex_braces', 0)) {
$pub->title = biblio_remove_brace($pub->title);
}
$block['content'] .= '<li >' . l(filter_xss($pub->title, biblio_get_allowed_tags()), "node/{$pub->nid}", $options) . '</li>';
}
$block['content'] .= '</ul>';
if (variable_get('biblio_rss', 0)) {
$block['content'] .= theme('feed_icon', url("{$base}/recent/rss.xml", array(
'absolute' => TRUE,
)), t('Recently Added Publications'));
}
$block['content'] .= l(t('More...'), $base);
$block['content'] .= '</div>';
return $block;
}
}
}
}
function biblio_recent_feed() {
$query = "SELECT *\n FROM {node} AS n\n WHERE n.type = 'biblio' AND n.status=1\n ORDER BY n.created DESC";
$numberInFeed = variable_get('biblio_rss_number_of_entries', 10);
$siteName = variable_get('site_name', 'Drupal');
$base = variable_get('biblio_base', 'biblio');
$result = db_query_range(db_rewrite_sql($query), 0, $numberInFeed);
$channel['title'] = $siteName . ' - ' . t("Recently Added Publications");
$channel['link'] = url($base, array(
'absolute' => TRUE,
));
$channel['description'] = t("This feed lists the %num most recently added publications on %site", array(
'%num' => $numberInFeed,
'%site' => $siteName,
));
$nids = array();
while ($row = db_fetch_object($result)) {
$nids[] = $row->nid;
}
node_feed($nids, $channel);
}
function biblio_filter_feed($query, $terms = NULL, $rss_info = NULL) {
$base = variable_get('biblio_base', 'biblio');
$channel['title'] = $rss_info['title'];
$channel['link'] = url($base . $rss_info['link'], array(
'absolute' => TRUE,
));
$channel['description'] = $rss_info['description'];
$nids = array();
$result = db_query($query, $terms);
while ($row = db_fetch_object($result)) {
$nids[] = $row->nid;
}
node_feed($nids, $channel);
}
function biblio_get_db_fields() {
$fields = array();
$fields[] = 'nid';
$fields[] = 'vid';
$fields[] = 'biblio_type';
$result = db_query('SELECT name FROM {biblio_fields} ');
while ($field = db_fetch_array($result)) {
$fields[] = $field['name'];
}
return $fields;
}
function _biblio_citekey_print($citekey) {
$nid = db_fetch_object(db_query("SELECT nid FROM {biblio} WHERE biblio_citekey = '%s' ORDER BY vid DESC", $citekey));
if ($nid->nid > 0) {
$style = biblio_get_style();
$base = variable_get('biblio_base', 'biblio');
$node = node_load($nid->nid);
return theme('biblio_style', $node, $base, $style);
}
else {
return t("Citekey @cite not found", array(
'@cite' => $citekey,
));
}
}
function biblio_filter_tips($delta, $format, $long = FALSE) {
switch ($delta) {
case 0:
if ($long) {
return t('You can cite references directly into texts with <code><bib><i>citekey</i></bib> <b><i>or</i></b> [bib]<i>citekey</i>[/bib]</code>. This will be replaced with a running number (the publication reference) and the publication referenced by the citekey within the <bib> tags will be printed at the bottom of the page (the reference).');
}
else {
return t('Use <bib><i>citekey</i></bib> <b><i>or</i></b> [bib]<i>citekey</i>[/bib] to insert automatically numbered references.');
}
break;
}
}
function biblio_filter($op, $delta = 0, $format = -1, $text = '') {
if ($op == 'list') {
return array(
0 => t('Biblio module references <bib> <i>or</i> [bib]'),
1 => t('Biblio module inline references <ibib> <i>or</i> [ibib]'),
);
}
if ($op == 'no cache') {
return TRUE;
}
switch ($delta) {
case 0:
switch ($op) {
case 'description':
return t('Use <bib>citekey</bib> or [bib]citebkey[/bib]to insert automatically numbered references.');
case 'prepare':
return $text;
case 'process':
$pattern = array(
'|\\[bib](.*?)\\[/bib]|s',
'|<bib>(.*?)</bib>|s',
);
if (variable_get('biblio_footnotes_integration', 0) && module_exists('footnotes')) {
$text = preg_replace_callback($pattern, '_biblio_filter_footnote_callback', $text);
return $text;
}
else {
$text = preg_replace_callback($pattern, '_biblio_filter_replace_callback', $text);
$footer = '';
$footer = _biblio_filter_replace_callback(NULL, 'output footer');
if (preg_match('/<bibliography(\\/( )?)?>/', $text) > 0) {
$text = preg_replace('/<bibliography(\\/( )?)?>/', $footer, $text, 1);
return $text;
}
else {
return $text . "\n\n" . $footer;
}
}
}
break;
case 1:
switch ($op) {
case 'description':
return t('Use <ibib>citekey</ibib> or [ibib]citebkey[/ibib]to insert inline references.');
case 'prepare':
return $text;
case 'process':
$pattern = array(
'|\\[ibib](.*?)\\[/ibib]|s',
'|<ibib>(.*?)</ibib>|s',
);
$text = preg_replace_callback($pattern, '_biblio_inline_filter_replace_callback', $text);
return $text;
}
break;
}
}
function _biblio_inline_filter_replace_callback($matches) {
$text = _biblio_citekey_print($matches[1]);
return $text;
}
function _biblio_filter_footnote_callback($matches, $square_brackets = FALSE) {
if ($square_brackets) {
$text = '[fn]' . _biblio_citekey_print($matches[1]) . "</fn>";
}
else {
$text = '<fn>' . _biblio_citekey_print($matches[1]) . "</fn>";
}
return $text;
}
function _biblio_filter_replace_callback($matches, $op = '') {
static $n = 0;
static $store_matches = array();
$str = '';
if ($op == 'output footer') {
if ($n > 0) {
$str = '<hr /><h3>' . t('References') . '</h3>';
$str .= '<div class="references"><ol>';
for ($m = 1; $m <= $n; $m++) {
$str .= '<li id="reference' . $m . '"><a name="ref' . $m . '">' . _biblio_citekey_print($store_matches[$m - 1]) . " </a></li>\n\n";
}
$str .= '</ol></div>';
}
$n = 0;
$store_matches = array();
return $str;
}
$ref = array_search($matches[1], $store_matches);
if ($ref === FALSE) {
$n++;
array_push($store_matches, $matches[1]);
$ref = $n;
}
else {
$ref++;
}
$allowed_tags = array();
$title = filter_xss($matches[1], biblio_get_allowed_tags());
$title = str_replace('"', """, $title);
$title = str_replace("\n", " ", $title);
$title = str_replace("\r", "", $title);
if (module_exists('hovertip')) {
$text = '<span hovertip="reference' . $ref . '"><a href="#ref' . $ref . '">[' . $ref . ']</a></span>';
$text .= '<span id="reference' . $ref . '" class="hovertip">' . _biblio_citekey_print($title) . '</span>';
}
else {
$text = '<a href="#ref' . $ref . '" title="Reference ' . $ref . '">[' . $ref . ']</a>';
}
return $text;
}
function biblio_taxonomy($op, $type, $array = NULL) {
if ($op == 'delete' && $type == 'vocabulary' && $array['vid'] == variable_get('biblio_keyword_vocabulary', -1)) {
variable_del('biblio_keyword_freetagging');
variable_del('biblio_keyword_vocabulary');
}
}
function biblio_term_path($term) {
$base = variable_get('biblio_base', 'biblio');
if ($term->vid == variable_get('biblio_collection_vocabulary', 0)) {
return "{$base}/collection/{$term->name}";
}
elseif ($term->vid == variable_get('biblio_keyword_vocabulary', 0)) {
return "{$base}/term_id/{$term->tid}";
}
else {
return;
}
}
function biblio_coins_generate(&$node) {
if ($node) {
$node->biblio_coins = biblio_coins($node);
db_query("UPDATE {biblio}\n SET biblio_coins = '%s'\n WHERE vid = %d", $node->biblio_coins, $node->vid);
}
else {
$result = db_query("SELECT nr.*, b.*\n FROM {node} AS n\n LEFT JOIN {node_revisions} AS nr ON n.vid = nr.vid LEFT JOIN {biblio} AS b ON n.vid = b.vid\n WHERE n.type = 'biblio' ");
while ($node = db_fetch_object($result)) {
$node->biblio_coins = biblio_coins($node);
db_query("UPDATE {biblio}\n SET biblio_coins = '%s'\n WHERE vid = %d", $node->biblio_coins, $node->vid);
}
drupal_goto('');
}
}
function biblio_coins($node) {
$fmt = "info:ofi/fmt:kev:mtx:";
if ($node->biblio_type == 108) {
$fmt .= "dissertation";
}
elseif ($node->biblio_type == 102) {
$fmt .= "journal";
}
elseif ($node->biblio_type == 100 || $node->biblio_type == 101) {
$fmt .= "book";
}
else {
$fmt .= "dc";
}
$co = biblio_contextObject($node);
$coins = "ctx_ver=Z39.88-2004&rft_val_fmt=" . urlencode($fmt);
foreach ($co as $coKey => $coValue) {
$coKey = ereg_replace("au[0-9]*", "au", $coKey);
$coins .= "&" . $coKey . "=" . urlencode($coValue);
}
$coinsSpan = "<span class=\"Z3988\" title=\"" . $coins . "\"></span>";
return $coinsSpan;
}
function biblio_contextObject($node) {
global $base_url;
$co = array();
if ($node->biblio_type == 102 || $node->biblio_type == 101) {
if (!empty($node->title)) {
$co["rft.atitle"] = check_plain($node->title);
}
if (!empty($node->biblio_secondary_title)) {
$co["rft.title"] = check_plain($node->biblio_secondary_title);
if ($node->biblio_type == 101) {
$co["rft.btitle"] = check_plain($node->biblio_secondary_title);
}
}
}
elseif (!empty($node->title)) {
$co["rft.title"] = check_plain($node->title);
}
if ($node->biblio_type == 100 && !empty($node->biblio_secondary_title)) {
$co["rft.btitle"] = check_plain($node->biblio_secondary_title);
}
if (!empty($node->biblio_short_title)) {
$co["rft.stitle"] = check_plain($node->biblio_short_title);
}
if (!empty($node->biblio_tertiary_title)) {
$co["rft.series"] = check_plain($node->biblio_tertiary_title);
}
if (!empty($node->biblio_issn)) {
$co["rft.issn"] = check_plain($node->biblio_issn);
}
if (!empty($node->biblio_isbn)) {
$co["rft.isbn"] = check_plain($node->biblio_isbn);
}
if (!empty($node->biblio_year)) {
$co["rft.date"] = check_plain($node->biblio_year);
}
if (!empty($node->biblio_volume)) {
$co["rft.volume"] = check_plain($node->biblio_volume);
}
if (!empty($node->biblio_issue)) {
$co["rft.issue"] = check_plain($node->biblio_issue);
}
if (!empty($node->biblio_pages)) {
if (ereg("[0-9] *- *[0-9]", $node->biblio_pages)) {
list($pagestart, $pageend) = preg_split('/\\s*[-]\\s*/', $node->biblio_pages);
if ($pagestart < $pageend) {
$co["rft.spage"] = check_plain($pagestart);
$co["rft.epage"] = check_plain($pageend);
}
}
elseif ($node->biblio_type == 100) {
$pagetotal = preg_replace('/^(\\d+)\\s*pp?\\.?$/', "\\1", $node->biblio_pages);
$co["rft.tpages"] = check_plain($pagetotal);
}
else {
$co["rft.spage"] = check_plain($node->biblio_pages);
}
}
if (!empty($node->biblio_contributors)) {
if (!empty($node->biblio_contributors[1][0]['lastname'])) {
$co["rft.aulast"] = check_plain($node->biblio_contributors[1][0]['lastname']);
}
if (!empty($node->biblio_contributors[1][0]['firstname'])) {
$co["rft.aufirst"] = check_plain($node->biblio_contributors[1][0]['firstname']);
}
elseif (!empty($node->biblio_contributors[1][0]['initials'])) {
$co["rft.auinit"] = check_plain($node->biblio_contributors[1][0]['initials']);
}
}
if (!empty($node->biblio_publisher)) {
$co["rft.pub"] = check_plain($node->biblio_publisher);
}
if (!empty($node->biblio_place_published)) {
$co["rft.place"] = check_plain($node->biblio_place_published);
}
if (!empty($node->biblio_doi)) {
$co["rft_id"] = "info:doi/" . check_plain($node->biblio_doi);
}
return $co;
}
function biblio_hash($node) {
static $sums = array();
if (empty($sums)) {
$res = db_query("SELECT nid, biblio_md5 FROM {biblio} ");
while ($md5 = db_fetch_object($res)) {
$sums[$md5->biblio_md5] = $md5->nid;
}
}
$hash_string = str_replace(' ', '', drupal_strtolower($node->title));
$hash_string .= str_replace(' ', '', drupal_strtolower($node->biblio_contributors[1][0]['lastname']));
$hash_string .= $node->biblio_year;
$sum = md5($hash_string);
if (isset($sums[$sum])) {
$duplicate = $sums[$sum];
}
else {
$sums[$sum] = $node->nid;
}
$node->biblio_md5 = $sum;
return $duplicate;
}
function biblio_diff(&$old_node, &$new_node) {
require_once drupal_get_path('module', 'biblio') . '/biblio.contributors.inc';
$result = array();
$old_type = db_fetch_object(db_query('SELECT name FROM {biblio_types} where tid = %d', $old_node->biblio_type));
$new_type = db_fetch_object(db_query('SELECT name FROM {biblio_types} where tid = %d', $new_node->biblio_type));
$result['biblio_type'] = array(
'#name' => 'Publication Type',
'#old' => array(
$old_type->name,
),
'#new' => array(
$new_type->name,
),
'#format' => array(
'show_header' => FALSE,
),
);
$old_node->biblio_contributors = biblio_load_contributors($old_node->vid);
$new_node->biblio_contributors = biblio_load_contributors($new_node->vid);
$db_result = db_query('SELECT b.name, btd.title, bt.weight
FROM {biblio_fields} b
INNER JOIN {biblio_field_type} bt ON bt.fid=b.fid
INNER JOIN {biblio_field_type_data} btd ON btd.ftdid=bt.ftdid
WHERE bt.tid=%d ORDER BY weight', $old_node->biblio_type);
while ($field = db_fetch_object($db_result)) {
$name = $field->name;
$old = $new = '';
if ($field->type == 'contrib_widget') {
foreach ((array) $old_node->biblio_contributors[$field->fid] as $auth) {
$old .= $auth['name'] . ' ';
}
foreach ((array) $old_node->biblio_contributors[$field->fid] as $auth) {
$new .= $auth['name'] . ' ';
}
}
else {
$old = $old_node->{$name};
$new = $new_node->{$name};
}
$result[$name] = array(
'#name' => $field->title,
'#old' => explode("\n", $old),
'#new' => explode("\n", $new),
);
}
return $result;
}
function biblio_token_list($type = 'all') {
if ($type == 'node') {
$tokens['node']['biblio_year'] = t("Biblio: Publication year");
$tokens['node']['biblio_authors'] = t("Biblio: Authors");
$tokens['node']['biblio_type_id'] = t("Biblio: Type ID (e.g.: 100)");
$tokens['node']['biblio_type'] = t("Biblio: Type Name (e.g.: book)");
$tokens['node']['biblio_citekey'] = t("Biblio: Cite Key often used in BibTex files");
return $tokens;
}
}
function biblio_token_values($type, $object = NULL) {
switch ($type) {
case 'node':
if ($object->type == "biblio") {
$type = db_result(db_query('SELECT name FROM {biblio_types} as t WHERE t.tid = %d', $object->biblio_type));
$values['biblio_year'] = check_plain($object->biblio_year);
$values['biblio_authors'] = check_plain($object->biblio_contributors[1][0][lastname]);
$values['biblio_type_id'] = check_plain($object->biblio_type);
$values['biblio_type'] = check_plain($type);
$values['biblio_citekey'] = check_plain($object->biblio_citekey);
return $values;
}
break;
}
$values['biblio_year'] = '';
$values['biblio_authors'] = '';
$values['biblio_type_id'] = '';
$values['biblio_type'] = '';
$values['biblio_citekey'] = '';
return $values;
}
function _biblio_profile_access($user, $type = 'profile') {
if ($type == 'profile') {
$key = 'biblio_show_profile';
}
else {
if ($type == 'menu' && $user->uid > 0) {
$key = 'biblio_my_pubs_menu';
}
else {
return false;
}
}
if (!variable_get('biblio_show_user_profile_form', '1') || !isset($user->{$key})) {
return variable_get($key, '0');
}
else {
return $user->{$key};
}
}
function biblio_get_style() {
global $user;
if (isset($user->biblio_user_style) && $user->biblio_user_style != "system") {
return $user->biblio_user_style;
}
return variable_get('biblio_style', 'cse');
}
function biblio_views_api() {
return array(
'api' => 2,
);
}
function biblio_fix_isi_links(&$node) {
$isi = check_plain(variable_get('biblio_isi_url', 'http://apps.isiknowledge.com/InboundService.do?Func=Frame&product=WOS&action=retrieve&SrcApp=EndNote&Init=Yes&SrcAuth=ResearchSoft&mode=FullRecord&UT='));
if (isset($node->biblio_url) && preg_match('/Go\\s*to\\s*ISI/', $node->biblio_url)) {
$node->biblio_url = str_replace('<Go to ISI>://', $isi, $node->biblio_url);
}
if (isset($node->biblio_accession_number) && preg_match('/^ISI:/', $node->biblio_accession_number)) {
$node->biblio_accession_number = str_replace("ISI:", $isi, $node->biblio_accession_number);
}
}
function biblio_get_allowed_tags() {
return array(
'a',
'b',
'i',
'u',
'sub',
'sup',
'span',
);
}
function biblio_get_title_url_info($node, $base = 'biblio', $inline = FALSE) {
$new_window = NULL;
if (variable_get('biblio_link_title_url', 0) && !empty($node->biblio_url)) {
$path = $node->biblio_url;
if (variable_get('biblio_links_target_new_window', null)) {
$new_window = array(
'target' => '_blank',
);
}
}
else {
$language = isset($node->language) ? $node->language : '';
$view_mode = $inline ? 'viewinline' : 'view';
if (module_exists('biblio_client')) {
$path = $base . '/' . $view_mode . '/' . $node->nid;
}
else {
$node_path = 'node/' . $node->nid;
$path = drupal_get_path_alias($node_path, $language);
}
}
return array(
'link' => $path,
'options' => array(
'attributes' => $new_window,
'html' => TRUE,
),
);
}
function biblio_node_export_node_alter(&$node, $original_node, $method) {
if ($method == 'export') {
foreach ($node->biblio_contributors as $cat => $authors) {
foreach ($authors as $key => $author) {
unset($node->biblio_contributors[$cat][$key]['cid']);
}
}
}
}
