hans/audio-library-manager
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

opus log file

Browse Source
This commit is contained in:
Hans Dijkema
2026-06-09 23:24:27 +02:00
parent 5263ebee71
commit c3e48285b4
2 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
flac2opus-manager.rkt
+2 -2
View File
@@ -17,7 +17,7 @@
(provide manage-flac2opus-tree
summary->lines)
(define manager-admin-relpaths '(".music-info.db" ".flac-48khz-manager.ini" ".flac-48khz-manager.log"))
(define manager-admin-relpaths '(".music-info.db" ".flac-48khz-manager.ini" ".flac2opus-manager.log"))
(define (quick-file-info path)
(list (cons 'size (file-size path))
@@ -182,7 +182,7 @@
(raise-argument-error 'manage-flac2opus-tree "existing source directory" source-directory))
(make-directory* target-dir)
(define config (load-manager-config source-dir))
(setup-logging! (manager-config-log-file config) (manager-config-display-log? config))
(setup-logging! (manager-config-log-file-opus config) (manager-config-display-log? config))
(info-alm "flac2opus source directory: ~a" source-dir)
(info-alm "flac2opus target directory: ~a" target-dir)
(info-alm "state file: ~a" (manager-config-state-file config))
private/config.rkt
+4 -2
View File
@@ -10,6 +10,7 @@
manager-config-ini-file
manager-config-state-file
manager-config-log-file
manager-config-log-file-opus
manager-config-max-sample-rate
manager-config-hash-algorithm
manager-config-change-detection
@@ -33,7 +34,7 @@
ensure-default-config!)
(struct manager-config
(base-dir ini-file state-file log-file max-sample-rate hash-algorithm change-detection dry-run?
(base-dir ini-file state-file log-file log-file-opus max-sample-rate hash-algorithm change-detection dry-run?
display-log? compression-level mail-enabled? mail-send-on-success?
mail-send-on-error? mail-host mail-port mail-tls? mail-username
mail-password mail-from mail-to mail-cc mail-bcc mail-subject-prefix)
@@ -86,7 +87,8 @@
(ensure-default-config! ini-file)
(define ini (file->ini ini-file))
(define log-file (resolve-log-file base-dir (ini-get ini 'manager 'log-file ".flac-48khz-manager.log")))
(manager-config base-dir ini-file (default-state base-dir) log-file
(define log-file-opus (resolve-log-file base-dir (ini-get ini 'opus-manager 'log-file ".flac2opus-manager.log")))
(manager-config base-dir ini-file (default-state base-dir) log-file log-file-opus
(int-value (ini-get ini 'manager 'max-sample-rate 48000) 48000)
(string-downcase (string-value (ini-get ini 'manager 'hash-algorithm "sha256") "sha256"))
(string-downcase (string-value (ini-get ini 'manager 'change-detection "flac-taglib") "flac-taglib"))