class REMOVE_UNKNOWN_ALBUM_PICTURES_TASK
Remove unknown album pictures task
note
description: "Remove unknown album pictures task"
author: "Finnian Reilly"
copyright: "Copyright (c) 2001-2022 Finnian Reilly"
contact: "finnian at eiffel hyphen loop dot com"
license: "MIT license (See: en.wikipedia.org/wiki/MIT_License)"
date: "2022-11-15 19:56:03 GMT (Tuesday 15th November 2022)"
revision: "13"
class
REMOVE_UNKNOWN_ALBUM_PICTURES_TASK
inherit
ID3_TASK
DATABASE_UPDATE_TASK
TL_SHARED_MUSICBRAINZ_ENUM
create
make
feature -- Basic operations
apply
do
Database.for_all_songs (
predicate (agent song_has_unknown_artist_and_album), agent remove_unknown_album_picture
)
Database.store_all
end
feature {NONE} -- Implementation
remove_unknown_album_picture (song: RBOX_SONG; relative_song_path: FILE_PATH; id3_info: TL_MUSICBRAINZ_MPEG_FILE)
do
if id3_info.tag.has_picture and then id3_info.tag.picture.description ~ Picture_artist then
id3_info.tag.remove_picture
id3_info.remove_mb_field (Musicbrainz.album_id)
id3_info.save
song.set_album_picture_checksum (0)
lio.put_path_field ("Removed album picture %S", relative_song_path)
lio.put_new_line
end
end
end