3 #include <sys/socket.h>
11 #define TFTP_PKT_SIZE 516
13 static const char *opcode_names[] = {
14 "RRQ", "WRQ", "DATA", "ACK", "ERR"
25 static inline void pkt_mknum(char *pkt, uint16_t n)
27 *(uint16_t*)pkt = htons(n);
30 static inline uint16_t pkt_num(char *pkt)
32 return ntohs(*(uint16_t*)pkt);
35 static void pkt_mkwrq(char *pkt, const char *filename, const char *mode)
41 strcpy(pkt + len, filename);
42 len += strlen(filename) + 1;
43 strcpy(pkt + len, mode);
44 len += strlen(mode) + 1;
47 static inline void pkt_print(char *pkt, FILE *fp)
49 uint16_t opcode = pkt_num(pkt);
50 if (!opcode || opcode > ERR) {
51 fprintf(fp, "(%d)", opcode);
53 fprintf(fp, "%s", opcode_names[opcode - 1]);
54 if (opcode == ACK || opcode == DATA) {
55 fprintf(fp, "(%d)", pkt_num(pkt + 2));
56 } else if (opcode == WRQ) {
57 fprintf(fp, "(%s, %s)", pkt + 2, pkt + 2 + strlen(pkt + 2) + 1);
62 static ssize_t tftp_recvfrom(int sock, char *pkt, struct sockaddr_in *src)
67 (void)src, (void)socklen;
69 len = recvfrom(sock, pkt, TFTP_PKT_SIZE, 0, NULL, NULL);
71 if (errno != EAGAIN) {
79 uint16_t opcode = pkt_num(pkt);
82 fprintf(stderr, "Error (%d): %.511s\n", pkt_num(pkt + 2), pkt + 4);
84 } else if (!opcode || opcode > ERR) {
85 /* The EX2700 I've tested this on sends a raw TFTP packet with no
86 * opcode, and an error message starting at offset 0.
88 fprintf(stderr, "Error: %.32s\n", pkt);
95 static ssize_t tftp_sendto(int sock, char *pkt, size_t len,
96 struct sockaddr_in *dst)
100 switch (pkt_num(pkt)) {
103 len = 2 + strlen(pkt + 2) + 1;
104 len += strlen(pkt + len) + 1;
113 len = 4 + strlen(pkt + 4);
116 fprintf(stderr, "Error: Invalid packet ");
117 pkt_print(pkt, stderr);
121 sent = sendto(sock, pkt, len, 0, (struct sockaddr*)dst, sizeof(*dst));
129 int sock_set_rx_timeout(int fd, unsigned msec)
134 tv.tv_usec = (msec % 1000) * 1000;
135 tv.tv_sec = msec / 1000;
136 if (setsockopt(fd, SOL_SOCKET, SO_RCVTIMEO, &tv, sizeof(tv)) < 0) {
137 perror("setsockopt(SO_RCVTIMEO)");
145 int tftp_put(const char *filename, const char *ipaddr, uint16_t port)
147 struct sockaddr_in addr;
150 int fd, sock, err, timeout, last_len;
151 char rx[TFTP_PKT_SIZE], tx[TFTP_PKT_SIZE];
153 fd = open(filename, O_RDONLY);
160 sock = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
167 err = sock_set_rx_timeout(sock, 999);
172 err = !inet_aton(ipaddr, &addr.sin_addr);
178 addr.sin_family = AF_INET;
179 addr.sin_port = htons(port);
181 pkt_mkwrq(tx, filename, "octet");
183 len = tftp_sendto(sock, tx, 0, &addr);
189 len = tftp_recvfrom(sock, rx, &addr);
200 if (timeout || (pkt_num(rx) == ACK && pkt_num(rx + 2) == block)) {
204 pkt_mknum(tx + 2, block);
205 len = read(fd, tx + 4, 512);
211 if (last_len != 512) {
219 err = tftp_sendto(sock, tx, len, &addr);
223 } else if (pkt_num(rx) != ACK) {
224 fprintf(stderr, "Expected ACK(%d), got ", block);
225 pkt_print(rx, stderr);
226 fprintf(stderr, "!\n");
229 err = tftp_recvfrom(sock, rx, &addr);
235 fprintf(stderr, "Timeout while waiting for ACK(%d)\n.", block);