1 /* crypto/bio/bss_sock.c */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3 * All rights reserved.
4 *
5 * This package is an SSL implementation written
6 * by Eric Young (eay@cryptsoft.com).
7 * The implementation was written so as to conform with Netscapes SSL.
8 *
9 * This library is free for commercial and non-commercial use as long as
10 * the following conditions are aheared to. The following conditions
11 * apply to all code found in this distribution, be it the RC4, RSA,
12 * lhash, DES, etc., code; not just the SSL code. The SSL documentation
13 * included with this distribution is covered by the same copyright terms
14 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15 *
16 * Copyright remains Eric Young's, and as such any Copyright notices in
17 * the code are not to be removed.
18 * If this package is used in a product, Eric Young should be given attribution
19 * as the author of the parts of the library used.
20 * This can be in the form of a textual message at program startup or
21 * in documentation (online or textual) provided with the package.
22 *
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
25 * are met:
26 * 1. Redistributions of source code must retain the copyright
27 * notice, this list of conditions and the following disclaimer.
28 * 2. Redistributions in binary form must reproduce the above copyright
29 * notice, this list of conditions and the following disclaimer in the
30 * documentation and/or other materials provided with the distribution.
31 * 3. All advertising materials mentioning features or use of this software
32 * must display the following acknowledgement:
33 * "This product includes cryptographic software written by
34 * Eric Young (eay@cryptsoft.com)"
35 * The word 'cryptographic' can be left out if the rouines from the library
36 * being used are not cryptographic related :-).
37 * 4. If you include any Windows specific code (or a derivative thereof) from
38 * the apps directory (application code) you must include an acknowledgement:
39 * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40 *
41 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
51 * SUCH DAMAGE.
52 *
53 * The licence and distribution terms for any publically available version or
54 * derivative of this code cannot be changed. i.e. this code cannot simply be
55 * copied and put under another distribution licence
56 * [including the GNU Public Licence.] */
57
58 #include <openssl/bio.h>
59
60 #if !defined(OPENSSL_TRUSTY)
61
62 #include <fcntl.h>
63 #include <string.h>
64
65 #if !defined(OPENSSL_WINDOWS)
66 #include <unistd.h>
67 #else
68 OPENSSL_MSVC_PRAGMA(warning(push, 3))
69 #include <winsock2.h>
OPENSSL_MSVC_PRAGMA(warning (pop))70 OPENSSL_MSVC_PRAGMA(warning(pop))
71
72 OPENSSL_MSVC_PRAGMA(comment(lib, "Ws2_32.lib"))
73 #endif
74
75 #include "internal.h"
76
77
78 #if !defined(OPENSSL_WINDOWS)
79 static int closesocket(int sock) {
80 return close(sock);
81 }
82 #endif
83
sock_free(BIO * bio)84 static int sock_free(BIO *bio) {
85 if (bio->shutdown) {
86 if (bio->init) {
87 closesocket(bio->num);
88 }
89 bio->init = 0;
90 bio->flags = 0;
91 }
92 return 1;
93 }
94
sock_read(BIO * b,char * out,int outl)95 static int sock_read(BIO *b, char *out, int outl) {
96 if (out == NULL) {
97 return 0;
98 }
99
100 bio_clear_socket_error();
101 #if defined(OPENSSL_WINDOWS)
102 int ret = recv(b->num, out, outl, 0);
103 #else
104 int ret = read(b->num, out, outl);
105 #endif
106 BIO_clear_retry_flags(b);
107 if (ret <= 0) {
108 if (bio_fd_should_retry(ret)) {
109 BIO_set_retry_read(b);
110 }
111 }
112 return ret;
113 }
114
sock_write(BIO * b,const char * in,int inl)115 static int sock_write(BIO *b, const char *in, int inl) {
116 int ret;
117
118 bio_clear_socket_error();
119 #if defined(OPENSSL_WINDOWS)
120 ret = send(b->num, in, inl, 0);
121 #else
122 ret = write(b->num, in, inl);
123 #endif
124 BIO_clear_retry_flags(b);
125 if (ret <= 0) {
126 if (bio_fd_should_retry(ret)) {
127 BIO_set_retry_write(b);
128 }
129 }
130 return ret;
131 }
132
sock_ctrl(BIO * b,int cmd,long num,void * ptr)133 static long sock_ctrl(BIO *b, int cmd, long num, void *ptr) {
134 long ret = 1;
135 int *ip;
136
137 switch (cmd) {
138 case BIO_C_SET_FD:
139 sock_free(b);
140 b->num = *((int *)ptr);
141 b->shutdown = (int)num;
142 b->init = 1;
143 break;
144 case BIO_C_GET_FD:
145 if (b->init) {
146 ip = (int *)ptr;
147 if (ip != NULL) {
148 *ip = b->num;
149 }
150 ret = b->num;
151 } else {
152 ret = -1;
153 }
154 break;
155 case BIO_CTRL_GET_CLOSE:
156 ret = b->shutdown;
157 break;
158 case BIO_CTRL_SET_CLOSE:
159 b->shutdown = (int)num;
160 break;
161 case BIO_CTRL_FLUSH:
162 ret = 1;
163 break;
164 default:
165 ret = 0;
166 break;
167 }
168 return ret;
169 }
170
171 static const BIO_METHOD methods_sockp = {
172 BIO_TYPE_SOCKET, "socket",
173 sock_write, sock_read,
174 NULL /* puts */, NULL /* gets, */,
175 sock_ctrl, NULL /* create */,
176 sock_free, NULL /* callback_ctrl */,
177 };
178
BIO_s_socket(void)179 const BIO_METHOD *BIO_s_socket(void) { return &methods_sockp; }
180
BIO_new_socket(int fd,int close_flag)181 BIO *BIO_new_socket(int fd, int close_flag) {
182 BIO *ret;
183
184 ret = BIO_new(BIO_s_socket());
185 if (ret == NULL) {
186 return NULL;
187 }
188 BIO_set_fd(ret, fd, close_flag);
189 return ret;
190 }
191
192 #endif // OPENSSL_TRUSTY
193