View source
<?php
function biblio_get_keyword_by_name($name) {
static $keywords = array();
if (!($kid = array_search($name, $keywords))) {
$term = db_fetch_object(db_query("SELECT * FROM {biblio_keyword_data} k WHERE LOWER(k.word) = LOWER('%s')", trim($name)));
if ($term) {
$keywords[$term->kid] = $term;
return $keywords[$term->kid];
}
else {
return FALSE;
}
}
return $keywords[$kid];
}
function biblio_get_keyword_by_id($kid) {
static $keywords = array();
if (!isset($keywords[$kid])) {
$keywords[$kid] = db_fetch_object(db_query('SELECT * FROM {biblio_keyword_data} WHERE kid = %d', $kid));
}
return $keywords[$kid];
}
function biblio_delete_keywords($node) {
db_query('DELETE FROM {biblio_keyword} WHERE nid = %d', $node->nid);
$count = db_affected_rows();
return $count;
}
function biblio_update_keywords($node) {
biblio_insert_keywords($node, TRUE);
}
function biblio_delete_orphan_keywords($force = FALSE) {
if (variable_get('biblio_keyword_orphan_autoclean', 0) || $force) {
$active_kids = array();
$all_kids = array();
$result = db_query('SELECT kid FROM {biblio_keyword} GROUP BY kid');
while ($kw = db_fetch_object($result)) {
$active_kids[] = $kw->kid;
}
$result = db_query('SELECT kid FROM {biblio_keyword_data} GROUP BY kid');
while ($kw = db_fetch_object($result)) {
$all_kids[] = $kw->kid;
}
$orphans = array_diff($all_kids, $active_kids);
if (!empty($orphans)) {
db_query('DELETE FROM {biblio_keyword_data} WHERE kid IN (' . implode(',', $orphans) . ')');
$count = db_affected_rows();
$message = t('%count orphaned keywords were deleted from the biblio_keyword_data table.', array(
'%count' => $count,
));
watchdog('biblio_cron', $message);
}
}
}
function biblio_load_keywords($vid) {
$result = db_query('SELECT bkd.* FROM {biblio_keyword} bk INNER JOIN {biblio_keyword_data} bkd ON bk.kid = bkd.kid WHERE bk.vid = %d ORDER BY bkd.word ASC', $vid);
$keywords[$vid] = array();
while ($keyword = db_fetch_object($result)) {
$keywords[$vid][$keyword->kid] = $keyword->word;
}
return $keywords[$vid];
}
function biblio_insert_keywords($node, $update = FALSE) {
$kw_vocab = variable_get('biblio_keyword_vocabulary', 0);
$freetagging = variable_get('biblio_keyword_freetagging', 0);
$taxo_terms = $typed_keywords = array();
if (!is_array($node->biblio_keywords)) {
$typed_keywords = biblio_explode_keywords($node->biblio_keywords);
}
else {
$typed_keywords = $node->biblio_keywords;
}
if ($update) {
db_query('DELETE FROM {biblio_keyword} WHERE nid = %d AND vid = %d', array(
$node->nid,
$node->vid,
));
}
if (isset($node->taxonomy) && is_array($node->taxonomy) && variable_get('biblio_copy_taxo_terms_to_keywords', 0)) {
foreach ($node->taxonomy as $vid => $term) {
switch ($vid) {
case 'tags':
if (is_array($term)) {
foreach ($term as $vid => $terms) {
$taxo_terms = array_merge($taxo_terms, biblio_explode_keywords($terms, ','));
}
}
break;
case 'copy_to_biblio':
if ($term == 0) {
$taxo_terms = array();
}
unset($node->taxonomy['copy_to_biblio']);
break;
default:
if (is_array($term) && !empty($term)) {
foreach ($term as $tid) {
if ($tid) {
$term_obj = taxonomy_get_term($tid);
$taxo_terms[] = $term_obj->name;
}
}
}
else {
if ($term) {
$term_obj = taxonomy_get_term($term);
$taxo_terms[] = $term_obj->name;
}
}
}
}
}
$keywords = array_unique(array_merge($typed_keywords, $taxo_terms));
foreach ($keywords as $keyword) {
$word = is_object($keyword) ? trim($keyword->word) : trim($keyword);
if (!strlen(trim($word))) {
continue;
}
$kid = FALSE;
if ($kw = biblio_get_keyword_by_name($word)) {
$kid = $kw->kid;
}
if (!$kid) {
$kw = array(
'word' => trim($word),
);
$status = biblio_save_keyword($kw);
$kid = $kw['kid'];
}
if (!isset($inserted[$kid])) {
if ($update) {
db_query('DELETE FROM {biblio_keyword} WHERE nid = %d AND vid = %d AND kid = %d', array(
$node->nid,
$node->vid,
$kid,
));
}
db_query('INSERT INTO {biblio_keyword} (kid, nid, vid) VALUES (%d, %d, %d)', $kid, $node->nid, $node->vid);
$inserted[$kid] = TRUE;
}
}
if ($freetagging && $kw_vocab) {
$node->taxonomy['tags'][$kw_vocab] = biblio_implode_keywords($typed_keywords, ',');
}
return;
}
function biblio_save_keyword(&$keyword) {
if (!empty($keyword['kid']) && $keyword['word']) {
drupal_write_record('biblio_keyword_data', $keyword, 'kid');
$status = SAVED_UPDATED;
}
else {
drupal_write_record('biblio_keyword_data', $keyword);
$status = SAVED_NEW;
}
return $status;
}
function biblio_delete_node_keywords($node) {
db_query('DELETE FROM {biblio_keyword} WHERE nid = %d', $node->nid);
}
function biblio_delete_revision_keywords($node) {
db_query('DELETE FROM {biblio_keyword} WHERE vid = %d', $node->vid);
return db_affected_rows();
}
function biblio_delete_multiple_keywords($keywords) {
$count = 0;
foreach ($keywords as $kid) {
$count += biblio_delete_keyword($kid);
}
return $count;
}
function biblio_delete_keyword($keyword_id) {
db_query('DELETE FROM {biblio_keyword} WHERE kid = %d', $keyword_id);
db_query('DELETE FROM {biblio_keyword_data} WHERE kid = %d', $keyword_id);
return db_affected_rows();
}
function biblio_explode_keywords($string, $sep = NULL) {
if (!$sep) {
$sep = check_plain(variable_get('biblio_keyword_sep', ','));
}
$regexp = '%(?:^|' . $sep . '\\ *)("(?>[^"]*)(?>""[^"]* )*"|(?: [^"' . $sep . ']*))%x';
preg_match_all($regexp, $string, $matches);
$keyword_array = array_unique($matches[1]);
$keywords = array();
foreach ($keyword_array as $keyword) {
$keyword = trim(str_replace('""', '"', preg_replace('/^"(.*)"$/', '\\1', $keyword)));
if ($keyword != "") {
$keywords[] = $keyword;
}
}
return $keywords;
}
function biblio_implode_keywords($keywords, $sep = '') {
if (empty($sep)) {
$sep = check_plain(variable_get('biblio_keyword_sep', ','));
}
$string = '';
foreach ($keywords as $kid => $keyword) {
$string .= strlen($string) ? "{$sep} " : '';
if (strpos($keyword, $sep) !== FALSE) {
$string .= '"' . $keyword . '"';
}
else {
$string .= $keyword;
}
}
return $string;
}