[Aporte] cURL y safe_mode = 'On' para API's (Twitter y Bit.ly)

[Triby]

Integrando las API's de Twitter y Bit.ly (Obtener enlaces cortos) en un servidor dedicado no tuve mayor problema, pero, en ambientes compartidos, donde normalmente PHP corre en modo seguro (safe_mode = 'On') se genera una advertencia:

CURLOPT_FOLLOWLOCATION cannot be activated when in safe_mode or an open_basedir is set

Basandome en las funciones encontradas en: http://www.edmondscommerce.co.uk/cur...-or-safe-mode/ hice lo siguiente para obtener las variables que ambas clases (Twitter y Bitly) requieren: $response, $headers, $errorNumber, $errorMessage.

Código PHP:

function sm_curl($options){
    // Hay que seguir redireccionamientos?
    $follow = (isset($options[CURLOPT_FOLLOWLOCATION])) ? $options[CURLOPT_FOLLOWLOCATION] : false;
 
    // Instanciamos cURL
    $go = curl_init();
    $response = array();
    if(ini_get('open_basedir') != '' || ini_get('safe_mode' == 'On') && $follow) {
        // Aqui entramos solo si hay que seguir redireccionamientos y
        // open_basedir o safe_mode estan activos
 
        // Eliminamos la opcion CURL para seguir redireccionamientos
        unset($options[CURLOPT_FOLLOWLOCATION]);
 
        // Establecemos las opciones
        curl_setopt_array($go, $options);
 
        // Ejecutamos y seguimos redireccionamientos
        $response = curl_redir_exec($go);
    } else {
        curl_setopt_array($go, $options);
        // Ejecutar
        $response['response'] = curl_exec($go);
        $response['headers'] = curl_getinfo($go);
 
        // Obtener errores
        $response['errorNumber'] = curl_errno($go);
        $response['errorMessage'] = curl_error($go);
    }
    curl_close($go);
    return $response;
}
 
// Seguir redireccionamientos con open_basedir o safe_mode = On
function curl_redir_exec($ch) {
    static $curl_loops = 0;
    static $curl_max_loops = 20;
    if ($curl_loops++>= $curl_max_loops) {
        $curl_loops = 0;
        return array('response' => '', 'headers' => '', 'errorNumber' => '47', 'errorMessage' => 'Too many redirects');
    }
    curl_setopt($ch, CURLOPT_HEADER, true);
    curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
    $data = curl_exec($ch);
    $data = str_replace("\n\r", "\n", $data);
    list($header, $data) = explode("\n\n", $data);
    $headers = curl_getinfo($ch);
    $http_code = $headers['http_code'];
    if ($http_code == 301 || $http_code == 302) {
        $matches = array();
        preg_match('/Location:(.*?)\n/', $header, $matches);
        $url = @parse_url(trim(array_pop($matches)));
        if (!$url) {
            //couldn't process the url to redirect to
            $curl_loops = 0;
            return array('response' => '', 'headers' => '', 'errorNumber' => 3, 'errorMessage' => 'The URL was not properly formatted (redirect).');
        }
        $last_url = parse_url(curl_getinfo($ch, CURLINFO_EFFECTIVE_URL));
        if (!$url['scheme'])
            $url['scheme'] = $last_url['scheme'];
        if (!$url['host'])
            $url['host'] = $last_url['host'];
        if (!$url['path'])
            $url['path'] = $last_url['path'];
        $new_url = $url['scheme'] . '://' . $url['host'] . $url['path'] . ($url['query']?'?'.$url['query']:'');
        curl_setopt($ch, CURLOPT_URL, $new_url);
        return curl_redir_exec($ch);
    } else {
        $curl_loops=0;
        return array(
            'response' => $data,
            'headers' => $headers,
            'errorNumber' => curl_errno($ch),
            'errorMessage' => curl_error($ch),
        );
    }
}
 

$options es una matriz donde se incluyen todas las opciones cURL a ejecutar, por ejemplo, en la funcion doCall() de la clase Bitly es:

Código PHP:

// set options
        $options[CURLOPT_URL] = $url;
        $options[CURLOPT_PORT] = self::API_PORT;
        $options[CURLOPT_USERAGENT] = $this->getUserAgent();
        $options[CURLOPT_FOLLOWLOCATION] = true;
        $options[CURLOPT_RETURNTRANSFER] = true;
        $options[CURLOPT_TIMEOUT] = (int) $this->getTimeOut();
 

La ejecucion original es:

Código PHP:

// init
        $curl = curl_init();
 
        // set options
        curl_setopt_array($curl, $options);
 
        // execute
        $response = curl_exec($curl);
        $headers = curl_getinfo($curl);
 
        // fetch errors
        $errorNumber = curl_errno($curl);
        $errorMessage = curl_error($curl);
 
        // close
        curl_close($curl);
 

Y hay que reemplazarla por:

Código PHP:

$data = sm_curl($options);
        extract($data);
 

Tengo un archivo common.php donde guardo las rutinas de uso mas frecuente o que son requeridas por dos o mas scripts en mis sitios, aqui coloque las funciones sm_curl() y curl_redir_exec().

Tanto para Twitter, como para Bit.ly, uso las clases creadas por Tijs Verkoyen que pueden descargar en: http://classes.verkoyen.eu/

[Triby]

Como usar esta funcion y las clases de Twitter y Bit.ly?

Ejemplo:

Código PHP:

// Ruta para buscar archivos a incluir
$incdir = '/ruta/de/tu/sitio';
// Matriz con opciones de configuracion, yo la cargo desde BDD
$aconfig = array(
    'twuser' => 'usuariotwitter',
    'twpass' => 'contraseña_twitter',
    'btlyuser' => 'usuariobitly',
    'btlypass' => 'apiKey' // Es mejor usar api Key que la contraseña de usuario
);
 
function twitter_update($status, $url = '') {
    global $incdir, $aconfig;
 
    // Creamos las variables necesarias y verificamos que todo este correcto
    $twuser = (isset($aconfig['twuser'])) ? $aconfig['twuser'] : '';
    $twpass = (isset($aconfig['twpass'])) ? $aconfig['twpass'] : '';
    $btlyuser = (isset($aconfig['btlyuser'])) ? $aconfig['btlyuser'] : '';
    $btlypass = (isset($aconfig['btlypass'])) ? $aconfig['btlypass'] : '';
 
    if($status == '')
        return 'Por favor teclea el texto de tu nuevo estado en Twitter.';
 
    if($twuser == '' || $twpass == '')
        return 'Las opciones de Twitter no están configuradas';
 
    if($url != '') {
        // Aqui entramos solo si es necesario recortar un enlace
        if($btlyuser == '' || $btlypass == '')
            return 'Las opciones de Bit.ly no están configuradas.';
 
        // Usamos include_once por si el proceso se ejecuta mas de una vez
        include_once "$incdir/classes/bitly.php";
 
        // Establecemos opciones, y ejecutamos
        $btly = new Bitly($btlyuser, $btlypass);
        $btly->setUserAgent('Bit.ly-php');
        $btres = $btly->shorten($url);
 
        // Verificamos si se recorto correctamente el enlace
        if(isset($btres['url']) && $btres['url'] != '')
            $url = ' ' . $btres['url'];
        else
            return 'No se pudo recortar la dirección de la página a enlazar.';
        
    }
 
    // Limpiamos un poco el texto a publicar en Twitter
    $ents = array("'", '"', '<', '>', '\\');
    $status = trim(str_replace($ents, '', $status));
    $status = utf8_encode($status);
 
    // Si se incluyo un enlace, hay que garantizar que aparezca completo
    if($url != '') {
        $max = 140 - strlen($url);
        if(strlen($status) > $max)
            $status = substr($status, 0, $max);
        $status .= $url;
    }
    include_once "$incdir/classes/twitter.php";
 
    // Establecemos opciones y ejecutamos
    $tw = new Twitter($twuser, $twpass);
    $tw->setUserAgent('Twitter-php');
    $twres = $tw->updateStatus($status);
 
    // Verificamos si se publico el nuevo estado
    if(!isset($twres['id']) || !is_numeric($twres['id']) || $twres['id'] < 0)
        return 'Error desconocido: no se pudo actualizar el estado en Twitter';
    return '';
}
 
 
$tw_resultado = twitter_update('Probando a actualizar el estado de Twitter desde PHP', 'http://www.forosdelweb.com/f18/aporte-curl-safe_mode-para-apis-twitter-bit-ly-808160/');
 
if($tw_resultado != '')
    die("'Error actualizando estado en Twitter: $tw_resultado");
 

[abimaelrc]

No había visto este tema (¿dónde habré estado? ), agregado a mis favoritos

Edito:
Ya agregué el enlace de este aporte en el que hice

[Triby]

Se agradece.