+/* Return binaries in the appliance.
+ * See tests/regressions/rhbz727178.sh
+ */
+static char *
+debug_binaries (const char *subcmd, int argc, char *const *const argv)
+{
+ int r;
+ char *out, *err;
+
+ const char cmd[] =
+ "find / -xdev -type f -executable "
+ "| xargs file -i "
+ "| grep application/x-executable "
+ "| gawk -F: '{print $1}'";
+
+ r = command (&out, &err, "sh", "-c", cmd, NULL);
+ if (r == -1) {
+ reply_with_error ("find: %s", err);
+ free (out);
+ free (err);
+ return NULL;
+ }
+
+ free (err);
+
+ return out;
+}
+
+/* Run 'ldd' on a file from the appliance.
+ * See tests/regressions/rhbz727178.sh
+ */
+static char *
+debug_ldd (const char *subcmd, int argc, char *const *const argv)
+{
+ int r;
+ char *out, *err, *ret;
+
+ if (argc != 1) {
+ reply_with_error ("ldd: no file argument");
+ return NULL;
+ }
+
+ /* Note that 'ldd' doesn't fail if it finds errors. We have to grep
+ * for errors in the regression test instead. 'ldd' only fails here
+ * if the binary is not a binary at all (eg. for shell scripts).
+ * Also 'ldd' randomly sends messages to stderr and errors to stdout
+ * depending on the phase of the moon.
+ */
+ r = command (&out, &err, "ldd", "-r", argv[0], NULL);
+ if (r == -1) {
+ reply_with_error ("ldd: %s: %s", argv[0], err);
+ free (out);
+ free (err);
+ return NULL;
+ }
+
+ /* Concatenate stdout and stderr in the result. */
+ ret = realloc (out, strlen (out) + strlen (err) + 1);
+ if (ret == NULL) {
+ reply_with_perror ("realloc");
+ free (out);
+ free (err);
+ return NULL;
+ }
+
+ strcat (ret, err);
+ free (err);
+
+ return ret;
+}
+