Changeset 237

Timestamp:

03/31/07 22:55:29 (2 years ago)

Author:

jpuchalski

Message:

Made some changes that may be broken, but need to check-in now. Will fix
later if so.

Files:

• honeyclient/branches/exp/jpuchalski-active_content/lib/HoneyClient/Agent/Driver/ActiveContent.pm (modified) (1 diff)

honeyclient/branches/exp/jpuchalski-active_content/lib/HoneyClient/Agent/Driver/ActiveContent.pm

@@ -98 +98 @@
-#######################################################################
-
+sub isActiveContent {
+  my %args = @_;
+  my $argsExist = scalar(%args);
+
+  # Sanity check: make sure an input file is defined
+  unless ($argsExist && exists($args{'file'}) && defined($args{'file'})) {
+    Carp::croak "Error: No input file provided!\n";
+  }
+
+  # Sanity check: make sure the input is a known resource type 
+  if ($args{'file'}->filename =~ /\.swf$/) {
+    return true;
+  } else {
+    return false;
+   }
+}
+
-sub process {
-  my %args = @_;
-  my $argsExist = scalar(%args);
-
- URL
+n input file
-  unless ($argsExist && exists($args{'file'}) && defined($args{'file'})) {
-URL
+input file
-  }
-
-URL points to a resource we understand
+input is a known resource type
-  if ($args{'file'}->filename =~ /\.swf$/) {
-
-
+
-  } else {
-URL
+Input file
-   }
-}