add troy api

Reviewed-on: #2

.gitignore

@@ -1,5 +1,6 @@
-/.buildpath
+/.buildpath
-/.project
+/.project
-/secret.php
+/secret.php
-/config.php
+/config.php
 /test.php
+/_secret.php

README.md

@@ -1,3 +1,2 @@
-git submodule add https://git.seemsleg.it/ef/php-func-lib lib
+# php-func-lib
-
+git submodule add https://git.seemsleg.it/pub/php-func-lib lib
-test

_func.php

@@ -1,10 +1,11 @@
-<?php
+<?php
-// include ('config.php');
+// include ('config.php');
-include_once ('sql.php');
+include_once ('sql.php');
-$sql = new SQL ();
+$sql = new SQL ();
-include_once ('string.php');
+include_once ('string.php');
-include_once ('numbers.php');
+include_once ('numbers.php');
-include_once ('mail.php');
+include_once ('mail.php');
-include_once ('debug.php');
+include_once ('debug.php');
-include_once ('markdown.php');
+include_once ('troy-api.php');
+// include_once ('markdown.php');
 ?>

ips/crawler.php

@@ -0,0 +1,43 @@
+<?php
+$_ips_crawler = array (
+        '34.79.234.76', // google
+        '40.77.167.', // bing bot
+        '54.36.148.', // ahrefbot
+        '54.36.149.', // ahrefbot
+        '66.249.',
+        '62.138.',
+        '62.210.149.60',
+        '65.21.180.26', // seekport
+        '81.209.177.145', // website-datenbank.de
+        '85.25.177.', // abuse
+        '85.25.210.', // hosteurope abuse
+        '92.118.160.37', // netsystem research bot
+        '104.155.85.', // google
+        '114.119.1', // petalbot
+        '144.76.15.153', // mj12bot
+        '148.251.120.201', // mj12bot
+        '157.55.39.', // microsoft???
+        '172.217.', //google
+        '176.125.230.38', //sql inj
+        '185.191.171.', // semrush bot
+        '192.99.5.225', // ...
+        '205.185.115.87', //sex spam
+        '207.46.13.', // bing bot
+        '216.58.', //google
+        '216.244.66.196', // opensiteexplorer
+        '2a01:4f8:190:4244::2', // mj12bot
+        '2a01:4f8:162:43c5::2', // mj12bot
+);
+function checkHuman() {
+  global $_ips_crawler;
+  if (stripos ( $_SERVER ['HTTP_USER_AGENT'], 'bot' ) !== false || stripos ( $_SERVER ['HTTP_USER_AGENT'], 'crawler' ) !== false) {
+    return false;
+  }
+  foreach ( $_ips_crawler as $np ) {
+    if (startsWith ( $_SERVER ['REMOTE_ADDR'], $np )) {
+      return false;
+    }
+  }
+  return true;
+}
+?>

mail.php

@@ -1,17 +1,81 @@
 <?php
-
+function send_mail($an, $betreff, $text, $ok = '', $error = '') {
-function send_mail($an, $betreff, $text, $ok = '', $error = '')
+  global $absender;
-{
+  $sender = 'noreply@troy-grunt.de';
-    $header = 'From: noreply@isleofhope.de' . "\r\n";
+  if(isset($absender) && $absender) {
-    $header .= 'To: ' . $an . "\r\n";
+    $sender = $absender;
-    $header .= 'Content-Type:text/html' . "\r\n";
+  }else{
-    $header .= 'Content-Transfer-Encoding: 8bit' . "\r\n";
+    include 'secret.php';
-    $header .= 'X-Mailer: PHP/' . phpversion();
+    if (isset ( $_sendermail )) {
-
+      $sender = $_sendermail;
-    if (mail($an, $betreff, $text, $header) === true) {
-        echo $ok;
-    } else {
-        echo $error;
     }
+  }
+  $header = 'From: ' . $sender . "\r\n";
+  $header .= 'To: ' . $an . "\r\n";
+  $header .= 'Content-Type:text/html' . "\r\n";
+  $header .= 'Content-Transfer-Encoding: 8bit' . "\r\n";
+  $header .= 'X-Mailer: PHP/' . phpversion ();
+
+  if (mail ( $an, $betreff, $text, $header ) === true) {
+    echo $ok;
+  } else {
+    echo $error;
+  }
 }
 
+function send_html_mail($an, $betreff, $text, $ok = '', $error = '') {
+  global $absender;
+  $sender = 'noreply@troy-grunt.de';
+  if(isset($absender) && $absender) {
+    $sender = $absender;
+  }else{
+    include 'secret.php';
+    if (isset ( $_sendermail )) {
+      $sender = $_sendermail;
+    }
+  }
+  $boundary = md5($an.$betreff.$text.time());
+
+  $header = 'From: ' . $sender . "\n";
+  $header .= 'To: ' . $an . "\n";
+  $header .= 'Content-Type:multipart/alternative;boundary='.$boundary . "\n";
+  $header .= 'X-Mailer: PHP/' . phpversion ();
+  $content = "This is multipart message using MIME\n";
+  $content .= "--" . $boundary . "\n";
+  $content .= "Content-type: text/plain;charset=utf-8\n";
+  $content .= 'Content-Transfer-Encoding: 8bit' . "\n\n";
+  $content .= strip_tags($text)."\n\n";
+  $content .= "--" . $boundary . "\n";
+  $content .= "Content-type: text/html;charset=utf-8\n";
+  $content .= "Content-Transfer-Encoding: 8bit". "\n\n";
+  $content .= '<html><body>'.$text.'</body></html>'."\n\n";
+
+  if (mail ( $an, $betreff, $content, $header ) === true) {
+    echo $ok;
+  } else {
+    echo $error;
+  }
+}
+
+function send_php_mail($an, $betreff, $text, $ok = '', $error = '') {
+  global $_sendermail;
+  $sender = 'noreply@troy-grunt.de';
+  if (isset ( $_sendermail )) {
+    $sender = $_sendermail;
+  }
+  include 'php-mailer/PHPMailer.php';
+  $mail = new PHPMailer();
+
+  $mail->setFrom($sender);
+  $mail->addAddress($an);
+  $mail->Subject = $betreff;
+  $mail->msgHTML($text, __DIR__);
+  $mail->AltBody = strip_tags($text);
+
+  if (!$mail->send()) {
+    echo 'Mailer Error: ' . $mail->ErrorInfo;
+  } else {
+      echo 'Message sent!';
+  }
+}
+?>

og.php

@@ -0,0 +1,15 @@
+<?php
+function scanOG($url) {
+  $og = array();
+  $html = file_get_contents($url);
+
+  $re = '/<meta (name|property)=("|\')(.*?)("|\').*?content=("|\')(.*?)("|\')/m';
+  preg_match_all($re, $html, $matches, PREG_SET_ORDER, 0);
+
+  foreach($matches as $m) {
+    $og[$m[3]] = $m[6];
+  }
+  //print_r($og);
+  return $og;
+}
+?>

secret.php.example

@@ -1,10 +1,15 @@
-<?php 
+<?php
 if (!defined('SQL_LOG')) define ( 'SQL_LOG', 1 ); // schreibt sql querys in eine log
 
-$_m['host'] = 'localhost'; 
+$_m['host'] = 'localhost';
 $_m['user'] = '';
 $_m['pass'] = '';
 $_m['data'] = '';
-$_m['pre']  = 'efcms2_';
+$_m['pre']  = '';
 $_m['salt'] = '';
+
+$_sendermail = 'noreply@.de';
+$_smtp['srv'] = 'mail.seemsleg.it';
+$_smtp['user'] = 'noreply@.de';
+$_smtp['pw'] = '';
 ?>

sql.php

@@ -27,46 +27,50 @@ class SQL {
     $this->cnt_get ++;
     if (SQL_LOG)
       fputs ( $this->f, str_replace ( array (
-          "\n",
+              "\n",
-          "	"
+              "  "
       ), array (
-          ' ',
+              ' ',
-          ''
+              ''
       ), $que ) . "\n" . print_r ( $p, true ) . "\n\n" );
     $statement = $this->h->prepare ( $que );
-    switch (count ( $p )) {
+    if (is_array ( $p )) {
-      case 0 :
+      switch (count ( $p )) {
-        break;
+        case 0 :
-      case 1 :
+          break;
-        $statement->bind_param ( $t, $p [0] );
+        case 1 :
-        break;
+          $statement->bind_param ( $t, $p [0] );
-      case 2 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1] );
+        case 2 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1] );
-      case 3 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2] );
+        case 3 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2] );
-      case 4 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3] );
+        case 4 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3] );
-      case 5 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4] );
+        case 5 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4] );
-      case 6 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5] );
+        case 6 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5] );
-      case 7 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6] );
+        case 7 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6] );
-      case 8 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7] );
+        case 8 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7] );
-      case 9 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8] );
+        case 9 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8] );
-      case 10 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8], $p [9] );
+        case 10 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8], $p [9] );
+          break;
+      }
+    } else {
+      $statement->bind_param ( $t, $p );
     }
     $statement->execute ();
 
@@ -122,60 +126,55 @@ class SQL {
     $statement = $this->h->prepare ( $que );
     if (SQL_LOG)
       fputs ( $this->f, str_replace ( array (
-          "\n",
+              "\n",
-          "	"
+              "  "
       ), array (
-          ' ',
+              ' ',
-          ''
+              ''
       ), $que ) . "\n" . print_r ( $p, true ) . "\n\n" );
-    switch (count ( $p )) {
+    if (is_array ( $p )) {
-      case 0 :
+      switch (count ( $p )) {
-        break;
+        case 0 :
-      case 1 :
+          break;
-        $statement->bind_param ( $t, $p [0] );
+        case 1 :
-        break;
+          $statement->bind_param ( $t, $p [0] );
-      case 2 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1] );
+        case 2 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1] );
-      case 3 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2] );
+        case 3 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2] );
-      case 4 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3] );
+        case 4 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3] );
-      case 5 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4] );
+        case 5 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4] );
-      case 6 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5] );
+        case 6 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5] );
-      case 7 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6] );
+        case 7 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6] );
-      case 8 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7] );
+        case 8 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7] );
-      case 9 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8] );
+        case 9 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8] );
-      case 10 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8], $p [9] );
+        case 10 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8], $p [9] );
-      case 11 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8], $p [9], $p [10] );
+        case 11 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8], $p [9], $p [10] );
-      case 12 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8], $p [9], $p [10], $p [11] );
+        case 12 :
-        break;
+          $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8], $p [9], $p [10], $p [11] );
-      case 13 :
+          break;
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8], $p [9], $p [10], $p [11], $p [12] );
+      }
-        break;
+    } else {
-      case 14 :
+      $statement->bind_param ( $t, $p );
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8], $p [9], $p [10], $p [11], $p [12], $p [13] );
-        break;
-      case 15 :
-        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8], $p [9], $p [10], $p [11], $p [12], $p [13], $p [14] );
-        break;
     }
     $statement->execute ();
     if (isset ( $statement->error ) && $statement->error != '') {
@@ -196,4 +195,4 @@ class SQL {
     // echo 'DESTROY';
   }
 }
-?>
+?>

string.php

@@ -1,21 +1,23 @@
 <?php
 function umlaute($str) {
   return str_replace ( array (
-      'Ä',
+          'Ä',
-      'Ö',
+          'Ö',
-      'Ü',
+          'Ü',
-      'ä',
+          'ä',
-      'ö',
+          'ö',
-      'ü',
+          'ü',
-      'ß'
+          'ß',
+          '&'
   ), array (
-      '&Auml;',
+          '&Auml;',
-      '&Ouml;',
+          '&Ouml;',
-      '&Uuml;',
+          '&Uuml;',
-      '&auml;',
+          '&auml;',
-      '&ouml;',
+          '&ouml;',
-      '&uuml;',
+          '&uuml;',
-      '&szlig;'
+          '&szlig;',
+          '&amp;'
   ), $str );
 }
 function chk($str) {
@@ -23,11 +25,11 @@ function chk($str) {
 }
 function noScript($str) {
   return str_replace ( array (
-      '<',
+          '<',
-      '>'
+          '>'
   ), array (
-      '&lt;',
+          '&lt;',
-      '&gt;'
+          '&gt;'
   ), $str );
 }
 function random($name_laenge) {
@@ -37,7 +39,7 @@ function random($name_laenge) {
   @mt_srand ( ( double ) microtime () * 1000000 );
   for($i = 0; $i < $name_laenge; $i ++) {
     $r = mt_rand ( 0, strlen ( $zeichen ) - 1 );
-    $name_neu .= $zeichen {$r};
+    $name_neu .= $zeichen[$r];
   }
   return $name_neu;
 }
@@ -127,134 +129,144 @@ function markUp($text) {
 }
 function onlySimpleHTML($s) {
   $s = str_replace ( array (
-      '<',
+          '<',
-      '>'
+          '>'
   ), array (
-      '{{|-&lt;-|}}',
+          '{{|-&lt;-|}}',
-      '{{|-&gt;-|}}'
+          '{{|-&gt;-|}}'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}b{{|-&gt;-|}}',
+          '{{|-&lt;-|}}b{{|-&gt;-|}}',
-      '{{|-&lt;-|}}b/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}b/{{|-&gt;-|}}'
   ), array (
-      '<b>',
+          '<b>',
-      '<b/>'
+          '<b/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}u{{|-&gt;-|}}',
+          '{{|-&lt;-|}}u{{|-&gt;-|}}',
-      '{{|-&lt;-|}}u/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}u/{{|-&gt;-|}}'
   ), array (
-      '<u>',
+          '<u>',
-      '<u/>'
+          '<u/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}i{{|-&gt;-|}}',
+          '{{|-&lt;-|}}i{{|-&gt;-|}}',
-      '{{|-&lt;-|}}i/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}i/{{|-&gt;-|}}'
   ), array (
-      '<i>',
+          '<i>',
-      '<i/>'
+          '<i/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}span{{|-&gt;-|}}',
+          '{{|-&lt;-|}}span{{|-&gt;-|}}',
-      '{{|-&lt;-|}}span/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}span/{{|-&gt;-|}}'
   ), array (
-      '<span>',
+          '<span>',
-      '<span/>'
+          '<span/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}b{{|-&gt;-|}}',
+          '{{|-&lt;-|}}b{{|-&gt;-|}}',
-      '{{|-&lt;-|}}b/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}b/{{|-&gt;-|}}'
   ), array (
-      '<b>',
+          '<b>',
-      '<b/>'
+          '<b/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}br{{|-&gt;-|}}',
+          '{{|-&lt;-|}}br{{|-&gt;-|}}',
-      '{{|-&lt;-|}}br/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}br/{{|-&gt;-|}}'
   ), array (
-      '<br>',
+          '<br>',
-      '<br/>'
+          '<br/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}h1{{|-&gt;-|}}',
+          '{{|-&lt;-|}}h1{{|-&gt;-|}}',
-      '{{|-&lt;-|}}h1/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}h1/{{|-&gt;-|}}'
   ), array (
-      '<h1>',
+          '<h1>',
-      '<h1/>'
+          '<h1/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}h2{{|-&gt;-|}}',
+          '{{|-&lt;-|}}h2{{|-&gt;-|}}',
-      '{{|-&lt;-|}}h2/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}h2/{{|-&gt;-|}}'
   ), array (
-      '<h2>',
+          '<h2>',
-      '<h2/>'
+          '<h2/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}h3{{|-&gt;-|}}',
+          '{{|-&lt;-|}}h3{{|-&gt;-|}}',
-      '{{|-&lt;-|}}h3/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}h3/{{|-&gt;-|}}'
   ), array (
-      '<h3>',
+          '<h3>',
-      '<h3/>'
+          '<h3/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}h4{{|-&gt;-|}}',
+          '{{|-&lt;-|}}h4{{|-&gt;-|}}',
-      '{{|-&lt;-|}}h4/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}h4/{{|-&gt;-|}}'
   ), array (
-      '<h4>',
+          '<h4>',
-      '<h4/>'
+          '<h4/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}h5{{|-&gt;-|}}',
+          '{{|-&lt;-|}}h5{{|-&gt;-|}}',
-      '{{|-&lt;-|}}h5/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}h5/{{|-&gt;-|}}'
   ), array (
-      '<h5>',
+          '<h5>',
-      '<h5/>'
+          '<h5/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}h6{{|-&gt;-|}}',
+          '{{|-&lt;-|}}h6{{|-&gt;-|}}',
-      '{{|-&lt;-|}}h6/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}h6/{{|-&gt;-|}}'
   ), array (
-      '<h6>',
+          '<h6>',
-      '<h6/>'
+          '<h6/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}li{{|-&gt;-|}}',
+          '{{|-&lt;-|}}li{{|-&gt;-|}}',
-      '{{|-&lt;-|}}li/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}li/{{|-&gt;-|}}'
   ), array (
-      '<li>',
+          '<li>',
-      '<li/>'
+          '<li/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}ul{{|-&gt;-|}}',
+          '{{|-&lt;-|}}ul{{|-&gt;-|}}',
-      '{{|-&lt;-|}}ul/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}ul/{{|-&gt;-|}}'
   ), array (
-      '<ul>',
+          '<ul>',
-      '<ul/>'
+          '<ul/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}ol{{|-&gt;-|}}',
+          '{{|-&lt;-|}}ol{{|-&gt;-|}}',
-      '{{|-&lt;-|}}ol/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}ol/{{|-&gt;-|}}'
   ), array (
-      '<ol>',
+          '<ol>',
-      '<ol/>'
+          '<ol/>'
   ), $s );
   $s = str_replace ( array (
-      '{{|-&lt;-|}}pre{{|-&gt;-|}}',
+          '{{|-&lt;-|}}pre{{|-&gt;-|}}',
-      '{{|-&lt;-|}}pre/{{|-&gt;-|}}'
+          '{{|-&lt;-|}}pre/{{|-&gt;-|}}'
   ), array (
-      '<pre>',
+          '<pre>',
-      '<pre/>'
+          '<pre/>'
   ), $s );
 
   // cleanup
   $s = str_replace ( array (
-      '{{|-',
+          '{{|-',
-      '-|}}'
+          '-|}}'
   ), array (
-      '',
+          '',
-      ''
+          ''
   ), $s );
 
   return $s;
 }
+function linkify($input) {
+  $pattern = '@(http(s)?://[a-zA-Z0-9/\.\#\-\_]*)@';
+  return $output = preg_replace ( $pattern, '<a href="$1">$1</a>', $input );
+}
+function inStr($needle, $haystack) {
+  if (strpos ( $haystack, $needle ) !== false) {
+    return true;
+  }
+  return false;
+}
 ?>

troy-api.php

@@ -0,0 +1,16 @@
+<?php
+function sendToTroy($data) {
+  $url = 'https://troy-grunt.de/api.php';
+  $options = array (
+          'http' => array (
+                  'method' => 'POST',
+                  'header' => array (
+                          'Content-Type: application/json'
+                  ),
+                  'content' => json_encode ( $data )
+          )
+  );
+  $context = stream_context_create ( $options );
+  return file_get_contents ( $url, false, $context );
+}
+?>