#!/usr/bin/env bash

###############################################################################
# Copyright 2024 Guillaume Archambault
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
#     http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law ou agreed to in writing, software
# distributed under the License est distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OU CONDITIONS OF ANY KIND, either express ou implied.
# See the License for the specific language governing permissions and
# limitations under the License.
###############################################################################

set -eo pipefail; [[ $TRACE ]] && set -x

readonly VERSION="2.0.0"
readonly CONFIG_DIR="${HOME}/.config/sshm"
readonly DEFAULT_CONFIG="${HOME}/.ssh/config"
readonly CURRENT_CONTEXT_FILE="${CONFIG_DIR}/.current_context"

mkdir -p "$CONFIG_DIR"

if [[ -f "$CURRENT_CONTEXT_FILE" ]]; then
  CONFIG_FILE=$(cat "$CURRENT_CONTEXT_FILE")
else
  CONFIG_FILE="$DEFAULT_CONFIG"
fi

ssh_manager_version() {
  echo "ssh_manager $VERSION"
}

ssh_manager_help() {
  echo "Usage: ssh_manager command <command-specific-options>"
  echo
  echo "Commands:"
  cat<<EOF | column -t -s $'\t'
  list                    List SSH hosts and prompt for connection
  connect <number|name>   Connect to SSH host by number or name
  ping <name>             Ping an SSH host to check availability
  view <name>             Check configuration of host
  delete <name>           Delete an SSH host from the configuration
  add                     Add an SSH host to the configuration
  context list            List available contexts
  context use <name>      Use a specific context
  context create <name>   Create a new context
  context delete <name>   Delete an existing context
  help                    Displays help
  version                 Displays the current version
EOF
}

ssh_manager_list() {
  local config_file="$CONFIG_FILE"
  echo -e "\nList of SSH hosts:"
  grep -E '^Host ' "$config_file" | awk '{print $2}' | grep -v '^#' | sort | nl
  
  echo -ne "\nEnter the number or name of the host (or press Enter to exit): "
  read host
  if [[ -z "$host" ]]; then
    echo "No host specified, exiting."
    exit 0
  fi
  
  ssh_manager_connect "$config_file" "$host"
}

ssh_manager_connect() {
  local config_file="$1"
  local host="$2"
  if [[ -z "$host" ]]; then
    echo "Error: please provide a host number or name." 1>&2
    exit 1
  fi

  if [[ "$host" =~ ^[0-9]+$ ]]; then
    local host_name
    host_name=$(grep -E '^Host ' "$config_file" | awk '{print $2}' | grep -v '^#' | sed -n "${host}p")
    if [ -n "$host_name" ]]; then
      ssh -F "$config_file" "$host_name"
    else
      echo "Invalid number." 1>&2
      exit 2
    fi
  else
    ssh -F "$config_file" "$host"
  fi
}

ssh_manager_ping() {
  local config_file="$1"
  local host="$2"
  if [[ -z "$host" ]]; then
    echo "Error: please provide a host name." 1>&2
    exit 1
  fi

  local hostname
  hostname=$(awk '/^Host '"$host"'$/,/^$/' "$config_file" | awk '/HostName/ {print $2}')
  if [[ -z "$hostname" ]]; then
    echo "Error: HostName not found for host $host in SSH configuration." 1>&2
    exit 1
  fi

  if ping -c 1 -W 1 "$hostname" &> /dev/null; then
    echo -e "\033[32m$host ($hostname) is available\033[0m"
  else
    echo -e "\033[31m$host ($hostname) is unavailable\033[0m"
  fi
}

ssh_manager_view() {
  local config_file="$1"
  local host="$2"
  if [[ -z "$host" ]]; then
    echo "Error: please provide a host name." 1>&2
    exit 1
  fi

  local host_info
  host_info=$(awk '/^Host '"$host"'$/,/^$/' "$config_file")
  if [[ -z "$host_info" ]]; then
    echo "Error: host not found in SSH configuration." 1>&2
    exit 1
  fi

  echo -e "\nInformation for host $host:\n"
  echo "$host_info"
}

ssh_manager_delete() {
  local config_file="$1"
  local host="$2"
  if [[ -z "$host" ]]; then
    echo "Error: please provide a host name." 1>&2
    exit 1
  fi

  local tmp_file=$(mktemp)
  sed '/^Host '"$host"'$/,/^$/d' "$config_file" > "$tmp_file"
  mv "$tmp_file" "$config_file"
  echo "Host $host removed from SSH configuration."
}

ssh_manager_add() {
  local config_file="$1"
  local host="$2"
  local hostname
  local user
  local port
  local identity_file

  # Request necessary information
  if [[ -z "$host" ]]; then
    read -p "Enter host name: " host
    if [[ -z "$host" ]]; then
      echo "Error: host name cannot be empty." 1>&2
      exit 1
    fi
  fi

  read -p "Enter HostName (IP address or domain): " hostname
  if [[ -z "$hostname" ]]; then
    echo "Error: HostName cannot be empty." 1>&2
    exit 1
  fi

  read -p "Enter user name (default: $(whoami)): " user
  user=${user:-$(whoami)}

  read -p "Enter SSH port (default: 22): " port
  port=${port:-22}

  read -p "Enter path to SSH key (default: ~/.ssh/id_rsa): " identity_file
  identity_file=${identity_file:-~/.ssh/id_rsa}

  # Add the new configuration to the file
  {
    echo ""
    echo "Host $host"
    echo "    HostName $hostname"
    echo "    User $user"
    if [[ "$port" -ne 22 ]]; then
      echo "    Port $port"
    fi
    if [[ "$identity_file" != ~/.ssh/id_rsa ]]; then
      echo "    IdentityFile $identity_file"
    fi
  } >> "$config_file"

  echo "Configuration for host $host added successfully."
}

ssh_manager_edit() {
  local config_file="$1"
  local host="$2"
  if [[ -z "$host" ]]; then
    echo "Error: please provide a host name." 1>&2
    exit 1
  fi

  local host_info
  host_info=$(awk '/^Host '"$host"'$/,/^$/' "$config_file")
  if [[ -z "$host_info" ]]; then
    echo "Error: host not found in SSH configuration." 1>&2
    exit 1
  fi

  # Extract current values
  local current_hostname=$(echo "$host_info" | awk '/HostName/ {print $2}')
  local current_user=$(echo "$host_info" | awk '/User/ {print $2}')
  local current_port=$(echo "$host_info" | awk '/Port/ {print $2}')
  local current_identity_file=$(echo "$host_info" | awk '/IdentityFile/ {print $2}')

  # Prompt for new values, defaulting to current values if no input is given
  read -p "HostName [$current_hostname]: " new_hostname
  new_hostname=${new_hostname:-$current_hostname}

  read -p "User [$current_user]: " new_user
  new_user=${new_user:-$current_user}

  read -p "Port [${current_port:-22}]: " new_port
  new_port=${new_port:-${current_port:-22}}

  read -p "IdentityFile [${current_identity_file:-~/.ssh/id_rsa}]: " new_identity_file
  new_identity_file=${new_identity_file:-${current_identity_file:-~/.ssh/id_rsa}}

  # Delete the old configuration
  ssh_manager_delete "$config_file" "$host"

  # Add the new configuration
  {
    echo ""
    echo "Host $host"
    echo "    HostName $new_hostname"
    echo "    User $new_user"
    if [[ "$new_port" -ne 22 ]]; then
      echo "    Port $new_port"
    fi
    if [[ "$new_identity_file" != ~/.ssh/id_rsa ]]; then
      echo "    IdentityFile $new_identity_file"
    fi
  } >> "$config_file"

  echo "Configuration for host $host updated successfully."
}

context_list() {
  local current_context
  current_context=$(cat "$CURRENT_CONTEXT_FILE" 2>/dev/null || echo "$DEFAULT_CONFIG")
  
  echo "Available contexts:"
  if [[ "$current_context" == "$DEFAULT_CONFIG" ]]; then
    echo "* default"
  else
    echo "  default"
  fi

  for context in "$CONFIG_DIR"/*; do
    if [[ -f "$context" ]]; then  # Vérifie que c'est bien un fichier existant
      local context_name
      context_name=$(basename "$context")
      if [[ "$CONFIG_DIR/$context_name" == "$current_context" ]]; then
        echo "* $context_name"
      else
        echo "  $context_name"
      fi
    fi
  done
}

context_use() {
  local context="$1"
  if [[ -z "$context" ]]; then
    echo "Error: please provide a context name." 1>&2
    exit 1
  fi

  if [[ "$context" == "default" ]]; then
    echo "$DEFAULT_CONFIG" > "$CURRENT_CONTEXT_FILE"
    echo "Switched to default context."
  elif [[ ! -f "$CONFIG_DIR/$context" ]]; then
    echo "Error: context '$context' does not exist." 1>&2
    exit 1
  else
    echo "$CONFIG_DIR/$context" > "$CURRENT_CONTEXT_FILE"
    echo "Switched to context '$context'."
  fi
}

context_create() {
  local context="$1"
  if [[ -z "$context" ]]; then
    echo "Error: please provide a context name." 1>&2
    exit 1
  fi

  if [[ -f "$CONFIG_DIR/$context" ]]; then
    echo "Error: context '$context' already exists." 1>&2
    exit 1
  fi

  touch "$CONFIG_DIR/$context"
  echo "Context '$context' created."
}

context_delete() {
  local context="$1"
  if [[ -z "$context" ]]; then
    echo "Error: please provide a context name." 1>&2
    exit 1
  fi

  if [[ ! -f "$CONFIG_DIR/$context" ]]; then
    echo "Error: context '$context' does not exist." 1>&2
    exit 1
  fi

  rm -f "$CONFIG_DIR/$context"
  echo "Context '$context' deleted."

  if [[ "$(cat "$CURRENT_CONTEXT_FILE")" == "$CONFIG_DIR/$context" ]]; then
    echo "$DEFAULT_CONFIG" > "$CURRENT_CONTEXT_FILE"
    echo "Switched to default context."
  fi
}

ssh_manager_main() {
  local config_file="$CONFIG_FILE"
  local command="$1"
  shift

  if [[ -z $command ]]; then
    ssh_manager_version
    echo
    ssh_manager_help
    exit 0
  fi

  case "$command" in
    "list")
      ssh_manager_list "$config_file"
      ;;
    "connect")
      ssh_manager_connect "$config_file" "$@"
      ;;
    "ping")
      ssh_manager_ping "$config_file" "$@"
      ;;
    "view")
      ssh_manager_view "$config_file" "$@"
      ;;
    "delete")
      ssh_manager_delete "$config_file" "$@"
      ;;
    "add")
      ssh_manager_add "$config_file" "$@"
      ;;
    "edit")
      ssh_manager_edit "$config_file" "$@"
      ;;
    "context")
      local subcommand="$1"
      shift
      case "$subcommand" in
        "list")
          context_list "$@"
          ;;
        "use")
          context_use "$@"
          ;;
        "create")
          context_create "$@"
          ;;
        "delete")
          context_delete "$@"
          ;;
        *)
          echo "Error: invalid context subcommand." 1>&2
          ssh_manager_help
          exit 3
          ;;
      esac
      ;;
    "version")
      ssh_manager_version
      ;;
    "help")
      ssh_manager_help
      ;;
    *)
      ssh_manager_help 1>&2
      exit 3
  esac
}

if [[ "$0" == "$BASH_SOURCE" ]]; then
  ssh_manager_main "$@"
fi