// * With a hyperlink to the anchor id: string
// * With an anchor id and a link to the id itself: string
//
// NOTE: Use 'id="key"' instead of 'name="key"' at XHTML 1.1
// Check ID is unique or not (compatible: no-check)
define('PLUGIN_ANAME_ID_MUST_UNIQUE', 0);
// Max length of ID
define('PLUGIN_ANAME_ID_MAX', 40);
// Pattern of ID
define('PLUGIN_ANAME_ID_REGEX', '/^[A-Za-z][\w\-]*$/');
// Show usage
function plugin_aname_usage($convert = TRUE, $message = '')
{
if ($convert) {
if ($message == '') {
return '#aname(anchorID[[,super][,full][,noid],Link title])' . '
';
} else {
return '#aname: ' . $message . '
';
}
} else {
if ($message == '') {
return '&aname(anchorID[,super][,full][,noid][,nouserselect]){[Link title]};';
} else {
return '&aname: ' . $message . ';';
}
}
}
// #aname
function plugin_aname_convert()
{
$convert = TRUE;
if (func_num_args() < 1)
return plugin_aname_usage($convert);
return plugin_aname_tag(func_get_args(), $convert);
}
// &aname;
function plugin_aname_inline()
{
$convert = FALSE;
if (func_num_args() < 2)
return plugin_aname_usage($convert);
$args = func_get_args(); // ONE or more
$body = strip_htmltag(array_pop($args), FALSE); // Strip anchor tags only
array_push($args, $body);
return plugin_aname_tag($args, $convert);
}
// Aname plugin itself
function plugin_aname_tag($args = array(), $convert = TRUE)
{
global $vars;
static $_id = array();
if (empty($args) || $args[0] == '') return plugin_aname_usage($convert);
$id = array_shift($args);
$body = '';
if (! empty($args)) $body = array_pop($args);
$f_noid = in_array('noid', $args); // Option: Without id attribute
$f_super = in_array('super', $args); // Option: CSS class
$f_full = in_array('full', $args); // Option: With full(absolute) URI
$f_nouserselect = in_array('nouserselect', $args); // Option: user-select:none;
if ($body == '') {
if ($f_noid) return plugin_aname_usage($convert, 'Meaningless(No link-title with \'noid\')');
if ($f_super) return plugin_aname_usage($convert, 'Meaningless(No link-title with \'super\')');
if ($f_full) return plugin_aname_usage($convert, 'Meaningless(No link-title with \'full\')');
}
if (PLUGIN_ANAME_ID_MUST_UNIQUE && isset($_id[$id]) && ! $f_noid) {
return plugin_aname_usage($convert, 'ID already used: '. $id);
} else {
if (strlen($id) > PLUGIN_ANAME_ID_MAX)
return plugin_aname_usage($convert, 'ID too long');
if (! preg_match(PLUGIN_ANAME_ID_REGEX, $id))
return plugin_aname_usage($convert, 'Invalid ID string: ' .
htmlsc($id));
$_id[$id] = TRUE; // Set
}
if ($convert) $body = htmlsc($body);
$id = htmlsc($id); // Insurance
$class = $f_super ? 'anchor_super' : 'anchor';
$attr_id = $f_noid ? '' : ' id="' . $id . '"';
$url = $f_full ? get_page_uri($vars['page']) : '';
$astyle = '';
if ($body != '') {
$href = ' href="' . $url . '#' . $id . '"';
$title = ' title="' . $id . '"';
if ($f_nouserselect) {
$astyle = ' style="user-select:none;"';
}
} else {
$href = $title = '';
}
return '' .
$body . '';
}