2 Copyright (C) 2010 by Ronnie Sahlberg <ronniesahlberg@gmail.com>
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU Lesser General Public License as published by
6 the Free Software Foundation; either version 2.1 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU Lesser General Public License for more details.
14 You should have received a copy of the GNU Lesser General Public License
15 along with this program; if not, see <http://www.gnu.org/licenses/>.
27 #include <arpa/inet.h>
28 #include <sys/ioctl.h>
29 #include <sys/types.h>
30 #include <sys/socket.h>
33 #include "libnfs-raw.h"
34 #include "libnfs-private.h"
37 static void set_nonblocking(int fd
)
40 v
= fcntl(fd
, F_GETFL
, 0);
41 fcntl(fd
, F_SETFL
, v
| O_NONBLOCK
);
44 int rpc_get_fd(struct rpc_context
*rpc
)
49 int rpc_which_events(struct rpc_context
*rpc
)
51 int events
= rpc
->is_connected
? POLLIN
: POLLOUT
;
53 if (rpc
->is_udp
!= 0) {
54 /* for udp sockets we only wait for pollin */
64 static int rpc_write_to_socket(struct rpc_context
*rpc
)
72 rpc_set_error(rpc
, "trying to write but not connected");
76 while (rpc
->outqueue
!= NULL
) {
79 total
= rpc
->outqueue
->outdata
.size
;
81 count
= write(rpc
->fd
, rpc
->outqueue
->outdata
.data
+ rpc
->outqueue
->written
, total
- rpc
->outqueue
->written
);
83 if (errno
== EAGAIN
|| errno
== EWOULDBLOCK
) {
86 rpc_set_error(rpc
, "Error when writing to socket :%s(%d)", strerror(errno
), errno
);
90 rpc
->outqueue
->written
+= count
;
91 if (rpc
->outqueue
->written
== total
) {
92 struct rpc_pdu
*pdu
= rpc
->outqueue
;
94 SLIST_REMOVE(&rpc
->outqueue
, pdu
);
95 SLIST_ADD_END(&rpc
->waitpdu
, pdu
);
101 static int rpc_read_from_socket(struct rpc_context
*rpc
)
108 if (ioctl(rpc
->fd
, FIONREAD
, &available
) != 0) {
109 rpc_set_error(rpc
, "Ioctl FIONREAD returned error : %d. Closing socket.", errno
);
112 if (available
== 0) {
113 rpc_set_error(rpc
, "Socket has been closed");
119 socklen_t socklen
= sizeof(rpc
->udp_src
);
121 buf
= malloc(available
);
123 rpc_set_error(rpc
, "Failed to malloc buffer for recvfrom");
126 count
= recvfrom(rpc
->fd
, buf
, available
, MSG_DONTWAIT
, (struct sockaddr
*)&rpc
->udp_src
, &socklen
);
128 rpc_set_error(rpc
, "Failed recvfrom: %s", strerror(errno
));
131 if (rpc_process_pdu(rpc
, buf
, count
) != 0) {
132 rpc_set_error(rpc
, "Invalid/garbage pdu received from server. Ignoring PDU");
140 /* read record marker, 4 bytes at the beginning of every pdu */
141 if (rpc
->inbuf
== NULL
) {
143 rpc
->inbuf
= malloc(rpc
->insize
);
144 if (rpc
->inbuf
== NULL
) {
145 rpc_set_error(rpc
, "Failed to allocate buffer for record marker, errno:%d. Closing socket.", errno
);
149 if (rpc
->inpos
< 4) {
150 size
= 4 - rpc
->inpos
;
152 count
= read(rpc
->fd
, rpc
->inbuf
+ rpc
->inpos
, size
);
154 if (errno
== EINTR
) {
157 rpc_set_error(rpc
, "Read from socket failed, errno:%d. Closing socket.", errno
);
164 if (available
== 0) {
168 pdu_size
= rpc_get_pdu_size(rpc
->inbuf
);
169 if (rpc
->insize
< pdu_size
) {
172 buf
= malloc(pdu_size
);
174 rpc_set_error(rpc
, "Failed to allocate buffer of %d bytes for pdu, errno:%d. Closing socket.", pdu_size
, errno
);
177 memcpy(buf
, rpc
->inbuf
, rpc
->insize
);
180 rpc
->insize
= rpc_get_pdu_size(rpc
->inbuf
);
184 if (size
> rpc
->insize
- rpc
->inpos
) {
185 size
= rpc
->insize
- rpc
->inpos
;
188 count
= read(rpc
->fd
, rpc
->inbuf
+ rpc
->inpos
, size
);
190 if (errno
== EINTR
) {
193 rpc_set_error(rpc
, "Read from socket failed, errno:%d. Closing socket.", errno
);
199 if (rpc
->inpos
== rpc
->insize
) {
200 if (rpc_process_pdu(rpc
, rpc
->inbuf
, pdu_size
) != 0) {
201 rpc_set_error(rpc
, "Invalid/garbage pdu received from server. Closing socket");
215 int rpc_service(struct rpc_context
*rpc
, int revents
)
217 if (revents
& POLLERR
) {
219 socklen_t err_size
= sizeof(err
);
221 if (getsockopt(rpc
->fd
, SOL_SOCKET
, SO_ERROR
,
222 &err
, &err_size
) != 0 || err
!= 0) {
226 rpc_set_error(rpc
, "rpc_service: socket error "
230 rpc_set_error(rpc
, "rpc_service: POLLERR, "
231 "Unknown socket error.");
233 rpc
->connect_cb(rpc
, RPC_STATUS_ERROR
, rpc
->error_string
, rpc
->connect_data
);
236 if (revents
& POLLHUP
) {
237 rpc_set_error(rpc
, "Socket failed with POLLHUP");
238 rpc
->connect_cb(rpc
, RPC_STATUS_ERROR
, rpc
->error_string
, rpc
->connect_data
);
242 if (rpc
->is_connected
== 0 && rpc
->fd
!= -1 && revents
&POLLOUT
) {
244 socklen_t err_size
= sizeof(err
);
246 if (getsockopt(rpc
->fd
, SOL_SOCKET
, SO_ERROR
,
247 &err
, &err_size
) != 0 || err
!= 0) {
251 rpc_set_error(rpc
, "rpc_service: socket error "
252 "%s(%d) while connecting.",
254 rpc
->connect_cb(rpc
, RPC_STATUS_ERROR
,
255 NULL
, rpc
->connect_data
);
259 rpc
->is_connected
= 1;
260 rpc
->connect_cb(rpc
, RPC_STATUS_SUCCESS
, NULL
, rpc
->connect_data
);
264 if (revents
& POLLOUT
&& rpc
->outqueue
!= NULL
) {
265 if (rpc_write_to_socket(rpc
) != 0) {
266 rpc_set_error(rpc
, "write to socket failed");
271 if (revents
& POLLIN
) {
272 if (rpc_read_from_socket(rpc
) != 0) {
273 rpc_disconnect(rpc
, rpc_get_error(rpc
));
282 int rpc_connect_async(struct rpc_context
*rpc
, const char *server
, int port
, rpc_cb cb
, void *private_data
)
284 struct sockaddr_storage s
;
285 struct sockaddr_in
*sin
= (struct sockaddr_in
*)&s
;
289 rpc_set_error(rpc
, "Trying to connect while already connected");
293 if (rpc
->is_udp
!= 0) {
294 rpc_set_error(rpc
, "Trying to connect on UDP socket");
298 sin
->sin_family
= AF_INET
;
299 sin
->sin_port
= htons(port
);
300 if (inet_pton(AF_INET
, server
, &sin
->sin_addr
) != 1) {
301 rpc_set_error(rpc
, "Not a valid server ip address");
305 switch (s
.ss_family
) {
307 socksize
= sizeof(struct sockaddr_in
);
308 #ifdef HAVE_SOCK_SIN_LEN
309 sin
->sin_len
= socksize
;
311 rpc
->fd
= socket(AF_INET
, SOCK_STREAM
, 0);
316 rpc_set_error(rpc
, "Failed to open socket");
320 rpc
->connect_cb
= cb
;
321 rpc
->connect_data
= private_data
;
323 set_nonblocking(rpc
->fd
);
325 if (connect(rpc
->fd
, (struct sockaddr
*)&s
, socksize
) != 0 && errno
!= EINPROGRESS
) {
326 rpc_set_error(rpc
, "connect() to server failed");
333 int rpc_disconnect(struct rpc_context
*rpc
, char *error
)
340 rpc
->is_connected
= 0;
342 rpc_error_all_pdus(rpc
, error
);
348 int rpc_bind_udp(struct rpc_context
*rpc
, char *addr
, int port
)
350 struct addrinfo
*ai
= NULL
;
353 if (rpc
->is_udp
== 0) {
354 rpc_set_error(rpc
, "Cant not bind UDP. Not UDP context");
358 snprintf(service
, 6, "%d", port
);
359 if (getaddrinfo(addr
, service
, NULL
, &ai
) != 0) {
360 rpc_set_error(rpc
, "Invalid address:%s. "
361 "Can not resolv into IPv4/v6 structure.");
365 switch(ai
->ai_family
) {
367 rpc
->fd
= socket(ai
->ai_family
, SOCK_DGRAM
, 0);
369 rpc_set_error(rpc
, "Failed to create UDP socket: %s", strerror(errno
));
374 if (bind(rpc
->fd
, (struct sockaddr
*)ai
->ai_addr
, sizeof(struct sockaddr_in
)) != 0) {
375 rpc_set_error(rpc
, "Failed to bind to UDP socket: %s",strerror(errno
));
381 rpc_set_error(rpc
, "Can not handle UPD sockets of family %d yet", ai
->ai_family
);
391 int rpc_set_udp_destination(struct rpc_context
*rpc
, char *addr
, int port
, int is_broadcast
)
393 struct addrinfo
*ai
= NULL
;
396 if (rpc
->is_udp
== 0) {
397 rpc_set_error(rpc
, "Can not set destination sockaddr. Not UDP context");
401 snprintf(service
, 6, "%d", port
);
402 if (getaddrinfo(addr
, service
, NULL
, &ai
) != 0) {
403 rpc_set_error(rpc
, "Invalid address:%s. "
404 "Can not resolv into IPv4/v6 structure.");
410 rpc
->udp_dest
= NULL
;
412 rpc
->udp_dest
= malloc(ai
->ai_addrlen
);
413 if (rpc
->udp_dest
== NULL
) {
414 rpc_set_error(rpc
, "Out of memory. Failed to allocate sockaddr structure");
417 memcpy(rpc
->udp_dest
, ai
->ai_addr
, ai
->ai_addrlen
);
420 rpc
->is_broadcast
= is_broadcast
;
421 setsockopt(rpc
->fd
, SOL_SOCKET
, SO_BROADCAST
, &is_broadcast
, sizeof(is_broadcast
));
426 struct sockaddr
*rpc_get_recv_sockaddr(struct rpc_context
*rpc
)
428 return (struct sockaddr
*)&rpc
->udp_src
;