OXIESEC PANEL

Name	Size	Modified	Perms
📁 ..	-	02/03/2023 08:06:37 AM	rwxr-xr-x
📄 .auditreport.sh.swp	12 KB	02/03/2023 07:34:08 AM	rw-r--r--
📄 CollectReportData.sh	2.17 KB	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 ComapreCubotTableData.sh	1.06 KB	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 VBox.sh	1.59 KB	02/03/2023 07:34:08 AM	rw-r--r--
📄 auditreport.sh	1.35 KB	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 cleanSRCid.sql	386 bytes	02/03/2023 07:34:08 AM	rw-r--r--
📄 cleancache.sh	8.89 KB	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 compare_database.sh	148 bytes	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 compressCSS.sh	262 bytes	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 compressJS.sh	251 bytes	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 cubbackup.sh	1.43 KB	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 cubbackup_sync.sh	314 bytes	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 cubmonitor.sh	3.77 KB	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 cubotmail	29.64 KB	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 esalesforce.pl	1.87 KB	02/03/2023 07:34:08 AM	rw-r--r--
📄 etl_xform_template.sh	543 bytes	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 killrunaway.sh	609 bytes	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 migrateSharedreports.sh	1.14 KB	02/03/2023 07:34:08 AM	rw-r--r--
📄 mysql2pgsql.perl	40.98 KB	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 removenewlinechar.awk	292 bytes	02/03/2023 07:34:08 AM	rw-r--r--
📄 removenewlinechar.pl	534 bytes	02/03/2023 07:34:08 AM	rw-r--r--
📄 removenewlinechar2.awk	82 bytes	02/03/2023 07:34:08 AM	rw-r--r--
📄 renameCubUser.sh	2.38 KB	02/03/2023 07:34:08 AM	rw-r--r--
📄 sendmail.pl	2.13 KB	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 updatealldb.sh	1.08 KB	02/03/2023 07:34:08 AM	rw-r--r--
📄 yuicompressor-2.4.6.jar	832.85 KB	02/03/2023 07:34:08 AM	rwxr-xr-x
📄 zap	1.86 KB	02/03/2023 07:34:08 AM	rwxr-xr-x

Name

Size

Modified

Perms

📁 ..

02/03/2023 08:06:37 AM

rwxr-xr-x

📄 .auditreport.sh.swp

12 KB

02/03/2023 07:34:08 AM

rw-r--r--

📄 CollectReportData.sh

2.17 KB

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 ComapreCubotTableData.sh

1.06 KB

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 VBox.sh

1.59 KB

02/03/2023 07:34:08 AM

rw-r--r--

📄 auditreport.sh

1.35 KB

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 cleanSRCid.sql

386 bytes

02/03/2023 07:34:08 AM

rw-r--r--

📄 cleancache.sh

8.89 KB

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 compare_database.sh

148 bytes

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 compressCSS.sh

262 bytes

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 compressJS.sh

251 bytes

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 cubbackup.sh

1.43 KB

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 cubbackup_sync.sh

314 bytes

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 cubmonitor.sh

3.77 KB

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 cubotmail

29.64 KB

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 esalesforce.pl

1.87 KB

02/03/2023 07:34:08 AM

rw-r--r--

📄 etl_xform_template.sh

543 bytes

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 killrunaway.sh

609 bytes

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 migrateSharedreports.sh

1.14 KB

02/03/2023 07:34:08 AM

rw-r--r--

📄 mysql2pgsql.perl

40.98 KB

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 removenewlinechar.awk

292 bytes

02/03/2023 07:34:08 AM

rw-r--r--

📄 removenewlinechar.pl

534 bytes

02/03/2023 07:34:08 AM

rw-r--r--

📄 removenewlinechar2.awk

82 bytes

02/03/2023 07:34:08 AM

rw-r--r--

📄 renameCubUser.sh

2.38 KB

02/03/2023 07:34:08 AM

rw-r--r--

📄 sendmail.pl

2.13 KB

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 updatealldb.sh

1.08 KB

02/03/2023 07:34:08 AM

rw-r--r--

📄 yuicompressor-2.4.6.jar

832.85 KB

02/03/2023 07:34:08 AM

rwxr-xr-x

📄 zap

1.86 KB

02/03/2023 07:34:08 AM

rwxr-xr-x

Editing: esalesforce.pl

#!/usr/bin/perl

use WWW::Salesforce::Simple;

$user = 'suneel@robustdesigns.com';
$pass = 'Rdcubot123$';
$token = '8QqGxxGWwb5jrX4MfFq3iXyn8';

sub sfLogin{
	my ($user, $pass, $token) = @_;

my $sf = eval { WWW::Salesforce::Simple->login( username => $user, password => $pass.$token ); };
	
  return $sf;
}

sub getTableField {
	my ($tblName, $user, $pass, $token) = @_;
	
  my $sforce = sfLogin($user, $pass, $token);
	my $fields = "";
	my $fields_ref = $sforce->get_field_list( $tblName );

foreach my $field( @{$fields_ref} ) {
		$fields = $fields.$field->{'name'}.", ";
	}
	$fields = substr($fields,0,length($fields)-2);
  return $fields;
}

sub getQueryFieldsArr{
	my ($queryString) = @_;
	my @fieldarr = split(',', $queryString);
	my @firstcolvals = split(" ", @fieldarr[0]);
	@fieldarr[0] = @firstcolvals[scalar(@firstcolvals)-1];

my @lastcolvals = split(" ", @fieldarr[scalar(@fieldarr)-1]);
	@fieldarr[scalar(@fieldarr)-1] = @lastcolvals[0];
	return @fieldarr;
}

sub getQueryData{
	my ($user, $pass, $token, $queryString) = @_;
	$sforce = sfLogin($user, $pass, $token);

#	print "getQueryData [$sforce][".$user."] [".$pass."] [".$token ."]\n";

#return undef if not defined $sforce;

my $G_DBOutDelim = '|';
	my @fieldname = getQueryFieldsArr( $queryString );
	my $string="";
	my $numcol= scalar(@fieldname);
	my $res = $sforce->do_queryAll( $queryString );
	#print $queryString."\n";
	foreach my $field ( @{ $res } ) {
		$i =0;
		foreach my $col ( @fieldname ) {
			$i++;
			trim($col);
			$string=$string.$field->{$col};
			if($i != $numcol){
				$string=$string.$G_DBOutDelim;
			}
		}
		$string=$string."\n";
	}
	return $string;
}

sub trim{
	$_[0]=~s/^\s+//;
	$_[0]=~s/\s+$//;
	return;
}

$query = "select ".@ARGV[1]." from ".@ARGV[0]." ".@ARGV[2];
print getQueryData($user, $pass, $token, $query);
#print getQueryData($user, $pass, $token, "Select id, OwnerId, Name FROM CUBOT__c", '');
1;