stats - merge licences and pkgflags into a single module

 * allow configuration of upload host/port
 * de-duplicate functions / split out git info into function
 * use an array for data / reduce var usage

Author: joolswills

scriptmodules/admin/licences.sh

@@ -0,0 +1,71 @@
+#!/usr/bin/env bash
+
+# This file is part of The RetroPie Project
+#
+# The RetroPie Project is the legal property of its developers, whose names are
+# too numerous to list here. Please refer to the COPYRIGHT.md file distributed with this source.
+#
+# See the LICENSE.md file at the top-level directory of this distribution and
+# at https://raw.githubusercontent.com/RetroPie/RetroPie-Setup/master/LICENSE.md
+#
+
+rp_module_id="stats"
+rp_module_desc="Generates statistics about packages"
+rp_module_section=""
+
+function _dest_stats() {
+    local dest="$__tmpdir/stats"
+    mkUserDir "$dest"
+    echo "$dest"
+}
+
+function _get_commit_data_stats() {
+    local hash=$(git -C "$scriptdir" log -1 --format=%h)
+    local date=$(git -C "$scriptdir" log -1 --format=%cd --date=iso-strict)
+    local branch=$(git -C "$scriptdir" rev-parse --abbrev-ref HEAD)
+    echo "$hash;$date;$branch;"
+}
+
+function licences_stats() {
+    local data=()
+
+    local dest="$(_dest_stats)/licences"
+    mkUserDir "$dest"
+
+    local idx
+    for idx in ${__mod_idx[@]}; do
+        data+=("${__mod_section[$idx]};${__mod_id[$idx]};${__mod_desc[$idx]};${__mod_licence[$idx]};")
+    done
+    printf "%s\n" "${data[@]}" >"$dest/packages.csv"
+
+    echo "$(_get_commit_data_stats)" > "$dest/commit.csv"
+
+    cp -v "$md_data/licences/"* "$dest/"
+    chown -R $user:$user "$dest"
+}
+
+function packages_stats() {
+    local data=()
+
+    local dest="$(_dest_stats)/pkgflags"
+    mkUserDir "$dest"
+
+    local idx
+    for idx in ${__mod_idx[@]}; do
+        data+=("${__mod_section[$idx]};${__mod_id[$idx]};${__mod_desc[$idx]};${__mod_flags[$idx]};")
+    done
+    printf "%s\n" "${data[@]}" >"$dest/packages.csv"
+
+    echo "$(_get_commit_data_stats)" > "$dest/commit.csv"
+
+    cp -v "$md_data/pkgflags/"* "$dest/"
+    chown -R $user:$user "$dest"
+}
+
+function upload_stats() {
+    local host="$__upload_host"
+    [[ -z "$host" ]] && host="$__binary_host"
+    local port="$__upload_port"
+    [[ -z "$port" ]] && port=22
+    rsync -av --progress --delay-updates -e "ssh -p $port" "$__tmpdir/stats/" "retropie@$host:stats/"
+}