Random cleanup.
[small-scheme-stack.git] / conf.scm
blob8912dd382ef90cbf53a7465cd954086b7aac095e
1 ;;;; Vincent St-Amour
2 ;;;; conf.scm
4 (define my-mac '#u8(#x00 #x20 #xfc #x20 #x0d #x64))
5 (define my-ip '#u8(10 223 151 99)) ;; TODO this is the one for the original tests, won't work with the new ones
6 (define broadcast-ip '#u8(255 255 255 255)) ;; TODO put in pkt ?
7 (define my-address-mask '#u8(255 255 0 0)) ; TODO put this in conf file ?
9 ;; the size of the vector storing the packet currently in the system
10 ;; the maximum size of an IP datagram we are forced to accept by the standard
11 ;; is 576 bytes, plus 14 bytes for the ethernet header
12 (define pkt-allocated-length 590)
14 ;; list of IPs associated to MAC adresses
15 (define rarp-mac-ip-alist
16   (list (cons '#u8(23 34 45 56 67 78) '#u8(192 168 1 108))))
19 (define ip-original-time-to-live 225)
21 ;; TCP configuration
23 ;; maximum life time of a tcp connection without any activation
24 ;; TODO explain better ? which unit ?
25 (define tcp-max-life-time 30)
26 ;; delay before retransmission
27 (define tcp-retransmission-delay 5)
28 ;; maximum number of retransmissions for a tcp packet
29 (define tcp-attempts-limit 3)
30 ;; time delay in the "time-wait" state
31 (define tcp-time-to-wait 15)
32 ;; size of the tcp input and output buffers for one connection.
33 (define tcp-input-size  64)
34 (define tcp-output-size 64)