iolib-devel

iolib-devel@common-lisp.net

246 discussions

[iolib-devel] New patches: 26-Mar-2010
by Stelian Ionescu 27 Mar '10

27 Mar '10

commit ebc4e267121cdc9f2587443d6ac08327453fbf12 Author: Stelian Ionescu <sionescu(a)cddr.org> Date: Sat Mar 27 03:37:27 2010 +0100 Rewrite STREAM-READ-CHAR and STREAM-READ-CHAR-NO-HANG. src/iolib.streams.asd | 5 +- src/streams/gray/buffer.lisp | 3 + src/streams/gray/classes.lisp | 15 +- src/streams/gray/gray-stream-methods.lisp | 445 +++++++---------------------- src/streams/gray/io-helpers.lisp | 281 ++++++++++++++++++ 5 files changed, 398 insertions(+), 351 deletions(-) An updated tarball of IOLib's source can be downloaded here: http://common-lisp.net/project/iolib/files/snapshots/iolib-20100326.tar.gz Gitweb URL: http://repo.or.cz/w/iolib.git

1 0

[iolib-devel] New patches: 25-Mar-2010
by Stelian Ionescu 26 Mar '10

26 Mar '10

commit 4b7233df1929d7329ac52b11726649fe5e56d323 Author: Stelian Ionescu <sionescu(a)cddr.org> Date: Thu Mar 25 12:58:04 2010 +0100 No initform for slot EOL-WRITER. src/streams/gray/classes.lisp | 3 +-- 1 files changed, 1 insertions(+), 2 deletions(-) An updated tarball of IOLib's source can be downloaded here: http://common-lisp.net/project/iolib/files/snapshots/iolib-20100325.tar.gz Gitweb URL: http://repo.or.cz/w/iolib.git

1 0

[iolib-devel] New patches: 24-Mar-2010
by Stelian Ionescu 25 Mar '10

25 Mar '10

commit aa93b0a9fd19fb0327e241e665efeff83b752fcc Author: Stelian Ionescu <sionescu(a)cddr.org> Date: Thu Mar 25 00:59:49 2010 +0100 Add fast path for EWOULDBLOCK in SIGNAL-SOCKET-ERROR. src/sockets/conditions.lisp | 2 ++ 1 files changed, 2 insertions(+), 0 deletions(-) commit 86355c3936feddad4fc97b611f930717cf028295 Author: Stelian Ionescu <sionescu(a)cddr.org> Date: Wed Mar 24 23:20:47 2010 +0100 Remove %WRITE-LINE-TERMINATOR and replace it with eol-writer function stored in the stream. src/streams/gray/classes.lisp | 2 + src/streams/gray/gray-stream-methods.lisp | 47 +++++++++++++++++----------- 2 files changed, 30 insertions(+), 19 deletions(-) commit 7803896dcdb1a0a4d0bcc6485c0e266859b745b7 Author: Stelian Ionescu <sionescu(a)cddr.org> Date: Wed Mar 24 22:56:12 2010 +0100 Rewrite STREAM-WRITE-STRING to fix bug reported by Andrey Moskvitin and make code clearer. src/streams/gray/gray-stream-methods.lisp | 40 ++++++++++++++++------------- 1 files changed, 22 insertions(+), 18 deletions(-) commit 08c24e3f082ac8355b95f79985e18178ce06aeec Author: Stelian Ionescu <sionescu(a)cddr.org> Date: Wed Mar 24 21:30:29 2010 +0100 Add and export condition IOLIB.STREAMS:NO-CHARACTERS-TO-UNREAD, use it in %STREAM-UNREAD-CHAR. src/streams/gray/conditions.lisp | 12 +++++++++++- src/streams/gray/gray-stream-methods.lisp | 8 ++++++-- src/streams/gray/pkgdcl.lisp | 1 + 3 files changed, 18 insertions(+), 3 deletions(-) An updated tarball of IOLib's source can be downloaded here: http://common-lisp.net/project/iolib/files/snapshots/iolib-20100324.tar.gz Gitweb URL: http://repo.or.cz/w/iolib.git

1 0

[iolib-devel] Bug in stream-write-string
by Andrey Moskvitin 25 Mar '10

25 Mar '10

Hi, I found bug in implementation stream-write-string for dual-channel-gray-stream class: lost last #\Newline character. Patch: diff --git a/src/streams/gray/gray-stream-methods.lisp b/src/streams/gray/gray-stream-methods.lisp index 43f4694..9d8b720 100644 --- a/src/streams/gray/gray-stream-methods.lisp +++ b/src/streams/gray/gray-stream-methods.lisp @@ -492,13 +492,13 @@ (ef (external-format-of stream)) (line-terminator (babel:external-format-eol-style ef))) (loop :for off1 := start :then (1+ off2) - :for nl-off := (position #\Newline string :start off1) + :for nl-off := (position #\Newline string :start off1 :end end) :for off2 := (or nl-off end) - :when nl-off :do (%write-line-terminator stream line-terminator) :when (> off2 off1) :do ;; FIXME: should probably convert directly to a foreign buffer? (setf octets (%to-octets string off1 off2 ef)) (%write-simple-array-ub8 stream octets 0 (length octets)) + :when nl-off :do (%write-line-terminator stream line-terminator) :while (< off2 end)))) (values string)) Andrey

2 1

[iolib-devel] Problem with peek-char
by Andrey Moskvitin 25 Mar '10

25 Mar '10

Hi, I am trying to rewrite the work with sockets in a swank via IOLib and found that call peek-char produces an error "No uncommitted character to unread" (see %stream-unread-char in a gray-stream-methods.lisp) . I did not understand deep, but noticed that after the following simple modifications: diff --git a/src/streams/gray/gray-stream-methods.lisp b/src/streams/gray/gray-stream-methods.lisp index d0cdbce..43f4694 100644 --- a/src/streams/gray/gray-stream-methods.lisp +++ b/src/streams/gray/gray-stream-methods.lisp @@ -320,7 +320,6 @@ (unread-index ibuf-unread-index-of) (ef external-format-of)) stream - (setf unread-index (iobuf-start ib)) (let* ((str nil) (ret nil) (encoding (babel:external-format-encoding ef)) (max-octets-per-char system begins to work normally Moskvitin Andrey

2 1

[iolib-devel] New patches: 18-Mar-2010
by Stelian Ionescu 19 Mar '10

19 Mar '10

commit b88687474bdbd7cc41f260efdb4606b48df93dd3 Author: Stelian Ionescu <sionescu(a)cddr.org> Date: Thu Mar 18 22:19:14 2010 +0100 Renamed package NET.TRIVIAL-SOCKETS to IOLIB.TRIVIAL-SOCKETS, shadow SOCKET-ERROR. src/sockets/trivial-sockets.lisp | 3 ++- 1 files changed, 2 insertions(+), 1 deletions(-) An updated tarball of IOLib's source can be downloaded here: http://common-lisp.net/project/iolib/files/snapshots/iolib-20100318.tar.gz Gitweb URL: http://repo.or.cz/w/iolib.git

1 0

[iolib-devel] send-to question
by Peter Keller 14 Mar '10

14 Mar '10

Hello, Under what situations does IOLib's send-to fail on a TCP socket and how does it fail? An example for a TCP receive-from is when it tries to read from a closed connection it returns 0 bytes--as oposed to read-line from a closed connection which results in a signaled END-OF-FILE condition. write-line will produce a hangup on a closed connection remotely, but what will send-to do on a closed connection remotely? Return 0? Signal a HANGUP? In practice it seems to "write" however many bytes I asked it to the nonexistent client and return the number of bytes written. I was expecting a signaled HANGUP instead. What's the deal? Thank you. -pete

2 1

[iolib-devel] New patches: 6-Mar-2010
by Stelian Ionescu 07 Mar '10

07 Mar '10

commit d4862b25cd1f55ea4d8b6fe9ff7c92315ff0cf10 Author: Peter Keller <psilord(a)cs.wisc.edu> Date: Sun Mar 7 00:09:57 2010 +0100 Avoid calling NULL callbacks. src/multiplex/event-loop.lisp | 17 +++++++++-------- 1 files changed, 9 insertions(+), 8 deletions(-) An updated tarball of IOLib's source can be downloaded here: http://common-lisp.net/project/iolib/files/snapshots/iolib-20100306.tar.gz Gitweb URL: http://repo.or.cz/w/iolib.git

1 0

[iolib-devel] Patch for a nil callback invocation.
by Peter Keller 07 Mar '10

07 Mar '10

Hello, Under the conditions where there are two or more handlers registered for a single fd in the multiplexer and one of the handlers removes all the fd's callbacks and other callbacks for that fd should have been invoked in the same event-dispath iteration, there is an invocation of a nil callback in event-dispatch. To the best of my knowledge, this patch below fixes it. Thank you. -pete diff --git a/src/multiplex/event-loop.lisp b/src/multiplex/event-loop.lisp index 35879fd..4afba32 100644 --- a/src/multiplex/event-loop.lisp +++ b/src/multiplex/event-loop.lisp @@ -306,7 +306,8 @@ within the extent of BODY. Closes VAR." (setf expired-events nil) (setf (values eventsp deletion-list) (dispatch-fd-events-once event-base poll-timeout now)) - (%remove-handlers event-base deletion-list) + (unless (equal '(nil nil) deletion-list) + (%remove-handlers event-base deletion-list)) (when (expire-pending-timers fd-timers now) (setf eventsp t)) (dispatch-fd-timeouts expired-events) (when (expire-pending-timers timers now) (setf eventsp t)) @@ -352,13 +353,14 @@ within the extent of BODY. Closes VAR." (defun %dispatch-event (fd-entry event-type errorp now) (let ((ev (fd-entry-handler fd-entry event-type))) - (funcall (fd-handler-callback ev) - (fd-entry-fd fd-entry) - event-type - (if errorp :error nil)) - (when-let (timer (fd-handler-timer ev)) - (reschedule-timer-relative-to-now timer now)) - (fd-handler-one-shot-p ev))) + (when ev + (funcall (fd-handler-callback ev) + (fd-entry-fd fd-entry) + event-type + (if errorp :error nil)) + (when-let (timer (fd-handler-timer ev)) + (reschedule-timer-relative-to-now timer now)) + (fd-handler-one-shot-p ev)))) (defun dispatch-fd-timeouts (events) (dolist (ev events)

2 3

[iolib-devel] New iolib examples, rfc
by Peter Keller 10 Feb '10

10 Feb '10

Hello, I've attached a newer version of the iolib examples I'm using for my tutorial. If people could comment upon the programs to get them more into the lisp style (except the first one or two which are C-style for a reason) or find bugs that'd be great. Thank you. -pete

1 0

← Newer
1
...
8
9
10
11
12
13
14
...
25
Older →

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

iolib-devel