name = "idartparent"; $fields[$idx] -> title = "Página Padre"; $fields[$idx] -> length = "25"; $fields[$idx] -> ilength = "25"; $fields[$idx] -> type = "string"; $fields[$idx] -> dtype = "popupdb"; $fields[$idx] -> extra = "articulos:id,idseccion:nombre"; $fields[$idx] -> vdefault = ""; $fields[$idx] -> vonchange = ""; $fields[$idx] -> column = ""; $fields[$idx] -> help = ""; $fields[$idx] -> browsable = true; $fields[$idx] -> browsedit = true; $fields[$idx] -> fieldedit = false; $fields[$idx] -> readonly = false; $fields[$idx] -> searchable = true; $fields[$idx] -> orderby = true; $fields[$idx] -> canbenull = true; if (!isset($dbname)) $dbname = ""; if ($dbname=="") $dbname = _DEF_dbname; include_once("header.php"); OpenTable(); include_once("modules/phpRAD/RAD_common.php"); include_once("modules/phpRAD/RAD_sql.php"); include("modules/phpRAD/normalRAD.php"); include_once("modules/phpRAD/RAD_js.php"); CloseTable(); include_once("footer.php"); return; } if (!is_user()) $CondPublico=" AND publico!='0'"; switch($cmd) { case "print": imprimearticulo($id); break; case "edit": if (is_user()) editaarticulo($id,""); break; case "new": if (is_user()) nuevoarticulo($id); break; case "save": if (is_user()) { if ($borra!="") borraarticulo($id); else guardaarticulo($id); } break; default: include_once ("header.php"); OpenTable(); if ($id!="") muestraarticulo($id, $page); else if ($owner!="") listaarticulos("","","",0); else if ($secid!="") listaarticulos($secid,"","",0); else if ($secindex!="") listaarticulosindex($secindex, $showindex, $lastindex, $maxchars); else listasecciones(); CloseTable(); include_once ("footer.php"); break; } if (function_exists("listasecciones")) return; ///////////////////////////////////////////////////////////////////////////////////////// function listasecciones() { global $RAD_dbi; if (is_admin() || is_editor() || is_viewer()) $result = sql_query("select id, nombre, imagen from articulossecciones order by orden", $RAD_dbi); else $result = sql_query("select id, nombre, imagen from articulossecciones where visible='1' order by orden", $RAD_dbi); $count = 0; while (list($secid, $secname, $image) = sql_fetch_row($result, $RAD_dbi)) { listaarticulos($secid,"","",0); } } ///////////////////////////////////////////////////////////////////////////////////////// function listaarticulos($TMP_secid,$TMP_idlis,$TMP_idartparent,$TMP_level) { global $RAD_dbi, $user, $SESSION_SID, $owner, $secid, $CondPublico, $V_dir, $V_mod, $A_ART_LISTADOS, $id, $color, $headeroff, $footeroff, $noshowartstree, $noprint; if (defined('_DEF_DIR_ROOT')) $dir_root = _DEF_DIR_ROOT; else $dir_root = ""; if ($owner=="" && $TMP_idartparent=="" && $TMP_idlis=="") { echo "\n"; if (is_admin() || is_editor() || is_viewer()) $result = sql_query("select nombre, imagen from articulossecciones where id='$TMP_secid'", $RAD_dbi); else $result = sql_query("select nombre, imagen from articulossecciones where id='$TMP_secid' AND visible='1'", $RAD_dbi); list($secname,$image) = sql_fetch_row($result, $RAD_dbi); echo ""; echo "\n
$secname
"; } else if ($owner!="" && $TMP_idartparent=="" && $TMP_idlis=="") { echo "\n"; echo ""; echo "\n
Mis Páginas
"; } if ($owner!="") { if ($TMP_secid=="") $TMP_cmdSQL="select id, idseccion, idartparent, nombre, contenido, paginas, autor from articulos where autor='$user' $CondPublico"; else $TMP_cmdSQL="select id, idseccion, idartparent, nombre, contenido, paginas, autor from articulos where autor='$user' and idseccion='$TMP_secid' $CondPublico"; } else { if (is_admin() || is_editor() || is_viewer()) $TMP_cmdSQL="select id, idseccion, idartparent, nombre, contenido, paginas, autor from articulos where idseccion='$TMP_secid' $CondPublico"; else $TMP_cmdSQL="select id, idseccion, idartparent, nombre, contenido, paginas, autor from articulos where idseccion='$TMP_secid' AND visible='1' $CondPublico"; } if ($TMP_idartparent>0) $TMP_cmdSQL.=" AND idartparent='".$TMP_idartparent."'"; if ($TMP_idlis>0) $TMP_cmdSQL.=" AND id='".$TMP_idlis."'"; $TMP_cmdSQL.=" order by idseccion,orden"; if ($noshowartstree!="") return; if ($TMP_idartparent=="" && $TMP_idlis=="") echo "\n"; $TMP_cont=0; $result = sql_query($TMP_cmdSQL, $RAD_dbi); while (list($TMP_id, $TMP_secid, $idartparent, $title, $content, $counter, $autor) = sql_fetch_row($result, $RAD_dbi)) { if ($color=="style='background-color:white'") $color="style='background-color:#E0E0E0'"; else $color="style='background-color:white'"; if ($A_ART_LISTADOS[$TMP_id]!="") continue; else $A_ART_LISTADOS[$TMP_id]=$TMP_id; $TMP_cont++; $title=str_replace("\r\n\r\n", "
\r\n
\r\n", $title); $title=str_replace("\n\n", "
\n
\n", $title); if (!eregi("\r\n
\r\n", $content); $content=str_replace("\n\n", "
\n
\n", $content); } if ($owner!="") $Xowner="&owner=".$owner; echo "
"; if ($noprint=="") echo ""; else echo ""; if (is_admin() || is_editor() || ($autor==$user && $autor!="" && $user!="") ) echo ""; else echo ""; echo "\n"; $TMP_level2=$TMP_level+1; listaarticulos($TMP_secid,"",$TMP_id,$TMP_level2); } if ($TMP_idartparent>0 || $TMP_idlis>0) return; if ($TMP_cont==0 && $TMP_idartparent=="" && $TMP_idlis=="") echo ""; if ($owner!="" || $secid!="") echo ""; if (is_user()) echo ""; if (is_admin() || is_editor() || is_viewer()) { $result = sql_query("select id, idseccion, nombre, contenido, paginas, autor, visible from articulos where visible!='1' order by orden", $RAD_dbi); while (list($TMP_id, $TMP_secid2, $title, $content, $counter, $autor, $visible) = sql_fetch_row($result, $RAD_dbi)) { if ($color=="style='background-color:white'") $color="style='background-color:#E8E8E0'"; else $color="style='background-color:white'"; $nombreautor=RAD_lookup("usuarios","nombre","usuario",$autor); if ($id==$TMP_id) $title="".$title.""; if (is_viewer()) echo " "; } } if ($TMP_idartparent=="" && $TMP_idlis=="") echo "\n
"; if ($TMP_level>0) echo str_repeat("    ", $TMP_level); if ($id==$TMP_id) $title="".$title.""; echo "· $title"; echo ""._DEF_NLSPrint."\""._EDIT."\" "._EDIT." 
No hay paginas en esta Seccion.
[ "._SECTIONS." ]
nueva pagina Crear Nuevo
".$TMP_x." $title [".$nombreautor."]"; else echo "
".$TMP_x." edita pagina $title [".$nombreautor."]"; if ($visible !="1") echo " No visible "; echo "
\n"; return; } ///////////////////////////////////////////////////////////////////////////////////////// function listaarticulosindex($TMP_secid, $TMP_showindex, $TMP_lastindex, $TMP_maxchars) { global $PHP_SELF, $RAD_dbi, $SESSION_SID, $CondPublico, $V_dir, $V_mod, $show; if (defined('_DEF_DIR_ROOT')) $dir_root = _DEF_DIR_ROOT; else $dir_root = ""; if ($TMP_maxchars=="" || $TMP_maxchars==0) $TMP_maxchars=250; if (!$TMP_lastindex>0) $TMP_lastindex=1; if (!$TMP_showindex>0) $TMP_showindex=1; if ($TMP_showindex>$TMP_lastindex) $TMP_showindex=$TMP_lastindex; $result=sql_query("select * from articulossecciones where id='$TMP_secid'", $RAD_dbi); $row=sql_fetch_array($result, $RAD_dbi); $secname=$row[nombre]; echo "
$secname
\n"; $TMP_cmdSQL="select * from articulos where idseccion='$TMP_secid' AND visible='1' $CondPublico"; $TMP_cmdSQL.=" order by fechaalta DESC,orden ASC LIMIT 0,$TMP_lastindex"; $result = sql_query($TMP_cmdSQL, $RAD_dbi); $TMP_cont=0; while ($row = sql_fetch_array($result, $RAD_dbi)) { $title=$row[nombre]; $content=$row[contenido]; $title=str_replace("\r\n\r\n", "
\r\n
\r\n", $title); $title=str_replace("\n\n", "
\n
\n", $title); if (!eregi("\r\n
\r\n", $content); $content=str_replace("\n\n", "
\n
\n", $content); } $TMP_icono=""; if ($TMP_maxchars>0) { $TMP_fotoregcont=RAD_ImgHTML($content); $TMP_fotominicont=""; if (file_exists($TMP_fotoregcont) && $TMP_fotoregcont!="") { $TMP_pos=strrpos($TMP_fotoregcont,"/"); $TMP_fotominicont=substr($TMP_fotoregcont,0,$TMP_pos+1)."x".substr($TMP_fotoregcont,$TMP_pos+1); if (!file_exists($TMP_fotominicont)) $TMP_fotominicont=RAD_resizeImg($TMP_fotoregcont,100,100); } $content=RAD_convertHTML2TXT($content); if (strlen($content)>$TMP_maxchars) $content=substr($content,0,$TMP_maxchars)." ..."; if (file_exists($TMP_fotominicont)) $TMP_icono="".$content."\n"; $content=$TMP_icono.$content; } $A_id[$TMP_cont]=$row[id]; $A_title[$TMP_cont]=$title; $A_content[$TMP_cont]=$content; $TMP_cont++; } $lista=""; for($k=0; $k<$TMP_showindex; $k++) { $idx=rand(0,count($A_id)-1); if (ereg(",".$idx.",",$lista)) { $k--; continue; }else{ $lista.=",".$idx.","; } $id=$A_id[$idx]; $title=$A_title[$idx]; $content=$A_content[$idx]; echo "\n
\n"; if ($TMP_maxchars>0) echo "$title
". $content."
"; else echo $content.""; echo "
\n"; } } ///////////////////////////////////////////////////////////////////////////////////////// function muestraarticulo($id, $page) { global $lang, $RAD_dbi, $user, $SESSION_SID, $owner, $CondPublico, $V_dir, $V_mod, $cmd, $headeroff, $footeroff, $dbname, $showdocs, $noeditamaqueta, $PHPSESSID, $V_idmod, $_REQUEST, $noshowfiles, $noprint, $contenidopie, $noshowartstree; if ($dbname=="") $dbname=_DEF_dbname; $TMP_secu=" Imagen
Recarga Imagen"; if (defined('_DEF_DIR_ROOT')) $dir_root = _DEF_DIR_ROOT; else $dir_root = ""; if ($cmd=="slide") { echo "
"; $result = sql_query("select * from articulos where id=$id ".$CondPublico, $RAD_dbi); $TMP_row = sql_fetch_array($result, $RAD_dbi); $TMP_row[contenido]=str_replace("",$TMP_secu,$TMP_row[contenido]); $TMP_row[contenido]=str_replace("< script","",$TMP_secu,$TMP_row["contenido_".$lang]); $TMP_row["contenido_".$lang]=str_replace("< script","",$TMP_secu,$TMP_row[contenido]); $TMP_row[contenido]=str_replace("< script","",$TMP_secu,$TMP_row["contenido_".$lang]); $TMP_row["contenido_".$lang]=str_replace("< script"," $secname \n"; if ($id==$TMP_id) { $barra=$ant." "; // $barra=$ant.$title; $SELECTED=" SELECTED"; } else $SELECTED=""; if ($id!=$TMP_id && $barra!="" && $post=="") $post=" \"".$title."\""; $ant="\"".$title."\""; $TMP_select.="\n"; } if ($post=="") $post=" "; echo "
$barra"; echo ""; echo ""; echo ""; echo ""; echo $post."

"; } if (is_admin() || is_editor() || is_viewer()) $result = sql_query("select * from articulos where id=$id ".$CondPublico, $RAD_dbi); else if ($owner!="") $result = sql_query("select * from articulos where id=$id AND autor='$user' ".$CondPublico, $RAD_dbi); else $result = sql_query("select * from articulos where id=$id AND visible!='0' ".$CondPublico, $RAD_dbi); $TMP_row=sql_fetch_array($result, $RAD_dbi); $TMP_row[contenido]=str_replace("",$TMP_secu,$TMP_row[contenido]); $TMP_row[contenido]=str_replace("< script","",$TMP_secu,$TMP_row["contenido_".$lang]); $TMP_row["contenido_".$lang]=str_replace("< script"," no mostrar el icono de print: variable que lo controlara if ($TMP_row['url'] != '' && strpos($TMP_row['url'],'V_mod=articulos') !== false && $TMP_row['contenido'] == '') $mostrar_imprime = false; else $mostrar_imprime = true; if ($TMP_row["nombre_".$lang]!="") $TMP_row["nombre"]=$TMP_row["nombre_".$lang]; if ($TMP_row["contenido_".$lang]!="") $TMP_row["contenido"]=$TMP_row["contenido_".$lang]; $id=$TMP_row["id"]; $secid=$TMP_row["idseccion"]; $tile=$TMP_row["nombre"]; $content=""; if ($contenidopie=="") $content=$TMP_row["contenido"]; $content="
".$content; $counter=$TMP_row["paginas"]; $autor=$TMP_row["autor"]; $documentos=$TMP_row["documentos"]; $url = $TMP_row[url]; if (trim($url)!="") eval("\$TMP_url=\"".$url."\";"); if (trim($TMP_url)!="") $content.="\n\n"; if (substr($TMP_url,0,9)=="index.php" || substr($TMP_url,0,11)=="modules".".php") $TMP_url=_DEF_URL_SUBBROWSE.$TMP_url."&subbrowseSID=".$PHPSESSID; if (trim($TMP_url)!="") { $TMP_url=trim($TMP_url)."&V_prevmod=$V_mod&V_prevdir=$V_dir&V_previd=$id"; //$TMP_url=trim($TMP_url)."&V_prevmod=$V_mod&V_prevdir=$V_dir&V_previdmod=$V_idmod&V_previd=$id"; foreach($_REQUEST as $TMP_k=>$TMP_v) { if (ereg("PHPSESSID",$TMP_k)) continue; if (!ereg("".$TMP_k."=",$TMP_url)) $TMP_url.="&".$TMP_k."=".urlencode($TMP_v); } //$content.=trim($TMP_url); $content_URL=RAD_OpenURL(trim($TMP_url)); } if (ereg("",$content)) $content=str_replace("",$content_URL,$content); else $content.=$content_URL; $title=str_replace("\r\n\r\n", "
\r\n
\r\n", $title); $title=str_replace("\n\n", "
\n
\n", $title); if (!eregi("\r\n
\r\n", $content); $content=str_replace("\n\n", "
\n
\n", $content); } $fotoautor=datosusuario($autor); if ($contenidopie!="") $content.=$TMP_row["contenido"]; if ($secid!="") { $result2 = sql_query("select id, nombre from articulossecciones where id=$secid", $RAD_dbi); list($secid, $secname) = sql_fetch_row($result2, $RAD_dbi); $words = sizeof(explode(" ", $content)); } // echo "
$title
"; $content.='
'; $contentpages = explode( "", $content ); $pageno = count($contentpages); if ( $page=="" || $page < 1 ) $page = 1; if ( $page > $pageno ) $page = $pageno; $arrayelement = (int)$page; $arrayelement --; if ($pageno > 1) echo ""._PAGE.": $page/$pageno
"; if (eregi("\\$"."fotoautor", $contentpages[$arrayelement])) { $contentpages[$arrayelement]=str_replace("\$fotoautor",$fotoautor,$contentpages[$arrayelement]); $fotoautor=""; } // echo $fotoautor.$contentpages[$arrayelement]; if($page >= $pageno) { $next_page = ""; } else { $next_pagenumber = $page + 1; $next_page = ""._NEXT." ($next_pagenumber/$pageno) \""._NEXT."\""; } if($page <= 1) { $previous_page = ""; } else { $previous_pagenumber = $page - 1; $previous_page = ""._PREVIOUS." ($previous_pagenumber/$pageno) \""._PREVIOUS."\""; } if ($owner!="") $Xowner="&owner=$owner"; $result = sql_query("select count(*) from articulos where idartparent='$id'", $RAD_dbi); $TMP_row = sql_fetch_array($result, $RAD_dbi); $numhijos=$TMP_row[0]; $idpadre=primerPadre($id); if ($idpadre<1) $idpadre=""; if (($idpadre!="" || $numhijos>0) && _DEF_ARTICULOS_SINJERARQUIA != "1" && $noshowartstree=="") { // oculta listado de artículos cuando visualizamos un artículo que pertenece a otro. OpenTable(); if ($idpadre>0) listaarticulos($secid,$idpadre,"",0); else listaarticulos($secid,$id,"",0); CloseTable(); } if (is_artpermitted($id)==true) echo $fotoautor.$contentpages[$arrayelement]; else echo "No posee permisos suficientes para poder visualizar este artículo."; $TMP_enlace=""; $TMP_visor=""; $TMP_otrosdocumentos=""; $TMP_galeria=""; $TMP_primera=""; if (trim($documentos)!="") { $files = explode("\n", $documentos."\n\n"); for ($k = 0; $k < count($files); $k++) { //Si el fichero es imagen seguimos para pintar la galeria $fichero = _DEF_DIRBASE."/".$dir_root."files/".$dbname."/".$files[$k]; if(trim($files[$k])=="") continue; $ficheroMay=strtoupper($fichero); if((strpos($fichero,"JPG")>=0)||(strpos($fichero,"PNG")>=0)||(strpos($fichero,"GIF")>=0)) { if($k==0) $TMP_primera=""; $TMP_galeria.=""; continue; } $files[$k]=str_replace("\n", "", $files[$k]); $files[$k]=str_replace("\r", "", $files[$k]); $pos=strpos($files[$k],"."); $filename=substr($files[$k],$pos+1); if ($files[$k]!="") { $ext=strtolower(substr($files[$k],strlen($files[$k])-3)); $ext4=strtolower(substr($files[$k],strlen($files[$k])-4)); $TMP_file=substr($files[$k],0,strlen($files[$k])-3); if ($ext=="mpg"||$ext=="avi"||$ext=="mp3") { // usa ffmpeg o mencoder para convertir a flv system("mencoder files/".$dbname."/".$files[$k]." -o files/".$dbname."/".$TMP_file."flv -of lavf -oac mp3lame -lameopts br=32 -af lavcresample=22050 -srate 22050 -ovc lavc -lavcopts vcodec=flv:vbitrate=340:autoaspect:mbd=2:trell:v4mv -vf scale=320:240 -lavfopts i_certify_that_my_video_stream_does_not_use_b_frames"); //system("ffmpeg -i files/".$dbname."/".$files[$k]." files/".$dbname."/".$TMP_file."flv"); $TMP_enlace.="
".$files[$k].""; } else if ($ext4=="mpeg") { $TMP_file=substr($files[$k],0,strlen($files[$k])-4); system("mencoder files/".$dbname."/".$files[$k]." -o files/".$dbname."/".$TMP_file."flv -of lavf -oac mp3lame -lameopts br=32 -af lavcresample=22050 -srate 22050 -ovc lavc -lavcopts vcodec=flv:vbitrate=340:autoaspect:mbd=2:trell:v4mv -vf scale=320:240 -lavfopts i_certify_that_my_video_stream_does_not_use_b_frames"); //system("ffmpeg -i files/".$dbname."/".$files[$k]." files/".$dbname."/".$TMP_file."flv"); $TMP_enlace.="
".$files[$k].""; } else { $TMP_otrosdocumentos.="".$filename."
\n"; } if ($ext=="flv"||$ext=="mpg"||$ext=="avi"||$ext=="mp3"||$ext4=="mpeg") { $TMP_visor="
"; } } } } if($TMP_galeria!="") echo "
$TMP_primera
".$tile."
".$TMP_galeria."
"; if ($showdocs!="") $TMP_enlace=RAD_showfield("file","",$documentos); if ($TMP_enlace!="" || $TMP_visor!="") echo $TMP_enlace.$TMP_visor; if ($noshowfiles=="" && $TMP_otrosdocumentos!="") echo "

Ficheros:".$TMP_otrosdocumentos."
"; if ($owner!="") { $result = sql_query("select * from articulos where autor='$user' AND visible!='0' $CondPublico AND idartparent='$id' order by orden", $RAD_dbi); } else if (is_admin() || is_editor() || is_viewer()) { $result = sql_query("select * from articulos where idartparent='$id' order by orden", $RAD_dbi); } else { $result = sql_query("select * from articulos where idartparent='$id' AND visible!='0' $CondPublico order by orden", $RAD_dbi); } $arts="
    "; while ($TMP_row = sql_fetch_array($result, $RAD_dbi)) { $arts.= "
  • ".$TMP_row[nombre]."
  • "; } if ($arts!="
      ") $arts.="


    "; else $arts=""; //xx echo $arts; echo "
    $previous_page    $next_page    "; // echo "[ "._BACKTO." $secname | " // .""._SECINDEX." ]"; // echo "($words "._TOTALWORDS.")
    ($counter "._READS.")   "; //if ($cmd=="") echo ""._DEF_NLSPrint." "; //if ($cmd=="print") echo "\n\n"; $esmaqueta=false; if (ereg("