;;; -*- Mode: Lisp -*-

;;; Common Lisp Interface for Net-SNMP (cl-net-snmp)

;;; Author: Chun Tian (binghe) <binghe.lisp@gmail.com>
;;;         NetEase.com, Inc. (http://corp.netease.com)

;;; This package only support:
;;;   * Version: SNMPv1, SNMPv2c
;;;   * PDU Type: GET
;;;   * Just print the result to stdout...

;;; I use the CFFI for portable CL support, see http://common-lisp.net/project/cffi/
;;; Known work on: SBCL and CLISP

;;; Sample usage:

(defun test ()
  (let ((s (make-instance 'snmp:snmp-session
			  :peername "localhost"
			  :community "public"
			  :version snmp:+snmp-version-2c+)))
    (snmp:snmp-msg-get s "sysDescr.0")
    (snmp:snmp-msg-get "localhost" ".1.3.6.1.2.1.1.1.0")))
