1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
|
/* $Id: minisoap.c,v 1.16 2008/10/11 16:39:29 nanard Exp $ */
/* Project : miniupnp
* Author : Thomas Bernard
* Copyright (c) 2005 Thomas Bernard
* This software is subject to the conditions detailed in the
* LICENCE file provided in this distribution.
*
* Minimal SOAP implementation for UPnP protocol.
*/
#include <stdio.h>
#include <string.h>
#ifdef WIN32
#include <io.h>
#include <winsock2.h>
#define snprintf _snprintf
#else
#include <unistd.h>
#include <sys/types.h>
#include <sys/socket.h>
#endif
#include "minisoap.h"
#include "miniupnpcstrings.h"
/* only for malloc */
#include <stdlib.h>
#ifdef WIN32
#define PRINT_SOCKET_ERROR(x) printf("Socket error: %s, %d\n", x, WSAGetLastError());
#else
#define PRINT_SOCKET_ERROR(x) perror(x)
#endif
/* httpWrite sends the headers and the body to the socket
* and returns the number of bytes sent */
static int
httpWrite (int fd, const char *body, int bodysize,
const char *headers, int headerssize)
{
int n = 0;
/*n = write(fd, headers, headerssize); */
/*if(bodysize>0)
n += write(fd, body, bodysize); */
/* Note : my old linksys router only took into account
* soap request that are sent into only one packet */
char *p;
/* TODO: AVOID MALLOC */
p = malloc (headerssize + bodysize);
if (!p)
return 0;
memcpy (p, headers, headerssize);
memcpy (p + headerssize, body, bodysize);
/*n = write(fd, p, headerssize+bodysize); */
n = send (fd, p, headerssize + bodysize, 0);
if (n < 0)
{
PRINT_SOCKET_ERROR ("send");
}
/* disable send on the socket */
/* draytek routers dont seems to like that... */
#if 0
#ifdef WIN32
if (shutdown (fd, SD_SEND) < 0)
{
#else
if (shutdown (fd, SHUT_WR) < 0)
{ /*SD_SEND */
#endif
PRINT_SOCKET_ERROR ("shutdown");
}
#endif
free (p);
return n;
}
/* self explanatory */
int
soapPostSubmit (int fd,
const char *url,
const char *host,
unsigned short port, const char *action, const char *body)
{
int bodysize;
char headerbuf[512];
int headerssize;
char portstr[8];
bodysize = (int) strlen (body);
/* We are not using keep-alive HTTP connections.
* HTTP/1.1 needs the header Connection: close to do that.
* This is the default with HTTP/1.0 */
/* Connection: Close is normally there only in HTTP/1.1 but who knows */
portstr[0] = '\0';
if (port != 80)
snprintf (portstr, sizeof (portstr), ":%hu", port);
headerssize = snprintf (headerbuf, sizeof (headerbuf),
"POST %s HTTP/1.1\r\n"
/* "POST %s HTTP/1.0\r\n"*/
"Host: %s%s\r\n" "User-Agent: " OS_STRING ", UPnP/1.0, MiniUPnPc/" MINIUPNPC_VERSION_STRING "\r\n" "Content-Length: %d\r\n" "Content-Type: text/xml\r\n" "SOAPAction: \"%s\"\r\n" "Connection: Close\r\n" "Cache-Control: no-cache\r\n" /* ??? */
"Pragma: no-cache\r\n"
"\r\n", url, host, portstr, bodysize, action);
#ifdef DEBUG
printf ("SOAP request : headersize=%d bodysize=%d\n",
headerssize, bodysize);
/*printf("%s", headerbuf); */
#endif
return httpWrite (fd, body, bodysize, headerbuf, headerssize);
}
|