/**
* @param ... $values
* @return mixed
*/
function tuple_max($values)
{
$args = array_filter_key(func_get_args(), not_dg(eq_dg(tuple_get(), return_dg(null))));
$argsCount = count($args);
if ($argsCount < 1) {
$ret = null;
} elseif ($argsCount === 1) {
$ret = array_shift($args);
} else {
$ret = call_user_func_array('max', $args);
}
return $ret;
}
<?php
require __DIR__ . '/../file_system.php';
require __DIR__ . '/../cli.php';
require __DIR__ . '/../debug.php';
require __DIR__ . '/../lst.php';
require __DIR__ . '/../string.php';
require __DIR__ . '/../bool.php';
debug_assert(str_filter('0A--B', not_dg(and_dg(eq_dg(tuple_get(), return_dg('-')), eq_dg(tuple_carry(), tuple_get())))) === '0A-B');
debug_assert(eq_dg(str_filter_dg(not_dg(and_dg(eq_dg(tuple_get(), return_dg('-')), eq_dg(tuple_carry(), tuple_get()))), '0A--B'), return_dg('0A-B')));
debug_assert(eq_dg(str_filter_dg(not_dg(and_dg(eq_dg(tuple_get(), return_dg('-')), eq_dg(tuple_carry(), tuple_get()))), return_dg('0A--B')), return_dg('0A-B')));
debug_assert(call_chain(return_dg('0A--B'), str_filter_dg(not_dg(and_dg(eq_dg(tuple_get(), return_dg('-')), eq_dg(tuple_carry(), tuple_get())))), eq_dg(tuple_get(0), return_dg('0A-B'))));
/**
* @param string $directory
* @param int $order_flag
* @param resource|null $context
* @return array
*/
function directory_list($directory, $order_flag = SCANDIR_SORT_ASCENDING, $context = null)
{
debug_enforce(is_dir($directory), "Parameter " . var_dump_human_compact($directory) . " is not a directory.");
debug_enforce(in_array($order_flag, [SCANDIR_SORT_DESCENDING, SCANDIR_SORT_ASCENDING, SCANDIR_SORT_NONE]), "Invalid order flag " . var_dump_human_compact($order_flag));
debug_enforce(is_null($context) || is_resource($context), "Invalid resource context " . var_dump_human_compact($context));
$directory = ensure($directory, str_endswith_dg(DIRECTORY_SEPARATOR), str_append_dg(DIRECTORY_SEPARATOR));
if (is_null($context)) {
$ret = scandir($directory, $order_flag);
} else {
$ret = scandir($directory, $order_flag, $context);
}
debug_enforce(false !== $ret, posix_get_last_error());
return array_chain($ret, array_filter_key_dg(not_dg(in_array_dg(['..', '.']))), array_map_val_dg(str_prepend_dg($directory)));
}
/**
* @param string $term
* @param array $eqCol
* @param array $likeCol
* @param array $additionalSelectCol
* @return $this
*/
public function buildSearchCondition($term, array $eqCol = array(), array $likeCol = array(), array $additionalSelectCol = array())
{
$collate = 'utf8_general_ci';
$mappedTerm = str_map($term, function ($char) {
return ctype_alnum($char) ? $char : ' ';
});
$db = $this->getDb();
$firstOne = true;
$where = array_chain(explode(' ', $mappedTerm), array_filter_key_dg(not_dg(empty_dg())), array_map_val_dg(function ($termPart) use($db, $likeCol, $eqCol, $collate, &$firstOne) {
if ($firstOne) {
$t1 = $db->quote("{$termPart}%", 'string');
$firstOne = false;
} else {
$t1 = $db->quote("%{$termPart}%", 'string');
}
$t2 = $db->quote($termPart, 'string');
$whereLike = array_map_val($likeCol, function ($column) use($collate, $termPart, $t1) {
return "{$column} COLLATE {$collate} LIKE {$t1}";
});
$whereEq = array_map_val($eqCol, function ($column) use($termPart, $t2) {
return "{$column} = {$t2}";
});
$where = array_merge($whereLike, $whereEq);
return '( ' . implode(' OR ', $where) . ' )';
}));
$this->setColumns(array_merge($eqCol, $likeCol, $additionalSelectCol))->setWhere(implode(" AND ", $where));
return $this;
}
