2024-11-11 18:34:27 -08:00
|
|
|
(uiop:define-package #:sync-music/libcue-ffi
|
|
|
|
(:use #:cffi)
|
|
|
|
(:export #+unix #:+stderr+
|
|
|
|
#+unix #:+stderr-fileno+
|
|
|
|
#:+errno+
|
|
|
|
#:disc-mode
|
|
|
|
#:track-mode
|
|
|
|
#:track-sub-mode
|
|
|
|
#:track-flag
|
|
|
|
#:data-type
|
|
|
|
#:pti
|
|
|
|
#:rem-type
|
|
|
|
#:fopen
|
|
|
|
#:fclose
|
|
|
|
#+unix #:freopen
|
|
|
|
#+unix #:dup
|
|
|
|
#:cue-parse-file
|
|
|
|
#:cue-parse-string
|
|
|
|
#:cd-delete
|
|
|
|
#:%cd-get-mode
|
|
|
|
#:cd-get-cd-text-file
|
|
|
|
#:cd-get-track-count
|
|
|
|
#:cd-get-cd-text
|
|
|
|
#:track-get-cd-text
|
|
|
|
#:cd-text-get
|
|
|
|
#:cd-get-rem
|
|
|
|
#:track-get-rem
|
|
|
|
#:rem-get
|
|
|
|
#:cd-get-track
|
|
|
|
#:track-get-file-name
|
|
|
|
#:track-get-start
|
|
|
|
#:track-get-length
|
|
|
|
#:%track-get-mode
|
|
|
|
#:%track-get-sub-mode
|
|
|
|
#:%track-flag-set-p
|
|
|
|
#:track-get-zero-pre
|
|
|
|
#:track-get-zero-post
|
|
|
|
#:track-get-isrc
|
|
|
|
#:track-get-index))
|
|
|
|
|
|
|
|
(uiop:define-package #:sync-music/libcue
|
|
|
|
(:use #:cl #:alexandria #:serapeum #:sync-music/libcue-ffi)
|
|
|
|
(:export #:with-cue
|
|
|
|
#:get-rem
|
|
|
|
#:get-cd-text
|
|
|
|
#:cd-get-mode
|
|
|
|
#:track-get-mode
|
|
|
|
#:track-get-sub-mode
|
|
|
|
#:track-flag-set-p
|
|
|
|
#:cd-get-cd-text-file
|
|
|
|
#:cd-get-track-count
|
|
|
|
#:cd-get-cd-text
|
|
|
|
#:track-get-cd-text
|
|
|
|
#:cd-get-rem
|
|
|
|
#:track-get-rem
|
|
|
|
#:cd-get-track
|
|
|
|
#:track-get-file-name
|
|
|
|
#:track-get-start
|
|
|
|
#:track-get-length
|
|
|
|
#:track-get-zero-pre
|
|
|
|
#:track-get-zero-post
|
|
|
|
#:track-get-isrc
|
|
|
|
#:track-get-index
|
|
|
|
#:ensure-nonempty))
|
|
|
|
|
2024-10-27 23:44:59 -07:00
|
|
|
(uiop:define-package #:sync-music
|
|
|
|
(:use #:cl #:alexandria #:serapeum)
|
2024-11-11 18:34:27 -08:00
|
|
|
(:local-nicknames (#:p-utils #:org.shirakumo.pathname-utils)
|
|
|
|
(#:libcue #:sync-music/libcue))
|
2024-10-27 23:44:59 -07:00
|
|
|
(:export #:*worker-threads*
|
|
|
|
#:*opus-bitrate*
|
|
|
|
#:*max-depth*
|
|
|
|
#:*cleanupp*
|
|
|
|
#:*ignore-toplevel-p*
|
2024-11-07 15:19:59 -08:00
|
|
|
#:*dumb-cue-copy-p*
|
2024-10-27 23:44:59 -07:00
|
|
|
#:*general-extensions*
|
|
|
|
#:*meta-extensions*
|
|
|
|
#:*action-perform-output*
|
|
|
|
#:action-describe
|
|
|
|
#:sync-music))
|