admin January 2007

admin@common-lisp.net

14 participants
22 discussions

[admin] Stefil - application yet another test framework project
by Attila Lendvai 15 Jan '07

15 Jan '07

dear admins, i know there's already too many of them, but we just had to roll our own after using 5am and Lift. it's simpler, more flexible and easier to use (imo). it consists of a very simple 'deftest, 'defsuite, some assertion macros and Slime inspector integration. deftest and defsuite expand to instrumented defun's that can be called from the repl and other tests, too. would you please create a project page for us? i'm alendvai, and please add the following people to the project: mbaringer lmeszaros tborbely gking -- - attila "- The truth is that I've been too considerate, and so became unintentionally cruel... - I understand. - No, you don't understand! We don't speak the same language!" (Ingmar Bergman - Smultronstället)

2 1

[admin] added stefil; owned by alendvai
by root＠common-lisp.net 15 Jan '07

15 Jan '07

Add successful at 2007.01.15.17.25.

1 0

[admin] Add Cyrus Harmon to Rucksack project?
by Arthur Lemmens 15 Jan '07

15 Jan '07

Hi Erik, Could you give Cyrus Harmon (charmon(a)common-lisp.net) CVS commit rights for the Rucksack project? Thanks a lot, Arthur Lemmens PS. Any chance you'll go to the ILC in Cambridge, UK, this year? Would be nice to have a real-life chat again.

2 1

[admin] trac request for iolib project
by Stelian Ionescu 15 Jan '07

15 Jan '07

hello, I'd like you you active a TRAC instance for the Iolib project, if that's possible -- (sign :name "Stelian Ionescu" :aka "fe[nl]ix" :quote "Quidquid latine dictum sit, altum sonatur.")

2 1

[admin] write privileges for group members
by Robert Strandh 15 Jan '07

15 Jan '07

Hello, Could you please change the mode of /project/flexichain/www and /project/flexichain/www/download so as to allow write operations for group members? Thanks in advance, -- Robert Strandh --------------------------------------------------------------------- Greenspun's Tenth Rule of Programming: any sufficiently complicated C or Fortran program contains an ad hoc informally-specified bug-ridden slow implementation of half of Common Lisp. ---------------------------------------------------------------------

2 1

[admin] added trivial-freeimage; owned by bgreen
by root＠common-lisp.net 11 Jan '07

11 Jan '07

Add successful at 2007.01.11.09.12.

1 0

[admin] Hosting
by Bryan Green 11 Jan '07

11 Jan '07

Hello, I would like to host my trivial-freeimage package on common-lisp.net. It is a cffi wrapper for freeimage <http://freeimage.sourceforge.net>. It is licensed under the GPL-- same as the freeimage license<http://freeimage.sourceforge.net/license.html> . I am also making a more lispy wrapping for it that will also be under GPL. Anyway, details: Bryan Green No other project members. This is the description of the library I have wrapped: FreeImage is an Open Source library project for developers who would like to support popular graphics image formats like PNG, BMP, JPEG, TIFF and others as needed by today's multimedia applications. FreeImage is easy to use, fast, multithreading safe, compatible with all 32-bit versions of Windows, and cross-platform (works both with Linux and Mac OS X). I have attached my public-key. Thank you for your time. Bryan Green

2 1

[admin] Application for hosting of project SNMP1
by Johan Ur Riise 02 Jan '07

02 Jan '07

I have created a small package for SNMP (Simple Network Management Protocol). It does BER-encoding and decoding of the SNMP V1 protocol. There is also a udp-send-and-receive function for sbcl, and some salt-functions for getting a value from the agent, and a walk function. Then there are some test-functions, and some comments in the code. There is already a SNMP project on common-lisp.net, (cl-snmp or SYSMAN) but it is not maintained lately, I could not easily make it compile on sbcl, it is not marked as Free Software, and I could not get in contact with the author. There is no project participants beyond myself. The code is GPLv2 or later. My gpg-key: riise@egg:~$ gpg --armor --export riise -----BEGIN PGP PUBLIC KEY BLOCK----- Version: GnuPG v1.4.1 (GNU/Linux) mQGiBEIQo9cRBADfR4yqLWOkn2LJoWPwipwFhZ6C6TU+TYnXLGGhFYyRZGZWZmMa hFGW56HcU4rzR2JqwrE7lC6KiZ7eu6J89SboyYfptz9SD8Mc3kMp8Bo4Ce55jo6J hnbFRFgOh9j9wABYASXjaWNtgtM14TsAJh5X84DUJTs2Q4P9k/gttzryCwCg6uAI 3tfqx445PmcEF8WvQxsBkEkEAIXQ5rKmw8OafwGAqmw4NMHNrJubK7Rjmy8VcKXG 9+fOweYOp/iABXyEv28sbFWgL5/aKaDhYN6evPELFNbdyt0XVbNUKpunqoAsVGs7 lx9iOuuBM3fJuhRS4WX0n3484VESdWBiawNPp678fCgM0mdfoIp9pWYMSjuJJ4y1 RgAVA/9XOkuNpT7dQigUWsZ4tT2HhM09Exh/dGRZg9ED6l+oPr5VG8FMY9+wKqAM kew/KNbFl3Tl1VsshXlItYoTLwHxxifZAdNRxvdXmGtce+FcnB5coFk4OJNf6PUf gleh9K8TKziHVIwkuDuddukUuSwqhO6OT3ZUgdV2d7P14PmAhLQkSm9oYW4gVXIg Umlpc2UgPGpvaGFuQHJpaXNlLWRhdGEubm8+iF4EExECAB4FAkIQo9cCGwMGCwkI BwMCAxUCAwMWAgECHgECF4AACgkQLwkimGnQPWkwgwCg5dXxX4gNEn80u37EA87I IJ4fvrEAn3rtTEx/tET19rWON1UylvC8Km1WuQENBEIQo9kQBACxdlIJlBmvIQe+ 32kYnUXPKhoaAMXvsxopV10StIPMyVDtRbodwMeHgVg09KPyzgag00W2bKhF13yu pxtBG1upZNFKJx2qCEvM4PJ+vbKvtYhuToBRAR9A/8cB+RmMoGn5PW/32+Fpx403 gdJLzQ/bGZyQzAs7TeYAZupzgGp2awADBgQAjJZhpLRimOfRhwdE6TrMbMiX2T4U YC+k72kALwqKx8Sx6VgKV4bih+4o6dONuxNAUCr+xx9sNK4dppkRmiF3FCN491sf XCk5lgbYPk/IN+MdyOpMva/YR2bcfb4l8vhQYEnPrSvdpDtNLpuBh5knXwYRLClJ WC4RQjKNft2HjkKISQQYEQIACQUCQhCj2QIbDAAKCRAvCSKYadA9acZ8AJ90+lbz S7O2kjiZGvo6ek23qygnOACguPQlw/K8ohbH8zllOhJiwR9iOmk= =Gzz+ -----END PGP PUBLIC KEY BLOCK----- The code itself is at http://www.riise-data.net/snmp1/. When I announce it on comp.lang.lisp, I would like to have the project in shape on common-lisp.net. The rest of this message is just about what I would post there: ================================================================ I have put together an ASDF-system for SNMP. Here is a description of how it works: The Simple Network Management Protocol (SNMP) has, on the bottom, tagged values of types integer, octet string, object identifier, null and sequence. The object identifiers are pointers into an agent's database of values. For example, an object identifier could look like this: (:object-identifier ".1.3.6.1.2.1.1.1.0") This specific object identifier also has the name .iso.org.dod.internet.mgmt.mib-2.system.sysDescr.0 or system.sysDescr.0 for short. There are no conversions between the two forms in this package. On the wire the values are encoded with Basic Encoding Rules (BER). The oid above would be encoded like this: SNMP1> (ber-encode '(:object-identifier ".1.3.6.1.2.1.1.1.0")) => #(6 8 43 6 1 2 1 1 1 0) Basically, the encoding is a tag octet, a length octet, and an octet for each sub-identifier, with a few special cases. An integer would be coded like this: SNMP1> (ber-encode '(:integer 12345)) => #(2 2 48 57) Again a tag, a length and a number of octets representing the value. This also works the other way around: SNMP1> (ber-decode #(2 2 48 57)) => (:INTEGER 12345) A null value is a tag and a length of zero: SNMP1> (ber-encode '(:null)) => #(5 0) We now put two of these values in a sequence. The sequence is encoded into two octets in this case, a tag and the length of the other two values: SNMP1> (ber-encode '(:sequence (:object-identifier ".1.3.6.1.2.1.1.1.0") (:null))) => #(48 12 6 8 43 6 1 2 1 1 1 0 5 0) This form, a sequence of an oid and a value, is in SNMP called a variable binding. The Protocol Transfer Unit (PDU) uses a sequence of these, so we wrap it in another sequence: SNMP1> (ber-encode '(:sequence (:sequence (:object-identifier ".1.3.6.1.2.1.1.1.0") (:null)))) => #(48 14 48 12 6 8 43 6 1 2 1 1 1 0 5 0) This is a GET PDU constructed around the previous varbind list: (:get (:integer 12345) (:integer 0) (:integer 0) (:sequence (:sequence (:object-identifier ".1.3.6.1.2.1.1.1.0") (:null)))) The :get keyword is the same as a sequence, except it has its own tag. The first integer is the request id, whatever we put in there we get back in the response. To finish it up, we create an SNMP message, which is a sequence of version, community and the PDU. Version is 0 for version 1. The community is a kind of password. (:sequence (:integer 0) (:octet-string "public") (:get (:integer 12345) (:integer 0) (:integer 0) (:sequence (:object-identifier ".1.3.6.1.2.1.1.1.0") (:null)))) We encode the complete message, the result is of type (SIMPLE-ARRAY (UNSIGNED-BYTE 8) SNMP1> (ber-encode '(:sequence (:integer 0) (:octet-string "public") (:get (:integer 12345) (:integer 0) (:integer 0) (:sequence (:sequence (:object-identifier ".1.3.6.1.2.1.1.1.0") (:null)))))) => #(48 39 2 1 0 4 6 112 117 98 108 105 99 160 26 2 2 48 57 2 1 0 2 1 0 48 14 48 12 6 8 43 6 1 2 1 1 1 0 5 0) Then we send this message to the agent. The udp-send-and-receive function is a wrapper around sbcl's socket library, the parameters are ip-adress, port, wait-between-retries, retry-count and then the buffer to send. SNMP1> (udp-send-and-receive #(127 0 0 1) 161 1 3 *) => #(48 124 2 1 0 4 6 112 117 98 108 105 99 162 111 2 2 48 57 2 1 0 2 1 0 48 99 48 97 6 8 43 6 1 2 1 1 1 0 4 85 76 105 110 117 120 32 98 114 101 97 100 32 50 46 54 46 49 53 45 50 55 45 97 109 100 54 52 45 103 101 110 101 114 105 99 32 35 49 32 83 77 80 32 80 82 69 69 77 80 84 32 70 114 105 32 68 101 99 32 56 32 49 55 58 53 48 58 53 52 32 85 84 67 32 50 48 48 54 32 120 56 54 95 54 52) When we decode it we see that we have a :response PDU, where the :null in the varbind has been replaced with the value from the agent: SNMP1> (ber-decode *) => (:SEQUENCE (:INTEGER 0) (:OCTET-STRING "public") (:RESPONSE (:INTEGER 12345) (:INTEGER 0) (:INTEGER 0) (:SEQUENCE (:SEQUENCE (:OBJECT-IDENTIFIER ".1.3.6.1.2.1.1.1.0") (:OCTET-STRING "Linux bread 2.6.15-27-amd64-generic #1 SMP PREEMPT Fri Dec 8 17:50:54 UTC 2006 x86_64"))))) We can also do SET, GETNEXT and TRAP PDUs. The encoding and decoding functions should work in all implementations, but the udp-send-and-receive function will have to be coded for implementations other than sbcl. The license is GPLv2 or later. The package is available on common-lisp.net under the name SNMP1. To get it, issue this command cvs -d .... -- Hilsen Johan Ur Riise

2 1

[admin] added snmp1; owned by jriise
by root＠common-lisp.net 02 Jan '07

02 Jan '07

Add successful at 2007.01.01.21.56.

1 0

[admin] Project for miscellaneous extensions?
by Scott L. Burson 02 Jan '07

02 Jan '07

Hi, I have a couple of small language extensions I would like to publish on your site. (One extends the behavior of LET to make it more convenient to use multiple values; the other is a simple, extensible iteration macro (yes, another one)). But before I ask you to set up a project for me, let me ask: do you know of an existing project I could simply add this code to? If one doesn't already exist, then I think we should start a project named (perhaps) "cl-extensions", intended to serve as a catch-all for small extensions of this kind. Anyone would be invited to add their favorites, the only restrictions being: () each extension must live in its own package () merely loading the extension must not alter the behavior of Common Lisp Please let me know whether you think this is a good idea. -- Scott P.S. Thanks for creating Common-Lisp.Net! I am excited to see it growing!

2 4

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

admin January 2007