void SendInvite(struct fetion_account_data *sip,const gchar *who)
{
gchar *body,*hdr,*fullto;
const gchar *my_ip;
gint my_port;
struct fetion_buddy * buddy = NULL;
if(strncmp("sip:", who, 4)==0)
fullto = g_strdup_printf("T: %s\r\n", who);
else
return;
buddy = g_hash_table_lookup(sip->buddies,who);
g_return_if_fail(buddy!=NULL);
my_ip = purple_network_get_my_ip(sip->fd);
my_port = purple_network_get_port_from_fd(sip->fd);
purple_debug_info("fetion:","SendInvite:[%s:%d]\n",my_ip,my_port);
hdr = g_strdup_printf("K: text/html-fragment\r\n"
"K: multiparty\r\n"
"K: nudge\r\n");
body = g_strdup_printf("v=0\r\n"
"o=-0 0 IN %s:%d\r\n"
"s=session\r\n"
"c=IN IP4 %s:%d\r\n"
"t=0 0\r\n"
"m=message %d sip %s\r\n",
my_ip,my_port,my_ip,my_port,my_port,sip->uri);
purple_debug_info("fetion:","SendInvite:[%s]\n",body);
send_sip_request(sip->gc,"I","",fullto,hdr,body,buddy->dialog,(TransCallback) SendInvite_cb);
g_free(fullto);
g_free(hdr);
g_free(body);
}
void process_incoming_invite(struct fetion_account_data *sip,struct sipmsg *msg)
{
const gchar * to,*callid;
gchar * body;
const gchar *my_ip;
gint my_port;
struct group_chat *g_chat;
struct fetion_buddy * buddy =NULL;
my_ip = purple_network_get_my_ip(sip->fd);
my_port = purple_network_get_port_from_fd(sip->fd);
purple_debug_info("fetion:","Invite:[%s:%d]\n",my_ip,my_port);
body = g_strdup_printf("v=0\r\n"
"o=-0 0 IN %s:%d\r\n"
"s=session\r\n"
"c=IN IP4 %s:%d\r\n"
"t=0 0\r\n"
"m=message %d sip %s\r\n",
my_ip,my_port,my_ip,my_port,my_port,sip->uri);
purple_debug_info("fetion:","Invite:answer[%s]\n",body);
send_sip_response(sip->gc,msg,200,"OK",body);
callid = sipmsg_find_header(msg,"I");
to = sipmsg_find_header(msg,"F");
if(strncmp(to,"sip:TG",6)!=0)
{
buddy = g_hash_table_lookup(sip->buddies,to);
if(buddy==NULL)
{
buddy = g_new0(struct fetion_buddy, 1);
buddy->name = g_strdup(to);
g_hash_table_insert(sip->buddies, buddy->name, buddy);
}
static void
hbn_listen_cb(int fd, gpointer data) {
StunHBNListenData *ld = (StunHBNListenData *)data;
GInetAddress *address = NULL;
GSocketAddress *socket_address = NULL;
struct stun_conn *sc;
static struct stun_header hdr_data;
if(fd < 0) {
nattype.status = PURPLE_STUN_STATUS_UNKNOWN;
nattype.lookup_time = time(NULL);
do_callbacks();
return;
}
sc = g_new0(struct stun_conn, 1);
sc->fd = fd;
sc->addr.sin_family = AF_INET;
sc->addr.sin_port = htons(purple_network_get_port_from_fd(fd));
sc->addr.sin_addr.s_addr = INADDR_ANY;
sc->incb = purple_input_add(fd, PURPLE_INPUT_READ, reply_cb, sc);
address = G_INET_ADDRESS(ld->addresses->data);
socket_address = g_inet_socket_address_new(address, ld->port);
g_socket_address_to_native(socket_address, &(sc->addr), g_socket_address_get_native_size(socket_address), NULL);
g_object_unref(G_OBJECT(address));
g_object_unref(G_OBJECT(socket_address));
g_resolver_free_addresses(ld->addresses);
g_free(ld);
hdr_data.type = htons(MSGTYPE_BINDINGREQUEST);
hdr_data.len = 0;
hdr_data.transid[0] = rand();
hdr_data.transid[1] = ntohl(((int)'g' << 24) + ((int)'a' << 16) + ((int)'i' << 8) + (int)'m');
hdr_data.transid[2] = rand();
hdr_data.transid[3] = rand();
if(sendto(sc->fd, &hdr_data, sizeof(struct stun_header), 0,
(struct sockaddr *)&(sc->addr),
sizeof(struct sockaddr_in)) < (gssize)sizeof(struct stun_header)) {
nattype.status = PURPLE_STUN_STATUS_UNKNOWN;
nattype.lookup_time = time(NULL);
do_callbacks();
close_stun_conn(sc);
return;
}
sc->test = 1;
sc->packet = &hdr_data;
sc->packetsize = sizeof(struct stun_header);
sc->timeout = purple_timeout_add(500, (GSourceFunc) timeoutfunc, sc);
}
static void
irc_dccsend_network_listen_cb(int sock, gpointer data)
{
PurpleXfer *xfer = data;
struct irc_xfer_send_data *xd;
PurpleConnection *gc;
struct irc_conn *irc;
const char *arg[2];
char *tmp;
struct in_addr addr;
unsigned short int port;
xd = purple_xfer_get_protocol_data(xfer);
xd->listen_data = NULL;
if (purple_xfer_get_status(xfer) == PURPLE_XFER_STATUS_CANCEL_LOCAL
|| purple_xfer_get_status(xfer) == PURPLE_XFER_STATUS_CANCEL_REMOTE) {
g_object_unref(xfer);
return;
}
xd = purple_xfer_get_protocol_data(xfer);
gc = purple_account_get_connection(purple_xfer_get_account(xfer));
irc = purple_connection_get_protocol_data(gc);
g_object_unref(xfer);
if (sock < 0) {
purple_notify_error(gc, NULL, _("File Transfer Failed"),
_("Unable to open a listening port."),
purple_request_cpar_from_connection(gc));
purple_xfer_cancel_local(xfer);
return;
}
xd->fd = sock;
port = purple_network_get_port_from_fd(sock);
purple_debug_misc("irc", "port is %hu\n", port);
/* Monitor the listening socket */
purple_xfer_set_watcher(xfer, purple_input_add(sock, PURPLE_INPUT_READ,
irc_dccsend_send_connected, xfer));
/* Send the intended recipient the DCC request */
arg[0] = purple_xfer_get_remote_user(xfer);
inet_aton(purple_network_get_my_ip(irc->fd), &addr);
arg[1] = tmp = g_strdup_printf("\001DCC SEND \"%s\" %u %hu %" G_GOFFSET_FORMAT "\001",
purple_xfer_get_filename(xfer), ntohl(addr.s_addr),
port, purple_xfer_get_size(xfer));
irc_cmd_privmsg(purple_connection_get_protocol_data(gc), "msg", NULL, arg);
g_free(tmp);
}
static void hbn_listen_cb(int fd, gpointer data) {
GSList *hosts = data;
struct stun_conn *sc;
static struct stun_header hdr_data;
if(fd < 0) {
nattype.status = PURPLE_STUN_STATUS_UNKNOWN;
nattype.lookup_time = time(NULL);
do_callbacks();
return;
}
sc = g_new0(struct stun_conn, 1);
sc->fd = fd;
sc->addr.sin_family = AF_INET;
sc->addr.sin_port = htons(purple_network_get_port_from_fd(fd));
sc->addr.sin_addr.s_addr = INADDR_ANY;
sc->incb = purple_input_add(fd, PURPLE_INPUT_READ, reply_cb, sc);
hosts = g_slist_delete_link(hosts, hosts);
memcpy(&(sc->addr), hosts->data, sizeof(struct sockaddr_in));
g_free(hosts->data);
hosts = g_slist_delete_link(hosts, hosts);
while (hosts) {
hosts = g_slist_delete_link(hosts, hosts);
g_free(hosts->data);
hosts = g_slist_delete_link(hosts, hosts);
}
hdr_data.type = htons(MSGTYPE_BINDINGREQUEST);
hdr_data.len = 0;
hdr_data.transid[0] = rand();
hdr_data.transid[1] = ntohl(((int)'g' << 24) + ((int)'a' << 16) + ((int)'i' << 8) + (int)'m');
hdr_data.transid[2] = rand();
hdr_data.transid[3] = rand();
if(sendto(sc->fd, &hdr_data, sizeof(struct stun_header), 0,
(struct sockaddr *)&(sc->addr),
sizeof(struct sockaddr_in)) < (gssize)sizeof(struct stun_header)) {
nattype.status = PURPLE_STUN_STATUS_UNKNOWN;
nattype.lookup_time = time(NULL);
do_callbacks();
close_stun_conn(sc);
return;
}
sc->test = 1;
sc->packet = &hdr_data;
sc->packetsize = sizeof(struct stun_header);
sc->timeout = purple_timeout_add(500, (GSourceFunc) timeoutfunc, sc);
}
static void
bonjour_bytestreams_listen(int sock, gpointer data)
{
PurpleXfer *xfer = data;
XepXfer *xf;
XepIq *iq;
xmlnode *query, *streamhost;
gchar *port;
GSList *local_ips;
BonjourData *bd;
purple_debug_info("bonjour", "Bonjour-bytestreams-listen. sock=%d.\n", sock);
if (sock < 0 || xfer == NULL) {
/*purple_xfer_cancel_local(xfer);*/
return;
}
xfer->watcher = purple_input_add(sock, PURPLE_INPUT_READ,
bonjour_sock5_request_cb, xfer);
xf = (XepXfer*)xfer->data;
xf->listen_data = NULL;
bd = xf->data;
iq = xep_iq_new(bd, XEP_IQ_SET, xfer->who, bonjour_get_jid(bd->jabber_data->account), xf->sid);
query = xmlnode_new_child(iq->node, "query");
xmlnode_set_namespace(query, "http://jabber.org/protocol/bytestreams");
xmlnode_set_attrib(query, "sid", xf->sid);
xmlnode_set_attrib(query, "mode", "tcp");
xfer->local_port = purple_network_get_port_from_fd(sock);
local_ips = bonjour_jabber_get_local_ips(sock);
port = g_strdup_printf("%hu", (guint16)purple_xfer_get_local_port(xfer));
while(local_ips) {
streamhost = xmlnode_new_child(query, "streamhost");
xmlnode_set_attrib(streamhost, "jid", xf->sid);
xmlnode_set_attrib(streamhost, "host", local_ips->data);
xmlnode_set_attrib(streamhost, "port", port);
g_free(local_ips->data);
local_ips = g_slist_delete_link(local_ips, local_ips);
}
g_free(port);
xep_iq_send_and_free(iq);
}
static void gfire_p2p_natcheck_query(gfire_p2p_natcheck *p_nat, int p_server, int p_stage)
{
static unsigned char packet[18] = { 'S', 'C', '0', '1',
0x04, 0x5a, 0xcb, 0x00,
0x01, 0x00, 0x00, 0x00,
0x00, 0x00, 0x00, 0x00,
0x00, 0x00 };
p_stage = GINT32_TO_LE(p_stage);
memcpy(packet + 12, &p_stage, 4);
guint16 port = g_htons(purple_network_get_port_from_fd(p_nat->socket));
memcpy(packet + 16, &port, 2);
purple_debug_misc("gfire", "P2P: NAT Check: Sending IP request to server %d...\n", p_server + 1);
sendto(p_nat->socket, packet, 18, 0, (struct sockaddr*)&p_nat->nat_servers[p_server], sizeof(struct sockaddr_in));
}
void
msn_dc_listen_socket_created_cb(int listenfd, gpointer data)
{
MsnDirectConn *dc = data;
if (purple_debug_is_verbose())
purple_debug_info("msn", "msn_dc_listen_socket_created_cb %p\n", dc);
g_return_if_fail(dc != NULL);
dc->listen_data = NULL;
if (listenfd != -1) {
const char *ext_ip;
const char *int_ip;
int port;
ext_ip = purple_network_get_my_ip(listenfd);
int_ip = purple_network_get_local_system_ip(listenfd);
port = purple_network_get_port_from_fd(listenfd);
dc->listenfd = listenfd;
dc->listenfd_handle = purple_input_add(
listenfd,
PURPLE_INPUT_READ,
msn_dc_incoming_connection_cb,
dc
);
dc->connect_timeout_handle = purple_timeout_add_seconds(
DC_INCOMING_TIMEOUT,
msn_dc_incoming_connection_timeout_cb,
dc
);
if (strcmp(int_ip, ext_ip) != 0) {
dc->msg_body = g_strdup_printf(
"Bridge: TCPv1\r\n"
"Listening: true\r\n"
"%sNonce: {%s}\r\n"
"IPv4External-Addrs: %s\r\n"
"IPv4External-Port: %d\r\n"
"IPv4Internal-Addrs: %s\r\n"
"IPv4Internal-Port: %d\r\n"
"\r\n",
dc->nonce_type != DC_NONCE_PLAIN ? "Hashed-" : "",
dc->nonce_hash,
ext_ip,
port,
int_ip,
port
);
} else {
dc->msg_body = g_strdup_printf(
"Bridge: TCPv1\r\n"
"Listening: true\r\n"
"%sNonce: {%s}\r\n"
"IPv4External-Addrs: %s\r\n"
"IPv4External-Port: %d\r\n"
"\r\n",
dc->nonce_type != DC_NONCE_PLAIN ? "Hashed-" : "",
dc->nonce_hash,
ext_ip,
port
);
}
if (dc->slpcall->wait_for_socket) {
if (dc->send_connection_info_msg_cb != NULL)
dc->send_connection_info_msg_cb(dc);
dc->slpcall->wait_for_socket = FALSE;
}
}
}
/**
* We've just opened a listener socket, so we send the remote
* user an ICBM and ask them to connect to us.
*/
static void
peer_connection_establish_listener_cb(int listenerfd, gpointer data)
{
PeerConnection *conn;
OscarData *od;
PurpleConnection *gc;
PurpleAccount *account;
PurpleConversation *conv;
char *tmp;
FlapConnection *bos_conn;
const char *listener_ip;
const guchar *ip_atoi;
unsigned short listener_port;
conn = data;
conn->listen_data = NULL;
if (listenerfd < 0)
{
/* Could not open listener socket */
peer_connection_trynext(conn);
return;
}
od = conn->od;
gc = od->gc;
account = purple_connection_get_account(gc);
conn->listenerfd = listenerfd;
/* Watch for new connections on our listener socket */
conn->watcher_incoming = purple_input_add(conn->listenerfd,
PURPLE_INPUT_READ, peer_connection_listen_cb, conn);
/* Send the "please connect to me!" ICBM */
bos_conn = flap_connection_findbygroup(od, SNAC_FAMILY_ICBM);
if (bos_conn == NULL)
{
/* Not good */
peer_connection_trynext(conn);
return;
}
if (bos_conn->gsc)
listener_ip = purple_network_get_my_ip(bos_conn->gsc->fd);
else
listener_ip = purple_network_get_my_ip(bos_conn->fd);
ip_atoi = purple_network_ip_atoi(listener_ip);
if (ip_atoi == NULL) {
/* Could not convert IP to 4 byte array--weird, but this does
happen for some users (#4829, Adium #15839). Maybe they're
connecting with IPv6...? Maybe through a proxy? */
purple_debug_error("oscar", "Can't ask peer to connect to us "
"because purple_network_ip_atoi(%s) returned NULL. "
"fd=%d. is_ssl=%d\n",
listener_ip ? listener_ip : "(null)",
bos_conn->gsc ? bos_conn->gsc->fd : bos_conn->fd,
bos_conn->gsc ? 1 : 0);
peer_connection_trynext(conn);
return;
}
listener_port = purple_network_get_port_from_fd(conn->listenerfd);
if (conn->type == OSCAR_CAPABILITY_DIRECTIM)
{
aim_im_sendch2_odc_requestdirect(od,
conn->cookie, conn->bn, ip_atoi,
listener_port, ++conn->lastrequestnumber);
/* Print a message to a local conversation window */
conv = purple_conversation_new(PURPLE_CONV_TYPE_IM, account, conn->bn);
tmp = g_strdup_printf(_("Asking %s to connect to us at %s:%hu for "
"Direct IM."), conn->bn, listener_ip, listener_port);
purple_conversation_write(conv, NULL, tmp, PURPLE_MESSAGE_SYSTEM, time(NULL));
g_free(tmp);
}
else if (conn->type == OSCAR_CAPABILITY_SENDFILE)
{
aim_im_sendch2_sendfile_requestdirect(od,
conn->cookie, conn->bn,
ip_atoi,
listener_port, ++conn->lastrequestnumber,
(const gchar *)conn->xferdata.name,
conn->xferdata.size, conn->xferdata.totfiles);
}
}
/**
* We've just opened a listener socket, so we send the remote
* user an ICBM and ask them to connect to us.
*/
static void
peer_connection_establish_listener_cb(int listenerfd, gpointer data)
{
PeerConnection *conn;
OscarData *od;
PurpleConnection *gc;
PurpleAccount *account;
PurpleConversation *conv;
char *tmp;
FlapConnection *bos_conn;
const char *listener_ip;
unsigned short listener_port;
conn = data;
conn->listen_data = NULL;
if (listenerfd < 0)
{
/* Could not open listener socket */
peer_connection_trynext(conn);
return;
}
od = conn->od;
gc = od->gc;
account = purple_connection_get_account(gc);
conn->listenerfd = listenerfd;
/* Watch for new connections on our listener socket */
conn->watcher_incoming = purple_input_add(conn->listenerfd,
PURPLE_INPUT_READ, peer_connection_listen_cb, conn);
/* Send the "please connect to me!" ICBM */
bos_conn = flap_connection_findbygroup(od, SNAC_FAMILY_ICBM);
if (bos_conn == NULL)
{
/* Not good */
peer_connection_trynext(conn);
return;
}
if (bos_conn->gsc)
listener_ip = purple_network_get_my_ip(bos_conn->gsc->fd);
else
listener_ip = purple_network_get_my_ip(bos_conn->fd);
listener_port = purple_network_get_port_from_fd(conn->listenerfd);
if (conn->type == OSCAR_CAPABILITY_DIRECTIM)
{
aim_im_sendch2_odc_requestdirect(od,
conn->cookie, conn->sn, purple_network_ip_atoi(listener_ip),
listener_port, ++conn->lastrequestnumber);
/* Print a message to a local conversation window */
conv = purple_conversation_new(PURPLE_CONV_TYPE_IM, account, conn->sn);
tmp = g_strdup_printf(_("Asking %s to connect to us at %s:%hu for "
"Direct IM."), conn->sn, listener_ip, listener_port);
purple_conversation_write(conv, NULL, tmp, PURPLE_MESSAGE_SYSTEM, time(NULL));
g_free(tmp);
}
else if (conn->type == OSCAR_CAPABILITY_SENDFILE)
{
aim_im_sendch2_sendfile_requestdirect(od,
conn->cookie, conn->sn,
purple_network_ip_atoi(listener_ip),
listener_port, ++conn->lastrequestnumber,
(const gchar *)conn->xferdata.name,
conn->xferdata.size, conn->xferdata.totfiles);
}
}
