From cc0cfca7fea6d98ba3d0f505e9760af2b4b88219 Mon Sep 17 00:00:00 2001
From: Jose Diaz-Gonzalez <email@josediazgonzalez.com>
Date: Sun, 28 Aug 2016 23:24:27 -0400
Subject: [PATCH] Add --internal-ip flag to info command

---
 README.md               | 1 +
 functions               | 4 +++-
 tests/service_info.bats | 3 +++
 3 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/README.md b/README.md
index a4e74d7..a7033be 100644
--- a/README.md
+++ b/README.md
@@ -65,6 +65,7 @@ dokku postgres:info lolipop --data-dir
 dokku postgres:info lolipop --dsn
 dokku postgres:info lolipop --exposed-ports
 dokku postgres:info lolipop --id
+dokku postgres:info lolipop --internal-ip
 dokku postgres:info lolipop --links
 dokku postgres:info lolipop --status
 dokku postgres:info lolipop --version
diff --git a/functions b/functions
index 323a8d0..0621a95 100755
--- a/functions
+++ b/functions
@@ -143,6 +143,7 @@ service_info() {
   local SERVICE_ROOT="$PLUGIN_DATA_ROOT/$SERVICE"
   local SERVICE_URL=$(service_url "$SERVICE")
   local PORT_FILE="$SERVICE_ROOT/PORT"
+  local SERVICE_CONTAINER_ID="$(cat "$SERVICE_ROOT/ID")"
   local flag key valid_flags
 
   local flag_map=(
@@ -150,7 +151,8 @@ service_info() {
     "--data-dir: ${SERVICE_ROOT}/data"
     "--dsn: ${SERVICE_URL}"
     "--exposed-ports: $(service_exposed_ports "$SERVICE")"
-    "--id: $(cat "$SERVICE_ROOT/ID")"
+    "--id: ${SERVICE_CONTAINER_ID}"
+    "--internal-ip: $(get_container_ip "${SERVICE_CONTAINER_ID}")"
     "--links: $(service_linked_apps "$SERVICE")"
     "--status: $(service_status "$SERVICE")"
     "--version: $(service_version "$SERVICE")"
diff --git a/tests/service_info.bats b/tests/service_info.bats
index fbec092..3518074 100755
--- a/tests/service_info.bats
+++ b/tests/service_info.bats
@@ -53,6 +53,9 @@ teardown() {
   run dokku "$PLUGIN_COMMAND_PREFIX:info" l --id
   assert_success
 
+  run dokku "$PLUGIN_COMMAND_PREFIX:info" l --internal-ip
+  assert_success
+
   run dokku "$PLUGIN_COMMAND_PREFIX:info" l --links
   assert_success