From 7f4159ac258c501f9666efc465a78cb2aec9d177 Mon Sep 17 00:00:00 2001
From: Laria Carolin Chabowski <laria@laria.me>
Date: Mon, 21 Sep 2020 21:21:30 +0200
Subject: Code cleanup

- Remove unused variables
- Remove unused utility functions
- Asserting presence and typehinting global variables
- Remove unused variables
- Add missing global
- Add parameter type constraint
- Fix some references to nonexisting variables
---
 ratatoeskr/sys/utils.php | 155 -----------------------------------------------
 1 file changed, 155 deletions(-)

(limited to 'ratatoeskr/sys/utils.php')

diff --git a/ratatoeskr/sys/utils.php b/ratatoeskr/sys/utils.php
index 89f779d..a285bcd 100644
--- a/ratatoeskr/sys/utils.php
+++ b/ratatoeskr/sys/utils.php
@@ -31,100 +31,6 @@ function array_repeat($val, $n)
     return $rv;
 }
 
-/*
- * Function: array_blend
- *
- * Blend multiple arrays together.
- *
- * Example:
- *
- *  array_blend(array(1,2,3), array(4,5,6), array(7,8,9));
- *  will return array(1,4,7,2,5,8,3,6,9)
- */
-function array_blend()
-{
-    $arrays = array_filter(func_get_args(), "is_array");
-
-    switch (count($arrays)) {
-        case 0:  return []; break;
-        case 1:  return $arrays[0]; break;
-        default:
-            $rv = [];
-            while (array_sum(array_map("count", $arrays)) > 0) {
-                for ($i = 0; $i < count($arrays); ++$i) {
-                    $val = array_shift($arrays[$i]);
-                    if ($val === null) {
-                        continue;
-                    }
-                    array_push($rv, $val);
-                }
-            }
-            return $rv;
-            break;
-    }
-}
-
-/*
- * Function: array_filter_empty
- *
- * Filters all empty elements out of an array.
- *
- * Parameters:
- *
- *  $input - The input array
- *
- * Returns:
- *
- *  The $input without its empty elements.
- */
-function array_filter_empty($input)
-{
-    return array_filter($input, function ($x) {
-        return !empty($x);
-    });
-}
-
-/*
- * Function: array_filter_keys
- *
- * Like PHPs `array_filter`, but callback will get the key, not the value of the array element.
- */
-function array_filter_keys($input, $callback)
-{
-    if (!is_array($input)) {
-        throw new InvalidArgumentException("Argument 1 must be an array");
-    }
-    if (empty($input)) {
-        return [];
-    }
-    $delete_keys = array_filter(array_keys($input), function ($x) use ($callback) {
-        return !$callback($x);
-    });
-    foreach ($delete_keys as $key) {
-        unset($input[$key]);
-    }
-    return $input;
-}
-
-/*
- * Function: array_kvpairs_to_assoc
- * Convert array of key-value pairs to an associative array.
- *
- * Parameters:
- *  $input - Array of key-value pairs
- *
- * Returns:
- *  An associative array.
- */
-function array_kvpairs_to_assoc($input)
-{
-    $rv = [];
-    foreach ($input as $kvpair) {
-        $rv[$kvpair[0]] = $kvpair[1];
-    }
-    return $rv;
-}
-
 /*
  * Function: intcmp
  * Compare integers (equavilent to strcmp)
@@ -134,67 +40,6 @@ function intcmp($a, $b)
     return ($a == $b) ? 0 : (($a < $b) ? -1 : 1);
 }
 
-/*
- * Function: ucount
- *
- * Count elements of an array matching unser-defined rules.
- *
- * Parameters:
- *  $array    - The input array.
- *  $callback - A callback function. It will be called with the current value as the only parameter. The value is counted, if callback returns TRUE.
- *
- * Returns:
- *
- *  Number of elements where $callback returned TRUE.
- */
-function ucount($array, $callback)
-{
-    return count(array_filter($array, $callback));
-}
-
-/*
- * Function: vcount
- *
- * Counts how often $value appears in $array.
- *
- * Parameters:
- *
- *  $array -
- *  $value -
- *
- * Returns:
- *
- *  How often $value appears in $array.
- */
-function vcount($array, $value)
-{
-    return ucount($array, function ($x) {
-        return $x===$value;
-    });
-}
-
-/*
- * Function: self_url
- *
- * Gets current URL.
- *
- * From: http://dev.kanngard.net/Permalinks/ID_20050507183447.html
- */
-function self_url()
-{
-    $s = empty($_SERVER["HTTPS"]) ? ''
-        : ($_SERVER["HTTPS"] == "on") ? "s"
-        : "";
-    $protocol = strleft(strtolower($_SERVER["SERVER_PROTOCOL"]), "/").$s;
-    $port = ($_SERVER["SERVER_PORT"] == "80") ? ""
-        : (":".$_SERVER["SERVER_PORT"]);
-    return $protocol."://".$_SERVER['SERVER_NAME'].$port.$_SERVER['REQUEST_URI'];
-}
-function strleft($s1, $s2)
-{
-    return substr($s1, 0, strpos($s1, $s2));
-}
-
 /*
  * Function: htmlesc
  * Escape HTML (shorter than htmlspecialchars)
-- 
cgit v1.2.3-70-g09d2