luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity
gambas-source-code/gb.net.curl/src/gbcurl.c
Daniel Campos ca4f1c508b [GB.NET.CURL] 
* Updated code to be compatible with both 32bits and 64bits architectures
* Updated author e-mail and copyright notice



git-svn-id: svn://localhost/gambas/trunk@1066 867c0c6c-44f3-4631-809d-bfa615b0a4ec
2008-02-14 11:25:00 +00:00

342 lines
7.2 KiB
C
Raw Blame History

/***************************************************************************
gbcurl.c
Advanced Network component
(c) 2003-2008 Daniel Campos Fernández <dcamposf@gmail.com>
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 1, or (at your option)
any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
***************************************************************************/
/*****************************
NOTE THAT :
libcurl <= 7.10.7 lacks CURLE_LDAP_INVALID_URL and CURLE_FILESIZE_EXCEEDED constants
libcurl <= 7.10.6 lacks proxy authentication support
libcurl <= 7.10.5 lacks user authentication support
*****************************/
#include <stdio.h>
#include <string.h>
#include <curl/curl.h>
#include "gbcurl.h"
#ifndef CURLAUTH_NONE
void Adv_WarningAuth(void)
{
printf("WARNING : This component was compiled without authentication support\n");
printf(" use libcurl version 7.10.7 or later\n");
}
#define CURLAUTH_NONE 0
#define LACKS_AUTH
#warning #######################################################################
#warning COMPILING WITHOUT AUTHENTICATION SUPPORT - YOU MUST USE LIBCURL>=7.10.6
#warning #######################################################################
#endif
void Adv_WarningProxyAuth(void)
{
printf("WARNING : This component was compiled without proxy authentication support\n");
printf(" use libcurl version 7.10.8 or later\n");
}
void Adv_correct_url(char **buf,char *protocol)
{
char *buftmp;
int len;
int myloop,myloop2;
int pos=-1;
int myok=1;
len=strlen(*buf);
for (myloop=0;myloop<len;myloop++)
{
if ( (*buf)[myloop]==':' )
{
if (myloop==(len-1))
{
pos=myloop;
break;
}
else
{
if ( (*buf)[myloop+1]=='/' )
{
pos=myloop;
break;
}
else
{
for (myloop2=myloop+1;myloop2<len;myloop2++)
{
if ( (*buf)[myloop2]=='/' ) break;
if ( ((*buf)[myloop2]<0x30) || ((*buf)[myloop2]>0x39) )
{
myok=0;
break;
}
}
if (!myok) pos=myloop;
break;
}
}
}
}
myok=0;
if (pos==-1)
{
GB.Alloc((void**)&buftmp,len+1);
strcpy(buftmp,*buf);
GB.Free((void**)buf);
GB.Alloc((void**)buf,len+strlen(protocol)+1);
}
else
{
GB.Alloc((void**)&buftmp,(len-pos)+1);
strcpy(buftmp,*buf+pos+1);
GB.Free((void**)buf);
GB.Alloc((void**)buf,strlen(buftmp)+strlen(protocol)+1);
}
strcpy(*buf,protocol);
if (strlen(buftmp)>=2)
{
if ( buftmp[0]=='/') myok++;
if ( buftmp[1]=='/') myok++;
}
strcat(*buf,buftmp+myok);
GB.Free((void**)&buftmp);
}
int Adv_Comp(char *str1,char *user, char *pwd)
{
char *str2=NULL;
int len=2;
if (user || pwd)
{
if (user) len+=strlen(user);
if (pwd) len+=strlen(pwd);
GB.Alloc ((void**)&str2,len);
str2[0]=0;
if (user) strcat (str2,user);
strcat(str2,":");
if (pwd) strcat (str2,pwd);
}
if ( (!str1) && (!str2) ) return 0;
if (!str1)
{
if ( strlen(str2) )
{
GB.Free((void**)&str2);
return 1;
}
GB.Free((void**)&str2);
return 0;
}
if (!str2)
{
if ( strlen(str1) ) return 1;
return 0;
}
if ( strcmp (str1,str2) )
{
GB.Free((void**)&str2);
return 1;
}
GB.Free((void**)&str2);
return 0;
}
/************************************************************************
PROXY
************************************************************************/
void Adv_proxy_NEW(Adv_proxy *proxy)
{
proxy->type=CURLPROXY_HTTP;
proxy->auth=CURLAUTH_NONE;
proxy->user=NULL;
proxy->pwd=NULL;
proxy->host=NULL;
proxy->userpwd=NULL;
}
void Adv_proxy_CLEAR(Adv_proxy *proxy)
{
if (proxy->host) GB.FreeString(&proxy->host);
if (proxy->user) GB.FreeString(&proxy->user);
if (proxy->pwd) GB.FreeString(&proxy->pwd);
if (proxy->userpwd) GB.Free((void**)&proxy->userpwd);
proxy->user=NULL;
proxy->host=NULL;
proxy->pwd=NULL;
proxy->userpwd=NULL;
}
void Adv_proxy_SET(Adv_proxy *proxy,CURL *curl)
{
int len=2;
if ( proxy->user ) len+=strlen(proxy->user);
if ( proxy->pwd ) len+=strlen(proxy->pwd);
if ( proxy->userpwd ) GB.Free ((void**)&proxy->userpwd);
GB.Alloc ((void**)&proxy->userpwd,sizeof(char)*len);
proxy->userpwd[0]=0;
if ( proxy->user ) strcat(proxy->userpwd,proxy->user);
strcat(proxy->userpwd,":");
if ( proxy->pwd ) strcat(proxy->userpwd,proxy->pwd);
if ( !proxy->host )
{
curl_easy_setopt(curl,CURLOPT_PROXY,NULL);
if ( LIBCURL_VERSION_NUM >= 0x070a08 )
curl_easy_setopt(curl,111,CURLAUTH_NONE);
return;
}
curl_easy_setopt(curl,CURLOPT_PROXYTYPE,proxy->type);
curl_easy_setopt(curl,CURLOPT_PROXY,proxy->host);
if ( LIBCURL_VERSION_NUM >= 0x070a08 )
{
curl_easy_setopt(curl,CURLOPT_PROXYUSERPWD,proxy->userpwd);
curl_easy_setopt(curl,111,proxy->auth);
}
else
Adv_WarningProxyAuth();
}
int Adv_proxy_SETAUTH(Adv_proxy *proxy,int auth)
{
#ifdef LACKS_AUTH
return 0;
#else
if ( LIBCURL_VERSION_NUM < 0x070a08 )
{
if (auth!=0) Adv_WarningProxyAuth();
return 0;
}
switch (auth)
{
case CURLAUTH_NONE:
case CURLAUTH_BASIC:
case CURLAUTH_NTLM: proxy->auth=auth; return 0;
default: return -1;
}
#endif
}
int Adv_proxy_SETTYPE(Adv_proxy *proxy,int type)
{
switch (type)
{
case CURLPROXY_HTTP:
case CURLPROXY_SOCKS5: proxy->type=type; return 0;
default: return -1;
}
}
/************************************************************************
USERS
************************************************************************/
void Adv_user_NEW(Adv_user *user)
{
user->auth=CURLAUTH_NONE;
user->user=NULL;
user->pwd=NULL;
user->userpwd=NULL;
}
void Adv_user_CLEAR(Adv_user *user)
{
if (user->user) GB.FreeString(&user->user);
if (user->pwd) GB.FreeString(&user->pwd);
if (user->userpwd) GB.Free((void**)&user->userpwd);
user->user=NULL;
user->pwd=NULL;
}
void Adv_user_SET(Adv_user *user,CURL *curl)
{
#ifdef LACKS_AUTH
return;
#else
int len=2;
if (user->auth==CURLAUTH_NONE)
{
curl_easy_setopt(curl,CURLOPT_USERPWD,NULL);
curl_easy_setopt(curl,CURLOPT_HTTPAUTH,CURLAUTH_NONE);
return;
}
if (user->user) len += strlen(user->user);
if (user->auth) len += strlen(user->pwd);
if (user->userpwd) GB.Free((void**)&user->userpwd);
GB.Alloc ((void**)&user->userpwd,len);
user->userpwd[0]=0;
if (user->user) strcat (user->userpwd,user->user);
strcat (user->userpwd,":");
if (user->pwd) strcat (user->userpwd,user->pwd);
curl_easy_setopt(curl,CURLOPT_USERPWD,user->userpwd);
curl_easy_setopt(curl,CURLOPT_HTTPAUTH,user->auth);
#endif
}
int Adv_user_SETAUTH(Adv_user *user,int auth)
{
#ifdef LACKS_AUTH
if (auth!=0) Adv_WarningAuth();
return 0;
#else
switch (auth)
{
case CURLAUTH_NONE:
case CURLAUTH_BASIC:
case CURLAUTH_NTLM:
case CURLAUTH_GSSNEGOTIATE:
case CURLAUTH_DIGEST: user->auth=auth; return 0;
default: return -1;
}
#endif
}
Reference in a new issue View git blame Copy permalink