From c7331f074510a4c925181290121602dec7fb9763 Mon Sep 17 00:00:00 2001
From: Vincent Riquer <vincent+gitorious@riquer.fr>
Date: Fri, 8 Nov 2013 22:33:35 +0100
Subject: [PATCH] show failed tasks

---
 atom | 57 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 57 insertions(+)

diff --git a/atom b/atom
index 03b417d..e72a157 100755
--- a/atom
+++ b/atom
@@ -763,6 +763,63 @@ echo -n	"Ran ${ran:=0} tasks, $failed of which failed, in $days"	\
 	"days, $hours hours, $minutes minutes and $seconds seconds."
 (( cron )) || echo -en "\033[K"
 echo
+if (( failed ))
+then
+	echo $'\nFailed tasks:\n'
+	echo '
+		SELECT		source_files.filename,
+				tasks.cmd_arg0,
+				tasks.cmd_arg1,
+				tasks.cmd_arg2,
+				tasks.cmd_arg3,
+				tasks.cmd_arg4,
+				tasks.cmd_arg5,
+				tasks.cmd_arg6,
+				tasks.cmd_arg7,
+				tasks.cmd_arg8,
+				tasks.cmd_arg9,
+				tasks.cmd_arg10,
+				tasks.cmd_arg11,
+				tasks.cmd_arg12,
+				tasks.cmd_arg13,
+				tasks.cmd_arg14,
+				tasks.cmd_arg15,
+				tasks.cmd_arg16,
+				tasks.cmd_arg17,
+				tasks.cmd_arg18,
+				tasks.cmd_arg19,
+				tasks.cmd_arg20,
+				tasks.cmd_arg21,
+				tasks.cmd_arg22,
+				tasks.cmd_arg23,
+				tasks.cmd_arg24,
+				tasks.cmd_arg25,
+				tasks.cmd_arg26,
+				tasks.cmd_arg27,
+				tasks.cmd_arg28,
+				tasks.cmd_arg29
+		FROM		tasks
+		INNER JOIN	source_files
+			ON	tasks.source_file=source_files.id
+		WHERE		tasks.status = 2
+		AND		requires is NULL;
+
+		SELECT "AtOM:NoMoreFiles";' >&3
+	read -u4 line
+	while ! [[ $line = AtOM:NoMoreFiles ]]
+	do
+		failedtasks+=("$line")
+		read -u4 line
+	done
+	for line in "${failedtasks[@]}"
+	do
+		echo "${line%%::AtOM:SQL:Sep::*}"
+		line="${line#*::AtOM:SQL:Sep::}"
+		line="${line//::AtOM:SQL:Sep::/ }"
+		echo $'\t'"${line/+( )$/}"
+		echo
+	done
+fi
 
 if [ -n "$quit" ]
 then