2012-10-30 06:35:39 -04:00
|
|
|
/* simple identd server for HexChat under Win32 */
|
2011-02-23 22:14:30 -05:00
|
|
|
|
2012-02-01 12:09:27 -05:00
|
|
|
#include "inet.h"
|
2012-10-24 15:33:02 -04:00
|
|
|
#include "hexchat.h"
|
|
|
|
#include "hexchatc.h"
|
2012-07-21 08:26:19 -04:00
|
|
|
#include "text.h"
|
2011-02-23 22:14:30 -05:00
|
|
|
|
|
|
|
static int identd_is_running = FALSE;
|
2012-02-01 12:09:27 -05:00
|
|
|
#ifdef USE_IPV6
|
|
|
|
static int identd_ipv6_is_running = FALSE;
|
|
|
|
#endif
|
2011-02-23 22:14:30 -05:00
|
|
|
|
|
|
|
static int
|
|
|
|
identd (char *username)
|
|
|
|
{
|
|
|
|
int sok, read_sok, len;
|
|
|
|
char *p;
|
|
|
|
char buf[256];
|
|
|
|
char outbuf[256];
|
|
|
|
struct sockaddr_in addr;
|
|
|
|
|
|
|
|
sok = socket (AF_INET, SOCK_STREAM, 0);
|
|
|
|
if (sok == INVALID_SOCKET)
|
|
|
|
{
|
|
|
|
free (username);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
len = 1;
|
|
|
|
setsockopt (sok, SOL_SOCKET, SO_REUSEADDR, (char *) &len, sizeof (len));
|
|
|
|
|
|
|
|
memset (&addr, 0, sizeof (addr));
|
|
|
|
addr.sin_family = AF_INET;
|
|
|
|
addr.sin_port = htons (113);
|
|
|
|
|
|
|
|
if (bind (sok, (struct sockaddr *) &addr, sizeof (addr)) == SOCKET_ERROR)
|
|
|
|
{
|
|
|
|
closesocket (sok);
|
|
|
|
free (username);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (listen (sok, 1) == SOCKET_ERROR)
|
|
|
|
{
|
|
|
|
closesocket (sok);
|
|
|
|
free (username);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
len = sizeof (addr);
|
|
|
|
read_sok = accept (sok, (struct sockaddr *) &addr, &len);
|
|
|
|
closesocket (sok);
|
|
|
|
if (read_sok == INVALID_SOCKET)
|
|
|
|
{
|
|
|
|
free (username);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
identd_is_running = FALSE;
|
|
|
|
|
2012-10-12 22:19:56 -04:00
|
|
|
snprintf (outbuf, sizeof (outbuf), "%%\tServicing ident request from %s with user name \"%s\"\n",
|
|
|
|
inet_ntoa (addr.sin_addr), username);
|
2011-02-23 22:14:30 -05:00
|
|
|
PrintText (current_sess, outbuf);
|
|
|
|
|
|
|
|
recv (read_sok, buf, sizeof (buf) - 1, 0);
|
|
|
|
buf[sizeof (buf) - 1] = 0; /* ensure null termination */
|
|
|
|
|
|
|
|
p = strchr (buf, ',');
|
|
|
|
if (p)
|
|
|
|
{
|
|
|
|
snprintf (outbuf, sizeof (outbuf) - 1, "%d, %d : USERID : UNIX : %s\r\n",
|
|
|
|
atoi (buf), atoi (p + 1), username);
|
|
|
|
outbuf[sizeof (outbuf) - 1] = 0; /* ensure null termination */
|
|
|
|
send (read_sok, outbuf, strlen (outbuf), 0);
|
|
|
|
}
|
|
|
|
|
|
|
|
sleep (1);
|
|
|
|
closesocket (read_sok);
|
|
|
|
free (username);
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2012-02-01 12:09:27 -05:00
|
|
|
#ifdef USE_IPV6
|
|
|
|
static int
|
|
|
|
identd_ipv6 (char *username)
|
|
|
|
{
|
|
|
|
int sok, read_sok, len;
|
|
|
|
char *p;
|
|
|
|
char buf[256];
|
|
|
|
char outbuf[256];
|
|
|
|
char ipv6buf[60];
|
|
|
|
DWORD ipv6buflen = sizeof (ipv6buf);
|
|
|
|
struct sockaddr_in6 addr;
|
|
|
|
|
|
|
|
sok = socket (AF_INET6, SOCK_STREAM, 0);
|
|
|
|
|
|
|
|
if (sok == INVALID_SOCKET)
|
|
|
|
{
|
|
|
|
free (username);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
len = 1;
|
|
|
|
setsockopt (sok, SOL_SOCKET, SO_REUSEADDR, (char *) &len, sizeof (len));
|
|
|
|
|
|
|
|
memset (&addr, 0, sizeof (addr));
|
|
|
|
addr.sin6_family = AF_INET6;
|
|
|
|
addr.sin6_port = htons (113);
|
|
|
|
|
|
|
|
if (bind (sok, (struct sockaddr *) &addr, sizeof (addr)) == SOCKET_ERROR)
|
|
|
|
{
|
|
|
|
closesocket (sok);
|
|
|
|
free (username);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (listen (sok, 1) == SOCKET_ERROR)
|
|
|
|
{
|
|
|
|
closesocket (sok);
|
|
|
|
free (username);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
len = sizeof (addr);
|
|
|
|
read_sok = accept (sok, (struct sockaddr *) &addr, &len);
|
|
|
|
closesocket (sok);
|
|
|
|
|
|
|
|
if (read_sok == INVALID_SOCKET)
|
|
|
|
{
|
|
|
|
free (username);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
identd_ipv6_is_running = FALSE;
|
|
|
|
|
|
|
|
if (WSAAddressToString ((struct sockaddr *) &addr, sizeof (addr), NULL, &ipv6buf, &ipv6buflen) == SOCKET_ERROR)
|
|
|
|
{
|
|
|
|
snprintf (ipv6buf, sizeof (ipv6buf) - 1, "[SOCKET ERROR: 0x%X]", WSAGetLastError ());
|
|
|
|
}
|
|
|
|
|
2012-10-12 22:19:56 -04:00
|
|
|
snprintf (outbuf, sizeof (outbuf), "%%\tServicing ident request from %s with user name \"%s\"\n", ipv6buf, username);
|
2012-02-01 12:09:27 -05:00
|
|
|
PrintText (current_sess, outbuf);
|
|
|
|
|
|
|
|
recv (read_sok, buf, sizeof (buf) - 1, 0);
|
|
|
|
buf[sizeof (buf) - 1] = 0; /* ensure null termination */
|
|
|
|
|
|
|
|
p = strchr (buf, ',');
|
|
|
|
|
|
|
|
if (p)
|
|
|
|
{
|
|
|
|
snprintf (outbuf, sizeof (outbuf) - 1, "%d, %d : USERID : UNIX : %s\r\n", atoi (buf), atoi (p + 1), username);
|
|
|
|
outbuf[sizeof (outbuf) - 1] = 0; /* ensure null termination */
|
|
|
|
send (read_sok, outbuf, strlen (outbuf), 0);
|
|
|
|
}
|
|
|
|
|
|
|
|
sleep (1);
|
|
|
|
closesocket (read_sok);
|
|
|
|
free (username);
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
void
|
2011-02-23 22:14:30 -05:00
|
|
|
identd_start (char *username)
|
|
|
|
{
|
|
|
|
DWORD tid;
|
|
|
|
|
2012-02-01 12:09:27 -05:00
|
|
|
#ifdef USE_IPV6
|
|
|
|
DWORD tidv6;
|
|
|
|
if (identd_ipv6_is_running == FALSE)
|
|
|
|
{
|
|
|
|
identd_ipv6_is_running = TRUE;
|
|
|
|
CloseHandle (CreateThread (NULL, 0, (LPTHREAD_START_ROUTINE) identd_ipv6,
|
|
|
|
strdup (username), 0, &tidv6));
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
2011-02-23 22:14:30 -05:00
|
|
|
if (identd_is_running == FALSE)
|
|
|
|
{
|
|
|
|
identd_is_running = TRUE;
|
|
|
|
CloseHandle (CreateThread (NULL, 0, (LPTHREAD_START_ROUTINE) identd,
|
|
|
|
strdup (username), 0, &tid));
|
|
|
|
}
|
|
|
|
}
|