#!/usr/bin/env bash
set -eo pipefail; [[ $DOKKU_TRACE ]] && set -x

setglobal MOVES = ''(ABLE ABNORMA AGAIN AIREXPL ANG ANGER ASAIL ATTACK AURORA AWL BAN BAND BARE BEAT BEATED BELLY BIND BITE BLOC BLOOD BODY BOOK BREATH BUMP CAST CHAM CLAMP CLAP CLAW CLEAR CLI CLIP CLOUD CONTRO CONVY COOLHIT CRASH CRY CUT DESCRI D-FIGHT DIG DITCH DIV DOZ DRE DUL DU-PIN DYE EARTH EDU EG-BOMB EGG ELEGY ELE-HIT EMBODY EMPLI ENGL ERUPT EVENS EXPLOR EYES FALL FAST F-CAR F-DANCE FEARS F-FIGHT FIGHT FIR FIRE FIREHIT FLAME FLAP FLASH FLEW FORCE FRA FREEZE FROG G-BIRD GENKISS GIFT G-KISS G-MOUSE GRADE GROW HAMMER HARD HAT HATE H-BOMB HELL-R HEMP HINT HIT HU HUNT HYPNOSI INHA IRO IRONBAR IR-WING J-GUN KEE KICK KNIF KNIFE KNOCK LEVEL LIGH LIGHHIT LIGHT LIVE L-WALL MAD MAJUS MEL MELO MESS MILK MIMI MISS MIXING MOVE MUD NI-BED NOISY NOONLI NULL N-WAVE PAT PEACE PIN PLAN PLANE POIS POL POWDE POWE POWER PRIZE PROTECT PROUD RAGE RECOR REFLAC REFREC REGR RELIV RENEW R-FIGHT RING RKICK ROCK ROUND RUS RUSH SAND SAW SCISSOR SCRA SCRIPT SEEN SERVER SHADOW SHELL SHINE SHO SIGHT SIN SMALL SMELT SMOK SNAKE SNO SNOW SOU SO-WAVE SPAR SPEC SPID S-PIN SPRA STAM STARE STEA STONE STORM STRU STRUG STUDEN SUBS SUCID SUN-LIG SUNRIS SUPLY S-WAVE TAILS TANGL TASTE TELLI THANK TONKICK TOOTH TORL TRAIN TRIKICK TUNGE VOLT WA-GUN WATCH WAVE W-BOMB WFALL WFING WHIP WHIRL WIND WOLF WOOD WOR YUJA)
setglobal NAMES = ''(SEED GRASS FLOWE SHAD CABR SNAKE GOLD COW GUIKI PEDAL DELAN B-FLY BIDE KEYU FORK LAP PIGE PIJIA CAML LAT BIRD BABOO VIV ABOKE PIKAQ RYE SAN BREAD LIDEL LIDE PIP PIKEX ROK JUGEN PUD BUDE ZHIB GELU GRAS FLOW LAFUL ATH BALA CORN MOLUF DESP DAKED MIMI BOLUX KODA GELUD MONK SUMOY GEDI WENDI NILEM NILE NILEC KEZI YONGL HUDE WANLI GELI GUAIL MADAQ WUCI WUCI MUJEF JELLY SICIB GELU NELUO BOLI JIALE YED YEDE CLO SCARE AOCO DEDE DEDEI BAWU JIUG BADEB BADEB HOLE BALUX GES FANT QUAR YIHE SWAB SLIPP CLU DEPOS BILIY YUANO SOME NO YELA EMPT ZECUN XIAHE BOLEL DEJI MACID XIHON XITO LUCK MENJI GELU DECI XIDE DASAJ DONGN RICUL MINXI BALIY ZENDA LUZEL HELE5 0FENB KAIL JIAND CARP JINDE LAPU MUDE YIFU LINLI SANDI HUSI JINC OUMU OUMUX CAP KUIZA PUD TIAO FRMAN CLAU SPARK DRAGO BOLIU GUAIL MIYOU MIY QIAOK BEIL MUKEI RIDED MADAM BAGEP CROC ALIGE OUDAL OUD DADA HEHE YEDEA NUXI NUXIN ROUY ALIAD STICK QIANG LAAND PIQI PI PUPI DEKE DEKEJ NADI NADIO MALI PEA ELECT FLOWE MAL MALI HUSHU NILEE YUZI POPOZ DUZI HEBA XIAN SHAN YEYEA WUY LUO KEFE HULA CROW YADEH MOW ANNAN SUONI KYLI HULU HUDEL YEHE GULAE YEHE BLU GELAN BOAT NIP POIT HELAK XINL BEAR LINB MAGEH MAGEJ WULI YIDE RIVE FISH AOGU DELIE MANTE KONMU DELU HELU HUAN HUMA DONGF JINCA HEDE DEFU LIBY JIAPA MEJI HELE BUHU MILK HABI THUN GARD DON YANGQ SANAQ BANQ LUJ PHIX SIEI EGG)

proc random_number {
  [[ -n "$1" ]] && setglobal RANGE = $1
  if [[ -n "$RANGE" ]] {
    setglobal number = $RANDOM
    let "number %= $RANGE"
  } else {
    setglobal number = $RANDOM
  }
  echo $number
}

proc random_name {
 setglobal NUM1 = $[random_number $(#MOVES[@])]
 setglobal NUM2 = $[random_number $(#MOVES[@])]
 setglobal NUM3 = $[random_number $(#NAMES[@])]

 setglobal UPPER_APPNAME = ""$(MOVES[${NUM1}])-$(MOVES[${NUM2}])-$(NAMES[${NUM3}])""

 [[ "$BASH_VERSION" =~ 4.* ]] && setglobal lower_appname = $(UPPER_APPNAME,,)
 [[ -z "$lower_appname" ]] && setglobal lower_appname = $[echo $UPPER_APPNAME | tr '[:upper:]' '[:lower:]]
 echo $lower_appname
}

proc client_help_msg {
  echo "==> Configure the DOKKU_HOST environment variable or run $0 from a repository with a git remote named dokku"
  echo "--> i.e. git remote add dokku dokku@<dokku-host>:<app-name>"
  exit 20 # exit with specific status. only used in units tests for now
}

proc is_git_repo {
    git rev-parse &>/dev/null
}

proc has_dokku_remote {
    git remote show | grep dokku
}

if [[ -z $DOKKU_HOST ]] {
  if [[ -d .git ]] || git rev-parse --git-dir > /dev/null !2 > !1 {
    setglobal DOKKU_HOST = $[git remote -v !2 >/dev/null | grep -Ei "^dokku" | head -n 1 | cut -f1 -d' ' | cut -f2 -d '@' | cut -f1 -d':' !2 >/dev/null || true]
  } else {
    client_help_msg
  }
}

export DOKKU_PORT=$(DOKKU_PORT:=22)

if [[ ! -z $DOKKU_HOST ]] {
  proc _dokku {
    setglobal appname = ''""
    if [[ -d .git ]] || git rev-parse --git-dir > /dev/null !2 > !1 {
      set +e
      setglobal appname = $[git remote -v !2 >/dev/null | grep -Ei "dokku@$DOKKU_HOST" | head -n 1 | cut -f2 -d'@' | cut -f1 -d' ' | cut -f2 -d':' !2 >/dev/null]
      set -e
    } else {
      echo "This is not a git repository"
    }

    match $1 {
      with apps:create
        if [[ -z "$2" ]] {
          setglobal appname = $[random_name]
          setglobal counter = '0'
          while ssh -p $DOKKU_PORT "dokku@$DOKKU_HOST" apps !2 >/dev/null| grep -q $appname {
            if [[ $counter -ge 100 ]] {
              echo "Error: could not reasonably generate a new app name. try cleaning up some apps..."
              ssh -p $DOKKU_PORT "dokku@$DOKKU_HOST" apps
              exit 1
            } else {
              setglobal appname = $[random_name]
              setglobal counter = $shExpr('counter+1')
            }
          }
        } else {
          setglobal appname = $2
        }
        if git remote add dokku "dokku@$DOKKU_HOST:$appname" {
          echo "-----> Dokku remote added at $DOKKU_HOST"
          echo "-----> Application name is $appname"
        } else {
          echo "!      Dokku remote not added! Do you already have a dokku remote?"
          return
        }
        
    with apps:destroy
      is_git_repo && has_dokku_remote && git remote remove dokku
      
    }

    [[ -n "$@" ]] && [[ -n "$appname" ]] && setglobal app_arg = ""--app $appname""
    # echo "ssh -o LogLevel=QUIET -p $DOKKU_PORT -t dokku@$DOKKU_HOST -- $app_arg $@"
    # shellcheck disable=SC2068,SC2086
    ssh -o LogLevel=QUIET -p $DOKKU_PORT -t dokku@$DOKKU_HOST -- $app_arg $ifsjoin(Argv)
  }

  if [[ "$0" == "dokku" ]] || [[ "$0" == *dokku_client.sh ]] || [[ "$0" == $(which dokku) ]] {
    _dokku @Argv
    exit $?
  }
} else {
  client_help_msg
}