--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/imgtools/imaker/buildrom_plugins/hide.pm	Wed Oct 28 14:39:48 2009 +0000
@@ -0,0 +1,144 @@
+#
+# Copyright (c) 2009 Nokia Corporation and/or its subsidiary(-ies).
+# All rights reserved.
+# This component and the accompanying materials are made available
+# under the terms of the License "Symbian Foundation License v1.0"
+# which accompanies this distribution, and is available
+# at the URL "http://www.symbianfoundation.org/legal/sfl-v10.html".
+#
+# Initial Contributors:
+# Nokia Corporation - initial contribution.
+#
+# Contributors:
+#
+# Description:
+# Buildrom plugin for hiding entire iby files.
+# Adds a HIDEALL keyword to hide content.
+#
+
+
+
+##############################################################################
+#
+# Syntax: HIDEALLBEGIN
+#         ..
+#         HIDEALLEND
+#
+# Example:
+# HIDEALLBEGIN
+# #include <browserui.iby>
+# #include <BrowserResources.iby>
+# HIDEALLEND
+# hides all target files in browserui.iby
+#
+##############################################################################
+
+
+package hide;
+use strict;
+use plugincommon;
+
+BEGIN
+  {
+  use Exporter ();
+  our ( $VERSION, @ISA, @EXPORT );
+  # set the version for version checking
+  $VERSION     = 1.00;
+
+  @ISA         = qw( Exporter );
+  @EXPORT      = qw(&hide_info
+                    &do_hide_extension
+                    &is_hideallbegin
+                    &is_hideallend );
+  }
+
+my %hide_infostruct =
+  (
+  name => "hide",
+  invocation => "InvocationPoint2.5",
+  single => "hide::do_hide_extension"
+  );
+
+my $line;
+my @newobydata;
+my %languages;
+my $defaultLang;
+my $verbose=0;
+my $errors=0;
+
+sub hide_info
+  {
+  return \%hide_infostruct;
+  }
+
+sub do_hide_extension
+{
+  print "Running plugin hide.pm\n";
+  my $obydata = shift;
+  my $depth = 0;
+  my $inhide = 0;
+  undef @newobydata;
+  foreach $line (@{$obydata})
+  {
+    if ($line =~ /^\s*REM/i)
+    {
+      # Ignore REM statements, to avoid processing "REM __SCALABLE_IMAGE( ... )"
+      push @newobydata, $line;
+      next;
+    }
+    if (is_hideallbegin($line))
+    {
+      push @newobydata, "REM handled $line";
+      $inhide = 1;
+      print "DoHide inhide\n" if $verbose;
+      next;
+    }
+    if (is_hideallend($line))
+    {
+      print "DoHide inhide end!\n" if $verbose;
+      $inhide = 0;
+      push @newobydata, "REM handled $line";
+      next;
+    }
+    # inhide, hide all target files and data entries
+    if ($inhide)
+    {
+      if (is_entry($line))
+      {
+        my $target = get_target_from_entry($line);
+        print "DoHide target $target!\n" if $verbose;
+        push @newobydata, "hide=$target\n";
+        next;
+      }
+    }
+    # Default case
+    push @newobydata, $line;
+  }
+  @{$obydata} = @newobydata;
+  print "========================== End DoHideExtension =======================\n" if $verbose;
+  #Stop image creation in error case
+  #exit(1) if ($errors);
+
+}
+
+sub is_hideallbegin
+{
+  my $entry = shift;
+  if ($entry=~/^\s*HIDEALLBEGIN\s*$/i)
+  {
+    return 1;
+  }
+  return 0;
+}
+
+sub is_hideallend
+{
+  my $entry = shift;
+  if ($entry=~/^\s*HIDEALLEND\s*$/i)
+  {
+    return 1;
+  }
+  return 0;
+}
+
+1;  # Return a true value from the file
\ No newline at end of file