Merge branch 'master' of https://git.seemsleg.it/pub/php-func-lib

Conflicts:
	README.md

.gitignore

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

README.md

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

_func.php

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

debug.php

@@ -0,0 +1,14 @@
+<?php 
+    function debug($s) {
+        if(isset($_COOKIE['debug'])) 
+            print_r($s);
+    }
+    
+    function debugCookie($on=true) {
+        if($on) {
+            setcookie('debug','1',time()+(60*60*24*365),"/");
+        }else{
+            setcookie('debug',null,0,"/");
+        }
+    }
+?>

mail.php

@@ -0,0 +1,17 @@
+<?php
+
+function send_mail($an, $betreff, $text, $ok = '', $error = '')
+{
+    $header = 'From: noreply@isleofhope.de' . "\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;
+    }
+}
+

markdown.php

@@ -0,0 +1,84 @@
+<?php
+// TODO markdown imple
+function md($str) {
+  // return nl2br ( $str ); // TODO md problem
+  $text = '<p>';
+  $lv = 0;
+  $str = explode ( "\n", str_replace ( "\r\n", "\n", $str ) );
+  // var_dump ( $str );
+  foreach ( $str as $t ) {
+    // echo '<pre>' . $t . '</pre>';
+    $t = preg_replace_callback ( '/\[\[([^\]]*)\]\]/m', '_md_link_replacer', $t );
+    $nlv = 0;
+    if (startsWith ( $t, '**** ' )) {
+      // echo - 1;
+      $t = substr ( $t, 5 );
+      $nlv = 4;
+    }
+    if (startsWith ( $t, '*** ' )) {
+      // echo - 2;
+      $t = substr ( $t, 4 );
+      $nlv = 3;
+    }
+    if (startsWith ( $t, '** ' )) {
+      // echo - 3;
+      $t = substr ( $t, 3 );
+      $nlv = 2;
+    }
+    if (startsWith ( $t, '* ' )) {
+      // echo - 4;
+      $t = substr ( $t, 2 );
+      $nlv = 1;
+    }
+    if ($lv != $nlv) {
+      while ( $lv < $nlv ) {
+        // echo '-5 (' . $lv . '-' . $nlv . ')';
+        $text .= '<ul>';
+        $lv ++;
+      }
+      while ( $lv > $nlv ) {
+        // echo '-6 (' . $lv . '-' . $nlv . ')';
+        $text .= '</ul>';
+        $lv --;
+      }
+    }
+    if (startsWith ( $t, '!!!!! ' )) {
+      $t = '<h5>' . substr ( $t, 6 ) . '</h5>';
+    }
+    if (startsWith ( $t, '!!!! ' )) {
+      $t = '<h4>' . substr ( $t, 5 ) . '</h4>';
+    }
+    if (startsWith ( $t, '!!! ' )) {
+      $t = '<h3>' . substr ( $t, 4 ) . '</h3>';
+    }
+    if (startsWith ( $t, '!! ' )) {
+      $t = '<h2>' . substr ( $t, 3 ) . '</h2>';
+    }
+    if (startsWith ( $t, '! ' )) {
+      $t = '<h1>' . substr ( $t, 2 ) . '</h1>';
+    }
+    if ($lv == 0) {
+      if ($t == '') {
+        $text .= '</p><p>';
+      } else {
+        $text .= $t;
+      }
+    } else {
+      $text .= '<li>' . $t . '</li>';
+    }
+    // var_dump ( $t );
+  }
+  while ( $lv > 0 ) {
+    $text .= '</ul>';
+    $lv --;
+  }
+  $text .= '</p>';
+  return $text;
+}
+function _md_link_replacer($in) {
+  // var_dump ( $in );
+  $in = explode ( '|', $in [1], 2 );
+
+  return '<a href="' . $in [0] . '" target="_blank">' . (isset ( $in [1] ) ? $in [1] : $in [0]) . '</a>';
+}
+?>

numbers.php

@@ -0,0 +1,37 @@
+<?php
+function decade($zahl)
+{
+    if (! is_numeric($zahl) || $zahl == 0)
+        return $zahl;
+        $si = array(
+            - 4 => 'p',
+            - 3 => 'n',
+            - 2 => '&mu;',
+            - 1 => 'm',
+            0 => '',
+            1 => 'K',
+            2 => 'M',
+            3 => 'G',
+            4 => 'T'
+        );
+        
+        $e = 0;
+        
+        if ($zahl < 1) {
+            while ($zahl < 1 || $zahl >= 1000) {
+                $zahl = $zahl * 1000;
+                $e --;
+            }
+        } else {
+            while ($zahl < 1 || $zahl >= 1000) {
+                $zahl = $zahl / 1000;
+                $e ++;
+            }
+        }
+        return $zahl . ' ' . $si[$e];
+}
+
+function onlyNumeric($num) {
+    return preg_replace("/[^0-9\.\-]+/", "", $num);
+}
+?>

secret.php.example

@@ -0,0 +1,10 @@
+<?php 
+if (!defined('SQL_LOG')) define ( 'SQL_LOG', 1 ); // schreibt sql querys in eine log
+
+$_m['host'] = 'localhost'; 
+$_m['user'] = '';
+$_m['pass'] = '';
+$_m['data'] = '';
+$_m['pre']  = 'efcms2_';
+$_m['salt'] = '';
+?>

sql.php

@@ -0,0 +1,199 @@
+<?php
+class SQL {
+  private $h;
+  private $res = false;
+  private $m;
+  public $salt;
+  public $pre;
+  public $cnt_get = 0;
+  public $cnt_set = 0;
+  public function __construct() {
+    require_once ('secret.php');
+
+    $this->m = $_m;
+    $this->pre = $_m ['pre'];
+    $this->salt = $_m ['salt'];
+    if (SQL_LOG)
+      $this->f = fopen ( 'sql.log', 'w' );
+
+    $this->h = new mysqli ( $_m ['host'], $_m ['user'], $_m ['pass'], $_m ['data'] );
+    if ($this->h->connect_errno) {
+      return false;
+    }
+    return true;
+  }
+  public function get($que, $t = '', $p = array ()) {
+    // echo $que;
+    $this->cnt_get ++;
+    if (SQL_LOG)
+      fputs ( $this->f, str_replace ( array (
+          "\n",
+          "	"
+      ), array (
+          ' ',
+          ''
+      ), $que ) . "\n" . print_r ( $p, true ) . "\n\n" );
+    $statement = $this->h->prepare ( $que );
+    switch (count ( $p )) {
+      case 0 :
+        break;
+      case 1 :
+        $statement->bind_param ( $t, $p [0] );
+        break;
+      case 2 :
+        $statement->bind_param ( $t, $p [0], $p [1] );
+        break;
+      case 3 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2] );
+        break;
+      case 4 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3] );
+        break;
+      case 5 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4] );
+        break;
+      case 6 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5] );
+        break;
+      case 7 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6] );
+        break;
+      case 8 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7] );
+        break;
+      case 9 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8] );
+        break;
+      case 10 :
+        $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;
+    }
+    $statement->execute ();
+
+    $ret = array ();
+
+    // print_r($statement);
+    if (isset ( $statement->error ) && $statement->error != '') {
+      if (SQL_LOG)
+        fputs ( $this->f, $statement->error );
+      return false;
+    }
+    $result = $statement->get_result ();
+    // print_r($result);
+    while ( $row = $result->fetch_assoc () ) {
+      $ret [] = $row;
+    }
+    return $ret;
+  }
+  public function single($que, $t = '', $p = array ()) {
+    $data = $this->get ( $que, $t, $p );
+    if ($data) {
+      return $data [0];
+    }
+    return false;
+  }
+  public function list($que, $t = '', $p = array ()) {
+    $data = $this->get ( $que, $t, $p );
+    if ($data) {
+      $ret = array ();
+      foreach ( $data as $d ) {
+        foreach ( $d as $k => $v ) {
+          $ret [] = $v;
+        }
+      }
+      return $ret;
+    }
+    return false;
+  }
+  public function keyval($que, $k, $v, $t = '', $p = array ()) {
+    $data = $this->get ( $que, $t, $p );
+    if ($data) {
+      $ret = array ();
+      foreach ( $data as $d ) {
+        $ret [$d [$k]] = $d [$v];
+      }
+      return $ret;
+    }
+    return false;
+  }
+  public function set($que, $t = '', $p = array (), $id = false) {
+    // echo $que;
+    $this->cnt_set ++;
+    $statement = $this->h->prepare ( $que );
+    if (SQL_LOG)
+      fputs ( $this->f, str_replace ( array (
+          "\n",
+          "	"
+      ), array (
+          ' ',
+          ''
+      ), $que ) . "\n" . print_r ( $p, true ) . "\n\n" );
+    switch (count ( $p )) {
+      case 0 :
+        break;
+      case 1 :
+        $statement->bind_param ( $t, $p [0] );
+        break;
+      case 2 :
+        $statement->bind_param ( $t, $p [0], $p [1] );
+        break;
+      case 3 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2] );
+        break;
+      case 4 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3] );
+        break;
+      case 5 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4] );
+        break;
+      case 6 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5] );
+        break;
+      case 7 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6] );
+        break;
+      case 8 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7] );
+        break;
+      case 9 :
+        $statement->bind_param ( $t, $p [0], $p [1], $p [2], $p [3], $p [4], $p [5], $p [6], $p [7], $p [8] );
+        break;
+      case 10 :
+        $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;
+      case 11 :
+        $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] );
+        break;
+      case 12 :
+        $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] );
+        break;
+      case 13 :
+        $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;
+      case 14 :
+        $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 != '') {
+      if (SQL_LOG)
+        fputs ( $this->f, $statement->error );
+      return false;
+    }
+
+    if ($id) {
+      return $statement->insert_id;
+    } else {
+      return $statement->affected_rows;
+    }
+  }
+  function __destruct() {
+    if (SQL_LOG)
+      $this->h->close ();
+    // echo 'DESTROY';
+  }
+}
+?>

string.php

@@ -0,0 +1,260 @@
+<?php
+function umlaute($str) {
+  return str_replace ( array (
+      'Ä',
+      'Ö',
+      'Ü',
+      'ä',
+      'ö',
+      'ü',
+      'ß'
+  ), array (
+      '&Auml;',
+      '&Ouml;',
+      '&Uuml;',
+      '&auml;',
+      '&ouml;',
+      '&uuml;',
+      '&szlig;'
+  ), $str );
+}
+function chk($str) {
+  return str_replace ( "'", '"', $str );
+}
+function noScript($str) {
+  return str_replace ( array (
+      '<',
+      '>'
+  ), array (
+      '&lt;',
+      '&gt;'
+  ), $str );
+}
+function random($name_laenge) {
+  $zeichen = "abcedfghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRTSUVWXYZ0123456789";
+  $name_neu = "";
+
+  @mt_srand ( ( double ) microtime () * 1000000 );
+  for($i = 0; $i < $name_laenge; $i ++) {
+    $r = mt_rand ( 0, strlen ( $zeichen ) - 1 );
+    $name_neu .= $zeichen {$r};
+  }
+  return $name_neu;
+}
+function startsWith($haystack, $needle) {
+  $length = strlen ( $needle );
+  return (substr ( $haystack, 0, $length ) === $needle);
+}
+function endsWith($haystack, $needle) {
+  $length = strlen ( $needle );
+
+  return $length === 0 || (substr ( $haystack, - $length ) === $needle);
+}
+function onlyAlpha($str, $zus = '') {
+  return preg_replace ( "/[^a-zA-Z0-9 \-\{$zus}_]+/", "", $str );
+}
+function shortener($str, $len = 50, $fill = '...') {
+  if (strlen ( $str ) > $len) {
+    $str = substr ( $str, 0, $len - strlen ( $fill ) ) . $fill;
+  }
+  return $str;
+}
+function isEmail($str) {
+  $match = preg_match ( "/[a-zA-Z0-9\-\_\.]*\@[a-zA-Z0-9\-\_\.]*.[a-z]{2,10}/", $str );
+  if ($match) {
+    return $str;
+  }
+  return false;
+}
+function markUp($text) {
+  $r = '';
+  $lv = 0;
+  foreach ( explode ( "\n", $text ) as $t ) {
+    $nlv = 0;
+    if (startsWith ( '**** ', $t )) {
+      $t = substr ( $t, 5 );
+      $nlv = 4;
+    }
+    if (startsWith ( '*** ', $t )) {
+      $t = substr ( $t, 4 );
+      $nlv = 3;
+    }
+    if (startsWith ( '** ', $t )) {
+      $t = substr ( $t, 3 );
+      $nlv = 2;
+    }
+    if (startsWith ( '* ', $t )) {
+      $t = substr ( $t, 2 );
+      $nlv = 1;
+    }
+    if ($lv != $nlv) {
+      while ( $lv < $nlv ) {
+        $text .= '<ul>';
+        $lv ++;
+      }
+      while ( $lv > $nlv ) {
+        $text .= '</ul>';
+        $lv --;
+      }
+    }
+    if (startsWith ( $t, '!!!!! ' )) {
+      $t = '<h5>' . substr ( $t, 6 ) . '</h5>';
+    }
+    if (startsWith ( $t, '!!!! ' )) {
+      $t = '<h4>' . substr ( $t, 5 ) . '</h4>';
+    }
+    if (startsWith ( $t, '!!! ' )) {
+      $t = '<h3>' . substr ( $t, 4 ) . '</h3>';
+    }
+    if (startsWith ( $t, '!! ' )) {
+      $t = '<h2>' . substr ( $t, 3 ) . '</h2>';
+    }
+    if (startsWith ( $t, '! ' )) {
+      $t = '<h1>' . substr ( $t, 2 ) . '</h1>';
+    }
+    if ($lv == 0) {
+      $r .= $t;
+    } else {
+      $r .= '<li>' . $t . '</li>';
+    }
+    // var_dump ( $t );
+  }
+  while ( $lv > 0 ) {
+    $r .= '</ul>';
+    $lv --;
+  }
+  return $r;
+}
+function onlySimpleHTML($s) {
+  $s = str_replace ( array (
+      '<',
+      '>'
+  ), array (
+      '{{|-&lt;-|}}',
+      '{{|-&gt;-|}}'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}b{{|-&gt;-|}}',
+      '{{|-&lt;-|}}b/{{|-&gt;-|}}'
+  ), array (
+      '<b>',
+      '<b/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}u{{|-&gt;-|}}',
+      '{{|-&lt;-|}}u/{{|-&gt;-|}}'
+  ), array (
+      '<u>',
+      '<u/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}i{{|-&gt;-|}}',
+      '{{|-&lt;-|}}i/{{|-&gt;-|}}'
+  ), array (
+      '<i>',
+      '<i/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}span{{|-&gt;-|}}',
+      '{{|-&lt;-|}}span/{{|-&gt;-|}}'
+  ), array (
+      '<span>',
+      '<span/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}b{{|-&gt;-|}}',
+      '{{|-&lt;-|}}b/{{|-&gt;-|}}'
+  ), array (
+      '<b>',
+      '<b/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}br{{|-&gt;-|}}',
+      '{{|-&lt;-|}}br/{{|-&gt;-|}}'
+  ), array (
+      '<br>',
+      '<br/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}h1{{|-&gt;-|}}',
+      '{{|-&lt;-|}}h1/{{|-&gt;-|}}'
+  ), array (
+      '<h1>',
+      '<h1/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}h2{{|-&gt;-|}}',
+      '{{|-&lt;-|}}h2/{{|-&gt;-|}}'
+  ), array (
+      '<h2>',
+      '<h2/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}h3{{|-&gt;-|}}',
+      '{{|-&lt;-|}}h3/{{|-&gt;-|}}'
+  ), array (
+      '<h3>',
+      '<h3/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}h4{{|-&gt;-|}}',
+      '{{|-&lt;-|}}h4/{{|-&gt;-|}}'
+  ), array (
+      '<h4>',
+      '<h4/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}h5{{|-&gt;-|}}',
+      '{{|-&lt;-|}}h5/{{|-&gt;-|}}'
+  ), array (
+      '<h5>',
+      '<h5/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}h6{{|-&gt;-|}}',
+      '{{|-&lt;-|}}h6/{{|-&gt;-|}}'
+  ), array (
+      '<h6>',
+      '<h6/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}li{{|-&gt;-|}}',
+      '{{|-&lt;-|}}li/{{|-&gt;-|}}'
+  ), array (
+      '<li>',
+      '<li/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}ul{{|-&gt;-|}}',
+      '{{|-&lt;-|}}ul/{{|-&gt;-|}}'
+  ), array (
+      '<ul>',
+      '<ul/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}ol{{|-&gt;-|}}',
+      '{{|-&lt;-|}}ol/{{|-&gt;-|}}'
+  ), array (
+      '<ol>',
+      '<ol/>'
+  ), $s );
+  $s = str_replace ( array (
+      '{{|-&lt;-|}}pre{{|-&gt;-|}}',
+      '{{|-&lt;-|}}pre/{{|-&gt;-|}}'
+  ), array (
+      '<pre>',
+      '<pre/>'
+  ), $s );
+
+  // cleanup
+  $s = str_replace ( array (
+      '{{|-',
+      '-|}}'
+  ), array (
+      '',
+      ''
+  ), $s );
+
+  return $s;
+}
+?>