4 <?plugin AddLink ?> will add an inline <form> to add a link to the
8 $ewiki_plugins["mpi"]["addlink"] = "ewiki_mpi_addlink";
12 function ewiki_mpi_addlink($action, $args, &$iii, &$s)
14 global $ewiki_id, $ewiki_action;
18 if ($_REQUEST["link_save"]) {
21 $url = trim($_REQUEST["link_url"]);
24 if (!strpos($url, "example.com") && (strlen($url) > 12) && preg_match('#^https?://#', $url)) {
25 $text = implode("", file($url));
27 (preg_match('#<title[^>]*>([^<]+)</title>#ims', $text, $uu))
29 or (preg_match('#//([^/]+)#', $url, $uu))
30 and ($title = $uu[1]);
31 (preg_match('#<meta[^>]+name=["\']description["\'][^>]+content=["\']([^"\']+)["\']#ims', $text, $uu))
33 or (preg_match('#<body[^>]+>(.+?)</body#ims', $text, $uu))
34 and ($desc = strip_tags($uu[1]));
35 $desc = substr(preg_replace('/\s+/', " ", $desc), 0, 300);
37 $add = ":$title:\n $url %%%\n $desc\n";
42 $data = ewiki_db::GET($ewiki_id);
43 $data["content"] = rtrim($data["content"]) . "\n" . $add;
44 ewiki_data_update($data);
46 ewiki_db::WRITE($data);
48 #-- append to page output
57 $url = ewiki_script("", $ewiki_id);
59 <form style="border:2px #333370 solid; background:#7770B0; padding:5px;"class="BugReport" action="$url" method="POST" enctype="multipart/form-data">
60 <input type="hidden" name="id" value="$ewiki_action/$ewiki_id">
61 Link <input type="text" name="link_url" value="http://www.example.com/" size="50">
62 <input type="submit" name="link_save" value="hinzufügen">