sydney/Autobot
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix name headers.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-02-11 20:34:39 -07:00
1 parent 9597a037ae
commit 40be9d4f80
31 files changed
+36 -187
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

auto
+2
View File
@@ -1,4 +1,6 @@
#!/bin/sh
# auto - Launcher.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# Written in sh because the user may not have Perl...to run Auto....
bin/auto
+1 -1
View File
@@ -1,6 +1,6 @@
#!/usr/bin/env perl
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# bin/auto - Main file.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package Auto;
bin/buildmod
+2 -1
View File
@@ -1,5 +1,6 @@
#!/usr/bin/env perl
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# bin/buildmod - Module builder.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
use 5.010_000;
bin/critic
+2 -1
View File
@@ -1,5 +1,6 @@
#!/usr/bin/env perl
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# bin/critic - Perl::Critic script.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
require 5.010000;
bin/genssl
+2 -1
View File
@@ -1,5 +1,6 @@
#!/usr/bin/env perl
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# bin/genssl - SSL CertFP generation script.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
install
+2 -1
View File
@@ -1,5 +1,6 @@
#!/usr/bin/env perl
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# install - Installation wizard.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package Install;
lang/de.alf
+1 -3
View File
@@ -1,9 +1,7 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lang/de.alf - German translation file.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# German translation file.
# Permission denied - Keine Berechtigung
msge "Permission_denied" "Keine Berechtigung"
lang/en.alf
+1 -3
View File
@@ -1,9 +1,7 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lang/en.alf - English translation file.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# English translation file.
# Permission denied - Permission denied
msge "Permission_denied" "Permission denied"
lang/es.alf
+2 -4
View File
@@ -1,10 +1,8 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lang/es.alf - Spanish translation file.
# Contributed by Matthew Burket.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# Spanish translation file.
# Contributed by Matthew Burket.
# Permission denied - Permiso denegado
msge "Permission_denied" "Permiso denegado"
lang/fr.alf
+1 -3
View File
@@ -1,9 +1,7 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lang/fr.alf - French translation file.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# French translation file.
# Permission denied - Autorisation refusée
msge "Permission_denied" "Autorisation refusée"
lib/API/IRC.pm
+1 -3
View File
@@ -1,8 +1,6 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lib/API/IRC.pm - IRC API subroutines.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# IRC API subroutines.
package API::IRC;
use strict;
use warnings;
lib/API/Log.pm
+1 -3
View File
@@ -1,8 +1,6 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lib/API/Log.pm - API logging subroutines.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# API logging subroutines.
package API::Log;
use strict;
use warnings;
lib/API/Std.pm
+1 -3
View File
@@ -1,8 +1,6 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lib/API/Std.pm - Standard API subroutines.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# Standard API subroutines.
package API::Std;
use strict;
use warnings;
lib/Core/Cmd.pm
+1 -3
View File
@@ -1,8 +1,6 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lib/Core/Cmd.pm - Core commands.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# Core::Cmd - Core commands.
package Core::Cmd;
use strict;
use warnings;
lib/Core/IRC.pm
+1 -3
View File
@@ -1,8 +1,6 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lib/Core/IRC.pm - Core IRC hooks.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# Core::IRC - Core IRC hooks.
package Core::IRC;
use strict;
use warnings;
lib/DB/Flatfile.pm
-133
View File
@@ -1,133 +0,0 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# Database subroutines for the Auto-Flatfile database format.
package DB;
use strict;
use warnings;
my (%MEM);
# Database initial loading.
sub load
{
# Open, read and close the database.
open(my $FDB, q{<}, "$Auto::Bin/../etc/auto.db") or return 0;
my @fbuf = <$FDB> or return 0;
close $FDB or return 0;
# Make sure the database version is compatible.
if ($fbuf[0] ne "DBV Auto-Flatfile_1.0\n") {
# It is not. Bail.
return 0;
}
# Iterate the buffer.
foreach my $buff (@fbuf) {
# Check if the buffer is defined.
if (defined $buff) {
# Space buffer.
my @lbuf = split(' ', $buff);
# Check if the first two values are defined.
if (defined $lbuf[0] and defined $lbuf[1]) {
# Make sure it isn't DBV.
if ($lbuf[0] eq "DBV") {
next;
}
# Get a count of the values in the buffer minus one.
my $c = scalar(@lbuf) - 1;
# Create an array of the values excluding the first.
my @vs;
for (my $i = $c; $i <= $c; $i++) {
push(@vs, $lbuf[$i]);
}
# Insert data into memory.
if (defined $MEM{$lbuf[0]}) {
# There is a database entry of the same name already, add to existing array.
push(@{ $MEM{$lbuf[0]} }, [ @vs ]);
}
else {
# This is the first database entry of this name, create an array.
@{ $MEM{$lbuf[0]} } = [ @vs ];
}
}
}
}
return 1;
}
# Database flush to disk.
sub flush
{
my $wd = "DBV Auto-Flatfile_1.0\n";
# Iterate through all the database data in memory.
foreach my $mek (keys %MEM) {
foreach my $mas (@{ $MEM{$mek} }) {
$wd .= $mek;
foreach my $masl (@{ $mas }) {
$wd .= " ".$masl;
}
$wd .= "\n";
}
}
# Write to disk.
unless (-e "$Auto::Bin/../etc/auto.db") {
`touch $Auto::Bin/../etc/auto.db`;
}
open(my $FDB, q{>}, "$Auto::Bin/../etc/auto.db") or return 0;
print $FDB $wd or return 0;
close $FDB or return 0;
return 1;
}
# Get database value.
sub get
{
my ($name) = @_;
if (defined $MEM{$name}) {
return $MEM{$name};
}
else {
return 0;
}
}
# Write to database.
sub mwrite
{
my ($name, @values) = @_;
if (defined $MEM{$name}) {
# There is a database entry of the same name already, add to existing array.
push(@{ $MEM{$name} }, [ @values ]);
}
else {
# This is the first database entry of this name, create an array.
@{ $MEM{$name} } = [ @values ];
}
return 1;
}
# Delete from database.
sub mdelete
{
my ($name, $i) = @_;
if (defined $MEM{$name}[$i]) {
delete $MEM{$name}[$i];
}
return 1;
}
1;
lib/Lib/Auto.pm
+1 -1
View File
@@ -1,4 +1,4 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lib/Lib/Auto.pm - Core Auto subroutines.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package Lib::Auto;
lib/Lib/Install.pm
+1 -1
View File
@@ -1,4 +1,4 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lib/Lib/Install.pm - Installation subroutines.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package Lib::Install;
lib/Parser/Config.pm
+1 -3
View File
@@ -1,8 +1,6 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lib/Parser/Config.pm - Configuration parser.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# Parser::Config - Configuration parser.
package Parser::Config;
use strict;
use warnings;
lib/Parser/IRC.pm
+1 -3
View File
@@ -1,8 +1,6 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lib/Parser/IRC.pm - Subroutines for parsing incoming data from IRC.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# Parser::IRC - Subroutines for parsing incoming data from IRC.
package Parser::IRC;
use strict;
use warnings;
lib/Parser/Lang.pm
+1 -3
View File
@@ -1,8 +1,6 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# lib/Parser/Lang.pm - Language file parser.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
# Parser::Lang - Language file parser.
package Parser::Lang;
use strict;
use warnings;
modules/Badwords.pm
+1 -1
View File
@@ -1,4 +1,4 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# Module: Badwords. See below for documentation.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package m_Badwords;
modules/Bitly.pm
+1 -1
View File
@@ -1,4 +1,4 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# Module: Bitly. See below for documentation.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package m_Bitly;
modules/Calc.pm
+1 -1
View File
@@ -1,4 +1,4 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# Module: Calc. See below for documentation.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package m_Calc;
modules/EightBall.pm
+1 -1
View File
@@ -1,4 +1,4 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# Module: EightBall. See below for documentation.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package m_EightBall;
modules/FML.pm
+1 -1
View File
@@ -1,4 +1,4 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# Module: FML. See below for documentation.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package m_FML;
modules/HelloChan.pm
+1 -1
View File
@@ -1,4 +1,4 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# Module: HelloChan.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package m_HelloChan;
modules/IsItUp.pm
+1 -1
View File
@@ -1,4 +1,4 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# Module: IsItUp. See below for documentation.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package m_IsItUp;
modules/QDB.pm
+1 -1
View File
@@ -1,4 +1,4 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# Module: QDB. See below for documentation.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package m_QDB;
modules/SASLAuth.pm
+1 -1
View File
@@ -1,4 +1,4 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# Module: SASLAuth. See below for documentation.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package m_SASLAuth;
modules/Weather.pm
+1 -1
View File
@@ -1,4 +1,4 @@
# Auto IRC Bot. An advanced, lightweight and powerful IRC bot.
# Module: Weather. See below for documentation.
# Copyright (C) 2010-2011 Xelhua Development Group, et al.
# This program is free software; rights to this code are stated in doc/LICENSE.
package m_Weather;