You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

1586 lines
53 KiB

  1. #!/bin/bash
  2. . /etc/shlib
  3. include common
  4. include parse
  5. include cmdline
  6. include config
  7. [[ "${BASH_SOURCE[0]}" != "${0}" ]] && SOURCED=true
  8. version=0.1
  9. desc='Manage 0k related installs'
  10. help=""
  11. ##
  12. ## Functions
  13. ##
  14. is-port-open() {
  15. local host="$1" port="$2" timeout=5
  16. start="$SECONDS"
  17. debug "Testing if $host's port $2 is open ..."
  18. while true; do
  19. timeout 1 bash -c "</dev/tcp/${host}/${port}" >/dev/null 2>&1 && break
  20. sleep 0.2
  21. if [ "$((SECONDS - start))" -gt "$timeout" ]; then
  22. return 1
  23. fi
  24. done
  25. debug " .. $host's port $2 is open."
  26. return 0
  27. }
  28. resolve() {
  29. local ent hostname="$1"
  30. debug "Resolving $1 ..."
  31. if ent=$(getent ahosts "$hostname"); then
  32. ent=$(echo "$ent" | egrep ^"[0-9]+.[0-9]+.[0-9]+.[0-9]+\s+" | \
  33. head -n 1 | awk '{ print $1 }')
  34. debug " .. resolved $1 to $ent."
  35. echo "$ent"
  36. else
  37. debug " .. couldn't resolve $1."
  38. return 1
  39. fi
  40. }
  41. set_errlvl() { return "${1:-1}"; }
  42. export master_pid=$$
  43. ssh:open() {
  44. local hostname ssh_cmd ssh_options
  45. ssh_cmd=(ssh)
  46. ssh_options=()
  47. while [ "$#" != 0 ]; do
  48. case "$1" in
  49. "--stdin-password")
  50. ssh_cmd=(sshpass "${ssh_cmd[@]}")
  51. ;;
  52. -o)
  53. ssh_options+=("$1" "$2")
  54. shift
  55. ;;
  56. *)
  57. [ -z "$hostname" ] && hostname="$1" || {
  58. err "Surnumerous positional argument '$1'. Expecting only hostname."
  59. return 1
  60. }
  61. ;;
  62. esac
  63. shift
  64. done
  65. full_cmd=(
  66. "${ssh_cmd[@]}"
  67. -o ControlPath=/tmp/ssh-control-master-${master_pid}-$hostname \
  68. -o ControlMaster=auto -o ControlPersist=900 \
  69. -o ConnectTimeout=5 -o StrictHostKeyChecking=no \
  70. "${ssh_options[@]}" \
  71. "$hostname" "$@" -- true)
  72. "${full_cmd[@]}" >/dev/null 2>&1 || {
  73. err "Failed: ${full_cmd[*]}"
  74. return 1
  75. }
  76. trap_add EXIT,INT 'ssh:quit "$hostname"'
  77. }
  78. ssh:rsync() {
  79. local src="$1" dst="$2"
  80. hostname=${src%%:*}
  81. hostname=${hostname#*@}
  82. local rsync_ssh_options=(
  83. -o ControlPath="/tmp/ssh-control-master-${master_pid}-$hostname"
  84. -o ControlMaster=auto
  85. -o ControlPersist=900
  86. -o ConnectTimeout=10
  87. -o StrictHostKeyChecking=no
  88. )
  89. if ! ssh:run "root@$hostname" -- type -p rsync </dev/null >/dev/null; then
  90. info "No 'rsync' available on '$hostname'. Requesting installation..."
  91. ssh:run "root@$hostname" -- apt-get install rsync -y || {
  92. err "Installation of 'rsync' failed on '$hostname'"
  93. return 1
  94. }
  95. fi
  96. local cmd=(
  97. rsync -e "ssh ${rsync_ssh_options[*]}"
  98. -azvArH --delete --delete-excluded
  99. --partial --partial-dir .rsync-partial
  100. "$src" "$dst"
  101. )
  102. "${cmd[@]}"
  103. }
  104. ssh:open-try() {
  105. local opts hostnames
  106. opts=()
  107. hostnames=()
  108. while [ "$#" != 0 ]; do
  109. case "$1" in
  110. -o)
  111. opts+=("$1" "$2")
  112. shift
  113. ;;
  114. *)
  115. hostnames+=("$1")
  116. ;;
  117. esac
  118. shift
  119. done
  120. password=''
  121. for host in "${hostnames[@]}"; do
  122. debug "Trying $host with publickey."
  123. ssh:open -o PreferredAuthentications=publickey \
  124. "${opts[@]}" \
  125. "$host" >/dev/null 2>&1 && {
  126. echo "$host"$'\n'"$password"$'\n'
  127. return 0
  128. }
  129. debug " .. failed connecting to $host with publickey."
  130. done
  131. local times=0 password
  132. while [ "$((++times))" -le 3 ]; do
  133. read -sp "$HOST's password: " password
  134. errlvl="$?"
  135. echo >&2
  136. if [ "$errlvl" -gt 0 ]; then
  137. exit 1
  138. fi
  139. for host in "${hostnames[@]}"; do
  140. debug "Trying $host with password ($times/3)"
  141. echo "$password" | ssh:open -o PreferredAuthentications=password \
  142. --stdin-password \
  143. "${opts[@]}" \
  144. "$host" >/dev/null 2>&1 && {
  145. echo "$host"$'\n'"$password"$'\n'
  146. return 0
  147. }
  148. debug " .. failed connecting to $host with password."
  149. done
  150. err "login failed. Try again... ($((times+1))/3)"
  151. done
  152. return 1
  153. }
  154. ssh:run() {
  155. local hostname="$1" ssh_options cmd
  156. shift
  157. ssh_options=()
  158. cmd=()
  159. while [ "$#" != 0 ]; do
  160. case "$1" in
  161. "--")
  162. shift
  163. cmd+=("$@")
  164. break
  165. ;;
  166. *)
  167. ssh_options+=("$1")
  168. ;;
  169. esac
  170. shift
  171. done
  172. ## XXXvlab: keeping in case we need some debug
  173. # debug "$DARKCYAN$hostname$NORMAL $WHITE\$$NORMAL" "$@"
  174. # debug "Running cmd: ${cmd[*]}"
  175. # for arg in "${cmd[@]}"; do
  176. # debug "$arg"
  177. # done
  178. {
  179. {
  180. ssh -o ControlPath=/tmp/ssh-control-master-${master_pid}-$hostname \
  181. -o ControlMaster=auto -o ControlPersist=900 \
  182. -o "StrictHostKeyChecking=no" \
  183. "${ssh_options[@]}" "$hostname" -- "${cmd[@]}"
  184. } 3>&1 1>&2 2>&3 ## | sed -r "s/^/$DARKCYAN$hostname$NORMAL $DARKRED\!$NORMAL /g"
  185. set_errlvl "${PIPESTATUS[0]}"
  186. } 3>&1 1>&2 2>&3
  187. }
  188. ssh:quit() {
  189. local hostname="$1"
  190. shift
  191. ssh -o ControlPath=/tmp/ssh-control-master-${master_pid} \
  192. -o ControlMaster=auto -o ControlPersist=900 -O exit \
  193. "$hostname" 2>/dev/null
  194. }
  195. is_ovh_domain_name() {
  196. local domain="$1"
  197. [[ "$domain" == *.ovh.net ]] && return 0
  198. [[ "$domain" == "ns"*".ip-"*".eu" ]] && return 0
  199. return 1
  200. }
  201. is_ovh_hostname() {
  202. local domain="$1"
  203. [[ "$domain" =~ ^vps-[0-9a-f]*$ ]] && return 0
  204. [[ "$domain" =~ ^vps[0-9]*$ ]] && return 0
  205. return 1
  206. }
  207. vps_connection_check() {
  208. local vps="$1"
  209. ip=$(resolve "$vps") ||
  210. { echo "${DARKRED}no-resolve${NORMAL}"; return 1; }
  211. is-port-open "$ip" "22" </dev/null ||
  212. { echo "${DARKRED}no-port-22-open${NORMAL}"; return 1; }
  213. ssh:open -o ConnectTimeout=10 -o PreferredAuthentications=publickey \
  214. "root@$vps" >/dev/null 2>&1 ||
  215. { echo "${DARKRED}no-ssh-root-access${NORMAL}"; return 1; }
  216. }
  217. vps_check() {
  218. local vps="$1"
  219. vps_connection_check "$vps" </dev/null || return 1
  220. if size=$(
  221. echo "df /srv -h | tail -n +2 | sed -r 's/ +/ /g' | cut -f 5 -d ' ' | cut -f 1 -d %" |
  222. ssh:run "root@$vps" -- bash); then
  223. if [ "$size" -gt "90" ]; then
  224. echo "${DARKRED}above-90%-disk-usage${NORMAL}"
  225. elif [ "$size" -gt "75" ]; then
  226. echo "${DARKYELLOW}above-75%-disk-usage${NORMAL}"
  227. fi
  228. else
  229. echo "${DARKRED}no-size${NORMAL}"
  230. fi </dev/null
  231. compose_content=$(ssh:run "root@$vps" -- cat /opt/apps/myc-deploy/compose.yml </dev/null) ||
  232. { echo "${DARKRED}no-compose${NORMAL}"; return 1; }
  233. echo "$compose_content" | grep backup >/dev/null 2>&1 ||
  234. { echo "${DARKRED}no-backup${NORMAL}"; return 1; }
  235. }
  236. backup:setup-rsync() {
  237. local admin="$1" vps="$2" server="$3" id="$4"
  238. [ -z "${BACKUP_SSH_SERVER}" ] || {
  239. err "Unexpected error: '\$BACKUP_SSH_SERVER' is already set in '$FUNCNAME'."
  240. return 1
  241. }
  242. BACKUP_SSH_OPTIONS=(-o StrictHostKeyChecking=no)
  243. if [[ "$server" == *":"* ]]; then
  244. BACKUP_SSH_OPTIONS+=(-p "${server#*:}")
  245. BACKUP_SSH_SERVER=${server%%:*}
  246. else
  247. BACKUP_SSH_SERVER="$server"
  248. fi
  249. if ! private_key=$(ssh "${BACKUP_SSH_OPTIONS[@]}" \
  250. "$admin"@"${BACKUP_SSH_SERVER}" request-recovery-key "$id"); then
  251. err "Couldn't request a recovery key for '$id' with account '$admin'."
  252. return 1
  253. fi
  254. if ! VPS_TMP_DIR=$(echo "mktemp -d" | ssh:run "root@$vps" -- bash); then
  255. err "Couldn't create a temporary directory on vps"
  256. return 1
  257. fi
  258. cat <<EOF | ssh:run "root@$vps" -- bash || return 1
  259. touch "$VPS_TMP_DIR/recover_key" &&
  260. chmod go-rwx "$VPS_TMP_DIR/recover_key" &&
  261. printf "%s\n" "$private_key" >> "$VPS_TMP_DIR/recover_key"
  262. EOF
  263. BACKUP_SSH_OPTIONS+=(-i "$VPS_TMP_DIR/recover_key" -l rsync)
  264. BACKUP_VPS_TARGET="$vps"
  265. BACKUP_IDENT="$id"
  266. echo "type -p rsync >/dev/null 2>&1 || apt-get install -y rsync </dev/null" |
  267. ssh:run "root@$vps" -- bash || return 1
  268. }
  269. backup:rsync() {
  270. local ssh_options
  271. [ -n "${BACKUP_SSH_SERVER}" ] || {
  272. err "Unexpected error: '\$BACKUP_SSH_SERVER' is not set in 'rsync_exists'."
  273. return 1
  274. }
  275. rsync_options=()
  276. while [[ "$1" == "-"* ]]; do
  277. rsync_options+=("$1")
  278. shift
  279. done
  280. local src="$1" dst="$2"
  281. cat <<EOF | ssh:run "root@${BACKUP_VPS_TARGET}" -- bash
  282. rsync -e "ssh ${BACKUP_SSH_OPTIONS[*]}" \
  283. -azvArH --delete --delete-excluded \
  284. --partial --partial-dir .rsync-partial \
  285. --numeric-ids ${rsync_options[*]} \
  286. "${BACKUP_SSH_SERVER}":/var/mirror/"${BACKUP_IDENT}${src}" "${dst}"
  287. EOF
  288. }
  289. backup:path_exists() {
  290. local src="$1"
  291. [ -n "${BACKUP_SSH_SERVER}" ] || {
  292. err "Unexpected error: '\$BACKUP_SSH_SERVER' is not set in 'rsync_exists'."
  293. return 1
  294. }
  295. cat <<EOF | ssh:run "root@${BACKUP_VPS_TARGET}" -- bash >/dev/null 2>&1
  296. rsync -e "ssh ${BACKUP_SSH_OPTIONS[*]}" \
  297. -nazvArH --numeric-ids \
  298. "${BACKUP_SSH_SERVER}":/var/mirror/"${BACKUP_IDENT}${src}" "/tmp/dummy"
  299. EOF
  300. }
  301. file:vps_backup_recover() {
  302. local admin="$1" server="$2" id="$3" path="$4" vps="$5" vps_path="$6"
  303. backup:rsync "${path}" "${vps_path}" || return 1
  304. if [[ "$path" == *"/" ]]; then
  305. if [ "$path" == "$vps_path"/ ]; then
  306. msg_target="Directory '$path'"
  307. else
  308. msg_target="Directory '$path' -> '$vps_path'"
  309. fi
  310. else
  311. if [ "$path" == "$vps_path" ]; then
  312. msg_target="File '$path'"
  313. else
  314. msg_target="File '$path' -> '$vps_path'"
  315. fi
  316. fi
  317. info "$msg_target was ${GREEN}successfully${NORMAL} restored on $vps."
  318. }
  319. mailcow:vps_backup_recover() {
  320. local admin="$1" server="$2" id="$3" path="$4" vps="$5" vps_path="$6"
  321. if ! compose_yml_files=$(cat <<EOF | ssh:run "root@$vps" -- bash
  322. urn=com.docker.compose.project
  323. docker ps -f "label=\$urn=mailcowdockerized" \
  324. --format="{{.Label \"\$urn.working_dir\"}}/{{.Label \"\$urn.config_files\"}}" |
  325. uniq
  326. EOF
  327. ); then
  328. err "Couldn't get list of running projects"
  329. return 1
  330. fi
  331. stopped_containers=
  332. if [ -n "$compose_yml_files" ]; then
  333. echo "Found running mailcowdockerized containers" >&2
  334. if [[ "$compose_yml_files" == *$'\n'* ]]; then
  335. err "Running containers are confusing, did not find only one mailcowdockerized project."
  336. return 1
  337. fi
  338. if ! echo "[ -e \"$compose_yml_files\" ]" | ssh:run "root@$vps" -- bash ; then
  339. ## For some reason, sometimes $urn.config_files holds an absolute path
  340. compose_yml_files=/${compose_yml_files#*//}
  341. if ! echo "[ -e \"$compose_yml_files\" ]" | ssh:run "root@$vps" -- bash ; then
  342. err "Running containers are confusing, they don't point to an existing docker-compose.yml."
  343. return 1
  344. fi
  345. fi
  346. echo "Containers where launched from '$compose_yml_files'" >&2
  347. COMPOSE_FILE="$compose_yml_files"
  348. ENV_FILE="${COMPOSE_FILE%/*}/.env"
  349. if ! echo "[ -e \"${ENV_FILE}\" ]" | ssh:run "root@$vps" -- bash ; then
  350. err "Running containers are confusing, docker-compose.yml has no '.env' next to it."
  351. return 1
  352. fi
  353. echo "${WHITE}Bringing mailcowdockerized down${NORMAL}"
  354. echo "docker-compose -f \"${COMPOSE_FILE}\" --env-file \"${ENV_FILE}\" down" |
  355. ssh:run "root@$vps" -- bash
  356. stopped_containers=1
  357. fi
  358. if [[ "$path" == "/"* ]]; then
  359. ##
  360. ## Additional intelligence to simple file copy
  361. ##
  362. if [[ "$path" == "/var/lib/docker/volumes/mailcowdockerized_*-vol-1/_data"* ]]; then
  363. volume_name=${path#/var/lib/docker/volumes/}
  364. volume_name=${volume_name%%/*}
  365. volume_dir=${path%%"$volume_name"*}
  366. ## Create volumes if not existent
  367. if ! ssh:run "root@$vps" -- "
  368. [ -d '${volume_dir}' ] ||
  369. docker run --rm -v ${volume_name}:/tmp/dummy docker.0k.io/alpine:3.9
  370. [ -d '${volume_dir}' ]
  371. "; then
  372. err "Couldn't find nor create '${volume_dir}'."
  373. return 1
  374. fi
  375. fi
  376. echo "${WHITE}Sync from backup ${path} to VPS ${vps_path}${NORMAL}" >&2
  377. backup:rsync "${path}" "${vps_path}" || return 1
  378. if [[ "$path" == *"/" ]]; then
  379. if [ "$path" == "$vps_path"/ ]; then
  380. msg_target="Directory '$path'"
  381. else
  382. msg_target="Directory '$path' -> '$vps_path'"
  383. fi
  384. else
  385. if [ "$path" == "$vps_path" ]; then
  386. msg_target="File '$path'"
  387. else
  388. msg_target="File '$path' -> '$vps_path'"
  389. fi
  390. fi
  391. else
  392. ALL_TARGETS=(mailcow postfix rspamd redis crypt vmail{,-attachments} mysql)
  393. if [[ -n "$path" ]]; then
  394. targets=()
  395. bad_targets=()
  396. for target in ${path//,/ }; do
  397. if [[ " ${ALL_TARGETS[*]} " != *" $target "* ]]; then
  398. bad_targets+=("$target")
  399. fi
  400. targets+=("$target")
  401. done
  402. if [ "${#bad_targets[@]}" -gt 0 ]; then
  403. bad_target_msg=$(printf "%s, " "${bad_targets[@]}")
  404. err "Unknown components: ${bad_target_msg%, }. These are allowed components:"
  405. printf " - %s\n" "${ALL_TARGETS[@]}" >&2
  406. return 1
  407. fi
  408. msg_target="Partial mailcow backup"
  409. else
  410. targets=("${ALL_TARGETS[@]}")
  411. msg_target="Full mailcow backup"
  412. fi
  413. for target in "${targets[@]}"; do
  414. case "$target" in
  415. postfix|rspamd|redis|crypt|vmail|vmail-attachments)
  416. volume_name="mailcowdockerized_${target}-vol-1"
  417. volume_dir="/var/lib/docker/volumes/${volume_name}/_data"
  418. if ! backup:path_exists "${volume_dir}/"; then
  419. warn "No '$volume_name' in backup. This might be expected."
  420. continue
  421. fi
  422. ## Create volumes if not existent
  423. if ! ssh:run "root@$vps" -- "
  424. [ -d '${volume_dir}' ] ||
  425. docker run --rm -v ${volume_name}:/tmp/dummy docker.0k.io/alpine:3.9
  426. [ -d '${volume_dir}' ]
  427. "; then
  428. err "Couldn't find nor create '${volume_dir}'."
  429. return 1
  430. fi
  431. echo "${WHITE}Downloading of $volume_name${NORMAL}"
  432. backup:rsync "${volume_dir}/" "${volume_dir}" || return 1
  433. ;;
  434. mailcow)
  435. ## Mailcow git base
  436. COMPOSE_FILE=
  437. for mailcow_dir in /opt/{apps/,}mailcow-dockerized; do
  438. backup:path_exists "${mailcow_dir}/" || continue
  439. ## this possibly change last value
  440. COMPOSE_FILE="$mailcow_dir/docker-compose.yml"
  441. ENV_FILE="$mailcow_dir/.env"
  442. echo "${WHITE}Download of $mailcow_dir${NORMAL}"
  443. backup:rsync "${mailcow_dir}"/ "${mailcow_dir}" || return 1
  444. break
  445. done
  446. if [ -z "$COMPOSE_FILE" ]; then
  447. err "Can't find mailcow base installation path in backup."
  448. return 1
  449. fi
  450. ;;
  451. mysql)
  452. if [ -z "$COMPOSE_FILE" ]; then
  453. ## Mailcow git base
  454. compose_files=()
  455. for mailcow_dir in /opt/{apps/,}mailcow-dockerized; do
  456. ssh:run "root@$vps" -- "[ -e \"$mailcow_dir/docker-compose.yml\" ]" || continue
  457. ## this possibly change last value
  458. compose_files+=("$mailcow_dir/docker-compose.yml")
  459. done
  460. if [ "${#compose_files[@]}" == 0 ]; then
  461. err "No compose file found for mailcow installation."
  462. return 1
  463. elif [ "${#compose_files[@]}" -gt 1 ]; then
  464. err "Multiple compose files for mailcow found:"
  465. for f in "${compose_files[@]}"; do
  466. echo " - $f" >&2
  467. done
  468. echo "Can't decide which to use for mounting mysql container." >&2
  469. return 1
  470. fi
  471. COMPOSE_FILE="${compose_files[0]}"
  472. ENV_FILE="${COMPOSE_FILE%/*}/.env"
  473. if ! ssh:run "root@$vps" -- "[ -e \"${COMPOSE_FILE%/*}/.env\" ]"; then
  474. err "No env file in '$ENV_FILE' found."
  475. return 1
  476. fi
  477. fi
  478. ## Mysql database
  479. echo "${WHITE}Downloading last backup of mysql backups${NORMAL}"
  480. backup:rsync "/var/backups/mysql/" "/var/backups/mysql" || return 1
  481. if ! env_content=$(echo "cat '$ENV_FILE'" | ssh:run "root@$vps" -- bash); then
  482. err "Can't access env file: '$ENV_FILE'."
  483. return 1
  484. fi
  485. root_password=$(printf "%s\n" "$env_content" | grep ^DBROOT= | cut -f 2 -d =)
  486. echo "${WHITE}Bringing mysql-mailcow up${NORMAL}"
  487. if ! image=$(cat <<EOF | ssh:run "root@$vps" -- bash
  488. shyaml get-value services.mysql-mailcow.image < "${COMPOSE_FILE}"
  489. EOF
  490. ); then
  491. err "Failed to get image name of service 'mysql-mailcow' in 'compose.yml'."
  492. return 1
  493. fi
  494. if [ -z "$(ssh:run "root@$vps" -- docker images -q "$image")" ]; then
  495. info "Image '$image' not available, pull it."
  496. if ! ssh:run "root@$vps" -- \
  497. docker-compose -f "${COMPOSE_FILE}" --env-file "${ENV_FILE}" \
  498. pull mysql-mailcow; then
  499. err "Failed to pull image of service 'mysql-mailcow'."
  500. return 1
  501. fi
  502. fi
  503. if ! container_id=$(cat <<EOF | ssh:run "root@$vps" -- bash
  504. echo "[client]
  505. password=$root_password" > "$VPS_TMP_DIR/my.cnf"
  506. docker-compose -f "${COMPOSE_FILE}" --env-file "${ENV_FILE}" \
  507. run -d \
  508. -v "$VPS_TMP_DIR/my.cnf:/root/.my.cnf:ro" \
  509. mysql-mailcow
  510. EOF
  511. ); then
  512. err "Failed to bring up mysql-mailcow"
  513. return 1
  514. fi
  515. START="$SECONDS"
  516. retries=0
  517. timeout=600
  518. while true; do
  519. ((retries++))
  520. echo " waiting for mysql db..." \
  521. "(retry $retries, $(($SECONDS - $START))s elapsed, timeout is ${timeout}s)" >&2
  522. cat <<EOF | ssh:run "root@$vps" -- bash && break
  523. echo "SELECT 1;" | docker exec -i "$container_id" mysql >/dev/null 2>&1
  524. EOF
  525. if (($SECONDS - $START > $timeout)); then
  526. err "Failed to connect to mysql-mailcow."
  527. echo "docker-compose -f \"${COMPOSE_FILE}\" --env-file \"${ENV_FILE}\" down" |
  528. ssh:run "root@$vps" -- bash
  529. return 1
  530. fi
  531. sleep 0.4
  532. done
  533. DBUSER=$(printf "%s\n" "$env_content" | grep ^DBUSER= | cut -f 2 -d =)
  534. DBPASS=$(printf "%s\n" "$env_content" | grep ^DBPASS= | cut -f 2 -d =)
  535. echo "${WHITE}Uploading mysql dump${NORMAL}"
  536. cat <<EOF | ssh:run "root@$vps" -- bash
  537. echo "
  538. DROP DATABASE IF EXISTS mailcow;
  539. CREATE DATABASE mailcow;
  540. GRANT ALL PRIVILEGES ON mailcow.* TO '$DBUSER'@'%' IDENTIFIED BY '$DBPASS';
  541. " | docker exec -i "$container_id" mysql
  542. zcat /var/backups/mysql/mailcow/*.gz | docker exec -i "$container_id" mysql mailcow
  543. EOF
  544. if [ "$?" != 0 ]; then
  545. err "Failed to load mysql dump."
  546. echo "docker-compose -f \"${COMPOSE_FILE}\" --env-file \"${ENV_FILE}\" down" |
  547. ssh:run "root@$vps" -- bash
  548. return 1
  549. fi
  550. echo "${WHITE}Bringing mysql-mailcow down${NORMAL}"
  551. echo "docker-compose -f \"${COMPOSE_FILE}\" --env-file \"${ENV_FILE}\" down" |
  552. ssh:run "root@$vps" -- bash
  553. ;;
  554. *)
  555. err "Unknown component '$target'. Bailing out."
  556. return 1
  557. esac
  558. done
  559. ssh:run "root@$vps" -- "rm -rf '$VPS_TMP_DIR'"
  560. fi
  561. if [ -n "$stopped_containers" ]; then
  562. echo "${WHITE}Starting mailcow${NORMAL}" >&2
  563. echo "docker-compose -f \"${COMPOSE_FILE}\" --env-file \"${ENV_FILE}\" up -d" |
  564. ssh:run "root@$vps" -- bash
  565. fi
  566. info "$msg_target was ${GREEN}successfully${NORMAL} restored on $vps."
  567. }
  568. vps_backup_recover() {
  569. local vps="$1" admin server id path rtype force type
  570. read-0 admin server id path rtype force
  571. if [[ "$vps" == *":"* ]]; then
  572. vps_path=${vps#*:}
  573. vps=${vps%%:*}
  574. else
  575. vps_path=
  576. fi
  577. vps_connection_check "$vps" </dev/null || {
  578. err "Failed to access '$vps'."
  579. return 1
  580. }
  581. if type=$(ssh:run "root@$vps" -- vps get-type); then
  582. info "VPS $vps seems to be of ${WHITE}$type${NORMAL} type"
  583. else
  584. warn "Couldn't find type of vps '$vps' (command 'vps get-type' failed on vps)."
  585. fi
  586. if [ -z "$path" ]; then
  587. if [ -n "$vps_path" ]; then
  588. err "You can't provide a VPS with path as destination if you don't provide a path in backup source."
  589. return 1
  590. fi
  591. info "No path provided in backup, so we assume you want ${WHITE}full recovery${NORMAL}."
  592. if [ "$rtype" != "$type" ]; then
  593. if [ -n "$force" ]; then
  594. warn "Backup found is of ${rtype:-unknown} type, while vps is of ${type:-unknown} type."
  595. else
  596. err "Backup found is of ${rtype:-unknown} type, while vps is of ${type:-unknown} type. (use \`\`-f\`\` to force)"
  597. return 1
  598. fi
  599. fi
  600. else
  601. if [ "$path" == "/" ]; then
  602. if [ -z "$vps_path" ]; then
  603. err "Recovery of '/' (full backup files) requires that you provide a vps path also."
  604. return 1
  605. fi
  606. if [ "$vps_path" == "/" ]; then
  607. err "Recovery of '/' (full backup files) requires that you provide" \
  608. "a vps path different from '/' also."
  609. return 1
  610. fi
  611. fi
  612. fi
  613. ## Sets VPS and internal global variable to allow rsync to work
  614. ## from vps to backup server.
  615. backup:setup-rsync "$admin" "$vps" "$server" "$id" || return 1
  616. if [[ "$path" == "/"* ]]; then
  617. if ! backup:path_exists "${path}"; then
  618. err "File or directory '$path' not found in backup."
  619. return 1
  620. fi
  621. if [ -z "$vps_path" ]; then
  622. if [[ "$path" != *"/" ]] && backup:path_exists "${path}"/ ; then
  623. path="$path/"
  624. fi
  625. vps_path=${path%/}
  626. vps_path=${vps_path:-/}
  627. fi
  628. fi
  629. case "$rtype-$type" in
  630. mailcow-*)
  631. ## Supports having $path and $vps_path set or unset, with additional behavior
  632. mailcow:vps_backup_recover "$admin" "$server" "$id" "$path" "$vps" "$vps_path"
  633. ;;
  634. *-*)
  635. if [[ "$path" == "/"* ]]; then
  636. ## For now, will require having $path and $vps_path set, no additional behaviors
  637. file:vps_backup_recover "$admin" "$server" "$id" "$path" "$vps" "$vps_path"
  638. else
  639. if [ -n "$path" ]; then
  640. err "Partial component recover of ${rtype:-unknown} backup type on" \
  641. "${type:-unknown} type VPS is not yet implemented."
  642. return 1
  643. else
  644. err "Full recover of ${rtype:-unknown} backup type on" \
  645. "${type:-unknown} type VPS is not yet implemented."
  646. return 1
  647. fi
  648. fi
  649. ;;
  650. esac
  651. }
  652. vps_install_backup() {
  653. local vps="$1" admin server
  654. vps_connection_check "$vps" </dev/null || return 1
  655. read-0 admin server
  656. if ! type=$(ssh:run "root@$vps" -- vps get-type); then
  657. err "Could not get type."
  658. return 1
  659. fi
  660. if ! out=$(ssh:run "root@$vps" -- vps install backup "$server" 2>&1); then
  661. err "Command 'vps install backup $server' on $vps failed:"
  662. echo "$out" | prefix " ${DARKGRAY}|${NORMAL} " >&2
  663. return 1
  664. fi
  665. ## Format of output:
  666. ##
  667. ## II Entry for service rsync-backup is already present in '/opt/apps/myc-deploy/compose.yml'.
  668. ## II You can run this following command from an host having admin access to core-07.0k.io:
  669. ## (Or send it to a backup admin of core-07.0k.io)
  670. ## ssh -p 10023 myadmin@core-07.0k.io ssh-key add 'ssh-rsa AAAAAAAD...QCJ\
  671. ## 8HH6pVgEpu1twyxpr9xTt7eh..WaJdgPoxmiEwGfjMMNGxs39ggOTKUuSFSmOv8TiA1fzY\
  672. ## s85hF...dKP1qByJU1k= compose@odoo.sikle.fr'
  673. key="ssh-rsa ${out##*\'ssh-rsa }" ## remove everything before last "'ssh-rsa"
  674. key="${key%\'*}" ## remove everything after last '
  675. if ! [[ "$key" =~ ^"ssh-rsa "[a-zA-Z0-9/+=]+" "[a-zA-Z0-9._-]+"@"[a-zA-Z0-9._-]+$ ]]; then
  676. err "Unexpected output from 'vps install backup $server'. Can't find key."
  677. echo "$out" | prefix " ${GRAY}|$NORMAL " >&2
  678. echo " Extracted key:" >&2
  679. echo "$key" | prefix " ${GRAY}|$NORMAL " >&2
  680. return 1
  681. fi
  682. if [ "$type" == "compose" ]; then
  683. if ! ssh:run "root@$vps" -- \
  684. docker exec myc_cron_1 \
  685. cat /etc/cron.d/rsync-backup >/dev/null 2>&1; then
  686. ssh:run "root@$vps" -- compose --debug up || {
  687. err "Command 'compose --debug up' failed."
  688. return 1
  689. }
  690. if ! ssh:run "root@$vps" -- \
  691. docker exec myc_cron_1 \
  692. cat /etc/cron.d/rsync-backup >/dev/null 2>&1; then
  693. err "Launched 'compose up' successfully but ${YELLOW}cron${NORMAL} container is not setup as expected."
  694. echo " Was waiting for existence of '/etc/cron.d/rsync-backup' in it." >&2
  695. return 1
  696. fi
  697. fi
  698. fi
  699. dest="$server"
  700. dest="${dest%/*}"
  701. ssh_options=()
  702. if [[ "$dest" == *":"* ]]; then
  703. port="${dest##*:}"
  704. dest="${dest%%:*}"
  705. ssh_options=(-p "$port")
  706. else
  707. port=""
  708. dest="${dest%%:*}"
  709. fi
  710. cmd=(ssh "${ssh_options[@]}" "$admin"@"$dest" ssh-key add "$key")
  711. echo "${WHITE}Launching:${NORMAL} ${cmd[@]}"
  712. "${cmd[@]}" || {
  713. err "Failed add key to backup server '$dest'."
  714. return 1
  715. }
  716. echo "${WHITE}Launching backup${NORMAL} from '$vps'"
  717. ssh:run "root@$vps" -- vps backup || {
  718. err "First backup failed to run."
  719. return 1
  720. }
  721. echo "Backup is ${GREEN}up and running${NORMAL}."
  722. }
  723. vps_update() {
  724. local vps="$1"
  725. vps_connection_check "$vps" || return 1
  726. ssh:run "root@$vps" -- myc-update </dev/null
  727. }
  728. vps_bash() {
  729. local vps="$1"
  730. vps_connection_check "$vps" </dev/null || return 1
  731. ssh:run "root@$vps" -- bash
  732. }
  733. vps_mux() {
  734. local fn="$1" vps_done VPS max_size vps
  735. shift
  736. VPS=($(printf "%s\n" "$@" | sort))
  737. max_size=0
  738. declare -A vps_done;
  739. new_vps=()
  740. for name in "${VPS[@]}"; do
  741. [ -n "${vps_done[$name]}" ] && {
  742. warn "duplicate vps '$name' provided. Ignoring."
  743. continue
  744. }
  745. vps_done["$name"]=1
  746. new_vps+=("$name")
  747. size_name="${#name}"
  748. [ "$max_size" -lt "${size_name}" ] &&
  749. max_size="$size_name"
  750. done
  751. settmpdir "_0KM_TMP_DIR"
  752. cat > "$_0KM_TMP_DIR/code"
  753. for vps in "${new_vps[@]}"; do
  754. label=$(printf "%-${max_size}s" "$vps")
  755. (
  756. {
  757. {
  758. "$fn" "$vps" < "$_0KM_TMP_DIR/code"
  759. } 3>&1 1>&2 2>&3 | sed -r "s/^/$DARKCYAN$label$NORMAL $DARKRED\!$NORMAL /g"
  760. set_errlvl "${PIPESTATUS[0]}"
  761. } 3>&1 1>&2 2>&3 | sed -r "s/^/$DARKCYAN$label$NORMAL $DARKGRAY\|$NORMAL /g"
  762. set_errlvl "${PIPESTATUS[0]}"
  763. ) &
  764. done
  765. wait
  766. }
  767. [ "$SOURCED" ] && return 0
  768. ##
  769. ## Command line processing
  770. ##
  771. cmdline.spec.gnu
  772. cmdline.spec.reporting
  773. cmdline.spec.gnu vps-setup
  774. cmdline.spec::cmd:vps-setup:run() {
  775. : :posarg: HOST 'Target host to check/fix ssh-access'
  776. : :optfla: --force,-f "Will force domain name change, even if
  777. current hostname was not recognized as
  778. an ovh domain name. "
  779. depends sshpass shyaml
  780. KEY_PATH="ssh-access.public-keys"
  781. local keys=$(config get-value -y "ssh-access.public-keys") || true
  782. if [ -z "$keys" ]; then
  783. err "No ssh publickeys configured in config file."
  784. echo " Looking for keys in ${WHITE}${KEY_PATH}${NORMAL}" \
  785. "in config file." >&2
  786. config:exists --message 2>&1 | prefix " "
  787. if [ "${PIPESTATUS[0]}" == "0" ]; then
  788. echo " Config file found in $(config:filename)"
  789. fi
  790. return 1
  791. fi
  792. local tkey=$(e "$keys" | shyaml get-type)
  793. if [ "$tkey" != "sequence" ]; then
  794. err "Value type of ${WHITE}${KEY_PATH}${NORMAL} unexpected (is $tkey, expecting sequence)."
  795. echo " Check content of $(config:filename), and make sure to use a sequence." >&2
  796. return 1
  797. fi
  798. local IP NAME keys host_pass_connected
  799. if ! IP=$(resolve "$HOST"); then
  800. err "'$HOST' name unresolvable."
  801. exit 1
  802. fi
  803. NAME="$HOST"
  804. if [ "$IP" != "$HOST" ]; then
  805. NAME="$HOST ($IP)"
  806. fi
  807. if ! is-port-open "$IP" "22"; then
  808. err "$NAME unreachable or port 22 closed."
  809. exit 1
  810. fi
  811. debug "Host $IP's port 22 is open."
  812. if ! host_pass_connected=$(ssh:open-try \
  813. {root,debian}@"$HOST"); then
  814. err "Could not connect to {root,debian}@$HOST with publickey nor password."
  815. exit 1
  816. fi
  817. read-0a host password <<<"$host_pass_connected"
  818. sudo_if_necessary=
  819. if [ "$password" -o "${host%%@*}" != "root" ]; then
  820. if ! ssh:run "$host" -- sudo -n true >/dev/null 2>&1; then
  821. err "Couldn't do a password-less sudo from $host."
  822. echo " This is not yet supported."
  823. exit 1
  824. else
  825. sudo_if_necessary=sudo
  826. fi
  827. fi
  828. SUPPORTED_KEY_TYPE=(ssh-rsa ssh-ed25519)
  829. Section Checking access
  830. while read-0 key; do
  831. prefix="${key%% *}"
  832. if ! [[ " ${SUPPORTED_KEY_TYPE[*]} " == *" $prefix "* ]]; then
  833. err "Unsupported key:"$'\n'"$key"
  834. echo " Please use only key of the following type:" >&2
  835. printf " - %s\n" "${SUPPORTED_KEY_TYPE[@]}" >&2
  836. return 1
  837. fi
  838. label="${key##* }"
  839. Elt "considering adding key ${DARKYELLOW}$label${NORMAL}"
  840. dest="/root/.ssh/authorized_keys"
  841. if ssh:run "$host" -- $sudo_if_necessary grep "\"$key\"" "$dest" >/dev/null 2>&1 </dev/null; then
  842. print_info "already present"
  843. print_status noop
  844. Feed
  845. else
  846. if echo "$key" | ssh:run "$host" -- $sudo_if_necessary tee -a "$dest" >/dev/null; then
  847. print_info added
  848. else
  849. echo
  850. Feedback failure
  851. return 1
  852. fi
  853. Feedback success
  854. fi
  855. done < <(e "$keys" | shyaml get-values-0)
  856. Section Checking ovh hostname file
  857. Elt "Checking /etc/ovh-hostname"
  858. if ! ssh:run "$host" -- $sudo_if_necessary [ -e "/etc/ovh-hostname" ]; then
  859. print_info "creating"
  860. ssh:run "$host" -- $sudo_if_necessary cp /etc/hostname /etc/ovh-hostname
  861. ovhname=$(ssh:run "$host" -- $sudo_if_necessary cat /etc/ovh-hostname)
  862. Elt "Checking /etc/ovh-hostname: $ovhname"
  863. Feedback || return 1
  864. else
  865. ovhname=$(ssh:run "$host" -- $sudo_if_necessary cat /etc/ovh-hostname)
  866. Elt "Checking /etc/ovh-hostname: $ovhname"
  867. print_info "already present"
  868. print_status noop
  869. Feed
  870. fi
  871. if ! is_ovh_domain_name "$HOST" && ! str_is_ipv4 "$HOST"; then
  872. Section Checking hostname
  873. Elt "Checking /etc/hostname..."
  874. old_etc_hostname="$(ssh:run "$host" -- $sudo_if_necessary cat /etc/hostname)"
  875. if [ "$old_etc_hostname" != "$HOST" ]; then
  876. Elt "/etc/hostname is '$old_etc_hostname'"
  877. if is_ovh_hostname "$old_etc_hostname" || [ -n "$opt_force" ]; then
  878. Elt "Hostname '$old_etc_hostname' --> '$HOST'"
  879. print_info "creating"
  880. echo "$HOST" | ssh:run "$host" -- $sudo_if_necessary tee /etc/hostname >/dev/null &&
  881. ssh:run "$host" -- $sudo_if_necessary hostname "$HOST"
  882. Feedback || return 1
  883. else
  884. Elt "Hostname '$old_etc_hostname' isn't an ovh domain"
  885. print_info "no change"
  886. print_status noop
  887. Feed
  888. warn "Domain name was not changed because it was already set"
  889. echo " (use \`-f\` or \`--force\`) to force domain name change to $HOST." >&2
  890. fi
  891. else
  892. print_info "already set"
  893. print_status noop
  894. Feed
  895. fi
  896. Elt "Checking consistency between /etc/hostname and \`hostname\`..."
  897. etc_hostname="$(ssh:run "$host" -- $sudo_if_necessary cat /etc/hostname)"
  898. transient_hostname="$(ssh:run "$host" -- $sudo_if_necessary hostname)"
  899. if [ "$etc_hostname" != "$transient_hostname" ]; then
  900. print_info "change"
  901. ssh:run "$host" -- $sudo_if_necessary hostname "$etc_hostname"
  902. Feedback || return 1
  903. else
  904. print_info "consistent"
  905. print_status noop
  906. Feed
  907. fi
  908. else
  909. info "Not changing domain as '$HOST' doesn't seem to be final domain."
  910. fi
  911. }
  912. cmdline.spec.gnu vps-check
  913. cmdline.spec::cmd:vps-check:run() {
  914. : :posarg: [VPS...] 'Target host(s) to check'
  915. echo "" |
  916. vps_mux vps_check "${VPS[@]}"
  917. }
  918. cmdline.spec.gnu vps-install
  919. cmdline.spec::cmd:vps-install:run() {
  920. :
  921. }
  922. cmdline.spec.gnu backup
  923. cmdline.spec:vps-install:cmd:backup:run() {
  924. : :posarg: BACKUP_TARGET 'Backup target.
  925. (ie: myadmin@backup.domain.org:10023/256)'
  926. : :posarg: [VPS...] 'Target host(s) to check'
  927. if [ "${#VPS[@]}" == 0 ]; then
  928. warn "VPS list provided in command line is empty. Nothing will be done."
  929. return 0
  930. fi
  931. if ! [[ "$BACKUP_TARGET" == *"@"* ]]; then
  932. err "Missing admin account identifier in backup target."
  933. echo " Have you forgottent to specify an account, ie 'myadmin@<MYBACKUP_SERVER>' ?)"
  934. return 1
  935. fi
  936. admin=${BACKUP_TARGET%%@*}
  937. server=${BACKUP_TARGET#*@}
  938. p0 "$admin" "$server" |
  939. vps_mux vps_install_backup "${VPS[@]}"
  940. }
  941. cmdline.spec.gnu vps-backup
  942. cmdline.spec::cmd:vps-backup:run() {
  943. :
  944. }
  945. cmdline.spec.gnu ls
  946. cmdline.spec:vps-backup:cmd:ls:run() {
  947. : :posarg: BACKUP_ID 'Backup id.
  948. (ie: myadmin@backup.domain.org:10023)'
  949. if ! [[ "$BACKUP_ID" == *"@"* ]]; then
  950. err "Missing admin account identifier in backup id."
  951. echo " Have you forgottent to specify an admin account ?" \
  952. "ie 'myadmin@<MYBACKUP_SERVER>#<BACKUP_IDENT>' ?)"
  953. return 1
  954. fi
  955. id=${BACKUP_ID##*#}
  956. BACKUP_TARGET=${BACKUP_ID%#*}
  957. admin=${BACKUP_TARGET%%@*}
  958. server=${BACKUP_TARGET#*@}
  959. ## XXXvlab: in this first implementation we expect to have access
  960. ## to the server main ssh port 22, so we won't use the provided port.
  961. ssh_options=()
  962. if [[ "$server" == *":"* ]]; then
  963. ssh_options+=(-p "${server#*:}")
  964. server=${server%%:*}
  965. fi
  966. ssh "${ssh_options[@]}" "$admin"@"$server" ssh-key ls
  967. }
  968. cmdline.spec.gnu recover
  969. cmdline.spec:vps-backup:cmd:recover:run() {
  970. : :posarg: BACKUP_ID 'Backup id.
  971. (ie: myadmin@backup.domain.org:10023#mx.myvps.org
  972. myadmin@ark-01.org#myid:/a/path
  973. admin@ark-02.io#myid:myqsl,mailcow)'
  974. : :posarg: VPS_PATH 'Target host(s) to check.
  975. (ie: myvps.com
  976. myvps.com:/a/path)'
  977. : :optval: --date,-D '"last", or label of version to recover. (Default: "last").'
  978. : :optfla: --force,-f 'Will allow you to bypass some checks.'
  979. if ! [[ "$BACKUP_ID" == *"@"* ]]; then
  980. err "Missing admin account identifier in backup id."
  981. echo " Have you forgottent to specify an admin account ?" \
  982. "ie 'myadmin@<MYBACKUP_SERVER>#<BACKUP_IDENT>' ?)"
  983. return 1
  984. fi
  985. if ! [[ "$BACKUP_ID" == *"@"*"#"* ]]; then
  986. err "Missing backup label identifier in backup id."
  987. echo " Have you forgottent to specify a backup label identifier ?" \
  988. "ie 'myadmin@<MYBACKUP_SERVER>#<BACKUP_IDENT>' ?)"
  989. return 1
  990. fi
  991. id_path=${BACKUP_ID#*#}
  992. if [[ "$id_path" == *":"* ]]; then
  993. id=${id_path%%:*}
  994. path=${id_path#*:}
  995. else
  996. id="$id_path"
  997. path=
  998. fi
  999. BACKUP_TARGET=${BACKUP_ID%#*}
  1000. admin=${BACKUP_TARGET%%@*}
  1001. server=${BACKUP_TARGET#*@}
  1002. ssh_options=()
  1003. if [[ "$server" == *":"* ]]; then
  1004. ssh_options+=(-p "${server#*:}")
  1005. ssh_server=${server%%:*}
  1006. fi
  1007. BACKUP_PATH="/srv/datastore/data/rsync-backup-target/var/mirror"
  1008. if ! content=$(ssh:run "$admin"@"${ssh_server}" "${ssh_options[@]}" -- ssh-key ls 2>/dev/null); then
  1009. err "Access denied to '$admin@${server}'."
  1010. return 1
  1011. fi
  1012. idents=$(echo "$content" | sed -r "s/"$'\e'"\[[0-9]+(;[0-9]+)*m//g" | cut -f 2 -d " ")
  1013. if ! [[ $'\n'"$idents"$'\n' == *$'\n'"$id"$'\n'* ]]; then
  1014. err "Given backup id '$id' not found in $admin@${server}'s idents."
  1015. return 1
  1016. fi
  1017. rtype=$(ssh:run "$admin"@"${ssh_server}" "${ssh_options[@]}" -- ssh-key get-type "$id" ) &&
  1018. info "Backup archive matches ${WHITE}${rtype}${NORMAL} type"
  1019. p0 "$admin" "$server" "$id" "$path" "$rtype" "$opt_force" |
  1020. vps_backup_recover "${VPS_PATH}"
  1021. }
  1022. cmdline.spec.gnu vps-update
  1023. cmdline.spec::cmd:vps-update:run() {
  1024. : :posarg: [VPS...] 'Target host to check'
  1025. echo "" |
  1026. vps_mux vps_update "${VPS[@]}"
  1027. }
  1028. cmdline.spec.gnu vps-mux
  1029. cmdline.spec::cmd:vps-mux:run() {
  1030. : :posarg: [VPS...] 'Target host(s) to check'
  1031. cat | vps_mux vps_bash "${VPS[@]}"
  1032. }
  1033. cmdline.spec.gnu vps-space
  1034. cmdline.spec::cmd:vps-space:run() {
  1035. : :posarg: [VPS...] 'Target host(s) to check'
  1036. echo "df /srv -h | tail -n +2 | sed -r 's/ +/ /g' | cut -f 2-5 -d ' '" |
  1037. vps_mux vps_bash "${VPS[@]}"
  1038. }
  1039. cmdline.spec.gnu vps-stats
  1040. cmdline.spec::cmd:vps-stats:run() {
  1041. : :posarg: [VPS...] 'Target host(s) to get stats'
  1042. : :optfla: --follow,-f 'Refresh graph every 2m'
  1043. : :optval: --timespan,-t 'timespan START[..END]'
  1044. : :optval: --resource,-r 'resource(s) separated with a comma'
  1045. : :optval: --interval,-i 'refersh interval (default: 60s)'
  1046. local opts_rrdfetch=( -a )
  1047. if [ -n "${opt_timespan}" ]; then
  1048. start=${opt_timespan%\.\.*}
  1049. opts_rrdfetch+=(-s "$start")
  1050. if [ "$start" != "${opt_timespan}" ]; then
  1051. end=${opt_timespan#*..}
  1052. opts_rrdfetch+=(-e "$end")
  1053. fi
  1054. fi
  1055. local resources=(c.memory c.network load_avg)
  1056. if [ -n "${opt_resource}" ]; then
  1057. resources=(${opt_resource//,/ })
  1058. fi
  1059. local not_found=()
  1060. for resource in "${resources[@]}"; do
  1061. if ! fn.exists "graph:def:$resource"; then
  1062. not_found+=("$resource")
  1063. fi
  1064. done
  1065. if [[ "${#not_found[@]}" -gt 0 ]]; then
  1066. not_found_msg=$(printf "%s, " "${not_found[@]}")
  1067. not_found_msg=${not_found_msg%, }
  1068. err "Unsupported resource(s) provided: ${not_found_msg}"
  1069. echo " resource must be one-of:" >&2
  1070. declare -F | egrep 'graph:def:[a-zA-Z_.]+$' | cut -f 3- -d " " | cut -f 3- -d ":" | prefix " - " >&2
  1071. return 1
  1072. fi
  1073. if [ "${#VPS[@]}" == 0 ]; then
  1074. err "You must provide a VPS list as positional arguments"
  1075. return 1
  1076. fi
  1077. include cache
  1078. if [ -z "$VAR_DIR" ]; then
  1079. err "Unset \$VAR_DIR, can't downlowd rrd graph"
  1080. return 1
  1081. fi
  1082. mkdir -p "$VAR_DIR/rrd"
  1083. if ! [ -d "$VAR_DIR/rrd" ]; then
  1084. err "Invalid \$VAR_DIR: '$VAR_DIR/rrd' is not a directory"
  1085. return 1
  1086. fi
  1087. (
  1088. for vps in "${VPS[@]}"; do
  1089. (
  1090. {
  1091. {
  1092. ssh:open "root@$vps" 2>/dev/null || {
  1093. err "Can't open connection $vps."
  1094. return 1
  1095. }
  1096. while true; do
  1097. if ssh:run "root@$vps" -- "[ -d '/var/lib/vps/rrd' ]"; then
  1098. echo "${WHITE}Collecting stats${NORMAL}..."
  1099. {
  1100. {
  1101. ssh:rsync "root@$vps:/var/lib/vps/rrd/" "${VAR_DIR}/rrd/${vps}"
  1102. } 3>&1 1>&2 2>&3 | prefix " ${DARKRED}\!${NORMAL} "
  1103. set_errlvl "${PIPESTATUS[0]}"
  1104. } 3>&1 1>&2 2>&3 | prefix " ${GRAY}|${NORMAL} "
  1105. echo " ${GRAY}..${NORMAL} ${DARKGREEN}done${NORMAL} collecting stats"
  1106. else
  1107. warn "No stats found. Did you run 'myc-update' on the vps ?."
  1108. fi
  1109. [ -z "$opt_follow" ] && break
  1110. echo "${WHITE}Sleeping ${DARKYELLOW}${opt_interval:-60}${NORMAL}s..."
  1111. sleep "${opt_interval:-60}"
  1112. echo " ${GRAY}..${NORMAL} ${DARKGREEN}done${NORMAL} sleeping"
  1113. done
  1114. } 3>&1 1>&2 2>&3 | prefix " ${DARKRED}\!${GRAY} collect(${DARKCYAN}$vps${GRAY})${NORMAL} "
  1115. set_errlvl "${PIPESTATUS[0]}"
  1116. } 3>&1 1>&2 2>&3 | prefix " ${GRAY}| collect(${DARKCYAN}$vps${GRAY})${NORMAL} " >&2
  1117. ) &
  1118. done
  1119. wait
  1120. ) &
  1121. collect_pid="$!"
  1122. if [ -z "$opt_follow" ]; then
  1123. echo "${WHITE}Fetching last stats${NORMAL}${GRAY}..${NORMAL}" >&2
  1124. wait
  1125. echo " ${GRAY}..${DARKGREEN} done${NORMAL} fetching stats" >&2
  1126. else
  1127. collect_end_msg=" ${GRAY}..${NORMAL} ${DARKGREEN}stop${NORMAL} collecting daemon (pid: ${DARKYELLOW}$collect_pid${NORMAL})"
  1128. trap_add EXIT \
  1129. "printf '%s\n' \"$collect_end_msg\" && kill $collect_pid"
  1130. echo "${WHITE}Start collecting daemon${NORMAL} (pid: ${DARKYELLOW}$collect_pid${NORMAL}) ${GRAY}..${NORMAL}" >&2
  1131. fi
  1132. ( depends gnuplot ) || {
  1133. echo ""
  1134. echo " Gnuplot is required to display graphs..." \
  1135. "You might want to try to install ${WHITE}gnuplot${NORMAL} with:"
  1136. echo ""
  1137. echo " apt install gnuplot"
  1138. echo ""
  1139. return 1
  1140. } >&2
  1141. export GNUTERM=qt
  1142. exec {PFD}> >(exec gnuplot 2>/dev/null)
  1143. gnuplot_pid="$!"
  1144. if [ -z "$opt_follow" ]; then
  1145. echo "${WHITE}Draw gnuplot graph${GRAY}..${NORMAL}" >&2
  1146. else
  1147. gnuplot_end_msg=" ${GRAY}..${NORMAL} ${DARKGREEN}stop${NORMAL} gnuplot process (pid: $gnuplot_pid)"
  1148. trap_add EXIT \
  1149. "printf '%s\n' \"$gnuplot_end_msg\" && kill $gnuplot_pid"
  1150. echo "${WHITE}Start gnuplot process${NORMAL} (pid: $gnuplot_pid) ${GRAY}..${NORMAL}" >&2
  1151. fi
  1152. echo "set term qt noraise replotonresize" >&$PFD
  1153. while true; do
  1154. {
  1155. i=0
  1156. data_start_ts=
  1157. data_stop_ts=
  1158. for resource in "${resources[@]}"; do
  1159. for vps in "${VPS[@]}"; do
  1160. ((i++))
  1161. {
  1162. {
  1163. rrd_vps_path="$VAR_DIR/rrd/$vps"
  1164. if [ -d "$rrd_vps_path" ]; then
  1165. graph:def:"${resource}" "$vps" "$i" "${opts_rrdfetch[@]}"
  1166. else
  1167. warn "No data yet, ignoring..."
  1168. fi
  1169. } 3>&1 1>&2 2>&3 | prefix " ${DARKRED}\!${GRAY} graph(${DARKCYAN}$vps${GRAY}:${WHITE}$resource${NORMAL})${NORMAL} "
  1170. set_errlvl "${PIPESTATUS[0]}"
  1171. } 3>&1 1>&2 2>&3 || continue 1
  1172. done
  1173. done
  1174. } >&$PFD
  1175. if [ -z "$opt_follow" ]; then
  1176. echo " ${GRAY}..${DARKGREEN} done${NORMAL} gnuplot graphing" >&2
  1177. break
  1178. else
  1179. {
  1180. echo "${WHITE}Sleeping ${DARKYELLOW}${opt_interval:-60}${NORMAL}s..."
  1181. sleep "${opt_interval:-60}"
  1182. echo " ${GRAY}..${NORMAL} ${DARKGREEN}done${NORMAL} sleeping"
  1183. } | prefix " ${GRAY}| gnuplot:${NORMAL} " >&2
  1184. fi
  1185. done
  1186. if [ -n "$opt_follow" ]; then
  1187. echo "Waiting for child process to finish.." >&2
  1188. wait
  1189. echo " ..done" >&2
  1190. else
  1191. echo "pause mouse close" >&$PFD
  1192. fi
  1193. }
  1194. graph:def:c.memory() {
  1195. local vps="$1" i="$2"
  1196. shift 2
  1197. local opts_rrdfetch=("$@")
  1198. local resource="memory"
  1199. rrd_vps_path="$VAR_DIR/rrd/$vps"
  1200. [ -d "$rrd_vps_path/containers" ] || {
  1201. warn "No containers data yet for vps '$vps'... Ignoring"
  1202. return 0
  1203. }
  1204. containers=(
  1205. $(
  1206. cd "$rrd_vps_path/containers";
  1207. find -maxdepth 3 -mindepth 3 -name "${resource}.rrd" -type f |
  1208. sed -r 's%^./([^/]+/[^/]+)/[^/]+.rrd$%\1%g'
  1209. )
  1210. )
  1211. gnuplot_line_config=(
  1212. "set term qt $i title \"$vps $resource\" replotonresize noraise"
  1213. "set title '$vps'"
  1214. "set xdata time"
  1215. "set timefmt '%s'"
  1216. "set ylabel '$resource Usage'"
  1217. "set format y '%s'"
  1218. "set ytics format ' %g'"
  1219. "set mouse mouseformat 6"
  1220. "set yrange [0:*] "
  1221. "set border behind"
  1222. )
  1223. printf "%s\n" "${gnuplot_line_config[@]}"
  1224. first=1
  1225. for container in "${containers[@]}"; do
  1226. rrdfetch_cmd="'< rrdtool fetch \"$rrd_vps_path/containers/$container/$resource.rrd\""
  1227. rrdfetch_cmd+=" AVERAGE ${opts_rrdfetch[*]} | \\"$'\n'
  1228. rrdfetch_cmd+=" tail -n +2 | \\"$'\n'
  1229. rrdfetch_cmd+=" egrep -v \"^$\" | sed -r \"s/ -?nan/ -/g;s/^([0-9]+): /\\1 /g\"'"
  1230. rrdfetch_cmd_bash=$(eval echo "${rrdfetch_cmd}")
  1231. rrdfetch_cmd_bash=${rrdfetch_cmd_bash#< }
  1232. first_ts=
  1233. first_ts=$(eval "$rrdfetch_cmd_bash" | head -n 1 | cut -f 1 -d " ")
  1234. if [ -z "$first_ts" ]; then
  1235. warn "No data for $container on vps $vps, skipping..."
  1236. continue
  1237. fi
  1238. last_ts=$(eval "$rrdfetch_cmd_bash" | tail -n 1 | cut -f 1 -d " ")
  1239. if [[ -z "$data_start_ts" ]] || [[ "$data_start_ts" > "$first_ts" ]]; then
  1240. data_start_ts="$first_ts"
  1241. fi
  1242. if [[ -z "$data_stop_ts" ]] || [[ "$data_stop_ts" < "$last_ts" ]]; then
  1243. data_stop_ts="$last_ts"
  1244. fi
  1245. if [ -n "$first" ]; then
  1246. first=
  1247. echo "plot \\"
  1248. else
  1249. echo ", \\"
  1250. fi
  1251. container="${container//\'/}"
  1252. container="${container//@/\\@}"
  1253. echo -n " ${rrdfetch_cmd} u 1:((\$3 - \$2)/1000000000) w lines title '${container//_/\\_}'"
  1254. done
  1255. echo
  1256. }
  1257. graph:def:c.network() {
  1258. local vps="$1" i="$2"
  1259. shift 2
  1260. local opts_rrdfetch=("$@")
  1261. local resource="network"
  1262. rrd_vps_path="$VAR_DIR/rrd/$vps"
  1263. [ -d "$rrd_vps_path/containers" ] || {
  1264. warn "No containers data yet for vps '$vps'... Ignoring"
  1265. return 0
  1266. }
  1267. containers=(
  1268. $(
  1269. cd "$rrd_vps_path/containers";
  1270. find -maxdepth 3 -mindepth 3 -name "${resource}.rrd" -type f |
  1271. sed -r 's%^./([^/]+/[^/]+)/[^/]+.rrd$%\1%g'
  1272. )
  1273. )
  1274. gnuplot_line_config=(
  1275. "set term qt $i title \"$vps $resource\" replotonresize noraise"
  1276. "set title '$vps'"
  1277. "set xdata time"
  1278. "set timefmt '%s'"
  1279. "set ylabel '$resource Usage'"
  1280. "set format y '%s'"
  1281. "set ytics format ' %.2f MiB/s'"
  1282. "set mouse mouseformat 6"
  1283. "set yrange [0:*] "
  1284. "set border behind"
  1285. )
  1286. printf "%s\n" "${gnuplot_line_config[@]}"
  1287. first=1
  1288. for container in "${containers[@]}"; do
  1289. rrdfetch_cmd="'< rrdtool fetch \"$rrd_vps_path/containers/$container/$resource.rrd\""
  1290. rrdfetch_cmd+=" AVERAGE ${opts_rrdfetch[*]} | \\"$'\n'
  1291. rrdfetch_cmd+=" tail -n +2 | \\"$'\n'
  1292. rrdfetch_cmd+=" egrep -v \"^$\" | sed -r \"s/ -?nan/ -/g;s/^([0-9]+): /\\1 /g\"'"
  1293. rrdfetch_cmd_bash=$(eval echo "${rrdfetch_cmd}")
  1294. rrdfetch_cmd_bash=${rrdfetch_cmd_bash#< }
  1295. first_ts=
  1296. first_ts=$(eval "$rrdfetch_cmd_bash" | head -n 1 | cut -f 1 -d " ")
  1297. if [ -z "$first_ts" ]; then
  1298. warn "No data for $container on vps $vps, skipping..."
  1299. continue
  1300. fi
  1301. last_ts=$(eval "$rrdfetch_cmd_bash" | tail -n 1 | cut -f 1 -d " ")
  1302. if [[ -z "$data_start_ts" ]] || [[ "$data_start_ts" > "$first_ts" ]]; then
  1303. data_start_ts="$first_ts"
  1304. fi
  1305. if [[ -z "$data_stop_ts" ]] || [[ "$data_stop_ts" < "$last_ts" ]]; then
  1306. data_stop_ts="$last_ts"
  1307. fi
  1308. if [ -n "$first" ]; then
  1309. first=
  1310. echo "plot \\"
  1311. else
  1312. echo ", \\"
  1313. fi
  1314. container="${container//\'/}"
  1315. container="${container//@/\\@}"
  1316. echo -n " ${rrdfetch_cmd} u 1:((\$3 / 1024) / 1024) w lines title '${container//_/\\_}'"
  1317. done
  1318. echo
  1319. }
  1320. graph:def:load_avg() {
  1321. local vps="$1" i="$2"
  1322. shift 2
  1323. local opts_rrdfetch=("$@")
  1324. rrd_vps_path="$VAR_DIR/rrd/$vps"
  1325. [ -f "$rrd_vps_path/$resource.rrd" ] || {
  1326. warn "No containers data yet for vps '$vps'... Ignoring"
  1327. return 0
  1328. }
  1329. gnuplot_line_config=(
  1330. "set term qt $i title \"$vps $resource\" replotonresize noraise"
  1331. "set title '$vps'"
  1332. "set xdata time"
  1333. "set timefmt '%s'"
  1334. "set ylabel '${resource//_/\\_} Usage'"
  1335. "set format y '%s'"
  1336. "set ytics format '%g'"
  1337. "set mouse mouseformat 6"
  1338. "set yrange [0:*] "
  1339. "set border behind"
  1340. )
  1341. printf "%s\n" "${gnuplot_line_config[@]}"
  1342. first=1
  1343. for value in 1m:2 5m:3 15m:4; do
  1344. label="${value%:*}"
  1345. col_num="${value#*:}"
  1346. rrdfetch_cmd="'< rrdtool fetch \"$rrd_vps_path/$resource.rrd\""
  1347. rrdfetch_cmd+=" AVERAGE ${opts_rrdfetch[*]} | \\"$'\n'
  1348. rrdfetch_cmd+=" tail -n +2 | \\"$'\n'
  1349. rrdfetch_cmd+=" egrep -v \"^$\" | sed -r \"s/ -?nan/ -/g;s/^([0-9]+): /\\1 /g\"'"
  1350. rrdfetch_cmd_bash=$(eval echo "${rrdfetch_cmd}")
  1351. rrdfetch_cmd_bash=${rrdfetch_cmd_bash#< }
  1352. first_ts=
  1353. first_ts=$(eval "$rrdfetch_cmd_bash" | head -n 1 | cut -f 1 -d " ")
  1354. if [ -z "$first_ts" ]; then
  1355. warn "No data for $resource on vps $vps, skipping..."
  1356. continue
  1357. fi
  1358. last_ts=$(eval "$rrdfetch_cmd_bash" | tail -n 1 | cut -f 1 -d " ")
  1359. if [[ -z "$data_start_ts" ]] || [[ "$data_start_ts" > "$first_ts" ]]; then
  1360. data_start_ts="$first_ts"
  1361. fi
  1362. if [[ -z "$data_stop_ts" ]] || [[ "$data_stop_ts" < "$last_ts" ]]; then
  1363. data_stop_ts="$last_ts"
  1364. fi
  1365. if [ -n "$first" ]; then
  1366. first=
  1367. echo "plot \\"
  1368. else
  1369. echo ", \\"
  1370. fi
  1371. container="${container//\'/}"
  1372. container="${container//@/\\@}"
  1373. echo -n " ${rrdfetch_cmd} u 1:$col_num w lines title '${label}'"
  1374. done
  1375. echo
  1376. }
  1377. cmdline::parse "$@"