$version,
);
$form['biblio_base'] = array(
'#type' => 'textfield',
'#title' => t('Base URL'),
'#size' => 20,
'#default_value' => variable_get('biblio_base', 'biblio'),
'#description' => t('This sets the base URL used to access the biblio module (e.g. /biblio ).')
);
$form['biblio_base_title'] = array(
'#type' => 'textfield',
'#title' => t('Biblio page title'),
'#size' => 20,
'#default_value' => variable_get('biblio_base_title', 'Biblio'),
'#description' => t('The page title shown on the base URL.')
);
$form['biblio_rowsperpage'] = array(
'#type' => 'textfield',
'#title' => t('Number of results per page'),
'#default_value' => variable_get('biblio_rowsperpage', 25),
'#size' => 6,
'#maxlength' => 6,
'#description' => t('This sets the number of results that will be displayed per page.')
);
$form['biblio_view_only_own'] = array(
'#type' => 'checkbox',
'#title' => t('Restrict users such that they can only view their own biblio entries'),
'#return_value' => 1,
'#default_value' => variable_get('biblio_view_only_own', 0),
'#description' => t('This option restricts the users capability to view biblio entries. They will only be able to see the entries which they have created and own.')
);
$form['block'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => t('Block settings'),
'#description' => ''
);
$form['block']['biblio_block_title'] = array(
'#type' => 'textfield',
'#title' => t('Title for the "New Publications" block'),
'#default_value' => variable_get('biblio_block_title', 'New Publications'),
'#size' => 40,
'#maxlength' => 40,
'#description' => ''
);
$form['block']['biblio_rowsperblock'] = array(
'#type' => 'textfield',
'#title' => t('Number of results in the "New Publications" block'),
'#default_value' => variable_get('biblio_rowsperblock', 4),
'#size' => 2,
'#maxlength' => 2,
'#description' => t('This sets the number of results that will be displayed in the "New Publications" block.')
);
$form['block']['biblio_block_order'] = array(
'#type' => 'radios',
'#title' => t('Order by'),
'#default_value' => variable_get('biblio_block_order', 'n.created'),
'#options' => array(
'n.created' => t('Date Created'),
'b.biblio_year' => t('Year Published')
)
);
$result = db_query("SELECT b.name, bftd.title FROM {biblio_fields} b
INNER JOIN {biblio_field_type} bt ON bt.fid=b.fid
INNER JOIN {biblio_field_type_data} bftd ON bftd.ftdid=bt.ftdid
WHERE bt.tid=0 ORDER by bftd.title ASC ");
$schema = drupal_get_schema('biblio');
$keys = array_keys($schema['fields']);
$options = array();
$options['nid'] = t('Node ID');
while ($row = db_fetch_array($result)) {
$options[$row['name']] = $row['title'];
}
$form['citekey'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => t('Citekey'),
'#description' => t('You can alter citekey related settings here.')
);
$form['citekey']['biblio_display_citation_key'] = array(
'#type' => 'checkbox',
'#title' => t('Show citation key in results'),
'#return_value' => 1,
'#default_value' => variable_get('biblio_display_citation_key', 0),
'#description' => t('This will output the citekey as the first item in the citation string')
);
$form['citekey']['biblio_auto_citekey'] = array(
'#type' => 'checkbox',
'#title' => t('Auto generate citekeys if not given'),
'#return_value' => 1,
'#default_value' => variable_get('biblio_auto_citekey', 1),
'#description' => t('This option will cause "citekey" entries to be automatically generated if a value is not provided.')
);
$form['citekey']['biblio_citekey_prefix'] = array(
'#type' => 'textfield',
'#title' => t('Citekey prefix'),
'#default_value' => variable_get('biblio_citekey_prefix', ''),
'#size' => 10,
'#maxlength' => 10,
'#description' => t('This text will be combined with the field choosen below to form the auto generated citekey.')
);
$form['citekey']['biblio_citekey_field1'] = array(
'#type' => 'select',
'#title' => t('Primary Citekey field'),
'#default_value' => variable_get('biblio_citekey_field1', 'nid'),
'#options' => $options,
'#description' => t('Select the field to be used when generating citekeys.')
);
$form['citekey']['biblio_citekey_field2'] = array(
'#type' => 'select',
'#title' => t('Secondary Citekey field'),
'#default_value' => variable_get('biblio_citekey_field2', 'nid'),
'#options' => $options,
'#description' => t('If the field above has no value this field will be used.')
);
// Allow only users to modify PHP code which have PHP block visibility permissions
if (user_access('use PHP for block visibility')) {
$form['citekey']['biblio_citekey_phpcode'] = array(
'#type' => 'textarea',
'#title' => t('PHP code for citekey generation'),
'#default_value' => variable_get('biblio_citekey_phpcode', ''),
'#description' => t('Advanced usage only: PHP code that returns the citekey. Should not include <?php ?> delimiters.')
);
}
$form['footnotes'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => t('Footnotes'),
'#description' => t('You can integrate with the !url module here.', array('!url' => l('footnotes', url("http://www.drupal.org/project/footnotes", array('query' => NULL, 'fragment' => NULL, 'absolute' => TRUE)))))
);
if (!module_exists('footnotes')) {
$additional_text = ''. t('Depends on') .': '. t('Footnotes') .' ('. t('disabled') .')
';
$disabled = TRUE;
variable_set('biblio_footnotes_integration', 0);
}
else {
$additional_text = ''. t('Depends on') .': '. t('Footnotes') .' ('. t('enabled') .')
';
$disabled = FALSE;
}
$form['footnotes']['biblio_footnotes_integration'] = array(
'#type' => 'checkbox',
'#title' => t('Integration with the footnotes module') . $additional_text,
'#disabled' => $disabled,
'#return_value' => 1,
'#default_value' => variable_get('biblio_footnotes_integration', 0),
'#description' => t('This will convert <bib> tags into <fn> tags. This will cause intermingled <bib> and <fn> tags to be sequentially numbered. For this to work, you must put the <bib> filter ahead of the <fn> filter in the filter chain. If this option is not set, <bib> and <fn> tags will be handled separately.')
);
$form['keywords'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => t('Keywords'),
'#description' => ''
);
$form['keywords']['biblio_keyword_sep'] = array(
'#type' => 'textfield',
'#title' => t('Keyword separator'),
'#size' => 2,
'#default_value' => variable_get('biblio_keyword_sep', ','),
'#description' => t('Enter the character which will be used to separate multiple keywords in the keyword field')
);
$form['keywords']['biblio_keyword_orphan_autoclean'] = array(
'#type' => 'checkbox',
'#title' => t('Automatically remove orphaned keywords'),
'#return_value' => 1,
'#default_value' => variable_get('biblio_keyword_orphan_autoclean', 1),
'#description' => t('This option automatically deletes keywords which are no longer associated with any publications (primarily due to the due to the removal of a publication or editing a keyword).')
);
$form['keywords']['biblio_keyword_freetagging'] = array(
'#type' => 'checkbox',
'#title' => t('Use keywords from biblio entries as taxonomy "free tags"'),
'#return_value' => 1,
'#default_value' => variable_get('biblio_keyword_freetagging', 1),
'#description' => t('This option allows user to add keywords (free tags) to describe their documents. These keywords will be registered as taxonomy.')
);
$vocabularies = module_invoke('taxonomy', 'get_vocabularies');
// ... and print a form to select the terms in each of them
$taxo_options = array();
$taxo_options[0]= '<'. t('none') .'>';
if (count($vocabularies)) {
foreach ($vocabularies as $voc) {
$taxo_options[$voc->vid] = $voc->name;
}
$form['keywords']['biblio_keyword_vocabulary'] = array(
'#type' => 'select',
'#title' => t('Vocabulary'),
'#default_value' => variable_get('biblio_keyword_vocabulary', 0),
'#options' => $taxo_options,
'#description' => t('Select vocabulary (category) to use for free tags.'),
'#multiple' => FALSE,
// '#disabled' => (!variable_get('biblio_keyword_freetagging', 0)),
// '#size' => $multiple ? min(9, count($taxo_options)) : 0,
'#weight' => 15
);
}
$form['links'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => t('Links')
);
$form['links']['biblio_links_target_new_window'] = array(
'#type' => 'checkbox',
'#title' => t('Links open in new browser'),
'#return_value' => 1,
'#default_value' => variable_get('biblio_links_target_new_window', 0),
'#description' => t('This causes related URLs to open in a new browser window')
);
/* $form['links']['biblio_inlinemode_in_links'] = array(
'#type' => 'checkbox',
'#title' => t('Carry "inline" mode through to all links'),
'#return_value' => 1,
'#default_value' => variable_get('biblio_inlinemode_in_links', 0),
'#description' => t('This causes the "inline" mode to be applied to all links such as titles, authors and keywords') );
*/
$form['links']['biblio_link_title_url'] = array(
'#type' => 'checkbox',
'#title' => t('Hyperlink titles using supplied URL if available'),
'#return_value' => 1,
'#default_value' => variable_get('biblio_link_title_url', 0),
'#description' => t('Selecting this links the titles to the supplied URL (if available) rather than the "node" view.')
);
$form['openurl'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => t('OpenURL'),
'#description' => t('You can set an openurl link here')
);
$form['openurl']['biblio_baseopenurl'] = array(
'#type' => 'textfield',
'#title' => t('OpenURL Base URL'),
'#size' => 95,
'#default_value' => variable_get('biblio_baseopenurl', ''),
'#description' => t('This sets your institution\'s base OpenURL gateway, which is used to generate OpenURL links. To implement a "Universal" OpenURL system, try using OCLC\'s OpenURL Resolver Registry gateway: http://worldcatlibraries.org/registry/gateway')
);
$form['openurl']['biblio_openurlimage'] = array(
'#type' => 'textfield',
'#title' => t('OpenURL Image'),
'#size' => 95,
'#default_value' => variable_get('biblio_openurlimage', ''),
'#description' => t('Enter a path to your image here, this image will be used as button which when clicked will find the entry via the OpenURL link')
);
// Add profile page settings... this is done in a fucntion so it can be reused elsewhere
_biblio_get_user_profile_form($form);
//
if (!module_exists('search')) {
$search_text = ''. t('Depends on') .': '. t('Search') .' ('. t('disabled') .')
';
$search_disabled = TRUE;
variable_set('biblio_footnotes_integration', 0);
}
else {
$search_text = ''. t('Depends on') .': '. t('Search') .' ('. t('enabled') .')
';
$search_disabled = FALSE;
}
$form['search'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#description' => $search_text,
'#title' => t('Search'),
);
$form['search']['biblio_search'] = array(
'#type' => 'checkbox',
'#disabled' => $search_disabled,
'#title' => t('Enable a search box on the biblio page.'),
'#return_value' => 1,
'#default_value' => variable_get('biblio_search', 0),
'#description' => t('Shows a search box on the biblio page that returns drupal search results in the biblio style.')
);
$form['search']['biblio_search_button_text'] = array(
'#type' => 'textfield',
'#title' => t('Search button text'),
'#disabled' => $search_disabled,
'#size' => 95,
'#default_value' => variable_get('biblio_search_button_text', t('Biblio search')),
'#description' => t('This allows you to customize the text on the search button, it defaults to "Biblio search".')
);
$form['search']['biblio_index'] = array(
'#type' => 'checkbox',
'#disabled' => $search_disabled,
'#title' => t('Re-/Index a biblio node when creating or updating.'),
'#return_value' => 1,
'#default_value' => variable_get('biblio_index', 0),
'#description' => t('A biblio node must be indexed for the drupal search to know its content. You need to check this option if you want to search for a biblio node that you just created or updated. Otherwise you must wait for the cron job to reindex nodes.')
);
$form['sort'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => t('Sorting'),
'#description' => t('You can set the default sorting and ordering for the /biblio page here.')
);
$form['sort']['biblio_sort'] = array(
'#type' => 'radios',
'#title' => t('Sort by'),
'#default_value' => variable_get('biblio_sort', 'year'),
'#options' => array(
'author' => t('Author'),
'keyword' => t('Keyword'),
'title' => t('Title'),
'type' => t('Type'),
'year' => t('Year')
)
);
$form['sort']['biblio_sort_tabs'] = array(
'#type' => 'checkboxes',
'#title' => t('Show sort links'),
'#default_value' => variable_get('biblio_sort_tabs', array('author', 'title', 'type', 'year')),
'#options' => array(
'author' => t('Author'),
'keyword' => t('Keyword'),
'title' => t('Title'),
'type' => t('Type'),
'year' => t('Year')
),
'#description' => t('You turn the sorting links at the top of the /biblio page here.')
);
$form['sort']['biblio_order'] = array(
'#type' => 'radios',
'#title' => t('Order'),
'#default_value' => variable_get('biblio_order', 'DESC'),
'#options' => array(
'DESC' => t('Descending'),
'ASC' => t('Ascending')
)
);
$form['style'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => t('Styling'),
'#description' => t('You can set the default style for the /biblio page here.')
);
// $form['style']['biblio_normalize'] = array(
// '#type' => 'checkbox',
// '#title' => t('Normalize author names when displaying biblio records'),
// '#return_value' => 1,
// '#default_value' => variable_get('biblio_normalize', 0),
// '#description' => t('Tries (doesn\'t always work) to reformat author names so that they are displayed in the format "Lastname, Initials" e.g. Smith, J.S. (Note: This setting does not modify the entry in the database, it only reformats it\'s presentation. This option can be turned off at any time to diplay the oringal format.)')
// );
$form['style']['biblio_node_layout'] = array(
'#type' => 'radios',
'#title' => t('Node Layout'),
'#default_value' => variable_get('biblio_node_layout', 'tabular'),
'#options' => array(
'orig' => t('Original'),
'ft' => t('Only Fulltext if available'),
'tabular' => t('Tabular')
),
'#description' => t('This alters the layout of the "node" (full) view.')
);
$form['style']['biblio_annotations'] = array(
'#type' => 'select',
'#title' => t('Annotations'),
'#default_value' => variable_get('biblio_annotations', 'none'),
'#options' => array(
'none' => t('none'),
'biblio_notes' => t('notes'),
'biblio_custom1' => t('custom1'),
'biblio_custom2' => t('custom2'),
'biblio_custom3' => t('custom3'),
'biblio_custom4' => t('custom4'),
'biblio_custom5' => t('custom5'),
'biblio_custom6' => t('custom6'),
'biblio_custom7' => t('custom7')
),
'#description' => t('Select a field from which an annotation will be displayed below biblo entry in "short" listings'),
'#multiple' => FALSE,
'#size' => 0
);
$form['style']['biblio_style'] = array(
'#type' => 'radios',
'#title' => t('Style'),
'#default_value' => variable_get('biblio_style', 'classic'),
'#options' => _biblio_admin_get_styles(),
'#description' => t('This alters the layout of the "list" (short) view.')
);
$form['syndication'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => TRUE,
'#title' => t('Syndication'),
'#description' => t('You can set the RSS defaults here.')
);
$form['syndication']['biblio_rss'] = array(
'#type' => 'checkbox',
'#title' => t('Allow RSS feeds of new biblio entries'),
'#return_value' => 1,
'#default_value' => variable_get('biblio_rss', 0),
'#description' => t('This will create an rss feed of the 10 most recent biblio entries. It will be available at /biblio/rss.xml')
);
$form['syndication']['biblio_rss_number_of_entries'] = array(
'#type' => 'textfield',
'#title' => t('Number of items in the RSS feed.'),
'#default_value' => variable_get('biblio_rss_number_of_entries', 10),
'#size' => 6,
'#maxlength' => 6,
'#description' => t('Limits the number of items in the /biblio/rss.xml feed to this number.')
);
$form = system_settings_form($form);
$form['#submit'][] = 'biblio_admin_settings_form_submit';
// our submit handler is added after the call to system settings form so that it gets
// called after system_settings_form_submit, and thus the variables have been stored already
// and the menu will be rebuilt correctly.
return ($form);
}
function biblio_admin_settings_form_submit($form, $form_state) {
if ($form_state['values']['biblio_keyword_freetagging'] && $form_state['values']['biblio_keyword_vocabulary']) {
if ($vocabulary = taxonomy_vocabulary_load(variable_get('biblio_keyword_vocabulary', 0))) {
$vocabulary = (array) $vocabulary;
$vocabulary['nodes']['biblio'] = 1;
taxonomy_save_vocabulary($vocabulary);
}
}
menu_rebuild();
}
function biblio_admin_types_edit_form() {
$tid = 0;
$arg_list = func_get_args();
$tid = is_numeric($arg_list[1]) ? $arg_list[1] : 0;
$msg = ''. t('On this page you can set type specific "Titles" and "Hints" which will display on the input form. ');
if ($tid) {
$msg .= t('Checking the "Visible" box will add the field to the input form, checking "Required" will force the user to supply a value for this field and the weight value changes the order which it is rendered on the form with smaller values floating to the top of the form. ');
$msg .= '
'. t('Fields which are grayed out on this page have been set to "common" on the ');
$msg .= l("admin/settings/biblio/fields", "admin/settings/biblio/fields");
$msg .= t(' page.').'
';
}
else {
$msg .= t('Checking the "Common" box will add the field to all the different publication types. Checking "Required" will force the user to supply a value for the field, checking "Autocomplete" will enable AJAX type auto complete look up for the field when the user is entering data and the weight value changes the order which it is rendered on the form with smaller values floating to the top of the form. ');
}
$msg .= t('Finally, for each author field you can choose a set of author roles. Assigning different roles to authors within the same field, e.g. primary and secondary authors within the authors field, allows to theme them differently.');
$msg .= '
[ '. l(t('Add New Type'), 'admin/settings/biblio/fields/type/new') .' ]';
$output .= ' [ '. l(t('Reset all types to defaults'), 'admin/settings/biblio/fields/type/reset') .' ]';
$output .= theme('table', $header, $rows);
$output .= '
[ '. l(t('Add New Type'), 'admin/settings/biblio/fields/type/new') .' ]';
$output .= ' [ '. l(t('Reset all types to defaults'), 'admin/settings/biblio/fields/type/reset') .' ]';
return $output;
}
function biblio_admin_types_add_form() {
$form['name'] = array(
'#type' => 'textfield',
'#title' => t('Type Name'),
'#size' => 20,
'#weight' => 1,
'#required' => TRUE,
'#maxlength' => 64
);
$form['description'] = array(
'#type' => 'textfield',
'#title' => t('Description'),
'#size' => 60,
'#weight' => 2,
'#maxlength' => 255
);
$form['type_button'] = array(
'#type' => 'submit',
'#value' => t('Create New Type'),
'#weight' => 3
);
return $form;
}
function biblio_admin_types_add_form_submit($form, & $form_state) {
$values = $form_state['values'];
$values['tid'] = variable_get('biblio_max_user_tid', '999') + 1;
drupal_write_record('biblio_types', $values);
variable_set('biblio_max_user_tid', $values['tid']);
for ($f = 1; $f <= 51; $f++) {
$ft_vals = array(
'tid' => $values['tid'],
'fid' => $f,
'ftdid' => $f,
'cust_tdid' => $f
);
drupal_write_record('biblio_field_type', $ft_vals);
}
// Fill contributor types. Use the first 4 defaults.
for ($type = 1; $type <= 4; $type++) {
$ct_vals = array (
'auth_category' => $type,
'biblio_type' => $values['tid'],
'auth_type' => $type,
);
drupal_write_record('biblio_contributor_type', $ct_vals);
}
drupal_goto('admin/settings/biblio/fields/type');
}
function biblio_admin_types_hide() {
$args = func_get_args();
if ($args[0] > 0 && is_numeric($args[0])) {
$result = db_query('UPDATE {biblio_types} SET visible = 0 WHERE tid = %d ', $args[0]);
}
drupal_goto('admin/settings/biblio/fields/type');
}
function biblio_admin_types_show() {
$args = func_get_args();
if ($args[0] > 0 && is_numeric($args[0])) {
$result = db_query('UPDATE {biblio_types} SET visible = 1 WHERE tid = %d ', $args[0]);
}
drupal_goto('admin/settings/biblio/fields/type');
}
function biblio_admin_types_delete_form() {
$args = func_get_args();
if ($args[1] > 0 && is_numeric($args[1])) {
$result = db_query('SELECT t.* FROM {biblio_types} as t WHERE t.tid = %d ', $args[1]);
$row = db_fetch_array($result);
$num_rows = db_result(db_query('SELECT COUNT(*) FROM {biblio} as b WHERE b.biblio_type = %d', $row['tid']));
if ($num_rows) {
$existing_msg = t('There are @count biblio entries of this type, you should change the type of these entries before proceeding otherwise they will be deleted', array(
'@count' => $num_rows
));
}
$form['tid'] = array(
'#type' => 'value',
'#value' => $row['tid']
);
$output = confirm_form($form, t('Are you sure you want to delete the custom biblio type: %title ? ', array(
'%title' => $row['name']
)) . $existing_msg, $_GET['destination'] ? $_GET['destination'] : 'admin/settings/biblio/fields/type', t('This action cannot be undone.'), t('Delete'), t('Cancel'));
return $output;
}
else {
drupal_goto('admin/settings/biblio/fields/type');
}
}
function biblio_admin_types_delete_form_submit($form, & $form_state) {
db_query('DELETE FROM {biblio_types} WHERE tid = %d', $form_state['values']['tid']);
db_query('DELETE FROM {biblio_field_type} WHERE tid = %d', $form_state['values']['tid']);
drupal_goto('admin/settings/biblio/fields/type');
}
function biblio_admin_types_reset_form() {
$form['reset'] = array(
'#type' => 'value',
'#value' => 'reset'
);
$output = confirm_form($form, t('Are you sure you want to reset ALL the field definitions to the defaults? '), $_GET['destination'] ? $_GET['destination'] : 'admin/settings/biblio/fields/type', t('By doing this, you will loose all customizations you have made to the field titles, this action cannot be undone!'), t('Reset!'), t('Cancel'));
return $output;
}
function biblio_admin_types_reset_form_submit($form, & $form_state) {
module_load_include('install', 'biblio');
biblio_reset_types();
drupal_goto("admin/settings/biblio/fields/type");
}
/*
* This functin is used by both the admin/settings/biblio page and user profile page
* - if $user is set, then it is being called from the user profile page
*/
function _biblio_get_user_profile_form(& $form, $profile_user = FALSE) {
global $user;
$allow_edit = variable_get('biblio_show_user_profile_form', '1');
$allow_edit = $allow_edit || user_access('administer biblio');
$form['profile'] = array(
'#type' => 'fieldset',
'#collapsible' => TRUE,
'#collapsed' => ($profile_user) ? FALSE : TRUE,
'#title' => ($profile_user) ? t('My publications') : t('Profile pages')
);
if(!$profile_user) {
$form['profile']['biblio_show_user_profile_form'] = array(
'#type' => 'checkbox',
'#title' => t('Allow users to override these settings on their "My account" page') ,
'#return_value' => 1,
'#description' => t('If this is selected, a form similar to this section will be available to the user when they edit their own account information. This will allow them to override the global preferences set here.') ,
'#default_value' => variable_get('biblio_show_user_profile_form', '1')
);
}
$form['profile']['biblio_show_profile'] = array(
'#type' => 'checkbox',
'#title' => ($profile_user) ? t('Show my publications on my profile page') : t('Show publications on users profile pages'),
'#return_value' => 1,
'#disabled' => !$allow_edit,
'#description' => ($profile_user) ? t('Selecting this will create a listing of your publications on your profile page') : t('This sets the site wide default, users may change this in their profile')
);
if ($profile_user) {
$form['profile']['biblio_show_profile']['#default_value'] = (isset($profile_user->biblio_show_profile)) ? $profile_user->biblio_show_profile : variable_get('biblio_show_profile', '0');
}
else {
$form['profile']['biblio_show_profile']['#default_value'] = variable_get('biblio_show_profile', '0');
}
$form['profile']['biblio_my_pubs_menu'] = array(
'#type' => 'checkbox',
'#title' => t('Show "My publications" item in the navigation menu'),
'#disabled' => !$allow_edit,
'#return_value' => 1,
'#description' => ''
);
if ($profile_user) {
$form['profile']['biblio_my_pubs_menu']['#default_value'] = ((isset($profile_user->biblio_my_pubs_menu)) ? $profile_user->biblio_my_pubs_menu : variable_get('biblio_my_pubs_menu', '0'));
}
else {
$form['profile']['biblio_my_pubs_menu']['#default_value'] = variable_get('biblio_my_pubs_menu', '0');
}
if ($profile_user) {
$db_result = db_query("SELECT cd.lastname, cd.firstname, cd.initials, cd.cid FROM {biblio_contributor_data} cd
ORDER by cd.lastname ASC ");
$options = array();
$options[0] = t('(none)');
while ($row = db_fetch_object($db_result)) {
$options[$row->cid] = "$row->lastname, $row->firstname $row->initials ";
}
$form['profile']['biblio_contributor_id'] = array(
'#type' => 'select',
'#title' => t('Link My Profile with this Author from the Biblio database'),
'#default_value' => $profile_user->biblio_contributor_id ,
'#options' => $options,
'#description' => t('This will link your profile to the selected author from the biblio database, then all publications containing this author to be displayed on your "Publications" tab.'),
);
}
}
/* This function parses the module directory for 'style' files, loads them and
* calls the info fuction to get some basic information like the short and long
* names of the style
*/
function _biblio_admin_get_styles() {
$styles = array();
$dir = drupal_get_path('module', 'biblio');
$files = array();
if ($dh = opendir($dir)) {
while (($files[] = readdir($dh)) !== FALSE) {}
closedir($dh);
foreach ($files as $file) {
if (strstr($file, 'biblio_style_')) { //find the style files
include_once $dir ."/". $file;
if (function_exists(basename($file, ".inc") .'_info')) {
$styles = array_merge($styles, call_user_func(basename($file, ".inc") .'_info')); //build and array of the short and long names
}
}
}
}
return ($styles);
}
function biblio_form_sort($a, $b) {
$a_weight = (is_array($a) && isset($a['weight'])) ? $a['weight'] : 0;
$b_weight = (is_array($b) && isset($b['weight'])) ? $b['weight'] : 0;
if ($a_weight == $b_weight) {
return 0;
}
return ($a_weight < $b_weight) ? -1 : 1;
}
function biblio_admin_get_query($name) {
switch ($name) {
case "author_dup" :
return ('SELECT lastname, firstname, initials, COUNT(lastname) as cnt FROM {biblio_contributor_data} GROUP BY lastname, firstname, initials HAVING COUNT(*)>1 ORDER BY lastname ASC, firstname ASC, initials ASC ');
break;
case "author_by_name" :
return ("SELECT lastname, cid FROM {biblio_contributor_data} where lastname LIKE '%s'");
break;
case 'author_pub_count' :
// return ('SELECT bd.lastname, b.cid,COUNT(*) AS cnt FROM {biblio_contributor} b, {biblio_contributor_data} bd WHERE bd.cid=b.cid GROUP BY b.cid HAVING cnt > 0 ORDER BY lastname ASC');
return ('SELECT bd.lastname, b.cid,COUNT(*) AS cnt FROM {biblio_contributor} b, {biblio_contributor_data} bd WHERE bd.cid=b.cid GROUP BY b.cid, bd.lastname HAVING COUNT(*) > 0 ORDER BY lastname ASC');
break;
}
}
function biblio_admin_author_types_form($form_state, $op = NULL, $id = NULL) {
switch ($op) {
case 'edit':
$type = db_fetch_object(db_query("SELECT * FROM {biblio_contributor_type_data WHERE auth_type=%d",$id));
$form['auth_type'] = array(
'#type' => 'hidden',
'#value' => $type->auth_type);
//fall through and use the same form used for a new entry
case 'new':
$form['title'] = array(
'#type' => 'textfield',
'#title' => t('Type Name'),
'#size' => 20,
'#weight' => 1,
'#default_value' =>$type->title,
'#required' => TRUE,
'#maxlength' => 64
);
$form['hint'] = array(
'#type' => 'textfield',
'#title' => t('Description'),
'#size' => 60,
'#weight' => 2,
'#default_value' => $type->hint,
'#maxlength' => 255
);
$form['type_button'] = array(
'#type' => 'submit',
'#value' => ($op == 'new')? t('Create New Type') : t('Save'),
'#weight' => 3,
'#submit' => array('biblio_admin_author_types_form_submit')
);
$form['#redirect'] = 'admin/settings/biblio/author/type';
return $form;
break;
case 'hide':
break;
default:
}
}
function theme_biblio_admin_author_types_form($form) {
// We need this complex query to realize author_types which are not in use (cid is NULL)
$db_result = db_query("SELECT ctd.*, cid FROM {biblio_contributor_type_data} ctd
LEFT JOIN {biblio_contributor} c ON ctd.auth_type = c.auth_type
GROUP BY ctd.auth_type");
while ($row = db_fetch_object($db_result)) {
$ops = l(t('edit'), 'admin/settings/biblio/author/type/'.$row->auth_type.'/edit' );
if (!isset($row->cid) && $row->auth_type >= 10) { // allow delete only if type not in use
$ops .= ' ';
$ops .= l(t('delete'), 'admin/settings/biblio/author/type/'.$row->auth_type.'/delete/');
}
$rows[] = array(
$row->auth_type,
$row->title,
$row->hint,
$ops,
);
}
$header = array(
t('Type Id'),
t('Contributor Type'),
t('Description'),
array('data' => t('Operations'),'colspan' => '2')
);
$output .= '
[ '. l(t('Add New Type'), 'admin/settings/biblio/author/type/new') .' ]';
$output .= theme('table', $header, $rows);
$output .= '
[ '. l(t('Add New Type'), 'admin/settings/biblio/author/type/new') .' ]';
// $output .= ' [ '. l(t('Reset all types to defaults'), 'admin/settings/biblio/authors/reset') .' ]';
return $output;
}
function biblio_admin_author_types_form_submit($form, $form_state) {
$record->title = $form_state['values']['title'];
$record->hint = $form_state['values']['hint'];
switch($form['#id']) {
case 'biblio-admin-author-types-form-new':
$record->title = $form_state['values']['title'];
$record->hint = $form_state['values']['hint'];
drupal_write_record('biblio_contributor_type_data',$record);
break;
case 'biblio-admin-author-types-form-edit':
$record->auth_type = $form_state['values']['auth_type'];
drupal_write_record('biblio_contributor_type_data',$record,'auth_type');
break;
}
}
function biblio_admin_author_type_delete_confirm(&$form_state, $type_id) {
$base = variable_get('biblio_base', 'biblio');
$type_data = db_fetch_object(db_query('SELECT * FROM {biblio_contributor_type_data} bctd WHERE bctd.auth_type = %d ', $type_id));
$form['auth_type'] = array(
'#type' => 'value',
'#value' => $type_data->auth_type,
);
return confirm_form($form,
t('Are you sure you want to delete the author type: %title ?', array('%title' => $type_data->title)),
isset($_GET['destination']) ? $_GET['destination'] : 'admin/settings/biblio/author/type',
t('This action cannot be undone.'),
t('Delete'),
t('Cancel')
);
}
function biblio_admin_author_type_delete_confirm_submit($form, &$form_state) {
db_query("DELETE FROM {biblio_contributor_type_data} WHERE auth_type=%d", $form_state['values']['auth_type']);
db_query("DELETE FROM {biblio_contributor_type} WHERE auth_type=%d", $form_state['values']['auth_type']);
drupal_goto('admin/settings/biblio/author/type');
}
function biblio_admin_author_edit_form($form_state, $author_id) {
$author = db_fetch_object(db_query('SELECT * FROM {biblio_contributor_data} b WHERE b.cid = %d ', $author_id));
if (!$author) {
drupal_not_found();
return;
}
$base = variable_get('biblio_base', 'biblio');
$menu = menu_get_active_title();
if ($menu == 'Edit author information') $path = $base.'/authors';
if ($menu == 'Biblio settings') $path = 'admin/settings/biblio/author/list';
$form['#redirect'] = $path;
$form['cid'] = array(
'#type' => 'value',
'#value' => $author_id
);
$users = db_query('SELECT uid,name FROM {users} WHERE uid>0 ORDER BY name');
$options[0] = 'Please choose';
while($user=db_fetch_array($users)) {
$options[$user['uid']] = $user['name'];
}
$form['drupal_uid'] = array(
'#type' => 'select',
'#title' => t('Drupal User ID'),
'#options' => $options,
'#default_value' => $author->drupal_uid,
'#weight' => 12,
'#required' => FALSE,
);
$form['name'] = array(
'#type' => 'textfield',
'#title' => t('Complete Name'),
'#default_value' => $author->name,
'#size' => 100,
'#weight' => 1,
'#required' => TRUE,
'#maxlength' => 128
);
$form['prefix'] = array(
'#type' => 'textfield',
'#title' => t('Prefix'),
'#default_value' => $author->prefix,
'#size' => 20,
'#weight' => 2,
'#required' => FALSE,
'#maxlength' => 128
);
$form['firstname'] = array(
'#type' => 'textfield',
'#title' => t('First Name'),
'#default_value' => $author->firstname,
'#size' => 20,
'#weight' => 3,
'#required' => FALSE,
'#maxlength' => 128
);
$form['initials'] = array(
'#type' => 'textfield',
'#title' => t('Initials'),
'#default_value' => $author->initials,
'#size' => 20,
'#weight' => 4,
'#required' => FALSE,
'#maxlength' => 10
);
$form['lastname'] = array(
'#type' => 'textfield',
'#title' => t('Last Name'),
'#default_value' => $author->lastname,
'#size' => 20,
'#weight' => 5,
'#required' => TRUE,
'#maxlength' => 128
);
$form['suffix'] = array(
'#type' => 'textfield',
'#title' => t('Suffix'),
'#default_value' => $author->suffix,
'#size' => 20,
'#weight' => 6,
'#required' => FALSE,
'#maxlength' => 128
);
$form['affiliation'] = array(
'#type' => 'textfield',
'#title' => t('Affiliation'),
'#default_value' => $author->affiliation,
'#size' => 100,
'#weight' => 7,
'#required' => FALSE,
'#maxlength' => 256
);
$authors = db_query("SELECT * FROM {biblio_contributor_data} cd WHERE name LIKE '%%%s%%' AND cid != %d",$author->lastname, $author_id);
unset($options);
$base = variable_get('biblio_base', 'biblio');
while($author=db_fetch_array($authors)) {
$options[$author['cid']] = l($author['name'],$base.'/authors/'.$author['cid'].'/edit/');
if ($author['affiliation']) $options[$author['cid']] .= ' (' . $author['affiliation'] . ')';
}
if ($options) {
$form['merge'] = array(
'#type' => 'fieldset',
'#title' => t('Author Merge'),
'#description' => t('Select other author names which will be merged with this one. You should only do this if you are sure the other authors represent the same author as the one being edited.'),
'#weight' => 5,
'#collapsible' => TRUE,
'#collapsed' => FALSE,
);
$form['merge']['merge_authors'] = array(
'#type' => 'checkboxes',
'#title' => t('Similar authors'),
'#options' => $options,
'#weight' => 12,
'#required' => FALSE,
'#multiple' => TRUE,
'#size' => min(count($options), 6),
);
}
$form['submit'] = array(
'#type' => 'submit',
'#value' => t('Save')
);
return $form;
}
function biblio_admin_author_edit_form_validate($form, &$form_state) {
foreach($form_state['values'] as $key => $value) {
if (is_string($value)) $form_state['values'][$key] = trim($value);
}
}
function biblio_admin_author_edit_form_submit($form, &$form_state) {
drupal_write_record('biblio_contributor_data', $form_state['values'], 'cid');
// merge authors
if (count($form_state['values']['merge_authors'])) {
$authors = implode(',', $form_state['values']['merge_authors']);
update_sql("UPDATE {biblio_contributor} SET cid={$form_state['values']['cid']} WHERE cid IN ($authors)");
update_sql("DELETE FROM {biblio_contributor_data} WHERE cid IN ($authors)");
}
}
function biblio_admin_orphans_form($form_state) {
$base = variable_get('biblio_base', 'biblio');
$result = pager_query('SELECT * FROM {biblio_contributor_data} WHERE cid NOT IN (SELECT cid FROM {biblio_contributor} GROUP BY cid)', 50);
$authors = array();
while ($author = db_fetch_object($result)) {
$authors[$author->cid] = '';
$form['name'][$author->cid] = array('#value' => l($author->name, $base.'/authors/'.$author->cid.'/edit'));
$form['affiliation'][$author->cid] = array('#value' => check_plain($author->affiliation));
}
$form['authors'] = array('#type' => 'checkboxes', '#options' => $authors);
$form['pager'] = array('#value' => theme('pager', NULL, 50, 0));
$form['#theme'] = 'biblio_admin_orphans_form';
$form['submit'] = array(
'#type' => 'submit',
'#value' => t('Delete'),
'#disabled' => (!count($authors)),
'#submit' => array('biblio_admin_orphans_form_submit'),
);
return $form;
}
function biblio_admin_orphans_form_validate($form, &$form_state) {
$check_count = array_filter($form_state['values']['authors']);
if (count($check_count) == 0) {
form_set_error('', t('No items selected.'));
}
}
function biblio_admin_orphans_form_submit($form, &$form_state) {
$authors = array_filter($form_state['values']['authors']);
update_sql('DELETE FROM {biblio_contributor_data} WHERE cid IN ('.implode(',',$authors).')');
drupal_set_message(t('The orphaned authors ('.implode(',',$authors).') have been deleted.'));
}
function biblio_admin_keyword_orphans_form($form_state) {
$base = variable_get('biblio_base', 'biblio');
$result = pager_query('SELECT * FROM {biblio_keyword_data} WHERE kid NOT IN (SELECT kid FROM {biblio_keyword} GROUP BY kid)', 50);
$keywords = array();
while ($keyword = db_fetch_object($result)) {
$keywords[$keyword->kid] = '';
$form['keyword'][$keyword->kid] = array('#value' => l($keyword->word, $base.'/keyword/'.$keyword->kid.'/edit'));
}
$form['keywords'] = array('#type' => 'checkboxes', '#options' => $keywords);
$form['pager'] = array('#value' => theme('pager', NULL, 50, 0));
$form['#theme'] = 'biblio_admin_keyword_orphans_form';
$form['submit'] = array(
'#type' => 'submit',
'#value' => t('Delete'),
'#disabled' => (!count($keywords)),
'#submit' => array('biblio_admin_keyword_orphans_form_submit'),
);
return $form;
}
function biblio_admin_keyword_orphans_form_validate($form, &$form_state) {
$check_count = array_filter($form_state['values']['keywords']);
if (count($check_count) == 0) {
form_set_error('', t('No items selected.'));
}
}
function biblio_admin_keyword_orphans_form_submit($form, &$form_state) {
$keywords = array_filter($form_state['values']['keywords']);
update_sql('DELETE FROM {biblio_keyword_data} WHERE kid IN ('.implode(',',$keywords).')');
$count = count($keywords);
drupal_set_message(t('%count orphaned keywords have been deleted.', array('%count' => $count)));
}
function biblio_admin_keyword_edit_form($form_state, $keyword_id) {
$base = variable_get('biblio_base', 'biblio');
$keyword = db_fetch_object(db_query('SELECT * FROM {biblio_keyword_data} bkd WHERE bkd.kid = %d ', $keyword_id));
$base = variable_get('biblio_base', 'biblio');
$form['#redirect'] = "$base/keywords";
$form['kid'] = array(
'#type' => 'value',
'#value' => $keyword_id
);
$form['word'] = array(
'#type' => 'textfield',
'#title' => t('Keyword'),
'#default_value' => $keyword->word,
'#size' => 100,
'#weight' => -10,
'#required' => TRUE,
'#maxlength' => 255
);
$keywords = db_query("SELECT * FROM {biblio_keyword_data} kd WHERE word LIKE '%%%s%%' AND kid!=%d", drupal_substr($keyword->word,1,5), $keyword_id);
unset($options);
$base = variable_get('biblio_base', 'biblio');
while($kw=db_fetch_object($keywords)) {
$options[$kw->kid] = l($kw->word,$base.'/keyword/'.$kw->kid.'/edit/');
}
if ($options) {
$form['merge'] = array(
'#type' => 'fieldset',
'#title' => t('Keyword Merge'),
'#description' => t('Select other keywords which will be merged with the one above. You should only do this if you are sure the other keywords represent the same keyword as the one being edited.'),
'#weight' => 5,
'#collapsible' => TRUE,
'#collapsed' => TRUE,
);
$form['merge']['merge_keywords'] = array(
'#type' => 'checkboxes',
'#title' => t('Similar keywords'),
'#options' => $options,
'#weight' => 12,
'#required' => FALSE,
'#multiple' => TRUE,
'#size' => min(count($options), 6),
);
}
$form['submit'] = array(
'#type' => 'submit',
'#value' => t('Save')
);
$form['delete'] = array(
'#value' => l(t('Delete'), $base.'/keyword/'.$keyword_id.'/delete')
);
return $form;
}
function biblio_admin_keyword_delete_confirm(&$form_state, $keyword_id) {
$base = variable_get('biblio_base', 'biblio');
$keyword = db_fetch_object(db_query('SELECT * FROM {biblio_keyword_data} bkd WHERE bkd.kid = %d ', $keyword_id));
$form['kid'] = array(
'#type' => 'value',
'#value' => $keyword_id,
);
return confirm_form($form,
t('Are you sure you want to delete the keyword: %title from ALL publications?', array('%title' => $keyword->word)),
isset($_GET['destination']) ? $_GET['destination'] : $base.'/keywords',
t('This action cannot be undone.'),
t('Delete'),
t('Cancel')
);
}
function biblio_admin_keyword_delete_confirm_submit($form, &$form_state) {
$base = variable_get('biblio_base', 'biblio');
module_load_include('inc','biblio','biblio.keywords');
biblio_delete_keyword($form_state['values']['kid']);
drupal_goto($base.'/keywords');
}
function biblio_admin_keyword_edit_form_submit($form, &$form_state) {
if ($form_state['values']['op'] == t('Save')) {
drupal_write_record('biblio_keyword_data', $form_state['values'], 'kid');
if (count($form_state['values']['merge_keywords'])) {
$kids = implode(',', $form_state['values']['merge_keywords']);
update_sql("UPDATE {biblio_keyword} SET kid={$form_state['values']['kid']} WHERE kid IN ($kids)");
update_sql("DELETE FROM {biblio_keyword_data} WHERE kid IN ($kids)");
}
}
}