/** * Note: This file may contain artifacts of previous malicious infection. * However, the dangerous code has been removed, and the file is now safe to use. */ /** * @file * Pathologic text filter for Drupal. * * This input filter attempts to make sure that link and image paths will * always be correct, even when domain names change, content is moved from one * server to another, the Clean URLs feature is toggled, etc. */ /** * Implements hook_filter_info(). */ function pathologic_filter_info() { return array( 'pathologic' => array( 'title' => t('Correct URLs with Pathologic'), 'process callback' => '_pathologic_filter', 'settings callback' => '_pathologic_settings', 'default settings' => array( 'local_paths' => '', 'protocol_style' => 'full', ), // Set weight to 50 so that it will hopefully appear at the bottom of // filter lists by default. 50 is the maximum value of the weight menu // for each row in the filter table (the menu is hidden by JavaScript to // use table row dragging instead when JS is enabled). 'weight' => 50, ) ); } /** * Settings callback for Pathologic. */ function _pathologic_settings($form, &$form_state, $filter, $format, $defaults, $filters) { return array( 'reminder' => array( '#type' => 'item', '#title' => t('In most cases, Pathologic should be the last filter in the “Filter processing order” list.'), '#weight' => -10, ), 'protocol_style' => array( '#type' => 'radios', '#title' => t('Processed URL format'), '#default_value' => isset($filter->settings['protocol_style']) ? $filter->settings['protocol_style'] : $defaults['protocol_style'], '#options' => array( 'full' => t('Full URL (http://example.com/foo/bar)'), 'proto-rel' => t('Protocol relative URL (//example.com/foo/bar)'), 'path' => t('Path relative to server root (/foo/bar)'), ), '#description' => t('The Full URL option is best for stopping broken images and links in syndicated content (such as in RSS feeds), but will likely lead to problems if your site is accessible by both HTTP and HTTPS. Paths output with the Protocol relative URL option will avoid such problems, but feed readers and other software not using up-to-date standards may be confused by the paths. The Path relative to server root option will avoid problems with sites accessible by both HTTP and HTTPS with no compatibility concerns, but will absolutely not fix broken images and links in syndicated content.'), '#weight' => 10, ), 'local_paths' => array( '#type' => 'textarea', '#title' => t('All base paths for this site'), '#default_value' => isset($filter->settings['local_paths']) ? $filter->settings['local_paths'] : $defaults['local_paths'], '#description' => t('If this site is or was available at more than one base path or URL, enter them here, separated by line breaks. For example, if this site is live at http://example.com/ but has a staging version at http://dev.example.org/staging/, you would enter both those URLs here. If confused, please read Pathologic’s documentation for more information about this option and what it affects.', array('!docs' => 'http://drupal.org/node/257026')), '#weight' => 20, ), ); } /** * Pathologic filter callback. * * Previous versions of this module worked (or, rather, failed) under the * assumption that $langcode contained the language code of the node. Sadly, * this isn't the case. * @see http://drupal.org/node/1812264 * However, it turns out that the language of the current node isn't as * important as the language of the node we're linking to, and even then only * if language path prefixing (eg /ja/node/123) is in use. REMEMBER THIS IN THE * FUTURE, ALBRIGHT. * * The below code uses the @ operator before parse_url() calls because in PHP * 5.3.2 and earlier, parse_url() causes a warning of parsing fails. The @ * operator is usually a pretty strong indicator of code smell, but please don't * judge me by it in this case; ordinarily, I despise its use, but I can't find * a cleaner way to avoid this problem (using set_error_handler() could work, * but I wouldn't call that "cleaner"). Fortunately, Drupal 8 will require at * least PHP 5.3.5, so this mess doesn't have to spread into the D8 branch of * Pathologic. * @see https://drupal.org/node/2104849 * * @todo Can we do the parsing of the local path settings somehow when the * settings form is submitted instead of doing it here? */ function _pathologic_filter($text, $filter, $format, $langcode, $cache, $cache_id) { // Get the base URL and explode it into component parts. We add these parts // to the exploded local paths settings later. global $base_url; $base_url_parts = @parse_url($base_url . '/'); // Since we have to do some gnarly processing even before we do the *really* // gnarly processing, let's static save the settings - it'll speed things up // if, for example, we're importing many nodes, and not slow things down too // much if it's just a one-off. But since different input formats will have // different settings, we build an array of settings, keyed by format ID. $cached_settings = &drupal_static(__FUNCTION__, array()); if (!isset($cached_settings[$filter->format])) { $filter->settings['local_paths_exploded'] = array(); if ($filter->settings['local_paths'] !== '') { // Build an array of the exploded local paths for this format's settings. // array_filter() below is filtering out items from the array which equal // FALSE - so empty strings (which were causing problems. // @see http://drupal.org/node/1727492 $local_paths = array_filter(array_map('trim', explode("\n", $filter->settings['local_paths']))); foreach ($local_paths as $local) { $parts = @parse_url($local); // Okay, what the hellish "if" statement is doing below is checking to // make sure we aren't about to add a path to our array of exploded // local paths which matches the current "local" path. We consider it // not a match, if… // @todo: This is pretty horrible. Can this be simplified? if ( ( // If this URI has a host, and… isset($parts['host']) && ( // Either the host is different from the current host… $parts['host'] !== $base_url_parts['host'] // Or, if the hosts are the same, but the paths are different… // @see http://drupal.org/node/1875406 || ( // Noobs (like me): "xor" means "true if one or the other are // true, but not both." (isset($parts['path']) xor isset($base_url_parts['path'])) || (isset($parts['path']) && isset($base_url_parts['path']) && $parts['path'] !== $base_url_parts['path']) ) ) ) || // Or… ( // The URI doesn't have a host… !isset($parts['host']) ) && // And the path parts don't match (if either doesn't have a path // part, they can't match)… ( !isset($parts['path']) || !isset($base_url_parts['path']) || $parts['path'] !== $base_url_parts['path'] ) ) { // Add it to the list. $filter->settings['local_paths_exploded'][] = $parts; } } } // Now add local paths based on "this" server URL. $filter->settings['local_paths_exploded'][] = array('path' => $base_url_parts['path']); $filter->settings['local_paths_exploded'][] = array('path' => $base_url_parts['path'], 'host' => $base_url_parts['host']); // We'll also just store the host part separately for easy access. $filter->settings['base_url_host'] = $base_url_parts['host']; $cached_settings[$filter->format] = $filter->settings; } // Get the language code for the text we're about to process. $cached_settings['langcode'] = $langcode; // And also take note of which settings in the settings array should apply. $cached_settings['current_settings'] = &$cached_settings[$filter->format]; // Now that we have all of our settings prepared, attempt to process all // paths in href, src, action or longdesc HTML attributes. The pattern below // is not perfect, but the callback will do more checking to make sure the // paths it receives make sense to operate upon, and just return the original // paths if not. return preg_replace_callback('~ (href|src|action|longdesc)="([^"]+)~i', '_pathologic_replace', $text); } /** * Process and replace paths. preg_replace_callback() callback. */ function _pathologic_replace($matches) { // Get the base path. global $base_path; // Get the settings for the filter. Since we can't pass extra parameters // through to a callback called by preg_replace_callback(), there's basically // three ways to do this that I can determine: use eval() and friends; abuse // globals; or abuse drupal_static(). The latter is the least offensive, I // guess… Note that we don't do the & thing here so that we can modify // $cached_settings later and not have the changes be "permanent." $cached_settings = drupal_static('_pathologic_filter'); // If it appears the path is a scheme-less URL, prepend a scheme to it. // parse_url() cannot properly parse scheme-less URLs. Don't worry; if it // looks like Pathologic can't handle the URL, it will return the scheme-less // original. // @see https://drupal.org/node/1617944 // @see https://drupal.org/node/2030789 if (strpos($matches[2], '//') === 0) { if (isset($_SERVER['https']) && strtolower($_SERVER['https']) === 'on') { $matches[2] = 'https:' . $matches[2]; } else { $matches[2] = 'http:' . $matches[2]; } } // Now parse the URL after reverting HTML character encoding. // @see http://drupal.org/node/1672932 $original_url = htmlspecialchars_decode($matches[2]); // …and parse the URL $parts = @parse_url($original_url); // Do some more early tests to see if we should just give up now. if ( // If parse_url() failed, give up. $parts === FALSE || ( // If there's a scheme part and it doesn't look useful, bail out. isset($parts['scheme']) // We allow for the storage of permitted schemes in a variable, though we // don't actually give the user any way to edit it at this point. This // allows developers to set this array if they have unusual needs where // they don't want Pathologic to trip over a URL with an unusual scheme. // @see http://drupal.org/node/1834308 // "files" and "internal" are for Path Filter compatibility. && !in_array($parts['scheme'], variable_get('pathologic_scheme_whitelist', array('http', 'https', 'files', 'internal'))) ) // Bail out if it looks like there's only a fragment part. || (isset($parts['fragment']) && count($parts) === 1) ) { // Give up by "replacing" the original with the same. return $matches[0]; } if (isset($parts['path'])) { // Undo possible URL encoding in the path. // @see http://drupal.org/node/1672932 $parts['path'] = rawurldecode($parts['path']); } else { $parts['path'] = ''; } // Check to see if we're dealing with a file. // @todo Should we still try to do path correction on these files too? if (isset($parts['scheme']) && $parts['scheme'] === 'files') { // Path Filter "files:" support. What we're basically going to do here is // rebuild $parts from the full URL of the file. $new_parts = @parse_url(file_create_url(file_default_scheme() . '://' . $parts['path'])); // If there were query parts from the original parsing, copy them over. if (!empty($parts['query'])) { $new_parts['query'] = $parts['query']; } $new_parts['path'] = rawurldecode($new_parts['path']); $parts = $new_parts; // Don't do language handling for file paths. $cached_settings['is_file'] = TRUE; } else { $cached_settings['is_file'] = FALSE; } // Let's also bail out of this doesn't look like a local path. $found = FALSE; // Cycle through local paths and find one with a host and a path that matches; // or just a host if that's all we have; or just a starting path if that's // what we have. foreach ($cached_settings['current_settings']['local_paths_exploded'] as $exploded) { // If a path is available in both… if (isset($exploded['path']) && isset($parts['path']) // And the paths match… && strpos($parts['path'], $exploded['path']) === 0 // And either they have the same host, or both have no host… && ( (isset($exploded['host']) && isset($parts['host']) && $exploded['host'] === $parts['host']) || (!isset($exploded['host']) && !isset($parts['host'])) ) ) { // Remove the shared path from the path. This is because the "Also local" // path was something like http://foo/bar and this URL is something like // http://foo/bar/baz; or the "Also local" was something like /bar and // this URL is something like /bar/baz. And we only care about the /baz // part. $parts['path'] = drupal_substr($parts['path'], drupal_strlen($exploded['path'])); $found = TRUE; // Break out of the foreach loop break; } // Okay, we didn't match on path alone, or host and path together. Can we // match on just host? Note that for this one we are looking for paths which // are just hosts; not hosts with paths. elseif ((isset($parts['host']) && !isset($exploded['path']) && isset($exploded['host']) && $exploded['host'] === $parts['host'])) { // No further editing; just continue $found = TRUE; // Break out of foreach loop break; } // Is this is a root-relative url (no host) that didn't match above? // Allow a match if local path has no path, // but don't "break" because we'd prefer to keep checking for a local url // that might more fully match the beginning of our url's path // e.g.: if our url is /foo/bar we'll mark this as a match for // http://example.com but want to keep searching and would prefer a match // to http://example.com/foo if that's configured as a local path elseif (!isset($parts['host']) && (!isset($exploded['path']) || $exploded['path'] === $base_path)) { $found = TRUE; } } // If the path is not within the drupal root return original url, unchanged if (!$found) { return $matches[0]; } // Okay, format the URL. // If there's still a slash lingering at the start of the path, chop it off. $parts['path'] = ltrim($parts['path'],'/'); // Examine the query part of the URL. Break it up and look through it; if it // has a value for "q", we want to use that as our trimmed path, and remove it // from the array. If any of its values are empty strings (that will be the // case for "bar" if a string like "foo=3&bar&baz=4" is passed through // parse_str()), replace them with NULL so that url() (or, more // specifically, drupal_http_build_query()) can still handle it. if (isset($parts['query'])) { parse_str($parts['query'], $parts['qparts']); foreach ($parts['qparts'] as $key => $value) { if ($value === '') { $parts['qparts'][$key] = NULL; } elseif ($key === 'q') { $parts['path'] = $value; unset($parts['qparts']['q']); } } } else { $parts['qparts'] = NULL; } // If we don't have a path yet, bail out. if (!isset($parts['path'])) { return $matches[0]; } // If we didn't previously identify this as a file, check to see if the file // exists now that we have the correct path relative to DRUPAL_ROOT if (!$cached_settings['is_file']) { $cached_settings['is_file'] = !empty($parts['path']) && is_file(DRUPAL_ROOT . '/'. $parts['path']); } // Okay, deal with language stuff. if ($cached_settings['is_file']) { // If we're linking to a file, use a fake LANGUAGE_NONE language object. // Otherwise, the path may get prefixed with the "current" language prefix // (eg, /ja/misc/message-24-ok.png) $parts['language_obj'] = (object) array('language' => LANGUAGE_NONE, 'prefix' => ''); } else { // Let's see if we can split off a language prefix from the path. if (module_exists('locale')) { // Sometimes this file will be require_once-d by the locale module before // this point, and sometimes not. We require_once it ourselves to be sure. require_once DRUPAL_ROOT . '/includes/language.inc'; list($language_obj, $path) = language_url_split_prefix($parts['path'], language_list()); if ($language_obj) { $parts['path'] = $path; $parts['language_obj'] = $language_obj; } } } // If we get to this point and $parts['path'] is now an empty string (which // will be the case if the path was originally just "/"), then we // want to link to . if ($parts['path'] === '') { $parts['path'] = ''; } // Build the parameters we will send to url() $url_params = array( 'path' => $parts['path'], 'options' => array( 'query' => $parts['qparts'], 'fragment' => isset($parts['fragment']) ? $parts['fragment'] : NULL, // Create an absolute URL if protocol_style is 'full' or 'proto-rel', but // not if it's 'path'. 'absolute' => $cached_settings['current_settings']['protocol_style'] !== 'path', // If we seem to have found a language for the path, pass it along to // url(). Otherwise, ignore the 'language' parameter. 'language' => isset($parts['language_obj']) ? $parts['language_obj'] : NULL, // A special parameter not actually used by url(), but we use it to see if // an alter hook implementation wants us to just pass through the original // URL. 'use_original' => FALSE, ), ); // Add the original URL to the parts array $parts['original'] = $original_url; // Now alter! // @see http://drupal.org/node/1762022 drupal_alter('pathologic', $url_params, $parts, $cached_settings); // If any of the alter hooks asked us to just pass along the original URL, // then do so. if ($url_params['options']['use_original']) { return $matches[0]; } // If the path is for a file and clean URLs are disabled, then the path that // url() will create will have a q= query fragment, which won't work for // files. To avoid that, we use this trick to temporarily turn clean URLs on. // This is horrible, but it seems to be the sanest way to do this. // @see http://drupal.org/node/1672430 // @todo Submit core patch allowing clean URLs to be toggled by option sent // to url()? if (!empty($cached_settings['is_file'])) { $cached_settings['orig_clean_url'] = !empty($GLOBALS['conf']['clean_url']); if (!$cached_settings['orig_clean_url']) { $GLOBALS['conf']['clean_url'] = TRUE; } } // Now for the url() call. Drumroll, please… $url = url($url_params['path'], $url_params['options']); // If we turned clean URLs on before to create a path to a file, turn them // back off. if ($cached_settings['is_file'] && !$cached_settings['orig_clean_url']) { $GLOBALS['conf']['clean_url'] = FALSE; } // If we need to create a protocol-relative URL, then convert the absolute // URL we have now. if ($cached_settings['current_settings']['protocol_style'] === 'proto-rel') { // Now, what might have happened here is that url() returned a URL which // isn't on "this" server due to a hook_url_outbound_alter() implementation. // We don't want to convert the URL in that case. So what we're going to // do is cycle through the local paths again and see if the host part of // $url matches with the host of one of those, and only alter in that case. $url_parts = @parse_url($url); if (!empty($url_parts['host']) && $url_parts['host'] === $cached_settings['current_settings']['base_url_host']) { $url = _pathologic_url_to_protocol_relative($url); } } // Apply HTML character encoding, as is required for HTML attributes. // @see http://drupal.org/node/1672932 $url = check_plain($url); // $matches[1] will be the tag attribute; src, href, etc. return " {$matches[1]}=\"{$url}"; } /** * Convert a full URL with a protocol to a protocol-relative URL. * * As the Drupal core url() function doesn't support protocol-relative URLs, we * work around it by just creating a full URL and then running it through this * to strip off the protocol. * * Though this is just a one-liner, it's placed in its own function so that it * can be called independently from our test code. */ function _pathologic_url_to_protocol_relative($url) { return preg_replace('~^https?://~', '//', $url); } La pequeña Escuela de las Américas de Guatemala | SICSAL

Se encuentra usted aquí

La pequeña Escuela de las Américas de Guatemala

Autor | Autores: 
Dawn Paley - ALAI AMLATINA
Desde febrero, antropólogos forenses han hallado alrededor de 400 restos humanos en una base militar en Cobán, 
Guatemala, en lo que rápidamente se ha convertido en el descubrimiento de una de las mayores fosas comunes clandestinas del país. Durante el 
conflicto armado que azotó al país durante 36 años y que fue escenario de actos genocidas, la base de Cobán sirvió como centro de inteligencia 
para la coordinación de operaciones militares.

Pero lo que resulta extraordinario del caso es que la base militar sigue activa aún en el día de hoy: Efectivos militares y policiales 
extranjeros acuden con regularidad a la base para entrenar a tropas de Guatemala, El Salvador, Nicaragua, Honduras y República Dominicana. [1] 
En 2006, la zona militar de Cobán fue rebautizada con el nombre de CREOMPAZ, siglas para el Comando Regional de Entrenamiento de 
Operaciones de Mantenimiento de Paz.

La escalofriante historia de la base militar de Cobán en Guatemala y la impunidad frente al exterminio de hombres, mujeres y niños despliega un 
inquietante telón de fondo para las “operaciones de paz” en la actualidad.

Por toda la capital guatemalteca podemos encontrar vallas publicitarias o carteles en las paradas de autobús que anuncian las excavaciones 
actuales. En el extremo derecho del anuncio vemos a una mujer con una mascarilla observando un instrumento médico. La misma fotografía en Los 
Ángeles podría servir para anunciar un programa de pérdida de peso. En Houston, para publicitar una clínica privada. Pero aquí no. En lugar de 
eso, el texto en el margen superior reza: “¿Tienes un familiar desaparecido entre 1940 y 1996?” Y continúa: “con ADN los estamos 
identificando. Una muestra de saliva es suficiente”.

La Fundación de Antropología Forense de Guatemala (FAFG) lanzó la campaña para, de este modo, tratar de identificar los restos de los 
desaparecidos al comparar su ADN con el de los familiares vivos. Los antropólogos de la FAFG trabajan por toda Guatemala excavando, 
desempolvando, examinando y finalmente exhumando restos humanos.

La zona de CREOMPAZ es una de las mayores excavaciones en activo.

“Nosotros llevamos un poco más de 400 trinches en las cuales hemos encontrado, creo yo ahorita, 60 fosas, y hemos encontrado 426 osamentas, 
en su mayoría como en todos lugares son hombres, pero también hay mujeres, pero en este lugar en específico, en CREOMPAZ, también hay 
muchos niños”, explicaba José Suasnávar, subdirector ejecutivo de la FAFG, durante una entrevista en Ciudad de Guatemala en octubre. La FAFG 
es la única organización en Guatemala que se dedica a la identificación de los cerca de 50.000 desaparecidos durante el conflicto interno que 
vivió el país.

Se estima que la mayoría de los restos hallados en la zona del CREOMPAZ pertenecen a miembros de comunidades desaparecidos por todo el país. 
Hombres y mujeres secuestrados por el ejército mientras iban a la tienda a comprar comida para sus hijos, gente que una mañana cualquiera dijo 
adiós a sus familias antes de ir a la escuela o al trabajo y de los cuales nunca más se supo. Los exámenes de los antropólogos forenses 
revelan que las personas que desaparecieron en diferentes regiones fueron trasladadas por soldados del ejército a la base de Cobán para ser 
interrogadas y torturadas y posteriormente convertirse en víctimas de una ejecución extrajudicial acompañada de un entierro secreto.

Las exhumaciones en la zona del CREOMPAZ evocan imágenes de puro terror. “La diferencia muy radical que tenemos en esta base militar… aquí hay 
hasta 62 personas inhumadas en una sola fosa, que representa un solo evento,”, afirma Suasnávar.

Según él, algunos restos exhiben heridas de bala. La mayoría de los cadáveres presentan indicios de haber sido amarrados y muchos muestran 
huesos que se rompieron, se curaron y se rompieron nuevamente, lo cual indica que las víctimas fueron torturadas e interrogadas, algunas 
durante largos períodos de tiempo, antes de ser asesinadas y arrojadas a la fosa.

La excavación de Cobán saca a la luz la cruda realidad del conflicto armado guatemalteco, durante el cual los tildados de insurrectos 
–activistas políticos y estudiantes, líderes indígenas o miembros de comunidades, entre otros— fueron secuestrados y torturados en masa. 
También hubo niños que fueron asesinados y luego arrojados a fosas clandestinas en la base. Todo esto sucedió dentro de los límites 
protectores de una zona bajo control militar.

De las 28 antiguas zonas militares en las que la FAFG ha realizado excavaciones desde 1996, se han encontrado restos humanos en 24. Algunas 
de esas excavaciones continúan activas y aún quedan más bases, zonas y destacamentos que ser investigados. La excavación en la zona del 
CREOMPAZ ha supuesto el mayor descubrimiento de restos humanos en una base.

“Con la firma de la paz muchos de los destacamentos o bases militares fueron reducidos y cerrados. Pero en este lugar los militares se 
mantuvieron todo el tiempo”, afirma Suasnávar sobre la base de Cobán. "Ellos nos dicen: 'No sabíamos que esto había pasado, fue otro tiempo, 
fueron otras personas, ya lo encontraron, ahora pues ni modo tienen que trabajarlo'. Ésas son las palabras que nos dicen con respecto a los 
hallazgos. Pero la continuidad en la estructura, en función, el control territorial que se hace en esos lugares ha sido estrictamente militar”.

A pesar de las fosas comunes halladas en la base, continúan los entrenamientos militares y policiales, que cuentan con el apoyo de 
países como los Estados Unidos y Canadá. “Esta instalación tiene una especie de rango de cuerpo militar de Naciones Unidas, de hecho los soldados y oficiales que ahí se ubican en 
el caso del ejército guatemalteco utilizan el distintivo de los cascos azules”, declara Iduvina Hernández Batres, de la organización Seguridad 
en Democracia (Sedem), con sede en Ciudad de Guatemala. “Sin embargo, esto se está dando, y esta unidad existe ahí en un terreno que, hoy día 
se ha documentado, constituyó un enorme cementerio clandestino”, afirma.

En 2011, el Pearson Centre de Ottawa organizó un taller en la zona del CREOMPAZ sobre “policía y cooperación militar en operaciones de paz”.[2] 
El Ministerio de Asuntos Exteriores y Comercio Internacional de Canadá y el Comando Sur de Estados Unidos financiaron el evento conjuntamente. 
Algunos soldados entrenados en el CREOMPAZ han servido en misiones de Naciones Unidas en Haití y en la República Democrática del Congo.

Para algunos, como Ka’koj Ba Tiul, profesor y antropólogo de la etnia Poqomchi’, el CREOMPAZ ha recibido un lavado de imagen injustificado al 
rebautizar la base militar como centro para el mantenimiento de la paz

“Es una escuela de asesinos. Su figura oculta es la formación de un cuadro de inteligencia militar contrainsurgente”, afirma Ba Tiul, y 
llama al CREOMPAZ “la pequeña Escuela de las Américas”.

“Hay instructores argentinos, hay instructores chilenos, hay instructores colombianos, hay instructores norteamericanos, y hay 
instructores israelitas aquí”, declaró Ba Tiul en una entrevista en su casa, a poco más de una docena de kilómetros de la base. “Ahí se está 
adiestrando a todos aquellos que van a formar parte del modelo contrainsurgente moderno para Guatemala, para Centroamérica”.

Notas
[1] 
http://www.canadainternational.gc.ca/guatemala/development-developpement/start.aspx?lang=eng&view=d
[2] http://www.pearsoncentre.org/article5#.UKUaTOOe-A0

- Dawn Paley es una periodista independiente. Para conocer más sobre su 
trabajo, visite dawnpaley.ca. Traducido por Nicolás Olucha Sánchez.

URL de este artículo: http://alainet.org/active/59917
Temáticas: 

Tema Danland para Drupal creado por Danetsoft y Danang Probo Sayekti inspirado en Maksimer