/[packages]/cauldron/net-tools/current/SOURCES/ether-wake.c
ViewVC logotype

Contents of /cauldron/net-tools/current/SOURCES/ether-wake.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 318 - (show annotations) (download)
Fri Jan 7 23:30:25 2011 UTC (13 years, 2 months ago) by tmb
File MIME type: text/plain
File size: 11107 byte(s)
imported package net-tools
1 /* ether-wake.c: Send a magic packet to wake up sleeping machines. */
2
3 static char version_msg[] =
4 "ether-wake.c: v1.09 11/12/2003 Donald Becker, http://www.scyld.com/";
5 static char brief_usage_msg[] =
6 "usage: ether-wake [-i <ifname>] [-p aa:bb:cc:dd[:ee:ff]] 00:11:22:33:44:55\n"
7 " Use '-u' to see the complete set of options.\n";
8 static char usage_msg[] =
9 "usage: ether-wake [-i <ifname>] [-p aa:bb:cc:dd[:ee:ff]] 00:11:22:33:44:55\n"
10 "\n"
11 " This program generates and transmits a Wake-On-LAN (WOL)\n"
12 " \"Magic Packet\", used for restarting machines that have been\n"
13 " soft-powered-down (ACPI D3-warm state).\n"
14 " It currently generates the standard AMD Magic Packet format, with\n"
15 " an optional password appended.\n"
16 "\n"
17 " The single required parameter is the Ethernet MAC (station) address\n"
18 " of the machine to wake or a host ID with known NSS 'ethers' entry.\n"
19 " The MAC address may be found with the 'arp' program while the target\n"
20 " machine is awake.\n"
21 "\n"
22 " Options:\n"
23 " -b Send wake-up packet to the broadcast address.\n"
24 " -D Increase the debug level.\n"
25 " -i ifname Use interface IFNAME instead of the default 'eth0'.\n"
26 " -p <pw> Append the four or six byte password PW to the packet.\n"
27 " A password is only required for a few adapter types.\n"
28 " The password may be specified in ethernet hex format\n"
29 " or dotted decimal (Internet address)\n"
30 " -p 00:22:44:66:88:aa\n"
31 " -p 192.168.1.1\n";
32
33 /*
34 This program generates and transmits a Wake-On-LAN (WOL) "Magic Packet",
35 used for restarting machines that have been soft-powered-down
36 (ACPI D3-warm state). It currently generates the standard AMD Magic Packet
37 format, with an optional password appended.
38
39 This software may be used and distributed according to the terms
40 of the GNU Public License, incorporated herein by reference.
41 Contact the author for use under other terms.
42
43 This source file was originally part of the network tricks package, and
44 is now distributed to support the Scyld Beowulf system.
45 Copyright 1999-2003 Donald Becker and Scyld Computing Corporation.
46
47 The author may be reached as becker@scyld, or C/O
48 Scyld Computing Corporation
49 914 Bay Ridge Road, Suite 220
50 Annapolis MD 21403
51
52 Notes:
53 On some systems dropping root capability allows the process to be
54 dumped, traced or debugged.
55 If someone traces this program, they get control of a raw socket.
56 Linux handles this safely, but beware when porting this program.
57
58 An alternative to needing 'root' is using a UDP broadcast socket, however
59 doing so only works with adapters configured for unicast+broadcast Rx
60 filter. That configuration consumes more power.
61 */
62
63 #include <unistd.h>
64 #include <stdlib.h>
65 #include <stdio.h>
66 #include <errno.h>
67 #include <ctype.h>
68 #include <string.h>
69
70 #if 0 /* Only exists on some versions. */
71 #include <ioctls.h>
72 #endif
73
74 #include <sys/socket.h>
75
76 #include <sys/types.h>
77 #include <sys/ioctl.h>
78 #include <linux/if.h>
79
80 #include <features.h>
81 #if __GLIBC__ >= 2 && __GLIBC_MINOR >= 1
82 #include <netpacket/packet.h>
83 #include <net/ethernet.h>
84 #else
85 #include <asm/types.h>
86 #include <linux/if_packet.h>
87 #include <linux/if_ether.h>
88 #endif
89 #include <netdb.h>
90 #include <netinet/ether.h>
91
92 /* Grrr, no consistency between include versions.
93 Enable this if setsockopt() isn't declared with your library. */
94 #if 0
95 extern int setsockopt __P ((int __fd, int __level, int __optname,
96 __ptr_t __optval, int __optlen));
97 #else /* New, correct head files. */
98 #include <sys/socket.h>
99 #endif
100
101 u_char outpack[1000];
102 int outpack_sz = 0;
103 int debug = 0;
104 u_char wol_passwd[6];
105 int wol_passwd_sz = 0;
106
107 static int opt_no_src_addr = 0, opt_broadcast = 0;
108
109 static int get_dest_addr(const char *arg, struct ether_addr *eaddr);
110 static int get_fill(unsigned char *pkt, struct ether_addr *eaddr);
111 static int get_wol_pw(const char *optarg);
112
113 int main(int argc, char *argv[])
114 {
115 char *ifname = "eth0";
116 int one = 1; /* True, for socket options. */
117 int s; /* Raw socket */
118 int errflag = 0, verbose = 0, do_version = 0;
119 int perm_failure = 0;
120 int i, c, pktsize;
121 #if defined(PF_PACKET)
122 struct sockaddr_ll whereto;
123 #else
124 struct sockaddr whereto; /* who to wake up */
125 #endif
126 struct ether_addr eaddr;
127
128 while ((c = getopt(argc, argv, "bDi:p:uvV")) != -1)
129 switch (c) {
130 case 'b': opt_broadcast++; break;
131 case 'D': debug++; break;
132 case 'i': ifname = optarg; break;
133 case 'p': get_wol_pw(optarg); break;
134 case 'u': printf(usage_msg); return 0;
135 case 'v': verbose++; break;
136 case 'V': do_version++; break;
137 case '?':
138 errflag++;
139 }
140 if (verbose || do_version)
141 printf("%s\n", version_msg);
142 if (errflag) {
143 fprintf(stderr, brief_usage_msg);
144 return 3;
145 }
146
147 if (optind == argc) {
148 fprintf(stderr, "Specify the Ethernet address as 00:11:22:33:44:55.\n");
149 return 3;
150 }
151
152 /* Note: PF_INET, SOCK_DGRAM, IPPROTO_UDP would allow SIOCGIFHWADDR to
153 work as non-root, but we need SOCK_PACKET to specify the Ethernet
154 destination address. */
155 #if defined(PF_PACKET)
156 s = socket(PF_PACKET, SOCK_RAW, 0);
157 #else
158 s = socket(AF_INET, SOCK_PACKET, SOCK_PACKET);
159 #endif
160 if (s < 0) {
161 if (errno == EPERM)
162 fprintf(stderr, "ether-wake: This program must be run as root.\n");
163 else
164 perror("ether-wake: socket");
165 perm_failure++;
166 }
167 /* Don't revert if debugging allows a normal user to get the raw socket. */
168 setuid(getuid());
169
170 /* We look up the station address before reporting failure so that
171 errors may be reported even when run as a normal user.
172 */
173 if (get_dest_addr(argv[optind], &eaddr) != 0)
174 return 3;
175 if (perm_failure && ! debug)
176 return 2;
177
178 pktsize = get_fill(outpack, &eaddr);
179
180 /* Fill in the source address, if possible.
181 The code to retrieve the local station address is Linux specific. */
182 if (! opt_no_src_addr) {
183 struct ifreq if_hwaddr;
184 unsigned char *hwaddr = if_hwaddr.ifr_hwaddr.sa_data;
185
186 strcpy(if_hwaddr.ifr_name, ifname);
187 if (ioctl(s, SIOCGIFHWADDR, &if_hwaddr) < 0) {
188 fprintf(stderr, "SIOCGIFHWADDR on %s failed: %s\n", ifname,
189 strerror(errno));
190 /* Magic packets still work if our source address is bogus, but
191 we fail just to be anal. */
192 return 1;
193 }
194 memcpy(outpack+6, if_hwaddr.ifr_hwaddr.sa_data, 6);
195
196 if (verbose) {
197 printf("The hardware address (SIOCGIFHWADDR) of %s is type %d "
198 "%2.2x:%2.2x:%2.2x:%2.2x:%2.2x:%2.2x.\n", ifname,
199 if_hwaddr.ifr_hwaddr.sa_family, hwaddr[0], hwaddr[1],
200 hwaddr[2], hwaddr[3], hwaddr[4], hwaddr[5]);
201 }
202 }
203
204 if (wol_passwd_sz > 0) {
205 memcpy(outpack+pktsize, wol_passwd, wol_passwd_sz);
206 pktsize += wol_passwd_sz;
207 }
208
209 if (verbose > 1) {
210 printf("The final packet is: ");
211 for (i = 0; i < pktsize; i++)
212 printf(" %2.2x", outpack[i]);
213 printf(".\n");
214 }
215
216 /* This is necessary for broadcasts to work */
217 if (setsockopt(s, SOL_SOCKET, SO_BROADCAST, (char *)&one, sizeof(one)) < 0)
218 perror("setsockopt: SO_BROADCAST");
219
220 #if defined(PF_PACKET)
221 {
222 struct ifreq ifr;
223 strncpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name));
224 if (ioctl(s, SIOCGIFINDEX, &ifr) == -1) {
225 fprintf(stderr, "SIOCGIFINDEX on %s failed: %s\n", ifname,
226 strerror(errno));
227 return 1;
228 }
229 memset(&whereto, 0, sizeof(whereto));
230 whereto.sll_family = AF_PACKET;
231 whereto.sll_ifindex = ifr.ifr_ifindex;
232 /* The manual page incorrectly claims the address must be filled.
233 We do so because the code may change to match the docs. */
234 whereto.sll_halen = ETH_ALEN;
235 memcpy(whereto.sll_addr, outpack, ETH_ALEN);
236
237 }
238 #else
239 whereto.sa_family = 0;
240 strcpy(whereto.sa_data, ifname);
241 #endif
242
243 if ((i = sendto(s, outpack, pktsize, 0, (struct sockaddr *)&whereto,
244 sizeof(whereto))) < 0)
245 perror("sendto");
246 else if (debug)
247 printf("Sendto worked ! %d.\n", i);
248
249 #ifdef USE_SEND
250 if (bind(s, (struct sockaddr *)&whereto, sizeof(whereto)) < 0)
251 perror("bind");
252 else if (send(s, outpack, 100, 0) < 0)
253 perror("send");
254 #endif
255 #ifdef USE_SENDMSG
256 {
257 struct msghdr msghdr = { 0,};
258 struct iovec iovector[1];
259 msghdr.msg_name = &whereto;
260 msghdr.msg_namelen = sizeof(whereto);
261 msghdr.msg_iov = iovector;
262 msghdr.msg_iovlen = 1;
263 iovector[0].iov_base = outpack;
264 iovector[0].iov_len = pktsize;
265 if ((i = sendmsg(s, &msghdr, 0)) < 0)
266 perror("sendmsg");
267 else if (debug)
268 printf("sendmsg worked, %d (%d).\n", i, errno);
269 }
270 #endif
271
272 return 0;
273 }
274
275 /* Convert the host ID string to a MAC address.
276 The string may be a
277 Host name
278 IP address string
279 MAC address string
280 */
281
282 static int get_dest_addr(const char *hostid, struct ether_addr *eaddr)
283 {
284 struct ether_addr *eap;
285
286 eap = ether_aton(hostid);
287 if (eap) {
288 *eaddr = *eap;
289 if (debug)
290 fprintf(stderr, "The target station address is %s.\n",
291 ether_ntoa(eaddr));
292 } else if (ether_hostton(hostid, eaddr) == 0) {
293 if (debug)
294 fprintf(stderr, "Station address for hostname %s is %s.\n",
295 hostid, ether_ntoa(eaddr));
296 } else {
297 (void)fprintf(stderr,
298 "ether-wake: The Magic Packet host address must be "
299 "specified as\n"
300 " - a station address, 00:11:22:33:44:55, or\n"
301 " - a hostname with a known 'ethers' entry.\n");
302 return -1;
303 }
304 return 0;
305 }
306
307
308 static int get_fill(unsigned char *pkt, struct ether_addr *eaddr)
309 {
310 int offset, i;
311 unsigned char *station_addr = eaddr->ether_addr_octet;
312
313 if (opt_broadcast)
314 memset(pkt+0, 0xff, 6);
315 else
316 memcpy(pkt, station_addr, 6);
317 memcpy(pkt+6, station_addr, 6);
318 pkt[12] = 0x08; /* Or 0x0806 for ARP, 0x8035 for RARP */
319 pkt[13] = 0x42;
320 offset = 14;
321
322 memset(pkt+offset, 0xff, 6);
323 offset += 6;
324
325 for (i = 0; i < 16; i++) {
326 memcpy(pkt+offset, station_addr, 6);
327 offset += 6;
328 }
329 if (debug) {
330 fprintf(stderr, "Packet is ");
331 for (i = 0; i < offset; i++)
332 fprintf(stderr, " %2.2x", pkt[i]);
333 fprintf(stderr, ".\n");
334 }
335 return offset;
336 }
337
338 static int get_wol_pw(const char *optarg)
339 {
340 int passwd[6];
341 int byte_cnt;
342 int i;
343
344 byte_cnt = sscanf(optarg, "%2x:%2x:%2x:%2x:%2x:%2x",
345 &passwd[0], &passwd[1], &passwd[2],
346 &passwd[3], &passwd[4], &passwd[5]);
347 if (byte_cnt < 4)
348 byte_cnt = sscanf(optarg, "%d.%d.%d.%d",
349 &passwd[0], &passwd[1], &passwd[2], &passwd[3]);
350 if (byte_cnt < 4) {
351 fprintf(stderr, "Unable to read the Wake-On-LAN password.\n");
352 return 0;
353 }
354 printf(" The Magic packet password is %2.2x %2.2x %2.2x %2.2x (%d).\n",
355 passwd[0], passwd[1], passwd[2], passwd[3], byte_cnt);
356 for (i = 0; i < byte_cnt; i++)
357 wol_passwd[i] = passwd[i];
358 return wol_passwd_sz = byte_cnt;
359 }
360
361 #if 0
362 {
363 to = (struct sockaddr_in *)&whereto;
364 to->sin_family = AF_INET;
365 if (inet_aton(target, &to->sin_addr)) {
366 hostname = target;
367 }
368 memset (&sa, 0, sizeof sa);
369 sa.sa_family = AF_INET;
370 strncpy (sa.sa_data, interface, sizeof sa.sa_data);
371 sendto (sock, buf, bufix + len, 0, &sa, sizeof sa);
372 strncpy (sa.sa_data, interface, sizeof sa.sa_data);
373 #if 1
374 sendto (sock, buf, bufix + len, 0, &sa, sizeof sa);
375 #else
376 bind (sock, &sa, sizeof sa);
377 connect();
378 send (sock, buf, bufix + len, 0);
379 #endif
380 }
381 #endif
382
383
384 /*
385 * Local variables:
386 * compile-command: "gcc -O -Wall -o ether-wake ether-wake.c"
387 * c-indent-level: 4
388 * c-basic-offset: 4
389 * c-indent-level: 4
390 * tab-width: 4
391 * End:
392 */

Properties

Name Value
svn:eol-style native

  ViewVC Help
Powered by ViewVC 1.1.30