1 (defpackage :aud 2 (:use :cl :std :dat/midi :sndfile :alsa)) 3 4 (defpackage :aud/music 5 (:use :cl :std :aud)) 6 7 (defpackage :aud/mpd 8 (:use :cl :std :sb-bsd-sockets :net/core :net/util) 9 (:nicknames :mpd) 10 (:export 11 :*default-host* 12 :*default-port* 13 :connect 14 :disconnect 15 :password 16 :with-mpc 17 :disable-output 18 :enable-output 19 :outputs 20 :ensure-mpd 21 :ping 22 :kill 23 :status 24 25 :now-playing 26 :pause 27 :play 28 :stop 29 :previous 30 :next 31 :crossfade 32 33 :add 34 :add-id 35 :move 36 :move-id 37 :swap 38 :swap-id 39 :clear 40 :delete-track 41 :delete-id 42 :save-playlist 43 :load-playlist 44 :rename-playlist 45 :playlist-info 46 :playlist-changes 47 :shuffle 48 :list-playlist 49 :list-playlist-info 50 :add-to-playlist 51 :clear-playlist 52 :delete-from-playlist 53 :move-in-playlist 54 :find-in-current-playlist 55 :search-in-current-playlist 56 57 :update 58 59 :list-all 60 :list-info 61 :list-all-info 62 :find-tracks 63 :search-tracks 64 :list-metadata 65 :count-tracks 66 67 :commands 68 :not-commands 69 :tag-types 70 :url-handlers 71 72 :playlist 73 :track 74 :file 75 :title 76 :artist 77 :albumartist 78 :album 79 :date 80 :genre 81 :composer 82 83 :position-in-playlist 84 :id 85 86 :mpd-error 87 :protocol-mismatch 88 :bad-argument 89 :incorrect-password 90 :not-permitted 91 :unknown-command 92 :not-exist 93 :playlist-size-exceed 94 :already-updating 95 :exist 96 97 :volume 98 :repeat 99 :randomized 100 :playlist-version 101 :playlist-length 102 :xfade 103 :state 104 :audio 105 :bitrate 106 :duration 107 :songid 108 :song 109 :nextsongid 110 :nextsong 111 :elapsed 112 :mixrampdb 113 :consume 114 :single 115 116 :artists 117 :albums 118 :songs 119 :uptime 120 :playtime 121 :db-playtime 122 :db-update)) 123 124 (in-package :aud) 125 (ignore-errors 126 (load-asound) 127 (load-sndfile))