diff options
author | Oliver Tappe | 2006-10-03 13:40:53 +0200 |
---|---|---|
committer | Oliver Tappe | 2006-10-03 13:40:53 +0200 |
commit | 98ecd61f61507ea49828b81e762be02239056ebf (patch) | |
tree | 01b40289ddf6ff8469750aa13e47007070503638 /config-db/OpenSLX/MetaDB | |
parent | * fixed problem with perl-scripts not finding their modules in production path (diff) | |
download | core-98ecd61f61507ea49828b81e762be02239056ebf.tar.gz core-98ecd61f61507ea49828b81e762be02239056ebf.tar.xz core-98ecd61f61507ea49828b81e762be02239056ebf.zip |
* added OpenSLX-header to all my files.
git-svn-id: http://svn.openslx.org/svn/openslx/trunk@434 95ad53e4-c205-0410-b2fa-d234c58c8868
Diffstat (limited to 'config-db/OpenSLX/MetaDB')
-rw-r--r-- | config-db/OpenSLX/MetaDB/Base.pm | 6 | ||||
-rw-r--r-- | config-db/OpenSLX/MetaDB/CSV.pm | 6 | ||||
-rw-r--r-- | config-db/OpenSLX/MetaDB/DBI.pm | 51 | ||||
-rw-r--r-- | config-db/OpenSLX/MetaDB/SQLite.pm | 6 | ||||
-rw-r--r-- | config-db/OpenSLX/MetaDB/mysql.pm | 6 |
5 files changed, 54 insertions, 21 deletions
diff --git a/config-db/OpenSLX/MetaDB/Base.pm b/config-db/OpenSLX/MetaDB/Base.pm index 832544bd..6a0371b0 100644 --- a/config-db/OpenSLX/MetaDB/Base.pm +++ b/config-db/OpenSLX/MetaDB/Base.pm @@ -1,3 +1,9 @@ +# Base.pm - provides empty base of the OpenSLX MetaDB API. +# +# (c) 2006 - OpenSLX.com +# +# Oliver Tappe <ot@openslx.com> +# ################################################################################ # OpenSLX::MetaDB:Base - the base class for all MetaDB drivers # diff --git a/config-db/OpenSLX/MetaDB/CSV.pm b/config-db/OpenSLX/MetaDB/CSV.pm index da11f39b..bfcac9d8 100644 --- a/config-db/OpenSLX/MetaDB/CSV.pm +++ b/config-db/OpenSLX/MetaDB/CSV.pm @@ -1,3 +1,9 @@ +# CSV.pm - provides CSV-specific overrides of the OpenSLX MetaDB API. +# +# (c) 2006 - OpenSLX.com +# +# Oliver Tappe <ot@openslx.com> +# package OpenSLX::MetaDB::CSV; use vars qw(@ISA $VERSION); diff --git a/config-db/OpenSLX/MetaDB/DBI.pm b/config-db/OpenSLX/MetaDB/DBI.pm index ac8401c2..f42ac506 100644 --- a/config-db/OpenSLX/MetaDB/DBI.pm +++ b/config-db/OpenSLX/MetaDB/DBI.pm @@ -1,23 +1,16 @@ +# DBI.pm - provides DBI-based implementation of the OpenSLX MetaDB API. +# +# (c) 2006 - OpenSLX.com +# +# Oliver Tappe <ot@openslx.com> +# package OpenSLX::MetaDB::DBI; +use strict; use vars qw(@ISA $VERSION); @ISA = ('OpenSLX::MetaDB::Base'); $VERSION = 1.01; # API-version . implementation-version -################################################################################ -### This class is the base for all DBI-related metaDB variants. -### It provides a default implementation for every method, such that -### each DB-specific implementation needs to override only the methods -### that require a different implementation than the one provided here. -### -### N.B.: In case you ask yourself why none of the SQL-statements in this -### file make use of SQL bind params (?), the answer is that at least -### one DBD-driver didn't like them at all. As the performance gains -### from bound params are not really necessary here, we simply do -### not use them. -################################################################################ - -use strict; use Carp; use DBI; use OpenSLX::Basics; @@ -325,12 +318,6 @@ sub fetchGroupIDsOfClient ################################################################################ ### data manipulation functions -### -### N.B.: In case you ask yourself why none of the SQL-statements in -### the following functions make use of SQL-placeholders (?), the answer -### is that at least one DBD-driver didn't like them at all. -### As the improved performance gained from using placeholders is not -### really necessary here, we simply do not use them. ################################################################################ sub _doInsert { @@ -960,4 +947,26 @@ sub schemaChangeColumns $self->schemaRenameTable($tempTable, $table, $colDescrs, 1); } -1;
\ No newline at end of file +1; + +__END__ + +=head1 NAME + +DBI.pm - provides DBI-based implementation of the OpenSLX MetaDB API. + +=head1 SYNOPSIS + +This class is the base for all DBI-related metaDB variants. +It provides a default implementation for every method, such that +each DB-specific implementation needs to override only the methods +that require a different implementation than the one provided here. + +=head1 NOTES + +In case you ask yourself why none of the SQL-statements in this +file make use of SQL bind params (?), the answer is that at least +one DBD-driver didn't like them at all. As the performance gains +from bound params are not really necessary here, we simply do +not use them. + diff --git a/config-db/OpenSLX/MetaDB/SQLite.pm b/config-db/OpenSLX/MetaDB/SQLite.pm index 3af72128..5f8afe15 100644 --- a/config-db/OpenSLX/MetaDB/SQLite.pm +++ b/config-db/OpenSLX/MetaDB/SQLite.pm @@ -1,3 +1,9 @@ +# SQLite.pm - provides SQLite-specific overrides of the OpenSLX MetaDB API. +# +# (c) 2006 - OpenSLX.com +# +# Oliver Tappe <ot@openslx.com> +# package OpenSLX::MetaDB::SQLite; use vars qw(@ISA $VERSION); diff --git a/config-db/OpenSLX/MetaDB/mysql.pm b/config-db/OpenSLX/MetaDB/mysql.pm index 316bdab0..648fbd6b 100644 --- a/config-db/OpenSLX/MetaDB/mysql.pm +++ b/config-db/OpenSLX/MetaDB/mysql.pm @@ -1,3 +1,9 @@ +# mysql.pm - provides mysql-specific overrides of the OpenSLX MetaDB API. +# +# (c) 2006 - OpenSLX.com +# +# Oliver Tappe <ot@openslx.com> +# package OpenSLX::MetaDB::mysql; use vars qw(@ISA $VERSION); |