21 lines
474 B
Awk
21 lines
474 B
Awk
BEGIN {
|
|
OFS="\t"
|
|
local_artists[0] = 0
|
|
delete local_artists[0]
|
|
if (file_local_artists) {
|
|
while ((getline < file_local_artists) == 1)
|
|
local_artists[$1] = 1
|
|
close(file_local_artists)
|
|
}
|
|
}
|
|
{
|
|
gsub("&", "\\\\&")
|
|
name = $2 == "Group" ? format_group : format_person
|
|
l = local_artists[$1] ? format_local : ""
|
|
if ($4)
|
|
name = name " " format_disambiguation
|
|
sub("<<disambiguation>>", $4, name)
|
|
sub("<<name>>", $3, name)
|
|
print l, name, "0", $1
|
|
}
|