auth_category][$row->biblio_type][] = $row->auth_type;
}
}
$result = $auth_types[$auth_category][$biblio_type];
// fall back to defaults, if no author types are defined for this biblio_type
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 first element of the array
return empty($result) ? NULL : current($result);
}
function _biblio_get_field_information($biblio_type, $only_visible = FALSE) {
$visible = $only_visible ? ' AND (bt.common = 1 OR bt.visible=1) ' : '';
$result = db_query("SELECT b.*, btd.*, btt.name AS type_name
FROM {biblio_fields} AS b
INNER JOIN {biblio_field_type} AS bt ON bt.fid = b.fid
INNER JOIN {biblio_field_type_data} AS btd ON btd.ftdid = bt.ftdid
INNER JOIN {biblio_types} as btt ON btt.tid = bt.tid
WHERE bt.tid = %d $visible
ORDER BY bt.weight ASC", $biblio_type);
while ($row = db_fetch_array($result)) {
$fields[$row['fid']] = $row;
}
return $fields;
}
function biblio_init() {
global $user, $conf;
drupal_add_css(drupal_get_path('module', 'biblio') .'/biblio.css');
if ($user->uid === 0) { // Prevent caching of biblio pages for anonymous users so session variables work and thus filering works
$base = variable_get('biblio_base', 'biblio');
if (drupal_match_path($_GET['q'], "$base\n$base/*"))
$conf['cache'] = FALSE;
}
}
function biblio_theme() {
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_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_tagged_link' => array(
'file' => 'biblio_theme.inc',
'arguments' => array('base', 'nid'),
),
'biblio_xml_link' => array(
'file' => 'biblio_theme.inc',
'arguments' => array('base', 'nid'),
),
'biblio_bibtex_link' => array(
'file' => 'biblio_theme.inc',
'arguments' => array('base', 'nid'),
),
'biblio_export_links' => array(
'file' => 'biblio_theme.inc',
'arguments' => array('nid'),
),
'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 = variable_get('biblio_keyword_sep', ',');
$sep_pos = strrpos($string, $sep); //find the last separator
$start = trim(drupal_substr($string, 0, $sep_pos)); // first part of the string upto the last separator
$end_sep = ($sep_pos) ? $sep_pos + 1 :$sep_pos;
$end = trim(drupal_substr($string, $end_sep)); // part of the string after the last separator
$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)) {
// now glue the word found onto the end of the original string...
$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 .= "". t('General:') ."
";
$text .= "". 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
))) ."
";
$text .= "". t('Filtering Search Results:') ."
";
$text .= "". 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.') ."
";
$text .= "". t('It is possible to create complex filters by returning to the Filter tab and adding additional filters. Simply follow the steps outlined above and press the "Refine" button.') ."
";
$text .= "". t('All filters can be removed by clicking the Clear All Filters link at the top of the result page, or on the Filter tab they can be removed one at a time using the Undo button, or you can remove them all using the Clear All button.') ."
";
$text .= "". 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.') ."
";
$text .= "". t('Exporting Search Results:') ."
";
$text .= "". 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.') ."
";
$text .= "". t('The information is exported in EndNote "Tagged" format similar to this...') ."
". t('
%0 Book
%A John Smith
%D 1959
%T The Works of John Smith
...') .'';
$text .= "". 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.') ."
";
return ($text);
}
/**
* Implementation of hook_help().
*
* Throughout Drupal, hook_help() is used to display help text at the top of
* pages. Some other parts of Drupal pages get explanatory text from these hooks
* as well. We use it here to provide a description of the module on the
* module administration page.
*/
function biblio_help($path, $arg) {
switch ($path) {
case 'admin/help#biblio' :
return biblio_help_page();
case 'admin/modules#description' :
// This description is shown in the listing at admin/modules.
return t('Manages a list of scholarly papers on your site');
case 'node/add#biblio' :
// This description shows up when users click "create content."
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')
)
);
}
/**
* Implementation of hook_access().
*
* Node modules may implement node_access() to determine the operations
* users may perform on nodes. This example uses a very common access pattern.
*/
function biblio_access($op, $node = '') {
global $user;
if ($op == 'admin') {
return user_access('administer biblio');
}
if ($op == 'create') {
// Only users with permission to do so may create this node type.
return user_access('create biblio');
}
if ($op == 'import') {
// Only users with permission to do so may import entries from file.
return user_access('import from file');
}
if ($op == 'edit_author') {
if (user_access('administer biblio') || (user_access('edit biblio authors')))
{
return TRUE;
}
}
if ($op == 'download') {
// Only users with permission to do so may see download links to attached files.
if (user_access('show download links') || (user_access('show own download links') && ($user->uid == $node->uid)))
{
return TRUE;
}
}
if ($op == 'export') {
// Only users with permission to do so may export entries from file.
return user_access('show export links');
}
if ($op == 'rss') {
// Only users with permission to do so may export entries from file.
return variable_get('biblio_rss', 0);
}
// Users who create a node may edit or delete it later, assuming they have the
// necessary permissions.
if ($op == 'update' || $op == 'delete') {
if (user_access('edit own biblio entries') && ($user->uid == $node->uid)) {
return TRUE;
}
else
if (user_access('edit all biblio entries')) {
return TRUE;
}
else {
return FALSE;
}
}
if ($op == 'view') {
if (variable_get('biblio_view_only_own', 0)) {
if ($user->uid == $node->uid) {
return TRUE;
}
else {
return FALSE;
}
}
else {
return TRUE;
}
}
}
/**
* Implementation of hook_perm().
*
* Since we are limiting the ability to create new nodes to certain users,
* we need to define what those permissions are here. We also define a permission
* to allow users to edit the nodes they created.
*/
function biblio_perm() {
return array(
'administer biblio',
'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'
);
}
/**
* Implementation of hook_link().
*
* This is implemented so that an edit link is displayed for users who have
* the rights to edit a node.
*/
function biblio_link($type, $node = NULL, $teaser = FALSE) {
$links = array();
if ($type == 'node' && $node->type == 'biblio') {
// Don't display a redundant edit link if they are node administrators.
if (biblio_access('update', $node) && !user_access('administer nodes')) {
$links['biblio_edit'] = array(
'title' => t('edit this entry'),
'href' => "node/$node->nid/edit"
);
return $links;
}
}
return;
}
/**
* Implementation of hook_link_alter to modifiy taxonomy links
*
* @param $links
* @param $node
* @return none
*/
//function biblio_link_alter(&$links, $node) {
// foreach ($links AS $module => $link) {
// if (strstr($module, 'taxonomy_term')) {
// // Link back to the forum and not the taxonomy term page
// $links[$module]['href'] = str_replace('taxonomy/term', 'biblio/term_id', $link['href']);
// }
// }
//}
/**
* Implementation of hook_user().
*/
function biblio_user($type, & $edit, & $user, $category = NULL) {
if ($type == 'form' && $category == 'account' && variable_get('biblio_show_user_profile_form', '1')) {
$form = array();
include_once drupal_get_path('module', 'biblio') .'/biblio.admin.inc';
_biblio_get_user_profile_form($form, $user);
return $form;
}
if ($type == 'validate' && $category == 'account') { // TODO: this is not reached at all
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.');
form_set_error('biblio_contributor_id', $message);
}
}
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", $user->uid);
db_query('UPDATE {biblio_contributor_data} set drupal_uid = %d WHERE cid = %d ', $user->uid, $edit['biblio_contributor_id']);
}
}
if ($type == 'categories') {
// return array(array('name' => 'account', 'title' => t('Account settings'), 'weight' => 1));
}
}
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;
}
/**
* Return actual argument for %biblio_user placeholders in menu paths
*/
function biblio_user_to_arg($arg) {
// Give back the current user uid when called from eg. tracker, aka.
// with an empty arg. Also use the current user uid when called from
// the menu with a % for the current account link.
return (empty($arg) || $arg == '%') ? $GLOBALS['user']->uid : $arg;
}
/**
* load user object from arg, used for %biblio_user placeholders in menu paths
* @param $uid
* @return $user
*/
function biblio_user_load($uid) {
return user_load($uid);
}
/**
* Implementation of hook_menu().
*
* Here we define some built in links for the biblio module, links exposed are:
*
*
*/
function biblio_menu() {
global $user;
$items = array();
$base = variable_get('biblio_base', 'biblio');
$base_title = 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 content'),
'file' => 'biblio.pages.inc',
//'type' => MENU_CALLBACK
);
$items["$base/authors"] = array(
'title' => t('Authors'),
'page callback' => 'biblio_author_page',
'access callback' => 'user_access',
'access arguments' => array('access content'),
'file' => 'biblio.pages.inc',
'weight' => 1,
);
$items["$base/keywords"] = array(
'title' => t('Keywords'),
'page callback' => 'biblio_keyword_page',
'access callback' => 'user_access',
'access arguments' => array('access content'),
'file' => 'biblio.pages.inc',
'weight' => 2,
);
$items["$base/import"] = array(
'title' => t('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'),
// 'type' => MENU_CALLBACK
'weight' => 10,
);
$items["$base/user/%biblio_user"] = array(
'title' => t('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/backup"] = array(
'title' => '',
'page callback' => 'biblio_backup',
'access callback' => 'user_access',
'access arguments' => array('access content'),
'file' => 'biblio.import.export.inc',
'type' => MENU_CALLBACK
);
*/
$items["$base/pot"] = array(
'title' => '',
'page callback' => 'biblio_dump_db_data_for_pot',
'access callback' => 'user_access',
'access arguments' => array('access content'),
'type' => MENU_CALLBACK);
$items["$base/authors/%/edit"] = array(
'title' => t('Edit author information'),
'page callback' => 'drupal_get_form',
'page arguments' => array('biblio_admin_author_edit_form', 2),
'access callback' => 'biblio_access',
'access arguments' => array('edit_author'),
'file' => 'biblio.admin.inc',
'type' => MENU_CALLBACK);
$items["$base/keyword/%/edit"] = array(
'title' => '',
'page callback' => 'drupal_get_form',
'page arguments' => array('biblio_admin_keyword_edit_form', 2),
'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', 2),
'access callback' => 'user_access',
'access arguments' => array('administer biblio'),
'file' => 'biblio.admin.inc',
'weight' => 1,
'type' => MENU_CALLBACK);
$items["user/%user/$base"] = array(
'title' => t('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
);
// The next two "LOCAL TASKS" are for the admin/settings/biblio page
$items['admin/settings/biblio'] = array(
'title' => t('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' => t('Preferences'),
'type' => MENU_DEFAULT_LOCAL_TASK,
'weight' => -10
);
$items['admin/settings/biblio/import'] = array(
'title' => t('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' => t('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' => t('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' => t('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' => t('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/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_LOCAL_TASK
);
$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' => t('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' => t('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' => t('Authors'),
'page callback' => 'biblio_author_page',
'access callback' => 'user_access',
'access arguments' => array('access content'),
'file' => 'biblio.pages.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -7
);
$items['admin/settings/biblio/author/list'] = array(
'title' => t('List'),
'page callback' => 'biblio_author_page',
'access callback' => 'user_access',
'access arguments' => array('access content'),
'file' => 'biblio.pages.inc',
'type' => MENU_DEFAULT_LOCAL_TASK,
'weight' => -7
);
$items['admin/settings/biblio/author/list/%/edit'] = array(
'title' => t('Edit author information'),
'page callback' => 'drupal_get_form',
'page arguments' => array('biblio_admin_author_edit_form',5),
'access callback' => 'biblio_access',
'access arguments' => array('edit_author'),
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -6
);
$items['admin/settings/biblio/author/orphans'] = array(
'title' => t('Orphaned Authors'),
'page callback' => 'drupal_get_form',
'page arguments' => array('biblio_admin_orphans_form'),
'access arguments' => array('administer biblio'),
'description' => t('Delete orphaned biblio authors.'),
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -6
);
$items['admin/settings/biblio/author/type'] = array(
'title' => t('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' => t('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' => t('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_LOCAL_TASK,
'weight' => -9
);
$items['admin/settings/biblio/author/type/%/delete'] = array(
'title' => t('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_LOCAL_TASK
);
$items['admin/settings/biblio/keyword'] = array(
'title' => t('Keywords'),
'page callback' => 'biblio_keyword_page',
'access callback' => 'user_access',
'access arguments' => array('access content'),
'file' => 'biblio.pages.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -7
);
$items['admin/settings/biblio/keyword/list'] = array(
'title' => t('List'),
'page callback' => 'biblio_keyword_page',
'access callback' => 'user_access',
'access arguments' => array('access content'),
'file' => 'biblio.pages.inc',
'type' => MENU_DEFAULT_LOCAL_TASK,
'weight' => -7
);
$items['admin/settings/biblio/keyword/list/%/edit'] = array(
'title' => t('Edit keyword information'),
'page callback' => 'drupal_get_form',
'page arguments' => array('biblio_admin_keyword_edit_form',5),
'access callback' => 'user_access',
'access arguments' => array('administer biblio'),
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -6
);
$items['admin/settings/biblio/keyword/orphans'] = array(
'title' => t('Orphaned Keywords'),
'page callback' => 'drupal_get_form',
'page arguments' => array('biblio_admin_keyword_orphans_form'),
'access arguments' => array('administer biblio'),
'description' => t('Delete orphaned biblio keywords.'),
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK,
'weight' => -6
);
/* $items['admin/settings/biblio/authors/reset'] = array(
'title' => t('Reset all Author types to defaults'),
'page callback' => 'drupal_get_form',
'page arguments' => array('biblio_admin_author_type_reset_form'),
'access arguments' => array('administer biblio'),
'file' => 'biblio.admin.inc',
'type' => MENU_LOCAL_TASK
);
*/
$items['biblio/autocomplete'] = array(
'title' => 'Autocomplete ',
'page callback' => 'biblio_autocomplete',
'access callback' => 'user_access',
'access arguments' => array('access content'),
'type' => MENU_CALLBACK
);
$items['biblio/js'] = array(
'title' => 'Javascript Contributors Form',
'page callback' => 'biblio_contributors_js',
'access arguments' => array('access content'),
'type' => MENU_CALLBACK,
);
$items["$base/list"] = array(
'title' => t('List'),
'type' => MENU_DEFAULT_LOCAL_TASK,
'weight' => -10
);
$items["$base/filter"] = array(
'title' => t('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 content'),
'type' => MENU_CALLBACK
);
$items["$base/help"] = array(
'title' => t('Help'),
'page callback' => 'biblio_help_page',
'access callback' => 'user_access',
'access arguments' => array('access 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 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 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_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 'presave':
if ($node->type == 'biblio')
{
// $node->body = '';
// $node_clone = clone($node); // we need a clone since objects get passed by reference regardless and we don't want to change the whole node object
// $node->body = theme('biblio_tabular', $node_clone, $base, $teaser);
$style = biblio_get_style();
$node->teaser = theme('biblio_style', $node_clone, $base, $style);
}
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)) {
// _node_index_node performs a node_load without resetting the node_load cache,
// so it would index the old version. We reset the cache here.
// Don't assign node_load to $node because node_load resets e.g. the menus mlid etc.
$mynode = node_load($node->nid, NULL, TRUE);
_node_index_node($mynode);
search_update_totals();
}
break;
}
}
}
function biblio_form_alter(&$form, $form_state, $form_id) {
if ($form_id == "biblio_node_form") { // this next bit is to remove all the form elements execpt the pub type select box the first time through
if (!isset($form_state['values']['biblio_type']) &&
empty($form_state['post']['biblio_type']) &&
empty($form_state['submitted']) &&
empty($form['vid']['#value'])) {
foreach (element_children($form) as $form_element) {
if ($form_element == 'doi_lookup') continue;
if ($form_element == 'cut_paste') continue;
if ($form[$form_element]['#type'] == 'fieldset' ||
$form_element == 'buttons' ||
$form_element == 'taxonomy') {
$form[$form_element] = NULL;
}
}
}
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']['#title'])) {
$form['taxonomy']['#title'] = t('Keyword and Collection Settings (Taxonomy)');
}
$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;
}
/**
* Implementation of hook_form().
*
* Create the form for collecting the information
* specific to this node type. This hook requires us to return some HTML
* that will be later placed inside the form.
*/
function biblio_form($node, $form_state) {
if (isset($form_state['post']['biblio_type'])) {
$tid = $form_state['post']['biblio_type'];
}
elseif (isset($form_state['values']['biblio_type'])) {
$tid = $form_state['values']['biblio_type'];
}
else {
$tid = $node->biblio_type;
}
$show_fields = !empty($tid);
$form['#validate'][] = 'biblio_form_validate';
$form['#cache'] = TRUE;
/* publication type */
$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"] = $option->name;
}
if (!isset($node->nid)) {// only show the doi lookup and paste boxes if this is a new entry
if(phpversion() > 5 && !isset($form_state['storage']['doi'])) {
$form['doi_lookup'] = array(
'#type' => 'fieldset',
'#title' => t('DOI Lookup'),
'#weight' => -20,
'#collapsible' => TRUE,
'#collapsed' => TRUE,
);
$form['doi_lookup']['doi_data'] = array(
'#type' => 'textfield',
'#title' => t('DOI'),
'#required' => FALSE,
'#default_value' => '',
'#description' => t('Enter a DOI name in the form: 10.1000/123456'),
'#size' => 60,
'#maxlength' => 255,
'#weight' => -4
);
$form['doi_lookup']['doi_submit'] = array(
'#type' => 'submit',
'#value' => t('Populate using DOI')
);
}
if(!isset($form_state['storage']['paste'])) {
$form['cut_paste'] = array(
'#type' => 'fieldset',
'#title' => t('Paste'),
'#weight' => -20,
'#collapsible' => TRUE,
'#collapsed' => TRUE,
);
$form['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['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
);
// Build the field array used to make the form
$result = db_query("SELECT * FROM {biblio_fields} b
INNER JOIN {biblio_field_type} bt ON b.fid = bt.fid
INNER JOIN {biblio_field_type_data} btd ON btd.ftdid=bt.ftdid
WHERE bt.tid=%d ORDER BY bt.weight ASC", $tid);
while ($row = db_fetch_array($result)) {
$fields[$row['name']] = $row;
}
$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) {
$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'])) {
$form['other_fields'] += _biblio_contributor_widget($form_state['values'], $fld, $auth_category, $tid, TRUE);
}
else {
$form['other_fields'] += _biblio_contributor_widget($node, $fld, $auth_category, $tid, TRUE);
}
}
}
else {
if ($key == 'biblio_keywords' ) {
$sep = variable_get('biblio_keyword_sep', ',');
// is the kewords are in array form, then implode them into a string.
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 (!empty($node->$key) && is_array($node->$key)) {
require_once(drupal_get_path('module', 'biblio') .'/biblio.keywords.inc');
$node->$key = biblio_implode_keywords($node->$key);
}
$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' => $fld['title'],
'#size' => $fld['size'],
'#required' => $fld['required'],
'#maxlength' => $fld['maxsize'],
'#weight' => $fld['weight'] / 10,
'#autocomplete_path' => ($fld['autocomplete']) ? 'biblio/autocomplete/'. $fld['name'] : '',
'#description' => $fld['hint']
);
if ($main_area && $fld['type'] == 'textarea') {
/* wrap all textarea fields in collapsed field sets to save space on the page */
$field_widget = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => $fld['title'],
'#description' => '',
'#weight' => $fld['weight'] / 10,
$key => $field_widget
);
$key = $fld['name'] .'_field';
}
// embed field directly or in "Other Fields" fieldset
if ($main_area) {
$form[$key] = $field_widget;
$max_visible_weight = max($max_visible_weight, $field_widget['#weight']);
}
else {
$form['other_fields'][$key] = $field_widget;
}
}
}
// place 'Other biblio fields' directly below visible fields
$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
);
// embed filter form in "Full Text" fieldset, because it applies to the full text only
$form['body_field']['format'] = filter_form($node->format, 20);
}
return $form;
}
/**
* @param $node
* @param $fld
* @param $auth_category
* @param $biblio_type
* @param $other_fields
* @return contributor fieldset form
*/
function _biblio_contributor_widget($node, $fld, $auth_category, $biblio_type, $other_fieldset = FALSE) {
$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(4, count($contributors));
$ctypes = _biblio_get_auth_types($auth_category, $biblio_type);
// if no author types are available skip this widget
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;
}
// Add a wrapper for the choices and more button.
$wrapper = array(
'#tree' => TRUE,
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => !$fld['required'] && (count($contributors)==0),
'#title' => $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' => '',
'#suffix' => '
'
);
// Container for just the contributors.
$wrapper['biblio_contributors'][$auth_category] = array(
'#prefix' => '',
'#suffix' => '
',
'#theme' => 'biblio_contributors',
'#id' => $fldname,
'#hideRole' => count($options) <= 1,
);
// Add the current choices to the form.
$default_values = array('name' => '', 'cid' => '', 'auth_type' => key($options));
for ($delta = 0; $delta < $contributor_count; $delta++) {
if (isset($contributors[$delta])) { // contributor already exists
$values = $contributors[$delta];
}
else { // contributor is new
$values = $default_values;
}
$values['rank'] = $delta;
$wrapper['biblio_contributors'][$auth_category][$delta]
= _biblio_contributor_form($delta, $auth_category, $values, $options, $fld['autocomplete']);
}
// We name our button 'contrib_more' to avoid conflicts with other modules using
// AHAH-enabled buttons with the id 'more'.
$path = 'biblio/js/'. $biblio_type .'/'. $auth_category;
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'), // If no javascript action.
'#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
);
// We'll manually set the #parents property of these fields so that
// their values appear in the $form_state['values']['choice'] array.
$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, $other_fields = FALSE) {
$delta = count($_POST['biblio_contributors'][$auth_category]);
// Build our new form element.
$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);
drupal_alter('form', $form_element, array(), 'biblio_contributors_js');
// Build the new form.
$form_state = array('submitted' => FALSE);
$form_build_id = $_POST['form_build_id'];
// Add the new element to the stored form. Without adding the element to the
// form, Drupal is not aware of this new elements existence and will not
// process it. We retreive the cached form, add the element, and resave.
$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
);
// Rebuild the form.
$form = form_builder('biblio_node_form', $form, $form_state);
// Render the new output.
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']); // Prevent duplicate wrappers.
$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();
}
/**
* Implementation of hook_validate().
*
*
* Errors should be signaled with form_set_error().
*/
function biblio_form_validate($form, & $form_state) {
$op = $form['#post']['op'];
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;
default:
if ($form_state['storage'] == $form_state['values']['biblio_type'] || (!empty($form['#node']->biblio_type) && $form['#node']->biblio_type == $form_state['values']['biblio_type'])) {
$form_state['storage'] = "";
$form_state['rebuild'] = FALSE;
}
else {
$form_state['storage']['doi'] = TRUE;
$form_state['storage']['paste'] = TRUE;
$form_state['storage'] = $form_state['values']['biblio_type'];
$form_state['rebuild'] = TRUE;
return;
}
}
if(!empty($node_data)) {
foreach($node_data[0] as $key => $value) {
$form_state['values'][$key] = $value;
}
$form_state['storage']['doi'] = TRUE;
$form_state['storage']['paste'] = TRUE;
$form_state['rebuild'] = TRUE;
return;
}
$today = getdate();
if (!is_numeric(_biblio_numeric_year($form_state['values']['biblio_year']))) {
form_set_error('biblio_year', t('Year of Publication must be a number between 1 and @thisyear or the words "In Press" or "Submitted" ', array('@thisyear' => $today['year'] + 1 )));
}
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 t("In Press");
if ($year == 9999) return t("Submitted");
return $year;
}
/**
* Prepare a node for submit to database. Contains code common to insert and update.
* @param $node
* @return none
*/
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) { // if this is a potential duplcate, write the nids of the pre-existing and new nodes
$dup_map = array('vid' => $duplicate, 'did' => $node->nid);
drupal_write_record('biblio_duplicates', $dup_map);
}
}
/**
* Implementation of hook_insert().
*
* As a new node is being inserted into the database, we need to do our own
* database inserts.
*/
function biblio_insert($node) {
require_once(drupal_get_path('module', 'biblio') .'/biblio.keywords.inc');
_biblio_prepare_submit($node);
drupal_write_record('biblio', $node);
biblio_save_contributors($node);
biblio_save_keywords($node);
}
/**
* Implementation of hook_update().
*
* As an existing node is being updated in the database, we need to do our own
* database updates.
*/
function biblio_update($node) {
require_once(drupal_get_path('module', 'biblio') .'/biblio.keywords.inc');
_biblio_prepare_submit($node);
// Update the node in the database:
if ($node->revision) {
drupal_write_record('biblio', $node);
}
else {
drupal_write_record('biblio', $node, 'vid');
}
biblio_save_contributors($node, TRUE);
if (variable_get('biblio_auto_orphaned_author_delete', 0)) {
db_query('DELETE FROM {biblio_contributor_data} WHERE cid NOT IN (SELECT DISTINCT(cid) FROM {biblio_contributor})');
}
biblio_save_keywords($node);
}
/**
* Implementation of hook_delete().
*
* When a node is deleted, we need to clean up related tables.
*/
function biblio_delete($node) {
//first remove data from the biblio table
db_query('DELETE FROM {biblio} WHERE nid = %d', $node->nid);
//now remove the entries from the contributor linking table
db_query('DELETE FROM {biblio_contributor} WHERE nid = %d', $node->nid);
if (variable_get('biblio_auto_orphaned_author_delete', 0)) {
db_query('DELETE FROM {biblio_contributor_data} WHERE cid NOT IN (SELECT DISTINCT(cid) FROM {biblio_contributor})');
}
db_query('DELETE FROM {biblio_keyword} WHERE nid = %d', $node->nid);
}
/**
* Implementation of hook_load().
*
* This hook is called
* every time a node is loaded, and allows us to do some loading of our own.
*
*/
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 = 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 $prefix . $citekey;
}
else {
ob_start();
$return = eval($php);
ob_end_clean();
return check_plain(strip_tags((string)$return));
}
}
/**
* Implementation of hook_view().
*
*/
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 = variable_get('biblio_base_title', 'Biblio');
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)));
}
return $node;
}
/**
* Implementation of hook_block().
*
* Generates a block containing the latest poll.
*/
function biblio_block($op = 'list', $delta = 0) {
if (user_access('access content')) {
if ($op == 'list') {
$blocks[0]['info'] = t('Most recent publications');
return $blocks;
}
else
if ($op == 'view') {
// Retrieve the latest pubs
$num_in_block = variable_get('biblio_rowsperblock', 4);
$block_order = variable_get('biblio_block_order', 'n.created');
$query = "SELECT COUNT(*)
FROM {node} n
LEFT JOIN {biblio} b on n.vid=b.vid
WHERE n.type = 'biblio' AND n.status=1";
$num_rows = db_result(db_query_range(db_rewrite_sql($query), 0, $num_in_block));
if ($num_rows) {
$query = "SELECT n.nid, n.title, n.status, b.biblio_year
FROM {node} n
LEFT JOIN {biblio} b on n.vid=b.vid
WHERE n.type = 'biblio' AND n.status=1
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(variable_get('biblio_block_title', 'Recent Publications'));
$block['content'] = '';
while ($pub = db_fetch_object($result)) {
$block['content'] .= '- '. l("$pub->title", "node/$pub->nid") .'
';
}
$block['content'] .= '
';
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, array('attributes' => array('style' => "float: right")));
$block['content'] .= '
<bib>citekey</bib> or [bib]citekey[/bib]. 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>citekey</bib> or [bib]citekey[/bib] to insert automatically numbered references.');
}
break;
}
}
/**
* Implementation of hook_filter().
*
* The bulk of filtering work is done here. This hook is quite complicated, so
* we'll discuss each operation it defines.
*/
function biblio_filter($op, $delta = 0, $format = -1, $text = '') {
// The "list" operation provides the module an opportunity to declare both how
// many filters it defines and a human-readable name for each filter. Note that
// the returned name should be passed through t() for translation.
if ($op == 'list') {
return array(
0 => t('Biblio module references <bib> or [bib]'),
);
}
if ($op == 'no cache') {
return TRUE;
}
// All operations besides "list" provide a $delta argument so we know which
// filter they refer to. We'll switch on that argument now so that we can
// discuss each filter in turn.
switch ($delta) {
// First is the html footnotes filter
case 0 :
switch ($op) {
// This description is shown in the administrative interface, unlike the
// filter tips which are shown in the content editing interface.
case 'description' :
return t('Use <bib>citekey</bib> or [bib]citebkey[/bib]to insert automatically numbered references.');
// We don't need the "prepare" operation for this filter, but it's required
// to at least return the input text as-is.
//TODO: May need to escape if we use HTML filter too, but Footnotes could be first
case 'prepare' :
return $text;
// The actual filtering is performed here. The supplied text should be
// returned, once any necessary substitutions have taken place.
case 'process' :
$pattern = array('|\[bib](.*?)\[/bib]|s', '|(.*?)|s');
if (variable_get('biblio_footnotes_integration', 0) && module_exists('footnotes')) { // this is used with footnote module integration to replace the tags with tags
$text = preg_replace_callback($pattern, '_biblio_filter_footnote_callback', $text);
return $text;
}
else {
$text = preg_replace_callback($pattern, '_biblio_filter_replace_callback', $text);
//Replace tag with the list of footnotes.
//If tag is not present, by default add the footnotes at the end.
//Thanks to acp on drupal.org for this idea. see http://drupal.org/node/87226
$footer = '';
$footer = _biblio_filter_replace_callback(NULL, 'output footer');
if (preg_match('//', $text) > 0) {
$text = preg_replace('//', $footer, $text, 1);
return $text;
}
else {
return $text ."\n\n". $footer;
}
}
}
break;
}
}
function _biblio_filter_footnote_callback($matches, $square_brackets = FALSE) {
if ($square_brackets) {
$text = '[fn]'. _biblio_citekey_print($matches[1]) ."";
} else {
$text = ''. _biblio_citekey_print($matches[1]) ."";
}
return $text;
}
/**
* Helper function called from preg_replace_callback() above
*
* Uses static vars to temporarily store footnotes found.
* In my understanding, this is not threadsafe?!
*/
function _biblio_filter_replace_callback($matches, $op = '') {
static $n = 0;
static $store_matches = array();
$str = '';
if ($op == 'output footer') {
if ($n > 0) {
$str = '
'. t('References') .'
';
$str .= '';
for ($m = 1; $m <= $n; $m++) {
$str .= '- '. _biblio_citekey_print($store_matches[$m -1]) ."
\n\n";
}
$str .= '
Reference
'. _biblio_citekey_print($title) .'';
}
return $text;
}
function biblio_taxonomy($op, $type, $array = NULL) {
if ($op == 'delete' && $term['vid'] == variable_get('biblio_keyword_vocabulary', 0)) {
switch ($type) {
case 'term' :
break;
case 'vocabulary' :
variable_del('biblio_keyword_freetagging');
variable_del('biblio_keyword_vocabulary');
break;
}
}
}
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}
SET biblio_coins = '%s'
WHERE vid = %d", $node->biblio_coins, $node->vid);
}
else {
$result = db_query("SELECT nr.*, b.*
FROM {node} AS n
LEFT JOIN {node_revisions} AS nr ON n.vid = nr.vid LEFT JOIN {biblio} AS b ON n.vid = b.vid
WHERE n.type = 'biblio' ");
while ($node = db_fetch_object($result)) {
$node->biblio_coins = biblio_coins($node);
db_query("UPDATE {biblio}
SET biblio_coins = '%s'
WHERE vid = %d", $node->biblio_coins, $node->vid);
}
drupal_goto('');
}
}
function biblio_coins($node) {
// Copyright: Matthias Steffens and the file's
// original author.
// Original Author: Richard Karnesky //
// Adapted for biblio: Ron Jerome
// fmt_info (type)
$fmt = "info:ofi/fmt:kev:mtx:";
// 'dissertation' is compatible with the 1.0 spec, but not the 0.1 spec
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";
// 'dc' (dublin core) is compatible with the 1.0 spec, but not the 0.1 spec.
// We default to this, as it is the most generic type.
else
$fmt .= "dc";
$co = biblio_contextObject($node);
$coins = "ctx_ver=Z39.88-2004&rft_val_fmt=". urlencode($fmt);
foreach ($co as $coKey => $coValue) {
// 'urlencode()' differs from 'rawurlencode() (i.e., RFC1738 encoding)
// in that spaces are encoded as plus (+) signs
$coKey = ereg_replace("au[0-9]*", "au", $coKey);
$coins .= "&". $coKey ."=". urlencode($coValue);
}
$coinsSpan = "";
return $coinsSpan;
}
function biblio_contextObject($node) {
// Copyright: Matthias Steffens and the file's
// original author.
// Original Author: Richard Karnesky //
// Adapted for biblio: Ron Jerome
global $base_url;
// $openurl_base = variable_get('biblio_baseopenurl', '');
$co = array();
// rfr_id
$co["rfr_id"] = "info:sid/". ereg_replace("http://", "", $base_url);
// genre (type)
if (isset($node->biblio_type)) {
if ($node->biblio_type == 102)
$co["rft.genre"] = "article";
elseif ($node->biblio_type == 101) $co["rft.genre"] = "bookitem";
elseif ($node->biblio_type == 100) $co["rft.genre"] = "book";
elseif ($node->biblio_type == "Journal") $co["rft.genre"] = "journal";
}
// atitle, btitle, title (title, publication)
if (($node->biblio_type == 102) || ($node->biblio_type == 101)) {
if (!empty($node->title)) $co["rft.atitle"] = $node->title;
if (!empty($node->biblio_secondary_title)) {
$co["rft.title"] = $node->biblio_secondary_title;
if ($node->biblio_type == 101)
$co["rft.btitle"] = $node->biblio_secondary_title;
}
}
elseif (!empty($node->title)) {
$co["rft.title"] = $node->title;
}
if (($node->biblio_type == 100) && (!empty($node->title))) $co["rft.btitle"] = $node->title;
// stitle (abbrev_journal)
if (!empty($node->biblio_short_title)) $co["rft.stitle"] = $node->biblio_short_title;
// series (series_title)
if (!empty($node->biblio_tertiary_title)) $co["rft.series"] = $node->biblio_tertiary_title;
// issn
if (!empty($node->biblio_issn)) $co["rft.issn"] = $node->biblio_issn;
// isbn
if (!empty($node->biblio_isbn)) $co["rft.isbn"] = $node->biblio_isbn;
// date (year)
if (!empty($node->biblio_year)) $co["rft.date"] = $node->biblio_year;
// volume
if (!empty($node->biblio_volume)) $co["rft.volume"] = $node->biblio_volume;
// issue
if (!empty($node->biblio_issue)) $co["rft.issue"] = $node->biblio_issue;
// spage, epage, tpages (pages)
// NOTE: lifted from modsxml.inc.php--should throw some into a new include file
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"] = $pagestart;
$co["rft.epage"] = $pageend;
}
}
elseif ($node->biblio_type == 100) { //"Book Whole") {
$pagetotal = preg_replace('/^(\d+)\s*pp?\.?$/', "\\1", $node->biblio_pages);
$co["rft.tpages"] = $pagetotal;
}
else {
$co["rft.spage"] = $node->biblio_pages;
}
}
// aulast, aufirst, author (author)
if (!empty($node->biblio_contributors)) {
if (!empty($node->biblio_contributors[1][0]['lastname'])) {
$co["rft.aulast"] = $node->biblio_contributors[1][0]['lastname'];
}
if (!empty($node->biblio_contributors[1][0]['firstname'])) {
$co["rft.aufirst"] = $node->biblio_contributors[1][0]['firstname'];
}
elseif (!empty($node->biblio_contributors[1][0]['initials'])) {
$co["rft.aufirst"] = $node->biblio_contributors[1][0]['initials'];
}
foreach((array)$node->biblio_contributors[1] as $author) {
if (!empty($author['lastname'])) {
$au = $author['lastname'];
if (!empty($author['firstname']) || !empty($author['initials'])) $au .= ", ";
}
if (!empty($author['firstname'])) {
$au .= $author['firstname'];
}
elseif (!empty($author['initials'])) {
$au .= $author['initials'];
}
if (!empty($au)) $co["rft.au".$i++] = $au;
}
}
// pub (publisher)
if (!empty($node->biblio_publisher)) $co["rft.pub"] = $node->biblio_publisher;
// place
if (!empty($node->biblio_place_published)) $co["rft.place"] = $node->biblio_place_published;
// id (doi, url)
if (!empty($node->biblio_doi)) {
$co["rft_id"] = "info:doi/". $node->biblio_doi;
}
elseif (!empty($node->biblio_url)) {
$co["rft_id"] = $node->biblio_url;
}
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; //return the nid of the potential duplicate
}
function biblio_dump_db_data_for_pot() {
$query = "SELECT name, description FROM {biblio_types} ";
$result = db_query($query);
while ($type = db_fetch_object($result)) {
$output .= "msgid \"$type->name\"\nmsgstr \"\"\n\n";
if (!empty($type->description))
$output .= "msgid \"$type->description\"\nmsgstr \"\"\n\n";
}
$query = "SELECT title, hint FROM {biblio_field_type_data} ";
$result = db_query($query);
while ($type_data = db_fetch_object($result)) {
$output .= "msgid \"$type_data->title\"\nmsgstr \"\"\n\n";
if (!empty($type_data->hint))
$output .= "msgid \"$type_data->hint\"\nmsgstr \"\"\n\n";
}
$query = "SELECT title, hint FROM {biblio_contributor_type_data} ";
$result = db_query($query);
while ($type_data = db_fetch_object($result)) {
$output .= "msgid \"$type_data->title\"\nmsgstr \"\"\n\n";
if (!empty($type_data->hint))
$output .= "msgid \"$type_data->hint\"\nmsgstr \"\"\n\n";
}
drupal_set_header('Content-Type: text/plain; charset=utf-8');
drupal_set_header('Content-Disposition: attachment; filename=biblio_db_values.pot');
print $output;
}
/**
* An implementation of hook_diff (from the diff module)
* @param $old_node
* @param $new_node
* @return unknown_type
*/
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)");
return $tokens;
}
}
/**
* Implementation of hook_token_values() for og specific 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));
#$title = db_result(db_query("SELECT title FROM {node} WHERE nid = %d", $gid));
$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);
return $values;
}
break;
}
// No group info found. Return defaults.
$values['biblio_year'] = '';
$values['biblio_authors'] = '';
$values['biblio_type_id'] = '';
$values['biblio_type'] = '';
return $values;
}
function _biblio_profile_access($user, $type = 'profile') {
if ($type == 'profile') $key = 'biblio_show_profile';
else if ($type == 'menu') $key = 'biblio_my_pubs_menu';
else return false;
// if user cannot override site settings or user hasn't yet made its selection, we use site default
if (!variable_get('biblio_show_user_profile_form', '1') || !isset($user->$key))
return variable_get($key, '0'); // return site default
else return $user->$key; // return user setting
}
/*
* Helper function to get either the user or system style
*/
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');
}
/**
* Implementation of hook_views_api().
*/
function biblio_views_api() {
return array(
'api' => 2,
);
}