2 Copyright 2020 Chris Tallon
4 This file is part of VOMP.
6 VOMP is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 VOMP is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with VOMP. If not, see <https://www.gnu.org/licenses/>.
23 #include <arpa/inet.h>
25 #define SOCKET_ERROR 0
30 #include <sys/timeb.h>
33 #include <sys/types.h>
46 if (initted) shutdown();
49 int UDP6::init(USHORT tPort)
51 if (initted) return 0;
53 addrlen = sizeof(struct sockaddr_in6);
55 if ((socketnum = socket(AF_INET6, SOCK_DGRAM, 0)) == -1)
56 { perror("socket"); return 0; }
58 // FIXME - implement server side
62 memset(&myAddr, 0, sizeof(myAddr));
63 myAddr.sin6_family = AF_INET6; // host byte order
64 myAddr.sin6_port = htons(myPort); // short, network byte order
66 // myAddr.sin_addr.s_addr = getIPNumber(iterate_ip++); // auto-fill with my IP
68 inet_pton(AF_INET6, "", &myAddr.sin6_addr);
71 if (bind(socketnum, reinterpret_cast<struct sockaddr *>(&myAddr), addrlen) == -1)
72 { perror("bind"); return 0; }
78 FD_SET(socketnum, &readfds);
90 CLOSESOCKET(socketnum);
95 unsigned char UDP6::waitforMessage(unsigned char how, SOCKET quitPipe)
97 unsigned char UDP6::waitforMessage(unsigned char how, int quitPipe)
100 if (!initted) return 0;
103 how = 1 - start new wait
104 how = 2 - continue wait
105 how = 3 - block, return on byte from quitPipe
109 FD_SET(socketnum, &readfds);
111 struct timeval* passToSelect = NULL;
113 int sockMaxP1 = socketnum + 1;
123 if ((tv.tv_sec == 0) && (tv.tv_usec == 0)) // protection in case timer = 0
132 FD_SET(quitPipe, &readfds);
133 if (quitPipe > socketnum) sockMaxP1 = quitPipe + 1;
137 if (select(sockMaxP1, &readfds, NULL, NULL, passToSelect) <= 0)
140 if ((how == 3) && FD_ISSET(quitPipe, &readfds)) return 3;
142 if ((mlength = recvfrom(socketnum, buf, MAXBUFLEN, 0,
143 reinterpret_cast<struct sockaddr *>(&theirAddr), &addrlen)) == -1)
144 { perror("recvfrom"); return 0; }
147 memset(&buf[mlength], 0, MAXBUFLEN - mlength);
148 inet_ntop(AF_INET6, &theirAddr.sin6_addr, fromIPA, 40);
149 fromPort = ntohs(theirAddr.sin6_port);
154 Return 1, nothing happened, timer expired
155 Return 2, packet arrived (timer not expired)
159 UINT UDP6::getDataLength(void) const
161 return static_cast<UINT>(mlength);
164 const void* UDP6::getData() const { return buf; }
165 const char* UDP6::getFromIPA() const { return fromIPA; }
166 short UDP6::getFromPort() const { return fromPort; }
168 bool UDP6::send(const char *ipa, USHORT port, char *message, int length, bool mcast)
170 if (!initted) return false;
174 struct sockaddr_in6 sendAddr;
175 memset(&sendAddr, 0, sizeof(struct sockaddr_in6));
176 sendAddr.sin6_family = AF_INET6;
177 inet_pton(AF_INET6, ipa, &sendAddr.sin6_addr);
178 sendAddr.sin6_port = htons(port);
182 struct if_nameindex* ifs = if_nameindex();
185 for(int i = 0; ifs[i].if_index > 0; i++)
187 ifIndex = ifs[i].if_index;
188 int res = setsockopt(socketnum, IPPROTO_IPV6, IPV6_MULTICAST_IF, &ifIndex, sizeof(ifIndex));
189 Log::getInstance()->log("UDP6", Log::DEBUG, "Transmitting IPv6 MC UDP on %s", ifs[i].if_name);
190 res = sendto(socketnum, message, length, 0, reinterpret_cast<struct sockaddr *>(&sendAddr), addrlen);
191 Log::getInstance()->log("UDP6", Log::DEBUG, "Result: %i. Errno: %i", res, errno);
195 if_freenameindex(ifs);
199 sentLength = sendto(socketnum, message, length, 0, reinterpret_cast<struct sockaddr *>(&sendAddr), addrlen);
200 if (sentLength == length) return true;
201 Log::getInstance()->log("UDP6", Log::ERR, "sendto failed, errno = %i", errno);
208 ULONG UDP6::getIPNumber(ULONG)
213 ULONG UDP6::getIPNumber(ULONG num)
218 if (gethostname(buffer,sizeof(buffer))==SOCKET_ERROR)
220 return INADDR_ANY; //well take any address, if we fail
223 struct hostent *hosts=gethostbyname(buffer);
226 return INADDR_ANY; //well take any address, if we fail
230 for (num_ip=0;hosts->h_addr_list[num_ip]!=NULL;num_ip++);
232 int get_ip=(num%num_ip);//Just wrap around, if no interface are present any more
233 memcpy(&returnaddress, hosts->h_addr_list[get_ip], sizeof(ULONG));
234 return returnaddress;