# 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
}
