New tutorial run and clean scripts.

bin/foamCleanTutorials

@@ -0,0 +1,68 @@
+#!/bin/sh
+#------------------------------------------------------------------------------
+# =========                 |
+# \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
+#  \\    /   O peration     |
+#   \\  /    A nd           | Copyright (C) 1991-2007 OpenCFD Ltd.
+#    \\/     M anipulation  |
+#------------------------------------------------------------------------------
+# License
+#     This file is part of OpenFOAM.
+#
+#     OpenFOAM is free software; you can redistribute it and/or modify it
+#     under the terms of the GNU General Public License as published by the
+#     Free Software Foundation; either version 2 of the License, or (at your
+#     option) any later version.
+#
+#     OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
+#     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+#     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+#     for more details.
+#
+#     You should have received a copy of the GNU General Public License
+#     along with OpenFOAM; if not, write to the Free Software Foundation,
+#     Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+#
+# Script
+#     foamCleanTutorials
+#
+# Description
+#       Run either Allclean or default cleanCase in current directory
+#       and all its subdirectories.
+#
+#------------------------------------------------------------------------------
+
+# Source tutorial clean functions
+. $WM_PROJECT_DIR/bin/tools/CleanFunctions
+
+thisScript=$0
+if [ "/${thisScript#/}" != "$thisScript" ]
+then
+    thisScript="$PWD/$thisScript"
+fi
+
+# If an argument is supplied do not execute ./Allclean to avoid recursion
+if [ $# = 0 -a -f "./Allclean" ]
+then
+    # Specialised script.
+    ./Allclean
+elif [ -d "./system" ]
+then
+    # Normal case.
+    cleanCase
+elif [ -d "./Make" ]
+then
+    # Normal application.
+    cleanApplication
+else
+    # Recurse to subdirectories
+    for case in *
+    do
+        if [ -d $case ]
+        then
+            (cd $case && $thisScript)
+        fi
+    done
+fi
+
+#------------------------------------------------------------------------------