annotate core/magnatagatune/makro_import_magnatagatune_mbid_cleanupisrc.m @ 0:e9a9cd732c1e tip

first hg version after svn
author wolffd
date Tue, 10 Feb 2015 15:05:51 +0000
parents
children
rev   line source
wolffd@0 1 function out = makro_import_magnatagatune_mbid_cleanupisrc();
wolffd@0 2 load db.mat
wolffd@0 3 clip_info_proper_names
wolffd@0 4 artists_mbid_map = containers.Map('KeyType', 'char', 'ValueType', 'char');
wolffd@0 5 artists_matched = containers.Map('KeyType', 'char', 'ValueType', 'char');
wolffd@0 6 cnt_workd = 0;
wolffd@0 7 for i = 1:size(clip_info_proper,1)
wolffd@0 8 if ~isempty(clip_info_proper{i,12})
wolffd@0 9 continue;
wolffd@0 10 end
wolffd@0 11 % ---
wolffd@0 12 % ok, we have the isrc, lets get the artist id
wolffd@0 13 % ---
wolffd@0 14 % clip_info_proper{i,11} = annots_isrc{i};
wolffd@0 15
wolffd@0 16 if artists_mbid_map.isKey(clip_info_proper{i,4})
wolffd@0 17 % did we already process this artist?
wolffd@0 18 if ~strcmp(artists_mbid_map(clip_info_proper{i,4}), '-');
wolffd@0 19 artist_mbid = artists_mbid_map(clip_info_proper{i,4});
wolffd@0 20 end
wolffd@0 21 else
wolffd@0 22 try
wolffd@0 23 % no we didnt, get the artist mbid via album and artist name
wolffd@0 24 [artist_mbid,artist_found, out] = mb_retrieve_artist_id_from_album_info(clip_info_proper{i,4},clip_info_proper{i,5});
wolffd@0 25
wolffd@0 26 if ~isempty(artist_mbid)
wolffd@0 27 cprint(0,'loaded info for %s: found %s, %s',clip_info_proper{i,4},artist_found,artist_mbid);
wolffd@0 28
wolffd@0 29 artists_matched(clip_info_proper{i,4}) = artist_found;
wolffd@0 30 artists_mbid_map(clip_info_proper{i,4}) = artist_mbid;
wolffd@0 31 cnt_workd = cnt_workd + 1;
wolffd@0 32 else
wolffd@0 33 artists_mbid_map(clip_info_proper{i,4}) = '-';
wolffd@0 34 end
wolffd@0 35 pause(1)
wolffd@0 36 catch
wolffd@0 37 end
wolffd@0 38 end
wolffd@0 39 clip_info_proper{i,12} = artist_mbid;
wolffd@0 40
wolffd@0 41 end
wolffd@0 42
wolffd@0 43 % clip_info_proper_names{11} = 'isrc';
wolffd@0 44 clip_info_proper_names{12} = 'artist_mbid';
wolffd@0 45 clear annots_isrc;
wolffd@0 46 clear artists_mbid_map;
wolffd@0 47 clear i;
wolffd@0 48 clear cnt_workd;
wolffd@0 49 clear out;
wolffd@0 50 save db_new.mat