changelog shortlog graph tags branches changeset files revisions annotate raw help

Mercurial > core / lisp/lib/net/pkg.lisp

changeset 123: a4ed30cbe083
parent: 4ba88cac5bc7
child: f85a2fac1ed7
author: ellis <ellis@rwest.io>
date: Sun, 24 Dec 2023 18:19:33 -0500
permissions: -rw-r--r--
description: data testing, added ical and vcard formats 
     1 (defpackage :net/core
     2   (:use :cl :std :sb-bsd-sockets :sb-thread :sb-concurrency)
     3   (:export
     4    ;; err
     5    :net-error
     6    :codec-error
     7    :protocol-error
     8    ;; obj
     9    :connection
    10    :transport
    11    :codec
    12    :protocol
    13    :client
    14    :server
    15    :peer
    16    :proxy
    17    :tunnel))
    18   
    19 (defpackage :net/udp
    20   (:nicknames :udp)
    21   (:use :cl :std :net/core :sb-bsd-sockets)
    22   (:export
    23    :udp-server
    24    :with-udp-client-and-server))
    25 
    26 (defpackage :net/tcp
    27   (:nicknames :tcp)
    28   (:use :cl :std :net/core :sb-bsd-sockets)
    29   (:export
    30    :tcp-server))
    31 
    32 (defpackage :net/codec/punycode
    33   (:nicknames :codec/punycode)
    34   (:use :cl)
    35   (:export
    36    :encode-punycode
    37    :decode-punycode
    38    :encode-domain
    39    :decode-domain))
    40 
    41 (defpackage :net/codec/dns
    42   (:nicknames :codec/dns)
    43   (:use :cl :std :net/core)
    44   (:export
    45    :*record-type-table*
    46    :record-type-id
    47    :id-record-type))
    48 
    49 (defpackage :net/codec/tlv
    50   (:nicknames :codec/tlv)
    51   (:use :cl :std :net/core)
    52   (:export
    53    :tlv :make-tlv))
    54 
    55 (defpackage :net/codec/osc
    56   (:nicknames :codec/osc)
    57   (:use :cl :std :log :net/core)
    58   (:export
    59    :*default-osc-buffer-size*
    60    :make-message
    61    :message
    62    :make-bundle
    63    :bundle
    64    :format-osc-data
    65    :command
    66    :args
    67    :timetag
    68    :elements
    69    :encode-message
    70    :encode-bundle
    71    :decode-message
    72    :decode-bundle
    73    :make-osc-tree
    74    :dp-register
    75    :dp-remove
    76    :dp-match
    77    :dispatch
    78    :get-current-timetag            ; osc-time
    79    :timetag+
    80    :get-unix-time
    81    :unix-time->timetag
    82    :timetag->unix-time
    83    :print-as-double))
    84 
    85 ;; sb-thread::make-condition
    86 (defpackage :net/proto/crew
    87   (:nicknames :net/crew)
    88   (:use :cl :sb-bsd-sockets :std :net/core)
    89   (:import-from #:sb-thread
    90                 #:condition-notify
    91                 #:condition-wait
    92                 ;; #:make-condition-variable
    93                 #:make-mutex ;; make-lock
    94                 #:make-thread
    95                 #:with-mutex)
    96   (:import-from :sb-concurrency
    97                 :make-gate)
    98   (:import-from #:swank-client
    99                 #:slime-close
   100                 #:slime-connect
   101                 #:slime-eval
   102                 #:slime-eval-async
   103                 #:slime-migrate-evals
   104                 #:slime-network-error
   105                 #:slime-pending-evals-p
   106                 #:swank-connection
   107                 #:with-slime-connection)
   108   (:export))
   109 
   110 (defpackage :net/proto/dns
   111   (:nicknames :net/dns)
   112   (:use :cl :sb-bsd-sockets :std :net/core :net/udp :codec/dns)
   113   (:export
   114    :dns-port
   115    :*cloudflare-servers*
   116    :*dnswatch-servers*
   117    :*google-servers*
   118    :*opendns-servers*
   119    :*quad9-servers*
   120    :*dns-servers*
   121    :query
   122    :query-data
   123    :resolve
   124    :hostname
   125    :response-code
   126    :dns-servers-exhausted
   127    :response-code-name
   128    :with-dns-error-handling))
   129 
   130 (defpackage :net/fetch
   131   (:nicknames :fetch)
   132   (:use :cl :std :drakma)
   133   (:export :fetch :download))
   134 
   135 (uiop:define-package :net
   136   (:use-reexport :net/core :net/dns :net/crew :net/tcp :net/udp :codec/dns :codec/osc :codec/tlv))