145 lines
3.1 KiB
C
145 lines
3.1 KiB
C
/*
|
|
* =====================================================================================
|
|
*
|
|
* Filename: geo.c
|
|
*
|
|
* Description: Get the coordinates of an IP using www.hostip.info
|
|
*
|
|
* Version: 0.1
|
|
* Created: 01/12/2010 17:18:21
|
|
* Revision: none
|
|
* Compiler: gcc
|
|
*
|
|
* Author: BlackLight (http://0x00.ath.cx), <blacklight@autistici.org>
|
|
* Licence: GNU GPL v.3
|
|
* Company: DO WHAT YOU WANT CAUSE A PIRATE IS FREE, YOU ARE A PIRATE!
|
|
*
|
|
* =====================================================================================
|
|
*/
|
|
|
|
#include "spp_ai.h"
|
|
|
|
#include <arpa/inet.h>
|
|
#include <netdb.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <sys/socket.h>
|
|
#include <unistd.h>
|
|
|
|
/** \defgroup geoinfo Geographic info management given an IP address using geoinfo.c
|
|
* @{ */
|
|
|
|
/**
|
|
* \brief Get latitude and longitude
|
|
* \param ip IP address
|
|
* \param coord double[2] object (NULL or not) that will contain latitude and longitude
|
|
* \return 1 if the coordinates were found, -1 otherwise
|
|
*/
|
|
|
|
int
|
|
AI_geoinfobyaddr ( const char *ip, double **coord )
|
|
{
|
|
int i, sd, n_read, n_matches;
|
|
char buf[1024] = { 0 },
|
|
hostip[INET_ADDRSTRLEN] = { 0 },
|
|
query[100] = { 0 };
|
|
|
|
char **matches = NULL;
|
|
FILE *fp = NULL;
|
|
struct hostent *host = NULL;
|
|
struct sockaddr_in addr;
|
|
|
|
if ( *coord == NULL )
|
|
{
|
|
if ( !( *coord = (double*) calloc ( 2, sizeof ( double ))))
|
|
{
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
if (( sd = socket ( AF_INET, SOCK_STREAM, IPPROTO_IP )) < 0 )
|
|
{
|
|
return -1;
|
|
}
|
|
|
|
if ( !( host = gethostbyname ( "www.hostip.info" )))
|
|
{
|
|
return -1;
|
|
}
|
|
|
|
inet_ntop ( AF_INET, host->h_addr_list[0], hostip, sizeof ( hostip ));
|
|
memset ( &addr, 0, sizeof ( addr ));
|
|
|
|
addr.sin_family = AF_INET;
|
|
addr.sin_port = htons ( 80 );
|
|
addr.sin_addr.s_addr = inet_addr ( hostip );
|
|
|
|
if ( connect ( sd, (struct sockaddr*) &addr, sizeof ( struct sockaddr )) < 0 )
|
|
{
|
|
return -1;
|
|
}
|
|
|
|
if ( !( fp = fdopen ( sd, "r+" )))
|
|
{
|
|
close ( sd );
|
|
return -1;
|
|
}
|
|
|
|
snprintf ( query, sizeof ( query ), "spip=%s&submit=Go", ip );
|
|
fprintf ( fp,
|
|
"POST /index.html HTTP/1.1\r\n"
|
|
"Host: www.hostip.info\r\n"
|
|
"Content-Length: %lu\r\n"
|
|
"Content-Type: application/x-www-form-urlencoded; charset=utf-8\r\n"
|
|
"Connection: close\r\n\r\n"
|
|
"%s\r\n",
|
|
(unsigned long int) strlen ( query ), query
|
|
);
|
|
|
|
do
|
|
{
|
|
memset ( buf, 0, sizeof ( buf ));
|
|
n_read = fread ( buf, sizeof ( buf ), 1, fp );
|
|
|
|
if ( preg_match ( "new GLatLng.([^,]+), ([^\\)]+)", buf, &matches, &n_matches ) > 0 )
|
|
{
|
|
(*coord)[0] = strtod ( matches[0], NULL );
|
|
(*coord)[1] = strtod ( matches[1], NULL );
|
|
|
|
for ( i=0; i < n_matches; i++ )
|
|
{
|
|
free ( matches[i] );
|
|
}
|
|
|
|
free ( matches );
|
|
matches = NULL;
|
|
|
|
fclose ( fp );
|
|
close ( sd );
|
|
|
|
if ( (*coord)[0] == 0.0 && (*coord)[1] == 0.0 )
|
|
{
|
|
return -1;
|
|
} else {
|
|
return 1;
|
|
}
|
|
}
|
|
|
|
for ( i=0; i < n_matches; i++ )
|
|
{
|
|
free ( matches[i] );
|
|
}
|
|
|
|
free ( matches );
|
|
matches = NULL;
|
|
} while ( n_read > 0 );
|
|
|
|
fclose ( fp );
|
|
close ( sd );
|
|
return -1;
|
|
} /* ----- end of function AI_geoinfobyaddr ----- */
|
|
|
|
/** @} */
|
|
|