1*36f2eda2SGleb Smirnoff /*-
2*36f2eda2SGleb Smirnoff * SPDX-License-Identifier: BSD-2-Clause
3*36f2eda2SGleb Smirnoff *
4*36f2eda2SGleb Smirnoff * Copyright (c) 2025 Gleb Smirnoff <glebius@FreeBSD.org>
5*36f2eda2SGleb Smirnoff *
6*36f2eda2SGleb Smirnoff * Redistribution and use in source and binary forms, with or without
7*36f2eda2SGleb Smirnoff * modification, are permitted provided that the following conditions
8*36f2eda2SGleb Smirnoff * are met:
9*36f2eda2SGleb Smirnoff * 1. Redistributions of source code must retain the above copyright
10*36f2eda2SGleb Smirnoff * notice, this list of conditions and the following disclaimer.
11*36f2eda2SGleb Smirnoff * 2. Redistributions in binary form must reproduce the above copyright
12*36f2eda2SGleb Smirnoff * notice, this list of conditions and the following disclaimer in the
13*36f2eda2SGleb Smirnoff * documentation and/or other materials provided with the distribution.
14*36f2eda2SGleb Smirnoff *
15*36f2eda2SGleb Smirnoff * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16*36f2eda2SGleb Smirnoff * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17*36f2eda2SGleb Smirnoff * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18*36f2eda2SGleb Smirnoff * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19*36f2eda2SGleb Smirnoff * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20*36f2eda2SGleb Smirnoff * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21*36f2eda2SGleb Smirnoff * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22*36f2eda2SGleb Smirnoff * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23*36f2eda2SGleb Smirnoff * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24*36f2eda2SGleb Smirnoff * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25*36f2eda2SGleb Smirnoff * SUCH DAMAGE.
26*36f2eda2SGleb Smirnoff */
27*36f2eda2SGleb Smirnoff
28*36f2eda2SGleb Smirnoff #include <sys/socket.h>
29*36f2eda2SGleb Smirnoff #include <netinet/in.h>
30*36f2eda2SGleb Smirnoff #include <arpa/inet.h>
31*36f2eda2SGleb Smirnoff #include <net/if.h>
32*36f2eda2SGleb Smirnoff #include <assert.h>
33*36f2eda2SGleb Smirnoff #include <errno.h>
34*36f2eda2SGleb Smirnoff #include <limits.h>
35*36f2eda2SGleb Smirnoff #include <stdbool.h>
36*36f2eda2SGleb Smirnoff #include <stdlib.h>
37*36f2eda2SGleb Smirnoff #include <string.h>
38*36f2eda2SGleb Smirnoff #include <err.h>
39*36f2eda2SGleb Smirnoff
40*36f2eda2SGleb Smirnoff static in_port_t
atop(const char * c)41*36f2eda2SGleb Smirnoff atop(const char *c)
42*36f2eda2SGleb Smirnoff {
43*36f2eda2SGleb Smirnoff unsigned long ul;
44*36f2eda2SGleb Smirnoff
45*36f2eda2SGleb Smirnoff errno = 0;
46*36f2eda2SGleb Smirnoff if ((ul = strtol(c, NULL, 10)) < 1 || ul > IPPORT_MAX || errno != 0)
47*36f2eda2SGleb Smirnoff err(1, "can't parse %s", c);
48*36f2eda2SGleb Smirnoff
49*36f2eda2SGleb Smirnoff return ((in_port_t)ul);
50*36f2eda2SGleb Smirnoff }
51*36f2eda2SGleb Smirnoff
52*36f2eda2SGleb Smirnoff int
main(int argc,char * argv[])53*36f2eda2SGleb Smirnoff main(int argc, char *argv[])
54*36f2eda2SGleb Smirnoff {
55*36f2eda2SGleb Smirnoff struct sockaddr_in src = {
56*36f2eda2SGleb Smirnoff .sin_family = AF_INET,
57*36f2eda2SGleb Smirnoff .sin_len = sizeof(struct sockaddr_in),
58*36f2eda2SGleb Smirnoff }, dst = {
59*36f2eda2SGleb Smirnoff .sin_family = AF_INET,
60*36f2eda2SGleb Smirnoff .sin_len = sizeof(struct sockaddr_in),
61*36f2eda2SGleb Smirnoff };
62*36f2eda2SGleb Smirnoff struct ip_mreqn mreqn;
63*36f2eda2SGleb Smirnoff struct in_addr in;
64*36f2eda2SGleb Smirnoff int s;
65*36f2eda2SGleb Smirnoff bool index;
66*36f2eda2SGleb Smirnoff
67*36f2eda2SGleb Smirnoff if (argc < 7)
68*36f2eda2SGleb Smirnoff errx(1, "Usage: %s src-IPv4 src-port dst-IPv4 dst-port "
69*36f2eda2SGleb Smirnoff "interface payload", argv[0]);
70*36f2eda2SGleb Smirnoff
71*36f2eda2SGleb Smirnoff if (inet_pton(AF_INET, argv[1], &src.sin_addr) != 1)
72*36f2eda2SGleb Smirnoff err(1, "inet_pton(%s) failed", argv[1]);
73*36f2eda2SGleb Smirnoff src.sin_port = htons(atop(argv[2]));
74*36f2eda2SGleb Smirnoff if (inet_pton(AF_INET, argv[3], &dst.sin_addr) != 1)
75*36f2eda2SGleb Smirnoff err(1, "inet_pton(%s) failed", argv[3]);
76*36f2eda2SGleb Smirnoff dst.sin_port = htons(atop(argv[4]));
77*36f2eda2SGleb Smirnoff if (inet_pton(AF_INET, argv[5], &in) == 1)
78*36f2eda2SGleb Smirnoff index = false;
79*36f2eda2SGleb Smirnoff else if ((mreqn.imr_ifindex = if_nametoindex(argv[5])) > 0)
80*36f2eda2SGleb Smirnoff index = true;
81*36f2eda2SGleb Smirnoff else
82*36f2eda2SGleb Smirnoff err(1, "if_nametoindex(%s) failed", argv[5]);
83*36f2eda2SGleb Smirnoff
84*36f2eda2SGleb Smirnoff assert((s = socket(PF_INET, SOCK_DGRAM, 0)) > 0);
85*36f2eda2SGleb Smirnoff assert(bind(s, (struct sockaddr *)&src, sizeof(src)) == 0);
86*36f2eda2SGleb Smirnoff if (index)
87*36f2eda2SGleb Smirnoff assert(setsockopt(s, IPPROTO_IP, IP_MULTICAST_IF, &mreqn,
88*36f2eda2SGleb Smirnoff sizeof(mreqn)) == 0);
89*36f2eda2SGleb Smirnoff else
90*36f2eda2SGleb Smirnoff assert(setsockopt(s, IPPROTO_IP, IP_MULTICAST_IF, &in,
91*36f2eda2SGleb Smirnoff sizeof(in)) == 0);
92*36f2eda2SGleb Smirnoff if (sendto(s, argv[6], strlen(argv[6]) + 1, 0, (struct sockaddr *)&dst,
93*36f2eda2SGleb Smirnoff sizeof(dst)) != (ssize_t)strlen(argv[6]) + 1)
94*36f2eda2SGleb Smirnoff err(1, "sendto failed");
95*36f2eda2SGleb Smirnoff
96*36f2eda2SGleb Smirnoff return (0);
97*36f2eda2SGleb Smirnoff }
98