[freeside-commits] freeside/FS/FS Tron.pm,1.2,1.3 Yori.pm,1.1,1.2

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv16641

Modified Files:
	Tron.pm Yori.pm 
Log Message:
payment gateway survey

Index: Yori.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Yori.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- Yori.pm	21 Aug 2008 23:21:35 -0000	1.1
+++ Yori.pm	28 Aug 2008 19:09:19 -0000	1.2
@@ -9,6 +9,7 @@
 sub reports { #should be autogenerated i guess
   qw( freeside_version debian_version pg_version
       apache_version apache_mpm
+      payment_gateways
     );
       #ssh_vulnkey
 }
@@ -59,6 +60,13 @@
   $apache_mpm;
 }
 
+sub report_payment_gateways {
+  my @gateways = split(/\n/,
+    `aptitude -F '%c %p' search 'libbusiness-onlinepayment-.*' | grep '^i ' | grep -v '^i libbusiness-onlinepayment-perl' | cut -c29- | cut -d- -f1`
+  );
+  join(', ', @gateways);
+}
+
 #sub report_ssh_vulnkey{
 #  my $ssh_vulnkey = `ssh-vulnkey -a | grep COMPROMISED`;
 #  $ssh_vulnkey;

Index: Tron.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Tron.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- Tron.pm	26 Aug 2008 23:53:45 -0000	1.2
+++ Tron.pm	28 Aug 2008 19:09:18 -0000	1.3
@@ -17,6 +17,9 @@
   'debian_version'   => qr/^4/,
   'apache_mpm'       => qw/^(Prefork|$)/,
 
+  #payment gateway survey
+  'payment_gateway'  => qw/^authorizenet$/,
+
   #stuff to add/replace later
   #'pg_version'       => qr/^8\.[1-9]/,
   #'apache_version'   => qr/^2/,