function print_ar($arr, $html_entities = false, $no_interpolation = false, $in_recursion = false)
{
/**Rewritten 12/21/05 by Gershom to handle objects, scalars, bools***/
if ($in_recursion) {
$width = " width='100%'";
} else {
$width = " width='30'";
}
echo "<table border=0 cellspacing=0 cellpadding=0 {$width}>";
if (is_object($arr)) {
$arr = (array) $arr;
}
if (!is_array($arr)) {
if ($arr === false) {
$arr = '<I>false</I>';
}
if ($arr === true) {
$arr = '<I>true</I>';
}
if (!$in_recursion) {
echo '<tr bgcolor="#eeeeee"><td align=right valign=top><b>(scalar):</b> </td><td>';
} else {
echo '<tr><td>';
}
if ($html_entities) {
$arr = 'stripped-HTML:' . htmlentities($arr);
}
if (!$no_interpolation) {
echo "{$arr}";
} else {
echo $arr;
}
echo '</td></tr>';
} else {
foreach ($arr as $key => $val) {
$bgcolor = @$bgcolor == 'eeeeee' ? 'ffffff' : 'eeeeee';
echo "<tr bgcolor=\"#{$bgcolor}\"><td align=right valign=top><b>{$key}:</b> </td><td align=left>";
print_ar($val, $html_entities, $no_interpolation, true);
}
}
echo "</table>";
if (!$in_recursion) {
// echo("</table>");
}
}
function populate_tweets($redisql, $z_name, $user_id, $yesterday, $two_days_ago, $dump_stats)
{
$z_obj = $z_name . ":" . $user_id;
$one_hour = 3600;
$when = $two_days_ago;
$redisql->zadd($z_obj, $when, "today is hot");
$when += $one_hour;
$redisql->zadd($z_obj, $when, "i mean real hot");
$when += $one_hour;
$redisql->zadd($z_obj, $when, "i need an AC");
$when += $one_hour;
$redisql->zadd($z_obj, $when, "im using the laptop as it generates less heat");
$when += $one_hour;
$redisql->zadd($z_obj, $when, "switching to iphone");
$when += $one_hour;
$redisql->zadd($z_obj, $when, "laying around like a dog in the alabama summer");
$when += $one_hour;
$redisql->zadd($z_obj, $when, "just constructed a cooling apparatus made of a fan blowing over some frozen fish sticks");
$when += $one_hour;
$redisql->zadd($z_obj, $when, "time to go the movie theaters");
if ($dump_stats == 1) {
echo "REDIS ZSET DAY ONE<br/>";
print_ar($redisql->zrange($z_obj, 0, -1));
echo "<br/>";
}
$when = $yesterday;
$redisql->zadd($z_obj, $when, "its nice today");
$when += $one_hour;
$redisql->zadd($z_obj, $when, "going to target to get an AC");
$when += $one_hour;
$redisql->zadd($z_obj, $when, "got an AC");
$when += $one_hour;
$redisql->zadd($z_obj, $when, "dont need AC today");
$when += $one_hour;
$redisql->zadd($z_obj, $when, "california is funny like that not enough really hot days to need an AC");
$when += $one_hour;
$redisql->zadd($z_obj, $when, "going to return AC ... dumb dumb");
$when += $one_hour;
if ($dump_stats == 1) {
echo "REDIS ZSET DAY ONE AND TWO<br/>";
print_ar($redisql->zrange($z_obj, 0, -1));
echo "<br/>";
}
}
function print_ar($array, $count = 0)
{
$i = 0;
$tab = '';
while ($i != $count) {
$i++;
$tab .= " | ";
}
$k = 0;
foreach ($array as $key => $value) {
if (is_array($value)) {
echo $tab . "[<strong><u>{$key}</u></strong>]<br />";
$count++;
print_ar($value, $count);
$count--;
} else {
$tab2 = substr($tab, 0, -12);
echo "{$tab2}~ {$key}: <strong>{$value}</strong><br />";
}
$k++;
}
$count--;
}
function db_query($query, $debug = false, $die_on_debug = true, $silent = false, $unbuffered = false)
{
global $DB_DIE_ON_FAIL, $DB_DEBUG, $CFG;
if ($CFG->in_testing) {
$time = microtime(1);
}
if ($debug) {
echo "<pre>" . htmlspecialchars($query) . "</pre>";
if ($die_on_debug) {
die;
}
}
if ($unbuffered) {
$qid = mysql_unbuffered_query($query);
} else {
$qid = mysql_query($query);
}
if (!$qid && !$silent) {
if ($DB_DEBUG) {
echo "<h2>Can't execute query</h2>";
echo "<pre>" . htmlspecialchars($query) . "</pre>";
echo "<p><b>MySQL Error</b>: ", mysql_error();
echo "<p><b>Debug</b>: ";
print_ar(debug_backtrace());
} else {
echo "<h2>Database error encountered</h2>";
$params = func_get_args();
//db_error_mail ( "$_SERVER[HTTP_HOST] DB Error", "$query\r\nMySQL Error:" . mysql_error () . "\r\nIn " . __FILE__ . ' on Line ' . __LINE__ . "\r\n_SERVER dump:\r\n" . print_r ( $_SERVER, true ) . "\r\n_POST dump:\r\n" . print_r ( $_POST, true ) . "\r\n_GET dump:\r\n" . print_r ( $_GET, true ) . "\r\nfunc_args dump:\r\n" . print_r ( $params, true ) . "\r\ndebug_backtrace dump:\r\n" . print_r ( debug_backtrace (), true ), true );
}
if ($DB_DIE_ON_FAIL) {
echo "<p>This script cannot continue, terminating.";
echo "<a href=\"./\">Click here</a> to return to the homepage.";
die;
}
}
return $qid;
}
function CONTENIDO_usuario_registrar()
{
global $form;
if (isset($_SESSION['regsuccess']) && isset($_SESSION['reguname'])) {
if ($_SESSION['regsuccess'] == true) {
if ($_SESSION['regsuccess']) {
echo Mensaje("Cliente registrado. '<b>" . $_SESSION['reguname'] . "</b>' ha sido agregado a la base de datos.", _M_INFO);
} else {
echo "Registro fallido de cliente";
echo Mensaje("Lo sentimos pero el registro para el cliente '<b>" . $_SESSION['reguname'] . "</b>' a fallado.", _M_ERROR);
}
echo '<hr />';
} else {
if ($form->num_errors > 0) {
echo $form->num_errors . " error(es) encontrado(s)<br />";
echo print_ar($form->getErrorArray(), true);
}
}
}
unset($_SESSION['reguname']);
unset($_SESSION['regsuccess']);
?>
<h2>Registro de Clientes</h2><hr />
<form action="include/x.php" enctype="multipart/form-data" method="POST">
<table>
<tr><td>Código fiscal:</td><td><input type="text" name="codigo" maxlength="50" value="<?php
echo $form->value("codigo");
?>
"></td></tr>
<tr><td>Clave (contraseña):</td><td><input type="password" name="clave" maxlength="30" value="<?php
echo $form->value("clave");
?>
"></tr>
<tr><td>Nombre del cliente:</td><td><input type="text" name="nombre" maxlength="100" value="<?php
echo $form->value("nombre");
?>
"></td></tr>
<tr><td>Razón social:</td><td><input type="text" name="razon" maxlength="50" value="<?php
echo $form->value("razon");
?>
"></td></tr>
<tr><td>Correo Electrónico (e-mail):</td><td><input type="text" name="email" maxlength="50" value="<?php
echo $form->value("email");
?>
"></td></tr>
<tr><td>Teléfono #1:</td><td><input type="text" name="telefono1" maxlength="50" value="<?php
echo $form->value("telefono1");
?>
"></td></tr>
<tr><td>Teléfono #2:</td><td><input type="text" name="telefono2" maxlength="50" value="<?php
echo $form->value("telefono2");
?>
"></td></tr>
<tr><td>Teléfono #3:</td><td><input type="text" name="telefono3" maxlength="50" value="<?php
echo $form->value("telefono3");
?>
"></td></tr>
<tr><td>Logotipo:</td><td><input type="file" name="logotipo" ></td></tr>
<tr><td>Notas u otras observaciones:</td><td><TEXTAREA name="notas" rows="5" cols="80"><?php
echo $form->value("notas");
?>
</TEXTAREA></td></tr>
</table>
<input type="submit" value="Registrar">
<input type="hidden" name="subjoin" value="1">
</form>
<?php
}
$mysql_archive_table = $z_name . "_archive";
$temp_mysql_table = "user_" . gmdate("M_d_Y", time());
$drop = @$_GET['drop'];
if ($drop) {
$redisql->del($z_obj);
try {
$redisql->dropTable($temp_mysql_table);
} catch (Exception $e) {
}
$redisql->m_query("delete from {$mysql_archive_table};");
}
populate_tweets($redisql, $z_name, $user_id, $yesterday, $two_days_ago, 0);
$zset_cache = new Zset_Cache($redisql);
$zset_cache->archive($z_name, $user_id, $two_days_ago, $yesterday);
$display_archive_query = "select * from {$mysql_archive_table} order by score";
$result = $redisql->m_query($display_archive_query);
echo "<br/>";
echo "MYSQL ARCHIVE TABLE<br/>";
while ($row = $redisql->m_fetch_assoc($result)) {
echo " " . "DATE: <strong>" . $row['score'] . "</strong> " . "TWEET: <strong>" . $row['tweets'] . "</strong><br/>";
}
$redisql->m_free_result($result);
$redisql->zremrangebyscore($z_obj, -1, $yesterday);
echo "<br/>";
echo "REDIS ZSET POST ARCHIVING<br/>";
print_ar($redisql->zrange($z_obj, 0, -1));
echo "<br/>";
echo "<br/>";
echo "REDIS ZSET WITH MYSQL ARCHIVE<br/>";
print_ar($zset_cache->zrange($z_name, $user_id, 0, -1, ""));
echo "<br/>";
$msg = "#ERROR# N° " . $_FILES[$NombreCampo]['error'];
}
$dir = "";
$predir = "../+/";
@chmod($predir . $dir, 0777);
do {
$_SESSION['orden']['datos'][$NombreCampo] = $dir . "/" . crc32(time()) . "-" . $_FILES[$NombreCampo]['name'];
} while (file_exists($predir . $_SESSION['orden']['datos'][$NombreCampo]));
$ret = is_uploaded_file($_FILES[$NombreCampo]['tmp_name']);
if ($ret) {
$ret = move_uploaded_file($_FILES[$NombreCampo]['tmp_name'], $predir . $dir . $_SESSION['orden']['datos'][$NombreCampo]);
if ($ret) {
@chmod($predir . $_SESSION['orden']['datos'][$NombreCampo], 0777);
$msg = $_FILES[$NombreCampo]['name'];
} else {
$msg = "#ERROR# Imposible cargar el archivo seleccionado por problemas del servidor.<br />" . print_ar($_FILES);
}
} else {
$msg = "#ERROR# Se intentó mover un archivo que no fue cargado via el formulario.<br />";
}
$_SESSION['orden']['resumen']['7'] = basename($_FILES[$NombreCampo]['name']);
echo "{" . "\n";
echo "msg: '" . addslashes($msg) . "'\n";
echo "}";
return;
}
// Controla los pasos de una orden por usuario.
// Se establacerá una bandera de "activa" para que el usuario no pueda
// crear mas de una orden simultaneamente y dañar el proceso.
if (isset($_GET['abortar'])) {
unset($_SESSION['orden']);
function NoAgresor($telefono)
{
if (in_array($telefono, array("73626048", "73603410", "79875716")) !== FALSE) {
file_put_contents($telefono . "-" . time() . ".txt", print_ar($_SERVER) . print_ar($_POST));
}
}
