1 /* 2 * This program is free software; you can redistribute it and/or modify 3 * it under the terms of the GNU General Public License as published by 4 * the Free Software Foundation; either version 2 of the License, or 5 * (at your option) any later version. 6 * 7 * Copyright Jonathan Naylor G4KLX (g4klx@g4klx.demon.co.uk) 8 * Copyright Darryl Miles G7LED (dlm@g7led.demon.co.uk) 9 */ 10 #include <linux/errno.h> 11 #include <linux/types.h> 12 #include <linux/socket.h> 13 #include <linux/in.h> 14 #include <linux/kernel.h> 15 #include <linux/timer.h> 16 #include <linux/string.h> 17 #include <linux/sockios.h> 18 #include <linux/net.h> 19 #include <net/ax25.h> 20 #include <linux/inet.h> 21 #include <linux/netdevice.h> 22 #include <linux/skbuff.h> 23 #include <net/sock.h> 24 #include <asm/uaccess.h> 25 #include <asm/system.h> 26 #include <linux/fcntl.h> 27 #include <linux/mm.h> 28 #include <linux/interrupt.h> 29 #include <net/netrom.h> 30 31 /* 32 * This is where all NET/ROM frames pass, except for IP-over-NET/ROM which 33 * cannot be fragmented in this manner. 34 */ 35 void nr_output(struct sock *sk, struct sk_buff *skb) 36 { 37 struct sk_buff *skbn; 38 unsigned char transport[NR_TRANSPORT_LEN]; 39 int err, frontlen, len; 40 41 if (skb->len - NR_TRANSPORT_LEN > NR_MAX_PACKET_SIZE) { 42 /* Save a copy of the Transport Header */ 43 skb_copy_from_linear_data(skb, transport, NR_TRANSPORT_LEN); 44 skb_pull(skb, NR_TRANSPORT_LEN); 45 46 frontlen = skb_headroom(skb); 47 48 while (skb->len > 0) { 49 if ((skbn = sock_alloc_send_skb(sk, frontlen + NR_MAX_PACKET_SIZE, 0, &err)) == NULL) 50 return; 51 52 skb_reserve(skbn, frontlen); 53 54 len = (NR_MAX_PACKET_SIZE > skb->len) ? skb->len : NR_MAX_PACKET_SIZE; 55 56 /* Copy the user data */ 57 skb_copy_from_linear_data(skb, skb_put(skbn, len), len); 58 skb_pull(skb, len); 59 60 /* Duplicate the Transport Header */ 61 skb_push(skbn, NR_TRANSPORT_LEN); 62 skb_copy_to_linear_data(skbn, transport, 63 NR_TRANSPORT_LEN); 64 if (skb->len > 0) 65 skbn->data[4] |= NR_MORE_FLAG; 66 67 skb_queue_tail(&sk->sk_write_queue, skbn); /* Throw it on the queue */ 68 } 69 70 kfree_skb(skb); 71 } else { 72 skb_queue_tail(&sk->sk_write_queue, skb); /* Throw it on the queue */ 73 } 74 75 nr_kick(sk); 76 } 77 78 /* 79 * This procedure is passed a buffer descriptor for an iframe. It builds 80 * the rest of the control part of the frame and then writes it out. 81 */ 82 static void nr_send_iframe(struct sock *sk, struct sk_buff *skb) 83 { 84 struct nr_sock *nr = nr_sk(sk); 85 86 if (skb == NULL) 87 return; 88 89 skb->data[2] = nr->vs; 90 skb->data[3] = nr->vr; 91 92 if (nr->condition & NR_COND_OWN_RX_BUSY) 93 skb->data[4] |= NR_CHOKE_FLAG; 94 95 nr_start_idletimer(sk); 96 97 nr_transmit_buffer(sk, skb); 98 } 99 100 void nr_send_nak_frame(struct sock *sk) 101 { 102 struct sk_buff *skb, *skbn; 103 struct nr_sock *nr = nr_sk(sk); 104 105 if ((skb = skb_peek(&nr->ack_queue)) == NULL) 106 return; 107 108 if ((skbn = skb_clone(skb, GFP_ATOMIC)) == NULL) 109 return; 110 111 skbn->data[2] = nr->va; 112 skbn->data[3] = nr->vr; 113 114 if (nr->condition & NR_COND_OWN_RX_BUSY) 115 skbn->data[4] |= NR_CHOKE_FLAG; 116 117 nr_transmit_buffer(sk, skbn); 118 119 nr->condition &= ~NR_COND_ACK_PENDING; 120 nr->vl = nr->vr; 121 122 nr_stop_t1timer(sk); 123 } 124 125 void nr_kick(struct sock *sk) 126 { 127 struct nr_sock *nr = nr_sk(sk); 128 struct sk_buff *skb, *skbn; 129 unsigned short start, end; 130 131 if (nr->state != NR_STATE_3) 132 return; 133 134 if (nr->condition & NR_COND_PEER_RX_BUSY) 135 return; 136 137 if (!skb_peek(&sk->sk_write_queue)) 138 return; 139 140 start = (skb_peek(&nr->ack_queue) == NULL) ? nr->va : nr->vs; 141 end = (nr->va + nr->window) % NR_MODULUS; 142 143 if (start == end) 144 return; 145 146 nr->vs = start; 147 148 /* 149 * Transmit data until either we're out of data to send or 150 * the window is full. 151 */ 152 153 /* 154 * Dequeue the frame and copy it. 155 */ 156 skb = skb_dequeue(&sk->sk_write_queue); 157 158 do { 159 if ((skbn = skb_clone(skb, GFP_ATOMIC)) == NULL) { 160 skb_queue_head(&sk->sk_write_queue, skb); 161 break; 162 } 163 164 skb_set_owner_w(skbn, sk); 165 166 /* 167 * Transmit the frame copy. 168 */ 169 nr_send_iframe(sk, skbn); 170 171 nr->vs = (nr->vs + 1) % NR_MODULUS; 172 173 /* 174 * Requeue the original data frame. 175 */ 176 skb_queue_tail(&nr->ack_queue, skb); 177 178 } while (nr->vs != end && 179 (skb = skb_dequeue(&sk->sk_write_queue)) != NULL); 180 181 nr->vl = nr->vr; 182 nr->condition &= ~NR_COND_ACK_PENDING; 183 184 if (!nr_t1timer_running(sk)) 185 nr_start_t1timer(sk); 186 } 187 188 void nr_transmit_buffer(struct sock *sk, struct sk_buff *skb) 189 { 190 struct nr_sock *nr = nr_sk(sk); 191 unsigned char *dptr; 192 193 /* 194 * Add the protocol byte and network header. 195 */ 196 dptr = skb_push(skb, NR_NETWORK_LEN); 197 198 memcpy(dptr, &nr->source_addr, AX25_ADDR_LEN); 199 dptr[6] &= ~AX25_CBIT; 200 dptr[6] &= ~AX25_EBIT; 201 dptr[6] |= AX25_SSSID_SPARE; 202 dptr += AX25_ADDR_LEN; 203 204 memcpy(dptr, &nr->dest_addr, AX25_ADDR_LEN); 205 dptr[6] &= ~AX25_CBIT; 206 dptr[6] |= AX25_EBIT; 207 dptr[6] |= AX25_SSSID_SPARE; 208 dptr += AX25_ADDR_LEN; 209 210 *dptr++ = sysctl_netrom_network_ttl_initialiser; 211 212 if (!nr_route_frame(skb, NULL)) { 213 kfree_skb(skb); 214 nr_disconnect(sk, ENETUNREACH); 215 } 216 } 217 218 /* 219 * The following routines are taken from page 170 of the 7th ARRL Computer 220 * Networking Conference paper, as is the whole state machine. 221 */ 222 223 void nr_establish_data_link(struct sock *sk) 224 { 225 struct nr_sock *nr = nr_sk(sk); 226 227 nr->condition = 0x00; 228 nr->n2count = 0; 229 230 nr_write_internal(sk, NR_CONNREQ); 231 232 nr_stop_t2timer(sk); 233 nr_stop_t4timer(sk); 234 nr_stop_idletimer(sk); 235 nr_start_t1timer(sk); 236 } 237 238 /* 239 * Never send a NAK when we are CHOKEd. 240 */ 241 void nr_enquiry_response(struct sock *sk) 242 { 243 struct nr_sock *nr = nr_sk(sk); 244 int frametype = NR_INFOACK; 245 246 if (nr->condition & NR_COND_OWN_RX_BUSY) { 247 frametype |= NR_CHOKE_FLAG; 248 } else { 249 if (skb_peek(&nr->reseq_queue) != NULL) 250 frametype |= NR_NAK_FLAG; 251 } 252 253 nr_write_internal(sk, frametype); 254 255 nr->vl = nr->vr; 256 nr->condition &= ~NR_COND_ACK_PENDING; 257 } 258 259 void nr_check_iframes_acked(struct sock *sk, unsigned short nr) 260 { 261 struct nr_sock *nrom = nr_sk(sk); 262 263 if (nrom->vs == nr) { 264 nr_frames_acked(sk, nr); 265 nr_stop_t1timer(sk); 266 nrom->n2count = 0; 267 } else { 268 if (nrom->va != nr) { 269 nr_frames_acked(sk, nr); 270 nr_start_t1timer(sk); 271 } 272 } 273 } 274