2 Copyright 2006 Matthias Haas <vomp@pompase.net>
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, write to the Free Software
18 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
20 Based on the work by R. Edwards (bob@cs.anu.edu.au) for the wakeonlan stuff
21 Based ont the work of Fred N. van Kempen, <waltje@uwalt.nl.mugnet.org> for the arp stuff
29 #include <net/ethernet.h>
30 #include <sys/socket.h>
31 #include <netinet/in.h>
43 #define _PATH_PROCNET_ARP "/proc/net/arp"
45 Wol* Wol::instance = NULL;
53 logger = Log::getInstance();
63 Wol* Wol::getInstance()
68 void Wol::setEnabled(bool tEnabled)
70 wolEnabled = tEnabled;
73 /* Display the contents of the ARP cache in the kernel. */
74 int Wol::find_ether(char *name)
81 /* Open the PROCps kernel table. */
82 if ((fp = fopen(_PATH_PROCNET_ARP, "r")) == NULL)
84 perror(_PATH_PROCNET_ARP);
87 /* Bypass header -- read until newline */
88 if (fgets(line, sizeof(line), fp) != (char *) NULL)
90 /* Read the ARP cache entries. */
91 for (; fgets(line, sizeof(line), fp);) {
92 num = sscanf(line, "%s 0x%*x 0x%*x %100s %*100s %*100s\n",
96 /* if the user specified address differs, skip it */
97 if (name[0] && !strcmp(ip, name))
99 logger->log("Wol", Log::NOTICE, "Found etheraddr %s", ether_addr);
108 int Wol::find_ether(char *name)
110 sockaddr_in sock_address;
111 int sockname_len=sizeof(sock_address);
112 WSAStringToAddress(name,AF_INET,NULL,(sockaddr*)&sock_address,&sockname_len);
114 DWORD ip=sock_address.sin_addr.s_addr;;
116 PMIB_IPNETTABLE table;
118 GetIpNetTable(NULL,&size,TRUE);
119 table=(PMIB_IPNETTABLE)new char[size];
120 if (table==NULL) return -1;
121 if (GetIpNetTable(table,&size,TRUE)!=NOERROR)
123 logger->log("Wol", Log::NOTICE, "Error getting IPtable");
127 for (int x=0;x<table->dwNumEntries;x++)
129 if (table->table[x].dwAddr==ip) {
130 char *ethp=ether_addr;
131 for (int i=0;i<table->table[x].dwPhysAddrLen;i++) {
132 ethp+=sprintf(ethp,"%X:",table->table[x].bPhysAddr[i]);
135 logger->log("Wol", Log::NOTICE, "Found etheraddr %s", ether_addr);
148 /* Input an Ethernet address and convert to binary. */
149 int Wol::convertToBinary(char *bufp, unsigned char *addr)
153 unsigned char *ptr = addr;
158 while ((*bufp != '\0') && (i < ETH_ALEN))
164 else if (c >= 'a' && c <= 'f')
166 else if (c >= 'A' && c <= 'F')
171 fprintf(stderr, "in_ether(%s): invalid ether address!\n", orig);
180 else if (c >= 'a' && c <= 'f')
182 else if (c >= 'A' && c <= 'F')
184 else if (c == ':' || c == 0)
189 fprintf(stderr, "in_ether(%s): invalid ether address!\n", orig);
196 *ptr++ = (unsigned char) (val & 0377);
199 /* We might get a semicolon here - not required. */
214 if (!wolEnabled) return -2;
215 if (!bEtherKnown) return -3;
219 struct sockaddr_in sap;
220 unsigned char ethaddr[8];
222 unsigned char buf [128];
225 /* Fetch the hardware address. */
226 if (convertToBinary (ether_addr, ethaddr) < 0)
231 /* setup the packet socket */
232 if ((packet = socket (PF_INET, SOCK_DGRAM, 0)) < 0)
237 /* Set socket options */
239 if (setsockopt (packet, SOL_SOCKET, SO_BROADCAST, (caddr_t) &optval,
240 sizeof (optval)) < 0)
242 if (setsockopt (packet, SOL_SOCKET, SO_BROADCAST, (char*)&optval,
243 sizeof (optval)) < 0)
246 fprintf (stderr, "setsocket failed %s\n",
252 /* Set up broadcast address */
253 sap.sin_family = AF_INET;
254 sap.sin_addr.s_addr = htonl(0xffffffff); /* broadcast address
256 sap.sin_port = htons(60000);
258 /* Build the message to send - 6 x 0xff then 16 x MAC address */
260 for (i = 0; i < 6; i++)
262 for (j = 0; j < 16; j++)
263 for (i = 0; i < ETH_ALEN; i++)
264 *ptr++ = ethaddr [i];
266 /* Send the packet out */
267 if (sendto (packet,(char*) buf, 102, 0, (struct sockaddr *)&sap, sizeof (sap)) < 0)
269 fprintf (stderr, " sendto failed, %s\n",
275 logger->log("Wol", Log::NOTICE, "Send wakeonlan to server");
281 void Wol::setWakeUpIP(char* ip_addr)
283 if(find_ether(ip_addr))
286 logger->log("Wol", Log::NOTICE, "Server IP set");