[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[dhcp] 05/08: more exports from dhcp/options/base and dhcp/dhcp
From: |
Rohan Prinja |
Subject: |
[dhcp] 05/08: more exports from dhcp/options/base and dhcp/dhcp |
Date: |
Mon, 15 Jun 2015 19:26:21 +0000 |
wenderen pushed a commit to branch master
in repository dhcp.
commit d7512cd0d66c5dabd8fa266b3d08da97672ac61c
Author: Rohan Prinja <address@hidden>
Date: Mon Jun 15 21:14:19 2015 +0530
more exports from dhcp/options/base and dhcp/dhcp
---
dhcp/dhcp.scm | 3 ++-
dhcp/options/base.scm | 12 ++++++------
2 files changed, 8 insertions(+), 7 deletions(-)
diff --git a/dhcp/dhcp.scm b/dhcp/dhcp.scm
index ad059e0..7c09e90 100644
--- a/dhcp/dhcp.scm
+++ b/dhcp/dhcp.scm
@@ -22,6 +22,8 @@
#:use-module (srfi srfi-9)
#:use-module ((srfi srfi-1) #:select (find))
#:export (<dhcp>
+ make-dhcp
+
dhcp-xid set-dhcp-xid!
dhcp-state set-dhcp-state!
dhcp-tries set-dhcp-tries!
@@ -151,7 +153,6 @@ interface NETIF."
'DHCP-INIT-REBOOT
'DHCP-INIT)))
(display (format #f "start-config: entered ~a state\n" dhcp-state))
- (slot-set! (net-iface-dhcp netif) (current-time))
(if (eq? dhcp-state 'INIT)
(begin
(wait-desync)
diff --git a/dhcp/options/base.scm b/dhcp/options/base.scm
index b0cc0d4..c1d22dc 100644
--- a/dhcp/options/base.scm
+++ b/dhcp/options/base.scm
@@ -21,18 +21,18 @@
#:export (<dhcp-option>
make-dhcp-option
dhcp-option?
- dhcp-option-code
- dhcp-option-len
- dhcp-option-val))
+ dhcp-option-code set-dhcp-option-code!
+ dhcp-option-len set-dhcp-option-len!
+ dhcp-option-val set-dhcp-option-val!))
; DHCP option object.
; See RFC 2132 for a list of DHCP options.
(define-record-type <dhcp-option>
(make-dhcp-option code len val)
dhcp-option?
- (code dhcp-option-code)
- (len dhcp-option-len)
- (val dhcp-option-val))
+ (code dhcp-option-code set-dhcp-option-code!)
+ (len dhcp-option-len set-dhcp-option-len!)
+ (val dhcp-option-val set-dhcp-option-val!))
; code = option code, lies between 0 and 255
; len = length of option in bytes when it is serialized into a,
- [dhcp] branch master updated (d1865d0 -> 0937fcf), Rohan Prinja, 2015/06/15
- [dhcp] 01/08: dhcp: remove trailing whitespace, Rohan Prinja, 2015/06/15
- [dhcp] 03/08: dhcp: correct copyright in tests/, Rohan Prinja, 2015/06/15
- [dhcp] 06/08: add copyright line from syscalls.scm in dhcp/interfaces, Rohan Prinja, 2015/06/15
- [dhcp] 02/08: dhcp: #nil -> #f, Rohan Prinja, 2015/06/15
- [dhcp] 04/08: dhcp: more tests for (dhcp interfaces), Rohan Prinja, 2015/06/15
- [dhcp] 05/08: more exports from dhcp/options/base and dhcp/dhcp,
Rohan Prinja <=
- [dhcp] 07/08: remove unneeded FFI code from dhcp/interfaces.scm, Rohan Prinja, 2015/06/15
- [dhcp] 08/08: fix bugs in serializer and deserializer, Rohan Prinja, 2015/06/15