time()) return date('Y-m-d H:i:s', $GLOBALS['meta']['date_prochain_postdate']); else return '2138-01-01 00:00:00'; } # retourne le fichier d'un document // http://doc.spip.org/@quete_fichier function quete_fichier($id_document, $serveur='') { return sql_getfetsel('fichier', 'spip_documents', ("id_document=" . intval($id_document)), '',array(), '', '', $serveur); } # Toute les infos sur un document function quete_document($id_document, $serveur='') { return sql_fetsel('*', 'spip_documents', ("id_document=" . intval($id_document)), '',array(), '', '', $serveur); } // http://doc.spip.org/@quete_petitions function quete_petitions($id_article, $table, $id_boucle, $serveur, &$cache) { $retour = sql_getfetsel('texte', 'spip_petitions',("id_article=".intval($id_article)),'',array(),'','', $serveur); if ($retour === NULL) return ''; # cette page est invalidee par toute petition $cache['varia']['pet'.$id_article] = 1; # ne pas retourner '' car le texte sert aussi de presence return $retour ? $retour : ' '; } # retourne le champ 'accepter_forum' d'un article // http://doc.spip.org/@quete_accepter_forum function quete_accepter_forum($id_article) { // si la fonction est appelee en dehors d'une boucle // article (forum de breves), $id_article est nul // mais il faut neanmoins accepter l'affichage du forum // d'ou le 0=>'' (et pas 0=>'non'). static $cache = array(0 => ''); $id_article = intval($id_article); if (isset($cache[$id_article])) return $cache[$id_article]; return $cache[$id_article] = sql_getfetsel('accepter_forum','spip_articles',"id_article=$id_article"); } // recuperer une meta sur un site distant (en local il y a plus simple) // http://doc.spip.org/@quete_meta function quete_meta($nom, $serveur) { return sql_getfetsel("valeur", "spip_meta", "nom=" . sql_quote($nom), '','','','',$serveur); } // // Retourne le logo d'un objet, eventuellement par heritage // Si flag <> false, retourne le chemin du fichier // sinon retourne un tableau de 3 elements: // le chemin du fichier, celui du logo de survol, l'attribut style=w/h function quete_logo($type, $onoff, $id, $id_rubrique, $flag) { $chercher_logo = charger_fonction('chercher_logo', 'inc'); $nom = strtolower($onoff); while (1) { $on = $chercher_logo($id, $type, $nom); if ($on) { if ($flag) return "$on[2].$on[3]"; else { $taille = @getimagesize($on[0]); $off = ($onoff != 'ON') ? '' : $chercher_logo($id, $type, 'off'); // on retourne une url du type IMG/artonXX?timestamp // qui permet de distinguer le changement de logo // et placer un expire sur le dossier IMG/ return array ($on[0].($on[4]?"?$on[4]":""), ($off ? $off[0] . ($off[4]?"?$off[4]":"") : ''), (!$taille ? '' : (" ".$taille[3]))); } } else if ($id_rubrique) { $type = 'id_rubrique'; $id = $id_rubrique; $id_rubrique = 0; } else if ($id AND $type == 'id_rubrique') $id = quete_parent($id); else return ''; } } // fonction appelee par la balise #LOGO_DOCUMENT // http://doc.spip.org/@calcule_logo_document function quete_logo_file($row, $connect=NULL) { include_spip('inc/documents'); $logo = vignette_logo_document($row, $connect); if (!$logo) $logo = image_du_document($row); if (!$logo){ $f = charger_fonction('vignette','inc'); $logo = $f($row['extension'], false); } if (preg_match(',^'._DIR_IMG_ICONES_DIST.',', $logo)) return $logo; return get_spip_doc($logo); } function quete_logo_document($row, $lien, $align, $mode_logo, $x, $y, $connect=NULL) { include_spip('inc/documents'); $logo = ''; if (!in_array($mode_logo,array('icone','apercu'))) $logo = vignette_logo_document($row, $connect); // si on veut explicitement la vignette, ne rien renvoyer si il n'y en a pas if ($mode_logo == 'vignette' AND !$logo) return ''; if ($mode_logo == 'icone') $row['fichier'] = ''; return vignette_automatique($logo, $row, $lien, $x, $y, $align); } // Retourne la vignette explicitement attachee a un document // le resutat est un fichier local existant, ou une URL function vignette_logo_document($row, $connect='') { if (!$row['id_vignette']) return ''; $fichier = quete_fichier($row['id_vignette'], $connect); if ($connect) { $site = quete_meta('adresse_site', $connect); $dir = quete_meta('dir_img', $connect); return "$site/$dir$fichier"; } $f = get_spip_doc($fichier); if ($f AND @file_exists($f)) return $f; if ($row['mode'] !== 'vignette') return ''; return generer_url_entite($row['id_document'], 'document','','', $connect); } // http://doc.spip.org/@calcul_exposer function calcul_exposer ($id, $prim, $reference, $parent, $type, $connect='') { static $exposer = array(); // Que faut-il exposer ? Tous les elements de $reference // ainsi que leur hierarchie ; on ne fait donc ce calcul // qu'une fois (par squelette) et on conserve le resultat // en static. if (!isset($exposer[$m=md5(serialize($reference))][$prim])) { $principal = isset($reference[$type])?$reference[$type]: // cas de la pagination indecte @xx qui positionne la page avec l'id xx // et donne la reference dynamique @type=xx dans le contexte (isset($reference["@$type"])?$reference["@$type"]:''); // le parent fournit en argument est le parent de $id, pas celui de $principal // il n'est donc pas utile $parent = 0; if (!$principal) { // regarder si un enfant est dans le contexte, auquel cas il expose peut etre le parent courant $enfants = array('id_rubrique'=>array('id_article'),'id_groupe'=>array('id_mot')); if (isset($enfants[$type])) foreach($enfants[$type] as $t) if (isset($reference[$t]) // cas de la reference donnee dynamiquement par la pagination OR isset($reference["@$t"])) { $type = $t; $principal = isset($reference[$type])?$reference[$type]:$reference["@$type"]; continue; } } $exposer[$m][$type] = array(); if ($principal) { $principaux = is_array($principal)?$principal:array($principal); foreach($principaux as $principal){ $exposer[$m][$type][$principal] = true; if ($type == 'id_mot'){ if (!$parent) { $parent = sql_getfetsel('id_groupe','spip_mots',"id_mot=" . $principal, '','','','',$connect); } if ($parent) $exposer[$m]['id_groupe'][$parent] = true; } else if ($type != 'id_groupe') { if (!$parent) { if ($type == 'id_rubrique') $parent = $principal; if ($type == 'id_article') { $parent = quete_rubrique($principal,$connect); } } do { $exposer[$m]['id_rubrique'][$parent] = true; } while ($parent = quete_parent($parent, $connect)); } } } } // And the winner is... return isset($exposer[$m][$prim]) ? isset($exposer[$m][$prim][$id]) : ''; } // Ajouter "&lang=..." si la langue du forum n'est pas celle du site. // Si le 2e parametre n'est pas une chaine, c'est qu'on n'a pas pu // determiner la table a la compil, on le fait maintenant. // Il faudrait encore completer: on ne connait pas la langue // pour une boucle forum sans id_article ou id_rubrique issu du contexte, // ce qui provoque un Log abscons ("table inconnue forum") // voire une erreur SQL dans le cas de id_syndic, qu'on neutralise // in extremis mais ce n'est pas satisfaisant // http://doc.spip.org/@lang_parametres_forum function lang_parametres_forum($qs, $lang) { if (is_array($lang) AND preg_match(',id_(\w+)=([0-9]+),', $qs, $r)) { $id = 'id_' . $r[1]; if ($t = $lang[$id] AND $id != 'id_syndic') $lang = sql_getfetsel('lang', $t, "$id=" . $r[2]); else $lang = ''; } // Si ce n'est pas la meme que celle du site, l'ajouter aux parametres if ($lang AND $lang <> $GLOBALS['meta']['langue_site']) return $qs . "&lang=" . $lang; return $qs; } function quete_debut_pagination($primary,$valeur,$pas,$res,$serveur=''){ // on ne devrait pas arriver ici si la cle primaire est inexistante // ou composee, mais verifions if (!$primary OR preg_match('/[,\s]/',$primary)) return 0; $pos = 0; while ($row = sql_fetch($res,$serveur) AND $row[$primary]!=$valeur){ $pos++; } // si on a pas trouve if ($row[$primary]!=$valeur) return 0; // sinon, calculer le bon numero de page return floor($pos/$pas)*$pas; } ?>