1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
|
# caching: ZOMG audioscrobbler cache functions
# Copyright (C) 2005-2013 Clint Adams
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 3 of the License, or
# (at your option) any later version.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
audioscrobbler_cache() {
local site="$1"
local poststr="$2"
local LOCK
status_msg "Caching submission for $site."
log_msg "Caching to $site $poststr"
lockfile-create $zomgdatadir/cache.$site
lockfile-touch $zomgdatadir/cache.$site &
LOCK="$!"
print -r "${poststr}" >> $zomgdatadir/cache.$site
kill "${LOCK}"
lockfile-remove $zomgdatadir/cache.$site
}
audioscrobbler_flushcache() {
local site="$1"
local username="$2" #unused
local sid="$3"
local i=0
local query LOCK
local authinfo="&s=${sid}"
submit[$site]=1
lockfile-create $zomgdatadir/cache.$site
lockfile-touch $zomgdatadir/cache.$site &
LOCK="$!"
while read line
do
query+=${line//\[0\]/[$i]}
if (( i==49 ));
then
if audioscrobbler_submit $site "$authinfo$query" "$username"; then
: here, purge successful submissions
else
kill "${LOCK}"
lockfile-remove $zomgdatadir/cache.$site
return 1
fi
query=""
i=0
else
(( i++ ))
fi
done < $zomgdatadir/cache.$site
kill "${LOCK}"
lockfile-remove $zomgdatadir/cache.$site
(( i == 0 )) || { audioscrobbler_submit $site "$authinfo$query" "$username" || return 1 }
return
}
|
