gaim/gaim

I am going ahead with this silc patch. There is a potential for bug
oldstatus
2005-04-14, Luke Schierer
45bde2d10c89
I am going ahead with this silc patch. There is a potential for bug
reports from it IF 1)someone uses gaim silc 2)that person uses two
networks 3)(a) that person uses the same sn on 2 networks or (b)changes the
key of one account

all told, Ethan, Stu, Robot101, and I think the odds of all 3 happening
will be acceptably low, and right now it is badly broken for multiple
accounts anyway.
/*
* gaim
*
* File: libc_interface.c
* Date: October 14, 2002
* Description: libc interface for Windows api
*
* Copyright (C) 2002-2003, Herman Bloggs <hermanator12002@yahoo.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 2 of the License, 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
*/
#include <winsock2.h>
#include <ws2tcpip.h>
#include <io.h>
#include <stdlib.h>
#include <stdio.h>
#include <errno.h>
#include <sys/timeb.h>
#include <sys/stat.h>
#include <time.h>
#include <glib.h>
#include "debug.h"
#include "libc_internal.h"
#if GLIB_CHECK_VERSION(2,6,0)
# include <glib/gstdio.h>
#else
#define g_remove remove
#define g_rename rename
#define g_stat stat
#endif
/*
* PROTOS
*/
/*
* LOCALS
*/
static char errbuf[1024];
/*
* CODE
*/
/* helpers */
static int wgaim_is_socket( int fd ) {
int optval;
unsigned int optlen = sizeof(int);
if( (getsockopt(fd, SOL_SOCKET, SO_TYPE, (void*)&optval, &optlen)) == SOCKET_ERROR ) {
int error = WSAGetLastError();
if( error == WSAENOTSOCK )
return FALSE;
else {
gaim_debug(GAIM_DEBUG_WARNING, "wgaim", "wgaim_is_socket: getsockopt returned error: %d\n", error);
return FALSE;
}
}
return TRUE;
}
/* socket.h */
int wgaim_socket (int namespace, int style, int protocol) {
int ret;
ret = socket( namespace, style, protocol );
if( ret == INVALID_SOCKET ) {
errno = WSAGetLastError();
return -1;
}
return ret;
}
int wgaim_connect(int socket, struct sockaddr *addr, u_long length) {
int ret;
ret = connect( socket, addr, length );
if( ret == SOCKET_ERROR ) {
errno = WSAGetLastError();
if( errno == WSAEWOULDBLOCK )
errno = WSAEINPROGRESS;
return -1;
}
return 0;
}
int wgaim_getsockopt(int socket, int level, int optname, void *optval, socklen_t *optlenptr) {
if(getsockopt(socket, level, optname, optval, optlenptr) == SOCKET_ERROR ) {
errno = WSAGetLastError();
return -1;
}
return 0;
}
int wgaim_setsockopt(int socket, int level, int optname, const void *optval, socklen_t optlen) {
if(setsockopt(socket, level, optname, optval, optlen) == SOCKET_ERROR ) {
errno = WSAGetLastError();
return -1;
}
return 0;
}
int wgaim_getsockname(int socket, struct sockaddr *addr, socklen_t *lenptr) {
if(getsockname(socket, addr, lenptr) == SOCKET_ERROR) {
errno = WSAGetLastError();
return -1;
}
return 0;
}
int wgaim_bind(int socket, struct sockaddr *addr, socklen_t length) {
if(bind(socket, addr, length) == SOCKET_ERROR) {
errno = WSAGetLastError();
return -1;
}
return 0;
}
int wgaim_listen(int socket, unsigned int n) {
if(listen(socket, n) == SOCKET_ERROR) {
errno = WSAGetLastError();
return -1;
}
return 0;
}
/* fcntl.h */
/* This is not a full implementation of fcntl. Update as needed.. */
int wgaim_fcntl(int socket, int command, int val) {
switch( command ) {
case F_SETFL:
{
int ret=0;
switch( val ) {
case O_NONBLOCK:
{
u_long imode=1;
ret = ioctlsocket(socket, FIONBIO, &imode);
break;
}
case 0:
{
u_long imode=0;
ret = ioctlsocket(socket, FIONBIO, &imode);
break;
}
default:
errno = EINVAL;
return -1;
}/*end switch*/
if( ret == SOCKET_ERROR ) {
errno = WSAGetLastError();
return -1;
}
return 0;
}
default:
gaim_debug(GAIM_DEBUG_WARNING, "wgaim", "wgaim_fcntl: Unsupported command\n");
return -1;
}/*end switch*/
}
/* sys/ioctl.h */
int wgaim_ioctl(int fd, int command, void* val) {
switch( command ) {
case FIONBIO:
{
if (ioctlsocket(fd, FIONBIO, (unsigned long *)val) == SOCKET_ERROR) {
errno = WSAGetLastError();
return -1;
}
return 0;
}
default:
errno = EINVAL;
return -1;
}/*end switch*/
}
/* arpa/inet.h */
int wgaim_inet_aton(const char *name, struct in_addr *addr) {
if((addr->s_addr = inet_addr(name)) == INADDR_NONE)
return 0;
else
return 1;
}
/* netdb.h */
struct hostent* wgaim_gethostbyname(const char *name) {
struct hostent *hp;
if((hp = gethostbyname(name)) == NULL) {
errno = WSAGetLastError();
return NULL;
}
return hp;
}
/* string.h */
char* wgaim_strerror( int errornum ) {
if( errornum > WSABASEERR ) {
sprintf( errbuf, "Windows socket error #%d", errornum );
return errbuf;
}
else
return strerror( errornum );
}
/* unistd.h */
/*
* We need to figure out whether fd is a file or socket handle.
*/
int wgaim_read(int fd, void *buf, unsigned int size) {
int ret;
if( wgaim_is_socket(fd) ) {
if( (ret = recv(fd, buf, size, 0)) == SOCKET_ERROR ) {
errno = WSAGetLastError();
return -1;
}
else if( ret == 0 ) {
/* connection has been gracefully closed */
errno = WSAENOTCONN;
return -1;
}
else {
/* success reading socket */
return ret;
}
}
else {
/* fd is not a socket handle.. pass it off to read */
return read(fd, buf, size);
}
}
int wgaim_write(int fd, const void *buf, unsigned int size) {
int ret;
if( wgaim_is_socket(fd) ) {
if( (ret = send(fd, buf, size, 0)) == SOCKET_ERROR ) {
errno = WSAGetLastError();
return -1;
}
else {
/* success */
return ret;
}
}
else
return write(fd, buf, size);
}
int wgaim_close(int fd) {
int ret;
if( wgaim_is_socket(fd) ) {
if( (ret = closesocket(fd)) == SOCKET_ERROR ) {
errno = WSAGetLastError();
return -1;
}
else
return 0;
}
else
return close(fd);
}
int wgaim_gethostname(char *name, size_t size) {
if(gethostname(name, size) == SOCKET_ERROR) {
errno = WSAGetLastError();
return -1;
}
return 0;
}
/* sys/time.h */
int wgaim_gettimeofday(struct timeval *p, struct timezone *z) {
int res = 0;
struct _timeb timebuffer;
if (z != 0) {
_tzset();
z->tz_minuteswest = _timezone/60;
z->tz_dsttime = _daylight;
}
if (p != 0) {
_ftime(&timebuffer);
p->tv_sec = timebuffer.time; /* seconds since 1-1-1970 */
p->tv_usec = timebuffer.millitm*1000; /* microseconds */
}
return res;
}
/* stdio.h */
int wgaim_rename (const char *oldname, const char *newname) {
struct stat oldstat, newstat;
if(g_stat(oldname, &oldstat) == 0) {
/* newname exists */
if(g_stat(newname, &newstat) == 0) {
/* oldname is a dir */
if(_S_ISDIR(oldstat.st_mode)) {
if(!_S_ISDIR(newstat.st_mode)) {
return g_rename(oldname, newname);
}
/* newname is a dir */
else {
/* This is not quite right.. If newname is empty and
is not a sub dir of oldname, newname should be
deleted and oldname should be renamed.
*/
gaim_debug(GAIM_DEBUG_WARNING, "wgaim", "wgaim_rename does not behave here as it should\n");
return g_rename(oldname, newname);
}
}
/* oldname is not a dir */
else {
/* newname is a dir */
if(_S_ISDIR(newstat.st_mode)) {
errno = EISDIR;
return -1;
}
/* newname is not a dir */
else {
g_remove(newname);
return g_rename(oldname, newname);
}
}
}
/* newname doesn't exist */
else
return g_rename(oldname, newname);
}
else {
/* oldname doesn't exist */
errno = ENOENT;
return -1;
}
}
/* time.h */
struct tm * wgaim_localtime_r (const time_t *time, struct tm *resultp) {
struct tm* tmptm;
if(!time)
return NULL;
tmptm = localtime(time);
if(resultp && tmptm)
return memcpy(resultp, tmptm, sizeof(struct tm));
else
return NULL;
}