Apache-SdnFw

 view release on metacpan or  search on metacpan

META.yml  view on Meta::CPAN

author:
    - Chris Sutton <chris@smalldognet.com>
license:            unknown
distribution_type:  module
configure_requires:
    ExtUtils::MakeMaker:  0
build_requires:
    ExtUtils::MakeMaker:  0
requires:
    Crypt::Blowfish:      0
    Crypt::CBC:           0
    Data::Dumper:         0
    Date::Format:         0
    DBD::Pg:              0
    DBI:                  0
    Digest::MD5:          0
    Google::SAML::Response:  0
    Lingua::EN::Numbers:  0
    LWP::UserAgent:       0
    MIME::Base64:         0
    MIME::QuotedPrint:    0

Makefile.PL  view on Meta::CPAN

# the contents of the Makefile that is written.
WriteMakefile(
    NAME              => 'Apache::SdnFw',
    VERSION_FROM      => 'lib/Apache/SdnFw.pm', # finds $VERSION
    PREREQ_PM         => {
		'DBI' => 0,
		'DBD::Pg' => 0,
		'Template' => 0,
		'Time::CTime' => 0,
		'LWP::UserAgent' => 0,
		'Crypt::CBC' => 0,
		'Crypt::Blowfish' => 0,
		'XML::Dumper' => 0,
		'XML::Simple' => 0,
		'Net::SMTP::SSL' => 0,
		'Net::FTP' => 0,
		'Digest::MD5' => 0,
		'MIME::Base64' => 0,
		'MIME::QuotedPrint' => 0,
		'Date::Format' => 0,
		'Data::Dumper' => 0,

lib/Apache/SdnFw/js/tinymce/jscripts/tiny_mce/themes/advanced/skins/o2k7/ui_black.css  view on Meta::CPAN

/* Black */
.o2k7SkinBlack .mceToolbar .mceToolbarStart span, .o2k7SkinBlack .mceToolbar .mceToolbarEnd span, .o2k7SkinBlack .mceButton, .o2k7SkinBlack .mceSplitButton, .o2k7SkinBlack .mceSeparator, .o2k7SkinBlack .mceSplitButton a.mceOpen, .o2k7SkinBlack .mceLi...
.o2k7SkinBlack table, .o2k7SkinBlack .mceMenuItemTitle a, .o2k7SkinBlack .mceMenuItemTitle span.mceText, .o2k7SkinBlack .mceStatusbar div, .o2k7SkinBlack .mceStatusbar span, .o2k7SkinBlack .mceStatusbar a {background:#535353; color:#FFF}
.o2k7SkinBlack table.mceListBoxEnabled .mceText, o2k7SkinBlack .mceListBox .mceText {background:#FFF; border:1px solid #CBCFD4; border-bottom-color:#989FA9; border-right:0}
.o2k7SkinBlack table.mceListBoxEnabled:hover .mceText, .o2k7SkinBlack .mceListBoxHover .mceText, .o2k7SkinBlack .mceListBoxSelected .mceText {background:#FFF; border:1px solid #FFBD69; border-right:0}
.o2k7SkinBlack .mceExternalToolbar, .o2k7SkinBlack .mceListBox .mceText, .o2k7SkinBlack div.mceMenu, .o2k7SkinBlack table.mceLayout, .o2k7SkinBlack .mceMenuItemTitle a, .o2k7SkinBlack table.mceLayout tr.mceFirst td, .o2k7SkinBlack table.mceLayout, .o...
.o2k7SkinBlack table.mceSplitButtonEnabled:hover a.mceAction, .o2k7SkinBlack .mceSplitButtonHover a.mceAction, .o2k7SkinBlack .mceSplitButtonSelected {background-image:url(img/button_bg_black.png)}
.o2k7SkinBlack .mceMenu .mceMenuItemEnabled a:hover, .o2k7SkinBlack .mceMenu .mceMenuItemActive {background-color:#FFE7A1}

lib/Apache/SdnFw/lib/Core.pm  view on Meta::CPAN

package Apache::SdnFw::lib::Core;

use strict;
use Carp;
use Apache::SdnFw::lib::DB;
#use Apache::SdnFw::lib::Memcached;
use Apache::SdnFw::object::home;
use Template;
use LWP::UserAgent;
use Crypt::CBC;
use Crypt::Blowfish;
use XML::Dumper;
use XML::Simple;
use Net::SMTP::SSL;
use Net::FTP;
use Digest::MD5 qw(md5_hex);
use MIME::Base64 qw(encode_base64);
use MIME::QuotedPrint qw(encode_qp);
use Date::Format;
use Data::Dumper;

lib/Apache/SdnFw/lib/Core.pm  view on Meta::CPAN

	$s->{r}{file_path} = "/tmp/$filename";
	$s->{r}{filename} = $filename;
}

sub encrypt {
	my $s = shift;
	my $data = shift;

	my $k = $s->{env}{CRYPT_KEY} || 'ilikegreeneggsandhamsamiam';
	my $cipher = new Crypt::CBC($k,'Blowfish');
	my $out = $cipher->encrypt($data) if ($data);

	my @tmp;
	foreach my $c (split '', $out) {
		push @tmp, unpack('c',$c);
	}

	return join '|', @tmp;
}

sub decrypt {
	my $s = shift;
	my $data = shift;

	my $tmp;
	foreach my $c (split /\|/, $data) {
		$tmp .= pack('c',$c);
	}

	my $k = $s->{env}{CRYPT_KEY} || 'ilikegreeneggsandhamsamiam';
	my $cipher = new Crypt::CBC($k,'Blowfish');
	my $out = $cipher->decrypt($tmp) if ($tmp);

	return $out;
}

sub help {
	my $s = shift;

	# we use our function to look for help
	$s->{function} = 'home' if ($s->{function} eq 'list');

lib/Apache/SdnFw/startup.pl  view on Meta::CPAN

my $smem = `ps -o rss --no-heading -p $$`;
chomp $smem;

use Carp;
use Apache::SdnFw::lib::DB;
#use Apache::SdnFw::lib::Memcached;
use Apache::SdnFw::object::home;
use Template;
use LWP::UserAgent;
use Crypt::CBC;
use Crypt::Blowfish;
use XML::Dumper;
use XML::Simple;
use Net::SMTP::SSL;
use Net::FTP;
use Digest::MD5 qw(md5_hex);
use MIME::Base64 qw(encode_base64);
use MIME::QuotedPrint qw(encode_qp);
use Date::Format;
use Data::Dumper;

lib/Apache/SdnFw/tt/install.txt  view on Meta::CPAN

ln -s /usr/local/pgsql/bin/dropdb /usr/bin
rm -f /usr/bin/pg_dump
ln -s /usr/local/pgsql/bin/pg_dump /usr/bin

# run cpan and set things up so stuff installs easier without a bunch of questions
cpan
o conf prerequisites_policy follow
o conf build_requires_install_policy yes
o conf commit

cpan -i LDS/Crypt-CBC-2.12.tar.gz Crypt::Blowfish XML::Dumper \
IO::Socket::SSL Net::SMTP::SSL Authen::SASL Template \
DateTime::Locale IO::Socket::INET Net::IMAP::Simple XML::Simple \
Lingua::EN::Numbers Google::SAML::Response

# Generally you don't need to install mysql, only if you need wordpress
yum -y install mysql-devel.x86_64 mysql-server.x86_64 mysql.x86_64
chkconfig --add mysqld
chkconfig mysqld on
vim /etc/my.cnf
# add bind-address=127.0.0.1