===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
cl-usocket-0.8.3/backend/clisp.lisp-34- (with-mapped-conditions (nil address)
cl-usocket-0.8.3/backend/clisp.lisp:35: (let ((hostent (posix:resolve-host-ipaddr (host-to-hostname address))))
cl-usocket-0.8.3/backend/clisp.lisp-36- (posix:hostent-name hostent))))
##############################################
cl-usocket-0.8.3/backend/clisp.lisp-294- (let ((sock (rawsock:socket :inet :dgram 0))
cl-usocket-0.8.3/backend/clisp.lisp:295: (lsock_addr (fill-sockaddr_in (make-sockaddr_in)
cl-usocket-0.8.3/backend/clisp.lisp-296- local-host local-port))
cl-usocket-0.8.3/backend/clisp.lisp:297: (rsock_addr (when remote-host
cl-usocket-0.8.3/backend/clisp.lisp-298- (fill-sockaddr_in (make-sockaddr_in)
##############################################
cl-usocket-0.8.3/backend/clisp.lisp-309- (let* ((sock (socket socket))
cl-usocket-0.8.3/backend/clisp.lisp:310: (sockaddr (rawsock:make-sockaddr :inet))
cl-usocket-0.8.3/backend/clisp.lisp-311- (real-length (or length +max-datagram-packet-size+))
##############################################
cl-usocket-0.8.3/backend/clisp.lisp-329- (let* ((sock (socket socket))
cl-usocket-0.8.3/backend/clisp.lisp:330: (sockaddr (when (and host port)
cl-usocket-0.8.3/backend/clisp.lisp-331- (rawsock:make-sockaddr :inet
##############################################
cl-usocket-0.8.3/backend/clisp.lisp-355- (defun get-socket-name (socket function)
cl-usocket-0.8.3/backend/clisp.lisp:356: (let ((sockaddr (rawsock:make-sockaddr :inet (make-sockaddr_in))))
cl-usocket-0.8.3/backend/clisp.lisp-357- (funcall function socket sockaddr)
##############################################
cl-usocket-0.8.3/backend/clisp.lisp-532- (:arguments (sockfd ffi:int)
cl-usocket-0.8.3/backend/clisp.lisp:533: (localaddr (ffi:c-ptr sockaddr) :in-out)
cl-usocket-0.8.3/backend/clisp.lisp-534- (addrlen (ffi:c-ptr socklen_t) :in-out))
##############################################
cl-usocket-0.8.3/backend/clisp.lisp-542- (:arguments (sockfd ffi:int)
cl-usocket-0.8.3/backend/clisp.lisp:543: (peeraddr (ffi:c-ptr sockaddr) :in-out)
cl-usocket-0.8.3/backend/clisp.lisp-544- (addrlen (ffi:c-ptr socklen_t) :in-out))
##############################################
cl-usocket-0.8.3/backend/clisp.lisp-575- (let ((sock (%socket +socket-af-inet+ +socket-sock-dgram+ +socket-ip-proto-udp+))
cl-usocket-0.8.3/backend/clisp.lisp:576: (lsock_addr (fill-sockaddr_in (ffi:allocate-shallow 'sockaddr_in)
cl-usocket-0.8.3/backend/clisp.lisp-577- local-host local-port))
cl-usocket-0.8.3/backend/clisp.lisp:578: (rsock_addr (when remote-host
cl-usocket-0.8.3/backend/clisp.lisp-579- (fill-sockaddr_in (ffi:allocate-shallow 'sockaddr_in)
##############################################
cl-usocket-0.8.3/backend/lispworks.lisp-287-
cl-usocket-0.8.3/backend/lispworks.lisp:288:(defun initialize-dynamic-sockaddr (hostname service protocol &aux (original-hostname hostname))
cl-usocket-0.8.3/backend/lispworks.lisp-289- (declare (ignorable original-hostname))
cl-usocket-0.8.3/backend/lispworks.lisp-290- #+(or lispworks4 lispworks5 lispworks6.0)
cl-usocket-0.8.3/backend/lispworks.lisp:291: (let ((server-addr (fli:allocate-dynamic-foreign-object
cl-usocket-0.8.3/backend/lispworks.lisp-292- :type '(:struct comm::sockaddr_in))))
##############################################
cl-usocket-0.8.3/backend/lispworks.lisp-312- (comm:ipv6-address-p hostname))
cl-usocket-0.8.3/backend/lispworks.lisp:313: (let ((server-addr (fli:allocate-dynamic-foreign-object
cl-usocket-0.8.3/backend/lispworks.lisp-314- :type '(:struct comm::lw-sockaddr))))
##############################################
cl-usocket-0.8.3/backend/lispworks.lisp-617- (declare (type integer socket-fd))
cl-usocket-0.8.3/backend/lispworks.lisp:618: (fli:with-dynamic-foreign-objects ((client-addr (:struct comm::sockaddr_in))
cl-usocket-0.8.3/backend/lispworks.lisp-619- (len :int
##############################################
cl-usocket-0.8.3/backend/openmcl.lisp-245-
cl-usocket-0.8.3/backend/openmcl.lisp:246:(defun get-socket-option-reuseaddr (socket)
cl-usocket-0.8.3/backend/openmcl.lisp-247- (ccl::int-getsockopt (ccl::socket-device socket)
##############################################
cl-usocket-0.8.3/backend/openmcl.lisp-249-
cl-usocket-0.8.3/backend/openmcl.lisp:250:(defun set-socket-option-reuseaddr (socket value)
cl-usocket-0.8.3/backend/openmcl.lisp-251- (ccl::int-setsockopt (ccl::socket-device socket)
##############################################
cl-usocket-0.8.3/option.lisp-200- #+clisp
cl-usocket-0.8.3/option.lisp:201: (socket:socket-options socket :so-reuseaddr (bool->int new-value))
cl-usocket-0.8.3/option.lisp-202- #+clozure
##############################################
cl-usocket-0.8.3/vendor/OpenTransportUDP.lisp-115- ;; prepare dest address
cl-usocket-0.8.3/vendor/OpenTransportUDP.lisp:116: (let ((addr (pref data :tunitdata.addr)))
cl-usocket-0.8.3/vendor/OpenTransportUDP.lisp-117- (declare (dynamic-extent addr))
##############################################
cl-usocket-0.8.3/vendor/OpenTransportUDP.lisp-134- (if (eql err #$kOTNoError)
cl-usocket-0.8.3/vendor/OpenTransportUDP.lisp:135: (let* (;(addr (pref data :tunitdata.addr))
cl-usocket-0.8.3/vendor/OpenTransportUDP.lisp-136- (udata (pref data :tunitdata.udata))
##############################################
cl-usocket-0.8.3/vendor/kqueue.lisp-112-#+ignore
cl-usocket-0.8.3/vendor/kqueue.lisp:113:(defun get-addr (bundle name)
cl-usocket-0.8.3/vendor/kqueue.lisp:114: (let* ((addr (#_CFBundleGetFunctionPointerForName bundle name)))
cl-usocket-0.8.3/vendor/kqueue.lisp-115- (rlet ((buf :long))
##############################################
cl-usocket-0.8.3/vendor/kqueue.lisp-121- (with-cfstrs ((str name))
cl-usocket-0.8.3/vendor/kqueue.lisp:122: (let* ((addr (#_CFBundleGetFunctionPointerForName bundle str)))
cl-usocket-0.8.3/vendor/kqueue.lisp-123- (if (%null-ptr-p addr)