#!/bin/sh
#
# 2011 Nico Schottelius (nico-cdist at schottelius.org)
#
# This file is part of cdist.
#
# cdist 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.
#
# cdist 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 cdist. If not, see <http://www.gnu.org/licenses/>.
#
# 
# For each created object check the explorers and run them if needed.
#

. cdist-config
[ $# -eq 2 ] || __cdist_usage "<target host> <object_base_dir>"
set -eux

__cdist_target_host="$1"; shift
__cdist_object_base_dir="$1"; shift

object_listing="$__cdist_tmp_dir/objects"
type_listing_all="$__cdist_tmp_dir/types_all"
type_listing="$__cdist_tmp_dir/types"

# Get listing of objects
__cdist_object_list "$__cdist_object_base_dir" > "$object_listing"

# Get listing of types used
while read object; do
   echo "$(__cdist_type_from_object "$object")" >> "$type_listing_all"
done < "$object_listing"
sort "$type_listing_all" | uniq > "$type_listing"

# Create pseudo array to avoid issues with ssh
tc=0
while read type; do
   eval type_$tc=\"\$type\"
   tc=$((tc+1))
done < "$type_listing"

# For every type that has explorers, Transfer the explorers
i=0
while [ "$i" -lt "$tc" ]; do
   eval cur_type=\"\$type_$i\"

   src_dir="$(__cdist_type_explorer_dir "$cur_type")"
   dst_dir="$(__cdist_remote_type_explorer_dir "$cur_type")"

   if [ -d "$src_dir" ]; then
      cdist-dir push "$__cdist_target_host" "$src_dir" "$dst_dir"
   fi
   i=$((i+1))
done

################################################################################
# Explorer execution per object
#
# need to create pseudo array, as ssh in cdist-explorer-run will destroy while-read loops
while read object; do
   set -- "$@" "$object"
done < "$object_listing"

while [ $# -gt 0 ]; do
   object="$1"; shift
   object_id="$(__cdist_object_id_from_object "$object")"
   type="$(__cdist_type_from_object "$object")"

   # Always copy object parameters (looks weired if done only for the ones with explorer)
   # Really always?

   # Check if type of object has >= 1 explorer
   has_explorer="$(__cdist_type_has_explorer "$type")"

   # If so, run explorers on remote side
   if [ "$has_explorer" ]; then
      cdist-run-remote "$__cdist_target_host"            \
         cdist-remote-explorer-run                       \
         "$__cdist_name_var_type_explorer"               \
         "$(__cdist_remote_type_explorer_dir "$type")"   \
         "$(__cdist_remote_object_type_explorer_dir "$object")"
   
      # Copy back results
      cdist-dir pull "$__cdist_target_host"                       \
         "$(__cdist_remote_object_type_explorer_dir "$object")"   \
         "$(__cdist_object_type_explorer_dir "$object")"
   fi
done