Fixed gr.udp_source,sink for use on Win32 (Don Ward)
[debian/gnuradio] / gnuradio-core / src / lib / io / gr_udp_sink.cc
1 /* -*- c++ -*- */
2 /*
3  * Copyright 2007,2008 Free Software Foundation, Inc.
4  * 
5  * This file is part of GNU Radio
6  * 
7  * GNU Radio is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 3, or (at your option)
10  * any later version.
11  * 
12  * GNU Radio is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  * 
17  * You should have received a copy of the GNU General Public License
18  * along with GNU Radio; see the file COPYING.  If not, write to
19  * the Free Software Foundation, Inc., 51 Franklin Street,
20  * Boston, MA 02110-1301, USA.
21  */
22
23 #ifdef HAVE_CONFIG_H
24 #include "config.h"
25 #endif
26 #include <gr_udp_sink.h>
27 #include <gr_io_signature.h>
28 #include <stdexcept>
29 #if defined(HAVE_SOCKET)
30 #include <netdb.h>
31 typedef void* optval_t;
32 #else
33 #define SHUT_RDWR 2
34 #define inet_aton(N,A) ( (A)->s_addr = inet_addr(N), ( (A)->s_addr != INADDR_NONE ) )
35 typedef char* optval_t;
36 #endif
37
38 #define SNK_VERBOSE 0
39
40 gr_udp_sink::gr_udp_sink (size_t itemsize, 
41                           const char *src, unsigned short port_src,
42                           const char *dst, unsigned short port_dst,
43                           int payload_size)
44   : gr_sync_block ("udp_sink",
45                    gr_make_io_signature (1, 1, itemsize),
46                    gr_make_io_signature (0, 0, 0)),
47     d_itemsize (itemsize), d_updated(false), d_payload_size(payload_size)
48 {
49   int ret = 0;
50   
51   // Set up the address stucture for the source address and port numbers
52   // Get the source IP address from the host name
53   struct hostent *hsrc = gethostbyname(src);
54   if(hsrc) {   // if the source was provided as a host namex
55     d_ip_src = *(struct in_addr*)hsrc->h_addr_list[0];    
56   }
57   else { // assume it was specified as an IP address
58     if((ret=inet_aton(src, &d_ip_src)) == 0) {            // format IP address
59       perror("Not a valid source IP address or host name");
60       throw std::runtime_error("can't initialize source socket");
61     }
62   }
63
64   // Get the destination IP address from the host name
65   struct hostent *hdst = gethostbyname(dst);
66   if(hdst) {   // if the source was provided as a host namex
67     d_ip_dst = *(struct in_addr*)hdst->h_addr_list[0];    
68   }
69   else { // assume it was specified as an IP address
70     if((ret=inet_aton(dst, &d_ip_dst)) == 0) {            // format IP address
71       perror("Not a valid destination IP address or host name");
72       throw std::runtime_error("can't initialize destination socket");
73     }
74   }
75
76   d_port_src = htons(port_src);           // format port number
77   d_port_dst = htons(port_dst);           // format port number
78
79   d_sockaddr_src.sin_family = AF_INET;
80   d_sockaddr_src.sin_addr   = d_ip_src;
81   d_sockaddr_src.sin_port   = d_port_src;
82
83   d_sockaddr_dst.sin_family = AF_INET;
84   d_sockaddr_dst.sin_addr   = d_ip_dst;
85   d_sockaddr_dst.sin_port   = d_port_dst;
86   
87   open();
88 }
89
90 // public constructor that returns a shared_ptr
91
92 gr_udp_sink_sptr
93 gr_make_udp_sink (size_t itemsize, 
94                   const char *src, unsigned short port_src,
95                   const char *dst, unsigned short port_dst,
96                   int payload_size)
97 {
98   return gr_udp_sink_sptr (new gr_udp_sink (itemsize, 
99                                             src, port_src,
100                                             dst, port_dst,
101                                             payload_size));
102 }
103
104 gr_udp_sink::~gr_udp_sink ()
105 {
106   close();
107 }
108
109 bool
110 gr_udp_sink::open()
111 {
112   omni_mutex_lock l(d_mutex);   // hold mutex for duration of this function
113
114   // create socket
115   if((d_socket = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP)) == -1) {
116     perror("socket open");
117     throw std::runtime_error("can't open socket");
118   }
119
120   // Turn on reuse address
121   int opt_val = true;
122   if(setsockopt(d_socket, SOL_SOCKET, SO_REUSEADDR, (optval_t)&opt_val, sizeof(int)) == -1) {
123     perror("SO_REUSEADDR");
124     throw std::runtime_error("can't set socket option SO_REUSEADDR");
125   }
126
127   // Don't wait when shutting down
128   linger lngr;
129   lngr.l_onoff  = 1;
130   lngr.l_linger = 0;
131   if(setsockopt(d_socket, SOL_SOCKET, SO_LINGER, (optval_t)&lngr, sizeof(linger)) == -1) {
132     perror("SO_LINGER");
133     throw std::runtime_error("can't set socket option SO_LINGER");
134   }
135
136   // bind socket to an address and port number to listen on
137   if(bind (d_socket, (sockaddr*)&d_sockaddr_src, sizeof(struct sockaddr)) == -1) {
138     perror("socket bind");
139     throw std::runtime_error("can't bind socket");
140   }
141
142   // Not sure if we should throw here or allow retries
143   if(connect(d_socket, (sockaddr*)&d_sockaddr_dst, sizeof(struct sockaddr)) == -1) {
144     perror("socket connect");
145     throw std::runtime_error("can't connect to socket");
146   }
147
148   d_updated = true;
149   return d_socket != 0;
150 }
151
152 void
153 gr_udp_sink::close()
154 {
155   omni_mutex_lock l(d_mutex);   // hold mutex for duration of this function
156
157   if (d_socket){
158     shutdown(d_socket, SHUT_RDWR);
159     d_socket = 0;
160   }
161   d_updated = true;
162 }
163
164 int 
165 gr_udp_sink::work (int noutput_items,
166                    gr_vector_const_void_star &input_items,
167                    gr_vector_void_star &output_items)
168 {
169   const char *in = (const char *) input_items[0];
170   ssize_t r=0, bytes_sent=0, bytes_to_send=0;
171   ssize_t total_size = noutput_items*d_itemsize;
172
173   #if SNK_VERBOSE
174   printf("Entered upd_sink\n");
175   #endif
176
177   while(bytes_sent <  total_size) {
178     bytes_to_send = std::min((ssize_t)d_payload_size, (total_size-bytes_sent));
179   
180     r = send(d_socket, (in+bytes_sent), bytes_to_send, 0);
181     if(r == -1) {         // error on send command
182       perror("udp_sink"); // there should be no error case where this function 
183       return -1;          // should not exit immediately
184     }
185     bytes_sent += r;
186     
187     #if SNK_VERBOSE
188     printf("\tbyte sent: %d bytes\n", bytes);
189     #endif
190   }
191
192   #if SNK_VERBOSE
193   printf("Sent: %d bytes (noutput_items: %d)\n", bytes_sent, noutput_items);
194   #endif
195
196   return noutput_items;
197 }