keayaki.com
KEAYAKI.COM Recursos para cultivar nuestra identidad ecológica, advoca por la recuperación de nuestros sentidos y un uso sostenible y respetuoso de la tecnología para conectar con la inteligencia de la naturaleza (E.I).
Tengo el privilegio de vivir inmerso en un mosaico de ecosistemas de gran valor del Bajo Vinalopó, la Vega Baja y el humedal el Hondo colindante con la ciudad de Elche. La belleza de la naturaleza es increíble, pero no es solamente una cuestión de estética. Cada piedra, cada forma de vida animal y vegetal es el resultado de una adaptación a lo largo de millones de años. Lo que más me asombra es la inteligencia relacional de la Naturaleza. En esta web Keayaki.com quiero compartir recursos que he ido elaborando en relación con el territorio, las especies y las personas que lo habitan. Esta web es el fruto de una pequeña odisea en bicicleta y andando, donde cada barranco, cada tahúlla y cada cala de la costa revela a veces unos tesoros infinitos para quíen está dispuesto en abrir sus sentidos. Al nivel local siento que soy Guardián del Fuego, este fuego que tenemos en nosotr@s y nos connecta con el mundo natural y los ancestros.
Espero con esta web, poder inspirarte en tu camino para connectar más profundamente con tu naturaleza, la del planeta Tierra.
Es una propuesta original de Fred Adam, creador multimedia y director artístico, experto en el uso de la tecnología móvil y la geolocalización. Miembro de la asociación ecologista AHSA, coordinador voluntario de las actividades del Aula de la Naturaleza de Catral. Visitar la web fredadam.net para tener más información.
.¿Keayaki? tecnología sostenible, patrimonio inmaterial y naturaleza, recursos para la ecología social y medioambiental. Fred Adam 2025 © Participamos en proyectos Europeos, Visitar la web de nuestra NGO Locative Media Supercluster para más información https://supercluster.eu
\n", $fdir); }
// counter file in necessary dir:
$file = $fdir . "/" . "counter.dat";
// already incremented a hit counter on this page, so passive mode in this one:
if (isset($HitCounterFile) && ($HitCounterFile == $file)) { $passive = true; }
// create the file if it does not yet exist:
if (!file_exists($file)) {
file_put_contents($file,"",LOCK_EX);
if (file_exists($file)) {
chmod($file,0666);
printf("\n", $file);
} else {
printf("\n", $file, getcwd());
}
} else {
if (!is_writable($file)) { chmod($file,0666); }
if ($passive) {
printf("\n", $file);
} else {
printf("\n", $file);
}
}
// get current count and add new entry:
if (file_exists($file)) {
if(isset($_SERVER['HTTP_X_FORWARDED_FOR']) && $_SERVER['HTTP_X_FORWARDED_FOR'] != '') {
$yipaddr = $_SERVER['HTTP_X_FORWARDED_FOR'];
} else {
$yipaddr = $_SERVER['REMOTE_ADDR'];
}
$utime = time();
// check if ip address should be ignored:
$yignore = false;
if ("" != "") {
$ipList = explode(" ", str_replace(array(",",";","\t","\n","\r"), " ", ""));
if (in_array($yipaddr,$ipList)) {
$yignore = true;
}
} else {
$ipList = array();
}
// add a log entry if not passive mode, and even if ip address is ignored:
if (!$passive) {
$line = $yipaddr . " " . $utime . "\n";
file_put_contents($file,$line,FILE_APPEND|LOCK_EX);
}
$fline = file_get_contents($file);
$lines = explode("\n",$fline);
// get first time entry:
$firstTime = false;
// sort on ip address:
sort($lines);
$startCount = 100;
$count = $startCount;
$ips = $startCount;
$timed = $startCount;
$previp = "";
$prevt = 0;
foreach ($lines as $entry) {
$tokens = explode(" ",$entry);
if (count($tokens) == 2) {
$ipaddr = $tokens[0];
// filter ip addresses here:
if (!in_array($ipaddr,$ipList)) {
$utime = intval($tokens[1]);
if ($firstTime === false) { $firstTime = $utime; }
if ($ipaddr != $previp) $ips ++;
if (($ipaddr != $previp) || (($utime - $prevt) > 60)) $timed ++;
$count ++;
$previp = $ipaddr;
$prevt = $utime;
}
}
}
// show count:
$usecount = $timed;
// make a tip:
$details = $usecount . " hits";
printf("", $details);
// split digits:
$str = "$usecount";
$strl = strlen($str);
for ($i=0; $i<$strl; $i++) {
if ($i <= 0) {
if ($strl <= 1) {
$class = "xcounter";
} else {
$class = "fcounter";
}
} else {
if ($i >= $strl-1) {
$class = "lcounter";
} else {
$class = "counter";
}
}
if (("" != "") && ($i > 0) && (($strl-$i) % 3 == 0)) { printf("", $class); }
printf("%s", $class, substr($str,$i,1));
}
printf("\n");
// set this so another hit counter on this page will not increment again:
if (!$passive) { $HitCounterFile = $file; }
}
?>