Esse script funciona bem para mim e para a maioria dos meus clientes, mas para alguns clientes o tempo limite é excedido com o erro -1712; Não faço ideia do porquê. Eu tentei aumentar o tempo limite, mas não faz diferença.
O arquivo /tmp/itunes_model.txt
não é criado, portanto, parece não estar fazendo nada.
Como posso depurar / corrigir isso?
with timeout of 1200 seconds
tell application "iTunes"
if (count of every file track of library playlist 1) is equal to 0 then
set thePath to (POSIX file "/tmp/itunes_model.txt")
set fileref to open for access (thePath) with write permission
set eof fileref to 0
close access fileref
return
end if
tell every file track of library playlist 1
script performancekludge
property tracknames : its name
property locs : its location
property persistids : its persistent ID
end script
end tell
end tell
set thePath to (POSIX file "/tmp/itunes_model.txt")
set fileref to open for access (thePath) with write permission
set eof fileref to 0
tell performancekludge
repeat with i from 1 to length of its tracknames
try
set nextline to item i of its tracknames ¬
& "::" & POSIX path of item i of its locs ¬
& "::" & item i of its persistids
write nextline & linefeed as «class utf8» to fileref
end try
end repeat
end tell
close access fileref
end timeout
Foi adicionada uma tentativa de captura do erro, conforme solicitado, e a nova execução; a primeira vez que foi executada, realmente funcionou, o que é interessante, mas a segunda vez que falhou novamente, sem obter mais informações úteis.