Commit b7326a33 authored by Dries's avatar Dries

- Removed the meta.module.  We are about to replace it ...
parent 6c0db2de
<?php
// $Id$
function meta_help() {
?>
To be written.
<?php
}
function meta_perm() {
return array("administer meta tags");
}
function meta_link($type) {
if ($type == "admin" && user_access("administer meta tags")) {
$links[] = "<a href=\"admin.php?mod=meta\">meta tags</a>";
}
return $links ? $links : array();
}
function meta_form($type, $edit = array()) {
if (!$edit[attributes]) $edit[attributes] = "";
$c = db_query("SELECT * FROM collection WHERE types LIKE '%". check_input($type) ."%'");
while ($collection = db_fetch_object($c)) {
unset($array);
$t = db_query("SELECT * FROM tag WHERE collections LIKE '%$collection->name%' ORDER BY name");
while ($tag = db_fetch_object($t)) {
if (strstr($edit[attributes], $tag->attributes)) {
$edit[$collection->name] = $tag->attributes;
}
$array[$tag->attributes] = $tag->name;
}
$form .= form_select($collection->name, $collection->name, $edit[$collection->name], $array);
}
return $form;
}
function meta_save($type, $edit = array()) {
$result = db_query("SELECT * FROM collection WHERE types LIKE '%". check_input($type) ."%'");
while ($collection = db_fetch_object($result)) {
$array[] = $edit[$collection->name];
}
return $array ? implode(", ", $array) : "";
}
function meta_get_collection($cid) {
return db_fetch_array(db_query("SELECT * FROM collection WHERE cid = '". check_input($cid) ."'"));
}
function meta_get_tag($tid) {
return db_fetch_array(db_query("SELECT * FROM tag WHERE tid = '". check_input($tid) ."'"));
}
function meta_form_collection($edit = array()) {
foreach (module_list() as $name) {
if (module_hook($name, "node")) {
$nodetypes[] = $name;
}
}
$form .= form_textfield("Collection name", "name", $edit[name], 50, 64, "Required. The name for this group or collection of meta-tags. Example: 'Software'.");
$form .= form_textfield("Types", "types", $edit[types], 50, 64, "Required. A comma-seperated list of node types you want to associate this collection with. Available types: " . implode(", ", $nodetypes) . ".");
$form .= form_submit("Submit");
if ($edit[cid]) {
$form .= form_submit("Delete");
$form .= form_hidden("cid", $edit[cid]);
}
return form($form);
}
function meta_form_tag($edit = array()) {
$form .= form_textfield("Meta-tag name", "name", $edit[name], 50, 64, "Required. The name for this meta-tag. Example: 'Apache'.");
$form .= form_textfield("Attributes", "attributes", $edit[attributes], 50, 64, "Required. A comma-seperated list of keywords you want to associate this meta-tag with. Example: 'Computers, Software, Webservers'.");
$form .= form_textfield("Collections", "collections", $edit[collections], 50, 64, "Required. A comma-seperated list of collections you want to associate this meta-tag with. Example: 'Section'.");
$form .= form_submit("Submit");
if ($edit[tid]) {
$form .= form_submit("Delete");
$form .= form_hidden("tid", $edit[tid]);
}
return form($form);
}
function meta_save_collection($edit) {
if ($edit[cid] && $edit[name]) {
db_query("UPDATE collection SET name = '". check_input($edit[name]) ."', types = '". check_input($edit[types]) ."' WHERE cid = '$edit[cid]'");
}
else if ($edit[cid]) {
db_query("DELETE FROM collection WHERE cid = '". check_input($edit[cid]) ."'");
}
else {
db_query("INSERT INTO collection (name, types) VALUES ('". check_input($edit[name]) ."', '". check_input($edit[types]) ."')");
}
}
function meta_save_tag($edit) {
if ($edit[tid] && $edit[name]) {
db_query("UPDATE tag SET name = '". check_input($edit[name]) ."', attributes = '". check_input($edit[attributes]) ."', collections = '". check_input($edit[collections]) ."' WHERE tid = '$edit[tid]'");
}
else if ($edit[tid]) {
db_query("DELETE FROM tag WHERE tid = '". check_input($edit[tid]) ."'");
}
else {
db_query("INSERT INTO tag (name, attributes, collections) VALUES ('". check_input($edit[name]) ."', '". check_input($edit[attributes]) ."', '". check_input($edit[collections]) ."')");
}
}
function meta_preview() {
foreach (module_list() as $name) {
if (module_hook($name, "status") && $name != "node") {
$output .= "<H3>". ucfirst($name) ." type</H3>";
$output .= meta_form($name) ."<HR>";
}
}
return form($output);
}
function meta_overview() {
$result = db_query("SELECT * FROM collection ORDER BY name");
$output .= "<H3>Collection overview</H3>";
$output .= "<TABLE BORDER=\"1\" cellpadding=\"2\" CELLSPACING=\"2\">\n";
$output .= " <TR><TH>name</TH><TH>node types</TH><TH>operations</TH></TR>\n";
while ($collection = db_fetch_object($result)) {
$output .= " <TR><TD>". check_output($collection->name) ."</TD><TD>". check_output($collection->types) ."</TD><TD><A HREF=\"admin.php?mod=meta&type=collection&op=edit&id=$collection->cid\">edit collection</A></TD></TR>\n";
}
$output .= "</TABLE>\n";
$result = db_query("SELECT * FROM tag ORDER BY name");
$output .= "<H3>Meta-tag overview</H3>";
$output .= "<TABLE BORDER=\"1\" cellpadding=\"2\" CELLSPACING=\"2\">\n";
$output .= " <TR><TH>name</TH><TH>collections</TH><TH>meta attributes</TH><TH>operations</TH></TR>\n";
while ($tag = db_fetch_object($result)) {
$output .= " <TR><TD>". check_output($tag->name) ."</TD><TD>". check_output($tag->collections) ."</TD><TD>". check_output($tag->attributes) ."</TD><TD><A HREF=\"admin.php?mod=meta&type=tag&op=edit&id=$tag->tid\">edit tag</A></TD></TR>\n";
}
$output .= "</TABLE>\n";
return $output;
}
function meta_admin() {
global $edit, $type, $op, $id;
if (user_access("administer meta tags")) {
print "<SMALL><A HREF=\"admin.php?mod=meta&type=collection&op=add\">add new collection</A> | <A HREF=\"admin.php?mod=meta&type=tag&op=add\">add new meta-tag</A> | <A HREF=\"admin.php?mod=meta&op=preview\">preview node forms</A> | <A HREF=\"admin.php?mod=meta\">overview</A> | <A HREF=\"admin.php?mod=meta&op=help\">help</A></SMALL><HR>\n";
switch ($op) {
case "add":
if ($type == "collection")
print meta_form_collection();
else
print meta_form_tag();
break;
case "edit":
if ($type == "collection")
print meta_form_collection(meta_get_collection($id));
else
print meta_form_tag(meta_get_tag($id));
break;
case "help":
print meta_help();
break;
case "preview":
print meta_preview();
break;
case "Delete":
$edit[name] = 0;
// fall through:
case "Submit":
if ($type == "collection")
print status(meta_save_collection($edit));
else
print status(meta_save_tag($edit));
// fall through:
default:
print meta_overview();
}
}
else {
print message_access();
}
}
?>
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment