function timeout($lock = false, $action = true, $connect_mysql = true)
{
static $ok = true;
global $db_ok;
// Has the hosting provided put a lock? (maximum age, 10 minutes)
$timeoutfile = (isset($_SERVER['LcmDataDir']) ? $_SERVER['LcmDataDir'] : 'inc/data') . '/lock';
if (@file_exists($timeoutfile) and time() - @filemtime($timeoutfile) < 600) {
lcm_debug("lock hebergeur {$timeoutfile}");
return $ok = false;
}
// Nothing to do?
if (!$action || !$ok) {
return $ok;
}
$ok = false;
// Database connected?
if ($connect_mysql) {
include_ecrire('inc_connect.php');
if (!$db_ok) {
return false;
}
// Lock requested?
if ($lock) {
lcm_debug("test lock mysql {$lock}");
if (!spip_get_lock($lock)) {
lcm_debug("lock mysql {$lock}");
return false;
}
}
}
// Go ahead
return true;
}
function barre_article($texte, $rows, $cols, $lang = '')
{
static $num_formulaire = 0;
include_ecrire('inc/layer');
$texte = entites_html($texte);
if (!$GLOBALS['browser_barre']) {
return "<textarea name='texte' rows='{$rows}' class='forml' cols='{$cols}'>{$texte}</textarea>";
}
$num_formulaire++;
return afficher_barre("document.getElementById('formulaire_{$num_formulaire}')", false) . "<textarea name='texte' rows='{$rows}' class='forml' cols='{$cols}'\n\t\tid='formulaire_{$num_formulaire}'\n\t\tonselect='storeCaret(this);'\n\t\tonclick='storeCaret(this);'\n\t\tonkeyup='storeCaret(this);'\n\t\tondbclick='storeCaret(this);'>{$texte}</textarea>" . $GLOBALS['options'];
}
function echappe_html($letexte, $source, $no_transform = false)
{
global $flag_pcre;
$les_echap = array();
if ($flag_pcre) {
// beaucoup plus rapide si on a pcre
$regexp_echap_html = "<html>((.*?))<\\/html>";
$regexp_echap_code = "<code>((.*?))<\\/code>";
$regexp_echap_cadre = "[\n\r]*<(cadre|frame)>((.*?))<\\/(cadre|frame)>[\n\r]*";
$regexp_echap_poesie = "[\n\r]*<(poesie|poetry)>((.*?))<\\/(poesie|poetry)>[\n\r]*";
$regexp_echap = "/({$regexp_echap_html})|({$regexp_echap_code})|({$regexp_echap_cadre})|({$regexp_echap_poesie})/si";
} else {
//echo creer_echappe_sans_pcre("cadre");
$regexp_echap_html = "<html>(([^<]|<[^/]|</[^h]|</h[^t]|</ht[^m]|</htm[^l]|<\\/html[^>])*)<\\/html>";
$regexp_echap_code = "<code>(([^<]|<[^/]|</[^c]|</c[^o]|</co[^d]|</cod[^e]|<\\/code[^>])*)<\\/code>";
$regexp_echap_cadre = "(<[cf][ar][da][rm]e>(([^<]|<[^/]|</[^cf]|</[cf][^ar]|</[cf][ar][^da]|</[cf][ar][da][^rm]|</[cf][ar][da][rm][^e]|<\\/[cf][ar][da][rm]e[^>])*)<\\/[cf][ar][da][rm]e>)()";
// parentheses finales pour obtenir meme nombre de regs que pcre
$regexp_echap_poesie = "(<poe[st][ir][ey]>(([^<]|<[^/]|</[^p]|</p[^o]|</po[^e]|</poe[^st]|</poe[st][^ir]|</poe[st][ir][^[ey]]|<\\/poe[st][ir][ey][^>])*)<\\/poe[st][ir][ey]>)()";
$regexp_echap = "({$regexp_echap_html})|({$regexp_echap_code})|({$regexp_echap_cadre})|({$regexp_echap_poesie})";
}
while ($flag_pcre && preg_match($regexp_echap, $letexte, $regs) || !$flag_pcre && preg_match($regexp_echap, $letexte, $regs)) {
$num_echap++;
if ($no_transform) {
// echappements bruts
$les_echap[$num_echap] = $regs[0];
} else {
if ($regs[1]) {
// Echapper les <html>...</ html>
$les_echap[$num_echap] = $regs[2];
} else {
if ($regs[4]) {
// Echapper les <code>...</ code>
$lecode = entites_html($regs[5]);
// supprimer les sauts de ligne debut/fin (mais pas les espaces => ascii art).
$lecode = preg_replace("/^\n+|\n+\$/", "", $lecode);
// ne pas mettre le <div...> s'il n'y a qu'une ligne
if (is_int(strpos($lecode, "\n"))) {
$lecode = nl2br("<div align='left' class='spip_code' dir='ltr'>" . $lecode . "</div>");
} else {
$lecode = "<span class='spip_code' dir='ltr'>" . $lecode . "</span>";
}
$lecode = preg_replace("/\t/", " ", $lecode);
$lecode = preg_replace("/ /", " ", $lecode);
$les_echap[$num_echap] = "<tt>" . $lecode . "</tt>";
} else {
if ($regs[7]) {
// Echapper les <cadre>...</cadre>
$lecode = trim(entites_html($regs[9]));
$total_lignes = count(explode("\n", $lecode));
$les_echap[$num_echap] = "</p><form action=\"/\" method=\"get\"><textarea readonly='readonly' cols='40' rows='{$total_lignes}' class='spip_cadre' dir='ltr'>" . $lecode . "</textarea></form><p class=\"spip\">";
} else {
if ($regs[12]) {
$lecode = $regs[14];
$lecode = preg_replace("/\n[[:space:]]*\n/", "\n \n", $lecode);
$lecode = preg_replace("/\r/", "\n", $lecode);
$lecode = "<div class=\"spip_poesie\"><div>" . preg_replace("/\n+/", "</div>\n<div>", $lecode) . "</div></div>";
$les_echap[$num_echap] = propre($lecode);
}
}
}
}
}
$pos = strpos($letexte, $regs[0]);
$letexte = substr($letexte, 0, $pos) . "@@SPIP_{$source}{$num_echap}@@" . substr($letexte, $pos + strlen($regs[0]));
}
// Gestion du TeX
// [ML] likely to be removed
if (!(strpos($letexte, "<math>") === false)) {
include_lcm('inc_math');
$letexte = traiter_math($letexte, $les_echap, $num_echap, $source);
}
//
// Insertion d'images et de documents utilisateur
//
while (preg_match("/<(IMG|DOC|EMB)([0-9]+)(\\|([^\\>]*))?/i" . ">", $letexte, $match)) {
include_ecrire("inc_documents.php3");
$num_echap++;
$letout = quotemeta($match[0]);
$letout = preg_replace("/\\|/", "\\|", $letout);
$id_document = $match[2];
$align = $match[4];
if (preg_match("/emb/i", $match[1])) {
$rempl = embed_document($id_document, $align);
} else {
$rempl = integre_image($id_document, $align, $match[1]);
}
$letexte = preg_replace($letout, "@@SPIP_{$source}{$num_echap}@@", $letexte);
$les_echap[$num_echap] = $rempl;
}
//
// Echapper les tags html contenant des caracteres sensibles a la typo
//
$regexp_echap = "<[a-zA-Z!][^<>!':;\\?]*[!':;\\?][^<>]*>";
if ($flag_pcre) {
if (preg_match_all("/{$regexp_echap}/", $letexte, $regs, PREG_SET_ORDER)) {
while (list(, $reg) = each($regs)) {
$num_echap++;
$les_echap[$num_echap] = $reg[0];
//echo htmlspecialchars($reg[0])."<p>";
$pos = strpos($letexte, $les_echap[$num_echap]);
$letexte = substr($letexte, 0, $pos) . "@@SPIP_{$source}{$num_echap}@@" . substr($letexte, $pos + strlen($les_echap[$num_echap]));
}
}
} else {
while (preg_match($regexp_echap, $letexte, $reg)) {
$num_echap++;
$les_echap[$num_echap] = $reg[0];
$pos = strpos($letexte, $les_echap[$num_echap]);
$letexte = substr($letexte, 0, $pos) . "@@SPIP_{$source}{$num_echap}@@" . substr($letexte, $pos + strlen($les_echap[$num_echap]));
}
}
return array($letexte, $les_echap);
}
function antispam($texte)
{
include_ecrire("inc_acces.php3");
$masque = creer_pass_aleatoire(3);
return preg_replace("/@/", " {$masque} ", $texte);
}