author | zautrix <zautrix> | 2004-07-03 16:33:12 (UTC) |
---|---|---|
committer | zautrix <zautrix> | 2004-07-03 16:33:12 (UTC) |
commit | e3b89230f065c48c84b48c88edb6eb088374c487 (patch) (unidiff) | |
tree | 162ea2ef909a6f82ccfcedf45d80d6c821174912 /kmicromail/libetpan/tools/connect.c | |
parent | 2dd6ac0b2d24c91d35ce674a6c26351352df2b15 (diff) | |
download | kdepimpi-e3b89230f065c48c84b48c88edb6eb088374c487.zip kdepimpi-e3b89230f065c48c84b48c88edb6eb088374c487.tar.gz kdepimpi-e3b89230f065c48c84b48c88edb6eb088374c487.tar.bz2 |
Initial revision
Diffstat (limited to 'kmicromail/libetpan/tools/connect.c') (more/less context) (ignore whitespace changes)
-rw-r--r-- | kmicromail/libetpan/tools/connect.c | 86 |
1 files changed, 86 insertions, 0 deletions
diff --git a/kmicromail/libetpan/tools/connect.c b/kmicromail/libetpan/tools/connect.c new file mode 100644 index 0000000..c67c18c --- a/dev/null +++ b/kmicromail/libetpan/tools/connect.c | |||
@@ -0,0 +1,86 @@ | |||
1 | /* | ||
2 | * libEtPan! -- a mail stuff library | ||
3 | * | ||
4 | * Copyright (C) 2001, 2002 - DINH Viet Hoa | ||
5 | * All rights reserved. | ||
6 | * | ||
7 | * Redistribution and use in source and binary forms, with or without | ||
8 | * modification, are permitted provided that the following conditions | ||
9 | * are met: | ||
10 | * 1. Redistributions of source code must retain the above copyright | ||
11 | * notice, this list of conditions and the following disclaimer. | ||
12 | * 2. Redistributions in binary form must reproduce the above copyright | ||
13 | * notice, this list of conditions and the following disclaimer in the | ||
14 | * documentation and/or other materials provided with the distribution. | ||
15 | * 3. Neither the name of the libEtPan! project nor the names of its | ||
16 | * contributors may be used to endorse or promote products derived | ||
17 | * from this software without specific prior written permission. | ||
18 | * | ||
19 | * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND | ||
20 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
21 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||
22 | * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE | ||
23 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | ||
24 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | ||
25 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
26 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | ||
27 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | ||
28 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | ||
29 | * SUCH DAMAGE. | ||
30 | */ | ||
31 | |||
32 | /* | ||
33 | * $Id$ | ||
34 | */ | ||
35 | |||
36 | #include "connect.h" | ||
37 | |||
38 | #include <sys/types.h> | ||
39 | #include <string.h> | ||
40 | #include <netdb.h> | ||
41 | #include <netinet/in.h> | ||
42 | #include <sys/socket.h> | ||
43 | #include <unistd.h> | ||
44 | |||
45 | uint16_t mail_get_service_port(const char * name, char * protocol) | ||
46 | { | ||
47 | struct servent * service; | ||
48 | |||
49 | service = getservbyname(name, protocol); | ||
50 | |||
51 | if (service == NULL) | ||
52 | return 0; | ||
53 | |||
54 | return service->s_port; | ||
55 | } | ||
56 | |||
57 | int mail_tcp_connect(const char * server, uint16_t port) | ||
58 | { | ||
59 | struct hostent * remotehost; | ||
60 | struct sockaddr_in sa; | ||
61 | int s; | ||
62 | int r; | ||
63 | |||
64 | s = socket(PF_INET, SOCK_STREAM, 0); | ||
65 | if (s == -1) | ||
66 | goto err; | ||
67 | |||
68 | remotehost = gethostbyname(server); | ||
69 | if (remotehost == NULL) | ||
70 | goto close_socket; | ||
71 | |||
72 | sa.sin_family = AF_INET; | ||
73 | sa.sin_port = htons(port); | ||
74 | memcpy(&sa.sin_addr, remotehost->h_addr, remotehost->h_length); | ||
75 | |||
76 | r = connect(s, (struct sockaddr *) &sa, sizeof(struct sockaddr_in)); | ||
77 | if (r == -1) | ||
78 | goto close_socket; | ||
79 | |||
80 | return s; | ||
81 | |||
82 | close_socket: | ||
83 | close(s); | ||
84 | err: | ||
85 | return -1; | ||
86 | } | ||