Antes de poder acceder al listado de entradas de la red de la Alianza, debes configurar conrrectamente este PlugIn.
Ve al panel del PlugIn AlianzaBlogs que tienes a tu izquierda y luego accede a la subseccion "Configuracion", ahi deberás introducir tu USUARIO y PASSWORD de la red.
';
}elseif(check_user()==false){
echo'
Advertencia!
ERROR LOGIN INCORRECTO!.
Verifica que has introducido tus credenciales de acceso correctamente.
Ve al panel del PlugIn AlianzaBlogs que tienes a tu izquierda y luego accede a la subseccion "Configuracion", ahi deberás introducir tu USUARIO y PASSWORD de la red.
';
}else{
//Capturar XML desde la fuente de la alianza.
$acategories="http://".get_option('alianzablog_user').":".get_option('alianzablog_passwd')."@".get_option('ufeedCats');
$adata="http://".get_option('alianzablog_user').":".get_option('alianzablog_passwd')."@".get_option('ufeed')."?u=".get_option('alianzablog_user')."&max=".$_GET['max']."&mes=".$_GET['mes']."&cat=".$_GET['cat'];
$pdraft="http://".get_option('ufeedNews');
function cargarNoticia($content){
$content=load($content);
$content=preg_replace("//i"," ",$content);
$content=preg_replace("//i"," ",$content);
$content=preg_replace("/<\!.*-->/i"," ",$content);
$doc = new DOMDocument();
$doc->loadXML($content);
$arrFeeds = array();
foreach ($doc->getElementsByTagName('item') as $node) {
$itemRSS = array (
'title' => $node->getElementsByTagName('title')->item(0)->nodeValue,
'id' => $node->getElementsByTagName('id')->item(0)->nodeValue,
'category' => $node->getElementsByTagName('category')->item(0)->nodeValue,
'author' => $node->getElementsByTagName('author')->item(0)->nodeValue,
'desc' => $node->getElementsByTagName('description')->item(0)->nodeValue,
'link' => $node->getElementsByTagName('link')->item(0)->nodeValue,
'date' => $node->getElementsByTagName('pubDate')->item(0)->nodeValue
);
array_push($arrFeeds, $itemRSS);
}
return $arrFeeds;
}
$datos=cargarNoticia($adata);
$cdatos=cargarNoticia($acategories);
$pdraft=load($pdraft);
echo'
';
}
}
add_action('admin_menu', 'alianza_menu');
function alianza_menu()
{
// Extraemos el directorio en el que estamos para ir us‡ndolo luego
$pluginDir = pathinfo( __FILE__ );
$pluginDir = $pluginDir['dirname'];
// Titulo de la p‡gina
$page_title = "Intercambio de Contenido AlianzaBlogs.";
// T’tulo que aparece en el menœ
$menu_title = "Auto Entradas";
// Nivel de acceso
$access_level = "1";
// p‡gina de destino
$content_file = $pluginDir . '/alianzablogs.php';
// Funci—n para cargar dentro de la p‡gina incluida para generar el menœ
// Si no se indica, se asume que al incluir el fichero ya se ha generado todo el
// contenido necesario.
$content_function = paso1;
// url del icono para el menœ
$menu_icon_url = '/wp-content/plugins/alianzablogs/alianza.png';
add_object_page($page_title, "AlianzaBlogs", $access_level, $content_file,$content_function,$menu_icon_url);
// Declaramos tambiŽn como primer submenœ la misma p‡gina con los mismos datos
add_submenu_page($content_file,$page_title, $menu_title, $access_level, $content_file, $content_function);
//////// DECLARACION DE CADA SUBMENU ////////////
// La func—n para declarar submenœs es igual que la anterior
// pero se a–ade como primer par‡metro el nombre usado como
// $content_file en la p‡gina padre
// Adem‡s, ya no se informa nunca el icon file.
$page_parent = $pluginDir . '/alianzablogs.php';// $content_file del padre
$page_title = "Configuracion AlianzaBlogs"; // Titulo de la p‡gina
$menu_title = "Configuracion"; // T’tulo que aparece en el menœ
$access_level = "0"; // Nivel de acceso
$content_file = '/alianzablogs.php'; // p‡gina de destino
$content_function = alianza_plugin_options; // funci—n a lanzar en la p‡gina de destino
add_submenu_page($page_parent, $page_title, $menu_title, $access_level, $content_file, $content_function);
}
function alianza_plugin_options() {
echo'
';
}
function load($url,$options=array()) {
$default_options = array(
'method' => 'get',
'post_data' => false,
'return_info' => false,
'return_body' => true,
'cache' => false,
'referer' => '',
'headers' => array(),
'session' => false,
'session_close' => false,
);
// Sets the default options.
foreach($default_options as $opt=>$value) {
if(!isset($options[$opt])) $options[$opt] = $value;
}
$url_parts = parse_url($url);
$ch = false;
$info = array(//Currently only supported by curl.
'http_code' => 200
);
$response = '';
$send_header = array(
'Accept' => 'text/*',
'User-Agent' => 'BinGet/1.00.A (http://www.bin-co.com/php/scripts/load/)'
) + $options['headers']; // Add custom headers provided by the user.
if($options['cache']) {
$cache_folder = joinPath(sys_get_temp_dir(), 'php-load-function');
if(isset($options['cache_folder'])) $cache_folder = $options['cache_folder'];
if(!file_exists($cache_folder)) {
$old_umask = umask(0); // Or the folder will not get write permission for everybody.
mkdir($cache_folder, 0777);
umask($old_umask);
}
$cache_file_name = md5($url) . '.cache';
$cache_file = joinPath($cache_folder, $cache_file_name); //Don't change the variable name - used at the end of the function.
if(file_exists($cache_file)) { // Cached file exists - return that.
$response = file_get_contents($cache_file);
//Seperate header and content
$separator_position = strpos($response,"\r\n\r\n");
$header_text = substr($response,0,$separator_position);
$body = substr($response,$separator_position+4);
foreach(explode("\n",$header_text) as $line) {
$parts = explode(": ",$line);
if(count($parts) == 2) $headers[$parts[0]] = chop($parts[1]);
}
$headers['cached'] = true;
if(!$options['return_info']) return $body;
else return array('headers' => $headers, 'body' => $body, 'info' => array('cached'=>true));
}
}
if(isset($options['post_data'])) { //There is an option to specify some data to be posted.
$options['method'] = 'post';
if(is_array($options['post_data'])) { //The data is in array format.
$post_data = array();
foreach($options['post_data'] as $key=>$value) {
$post_data[] = "$key=" . urlencode($value);
}
$url_parts['query'] = implode('&', $post_data);
} else { //Its a string
$url_parts['query'] = $options['post_data'];
}
} elseif(isset($options['multipart_data'])) { //There is an option to specify some data to be posted.
$options['method'] = 'post';
$url_parts['query'] = $options['multipart_data'];
/*
This array consists of a name-indexed set of options.
For example,
'name' => array('option' => value)
Available options are:
filename: the name to report when uploading a file.
type: the mime type of the file being uploaded (not used with curl).
binary: a flag to tell the other end that the file is being uploaded in binary mode (not used with curl).
contents: the file contents. More efficient for fsockopen if you already have the file contents.
fromfile: the file to upload. More efficient for curl if you don't have the file contents.
Note the name of the file specified with fromfile overrides filename when using curl.
*/
}
///////////////////////////// Curl /////////////////////////////////////
//If curl is available, use curl to get the data.
if(function_exists("curl_init")
and (!(isset($options['use']) and $options['use'] == 'fsocketopen'))) { //Don't use curl if it is specifically stated to use fsocketopen in the options
if(isset($options['post_data'])) { //There is an option to specify some data to be posted.
$page = $url;
$options['method'] = 'post';
if(is_array($options['post_data'])) { //The data is in array format.
$post_data = array();
foreach($options['post_data'] as $key=>$value) {
$post_data[] = "$key=" . urlencode($value);
}
$url_parts['query'] = implode('&', $post_data);
} else { //Its a string
$url_parts['query'] = $options['post_data'];
}
} else {
if(isset($options['method']) and $options['method'] == 'post') {
$page = $url_parts['scheme'] . '://' . $url_parts['host'] . $url_parts['path'];
} else {
$page = $url;
}
}
if($options['session'] and isset($GLOBALS['_binget_curl_session'])) $ch = $GLOBALS['_binget_curl_session']; //Session is stored in a global variable
else $ch = curl_init($url_parts['host']);
curl_setopt($ch, CURLOPT_URL, $page) or die("Invalid cURL Handle Resouce");
curl_setopt($ch, CURLOPT_RETURNTRANSFER, true); //Just return the data - not print the whole thing.
curl_setopt($ch, CURLOPT_HEADER, true); //We need the headers
curl_setopt($ch, CURLOPT_NOBODY, !($options['return_body'])); //The content - if true, will not download the contents. There is a ! operation - don't remove it.
$tmpdir = NULL; //This acts as a flag for us to clean up temp files
if(isset($options['method']) and $options['method'] == 'post' and isset($url_parts['query'])) {
curl_setopt($ch, CURLOPT_POST, true);
if(is_array($url_parts['query'])) {
//multipart form data (eg. file upload)
$postdata = array();
foreach ($url_parts['query'] as $name => $data) {
if (isset($data['contents']) && isset($data['filename'])) {
if (!isset($tmpdir)) { //If the temporary folder is not specifed - and we want to upload a file, create a temp folder.
// :TODO:
$dir = sys_get_temp_dir();
$prefix = 'load';
if (substr($dir, -1) != '/') $dir .= '/';
do {
$path = $dir . $prefix . mt_rand(0, 9999999);
} while (!mkdir($path, $mode));
$tmpdir = $path;
}
$tmpfile = $tmpdir.'/'.$data['filename'];
file_put_contents($tmpfile, $data['contents']);
$data['fromfile'] = $tmpfile;
}
if (isset($data['fromfile'])) {
// Not sure how to pass mime type and/or the 'use binary' flag
$postdata[$name] = '@'.$data['fromfile'];
} elseif (isset($data['contents'])) {
$postdata[$name] = $data['contents'];
} else {
$postdata[$name] = '';
}
}
curl_setopt($ch, CURLOPT_POSTFIELDS, $postdata);
} else {
curl_setopt($ch, CURLOPT_POSTFIELDS, $url_parts['query']);
}
}
//Set the headers our spiders sends
curl_setopt($ch, CURLOPT_USERAGENT, $send_header['User-Agent']); //The Name of the UserAgent we will be using ;)
$custom_headers = array("Accept: " . $send_header['Accept'] );
if(isset($options['modified_since']))
array_push($custom_headers,"If-Modified-Since: ".gmdate('D, d M Y H:i:s \G\M\T',strtotime($options['modified_since'])));
curl_setopt($ch, CURLOPT_HTTPHEADER, $custom_headers);
if($options['referer']) curl_setopt($ch, CURLOPT_REFERER, $options['referer']);
curl_setopt($ch, CURLOPT_COOKIEJAR, "/tmp/binget-cookie.txt"); //If ever needed...
curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true);
curl_setopt($ch, CURLOPT_MAXREDIRS, 5);
curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);
$custom_headers = array();
unset($send_header['User-Agent']); // Already done (above)
foreach ($send_header as $name => $value) {
if (is_array($value)) {
foreach ($value as $item) {
$custom_headers[] = "$name: $item";
}
} else {
$custom_headers[] = "$name: $value";
}
}
if(isset($url_parts['user']) and isset($url_parts['pass'])) {
$custom_headers[] = "Authorization: Basic ".base64_encode($url_parts['user'].':'.$url_parts['pass']);
}
curl_setopt($ch, CURLOPT_HTTPHEADER, $custom_headers);
$response = curl_exec($ch);
if(isset($tmpdir)) {
//rmdirr($tmpdir); //Cleanup any temporary files :TODO:
}
$info = curl_getinfo($ch); //Some information on the fetch
if($options['session'] and !$options['session_close']) $GLOBALS['_binget_curl_session'] = $ch; //Dont close the curl session. We may need it later - save it to a global variable
else curl_close($ch); //If the session option is not set, close the session.
//////////////////////////////////////////// FSockOpen //////////////////////////////
} else { //If there is no curl, use fsocketopen - but keep in mind that most advanced features will be lost with this approch.
if(!isset($url_parts['query']) || (isset($options['method']) and $options['method'] == 'post'))
$page = $url_parts['path'];
else
$page = $url_parts['path'] . '?' . $url_parts['query'];
if(!isset($url_parts['port'])) $url_parts['port'] = ($url_parts['scheme'] == 'https' ? 443 : 80);
$host = ($url_parts['scheme'] == 'https' ? 'ssl://' : '').$url_parts['host'];
$fp = fsockopen($host, $url_parts['port'], $errno, $errstr, 30);
if ($fp) {
$out = '';
if(isset($options['method']) and $options['method'] == 'post' and isset($url_parts['query'])) {
$out .= "POST $page HTTP/1.1\r\n";
} else {
$out .= "GET $page HTTP/1.0\r\n"; //HTTP/1.0 is much easier to handle than HTTP/1.1
}
$out .= "Host: $url_parts[host]\r\n";
foreach ($send_header as $name => $value) {
if (is_array($value)) {
foreach ($value as $item) {
$out .= "$name: $item\r\n";
}
} else {
$out .= "$name: $value\r\n";
}
}
$out .= "Connection: Close\r\n";
//HTTP Basic Authorization support
if(isset($url_parts['user']) and isset($url_parts['pass'])) {
$out .= "Authorization: Basic ".base64_encode($url_parts['user'].':'.$url_parts['pass']) . "\r\n";
}
//If the request is post - pass the data in a special way.
if(isset($options['method']) and $options['method'] == 'post') {
if(is_array($url_parts['query'])) {
//multipart form data (eg. file upload)
// Make a random (hopefully unique) identifier for the boundary
srand((double)microtime()*1000000);
$boundary = "---------------------------".substr(md5(rand(0,32000)),0,10);
$postdata = array();
$postdata[] = '--'.$boundary;
foreach ($url_parts['query'] as $name => $data) {
$disposition = 'Content-Disposition: form-data; name="'.$name.'"';
if (isset($data['filename'])) {
$disposition .= '; filename="'.$data['filename'].'"';
}
$postdata[] = $disposition;
if (isset($data['type'])) {
$postdata[] = 'Content-Type: '.$data['type'];
}
if (isset($data['binary']) && $data['binary']) {
$postdata[] = 'Content-Transfer-Encoding: binary';
} else {
$postdata[] = '';
}
if (isset($data['fromfile'])) {
$data['contents'] = file_get_contents($data['fromfile']);
}
if (isset($data['contents'])) {
$postdata[] = $data['contents'];
} else {
$postdata[] = '';
}
$postdata[] = '--'.$boundary;
}
$postdata = implode("\r\n", $postdata)."\r\n";
$length = strlen($postdata);
$postdata = 'Content-Type: multipart/form-data; boundary='.$boundary."\r\n".
'Content-Length: '.$length."\r\n".
"\r\n".
$postdata;
$out .= $postdata;
} else {
$out .= "Content-Type: application/x-www-form-urlencoded\r\n";
$out .= 'Content-Length: ' . strlen($url_parts['query']) . "\r\n";
$out .= "\r\n" . $url_parts['query'];
}
}
$out .= "\r\n";
fwrite($fp, $out);
while (!feof($fp)) {
$response .= fgets($fp, 128);
}
fclose($fp);
}
}
//Get the headers in an associative array
$headers = array();
if($info['http_code'] == 404) {
$body = "";
$headers['Status'] = 404;
} else {
//Seperate header and content
$header_text = substr($response, 0, $info['header_size']);
$body = substr($response, $info['header_size']);
foreach(explode("\n",$header_text) as $line) {
$parts = explode(": ",$line);
if(count($parts) == 2) {
if (isset($headers[$parts[0]])) {
if (is_array($headers[$parts[0]])) $headers[$parts[0]][] = chop($parts[1]);
else $headers[$parts[0]] = array($headers[$parts[0]], chop($parts[1]));
} else {
$headers[$parts[0]] = chop($parts[1]);
}
}
}
}
if(isset($cache_file)) { //Should we cache the URL?
file_put_contents($cache_file, $response);
}
if($options['return_info']) return array('headers' => $headers, 'body' => $body, 'info' => $info, 'curl_handle'=>$ch);
return $body;
}
function breve_descripcion($texto) {
$cTexto=strip_tags($texto);
$cad = (string) "";
$aPalabras = array();
$aPalabras = split(" ",$cTexto);
for ($i = 0; $i <50; $i++) $cad .= $aPalabras[$i].' ';
echo $cad." ...";
}
?>