view release on metacpan or search on metacpan
lib/Apache/AuthCAS.pm view on Meta::CPAN
Apache->warn("$$: CAS: set_session_data(): error updating session sid='$sid'") unless ($LOG_LEVEL < $LOG_DEBUG);
$sth->finish();
$dbh->disconnect();
return "";
}
Apache->warn("$$: CAS: set_session_data(): updated session sid='$sid': last_accessed='$last_accessed', uid='$uid', pgtiou='$pgtiou'") unless ($LOG_LEVEL < $LOG_DEBUG);
} else {
Apache->warn("$$: CAS: set_session_data(): creating new session sid='$sid' to update") unless ($LOG_LEVEL < $LOG_DEBUG);
#print "DEBUG2: '$id', '$last_accessed', '$uid', '$pgtiou'\n";
my $sth = $dbh->prepare("INSERT INTO $DB_SESSION_TABLE(id,last_accessed,uid,pgtiou) VALUES(?, ?, ?, ?);");
lib/Apache/AuthCAS.pm view on Meta::CPAN
$dbh->disconnect();
return "";
}
}
Apache->warn("$$: CAS: set_pgt(): updated '$count' pgtiou/pgt map") unless ($LOG_LEVEL < $LOG_DEBUG);
$sth->finish();
$dbh->disconnect();
return 1;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache/AuthCookie.pm view on Meta::CPAN
# Use this to only send over a secure connection
PerlSetVar WhatEverSecure 1
# Use this if you want user session cookies to expire if the user
# doesn't request a auth-required or recognize_user page for some
# time period. If set, a new cookie (with updated expire time)
# is set on every request.
PerlSetVar WhatEverSessionTimeout +30m
# to enable the HttpOnly cookie property, use HttpOnly.
# this is an MS extension. See
view all matches for this distribution
view release on metacpan or search on metacpan
- Updated documentation, fixed pod
0.30 Wed Jun 14 18:00:00 2000
- time files now generated using the $r->server_root_relative() method
- removed some useless debugging reporting
- updated README with TODO list
- inserted call for Apache::src module for future use
0.25 Wed Jun 14 15:20:00 2000
- updated version; modified by hand
- updated $r-dir_config entry for 'TIMEOUT_DEBUG'.
- cleaned up regexp that munges realm names to prevent a realm from being interpretted as a directory
- updated README to give credit to plaid from http://www.perlmonks.org/index.pl?node=plaid
0.21 Tue Jun 13 11:32:19 2000
- first release version; created by h2xs 1.20 with options
-AX -n Apache::AuthExpire
view all matches for this distribution
view release on metacpan or search on metacpan
0.01 Wed Aug 16 09:07:59 2000
- original version; created by h2xs 1.19
0.20 Mon Jun 10 06:33:30 2003
- Makefile.PL updated to prompt for automatic downloading of module dependencies.
- using ExtUtils::AutoInstall Makefile now prompts for prereqs Net::LDAP and mod_perl
- AuthNetLDAP.pm modified to work with both mod_perl 1 and mod_perl-1.99 or greater
0.21 Tue Jun 11 06:33:30 2003
- Move $VERSION number variable above the BEGIN block so that PAUSE will
view all matches for this distribution
view release on metacpan or search on metacpan
added configuration parameter TicketCheckIP so client ip address checks can
be disabled.
added test cases to check that cookie fields secure, path, and domain work
moved source management to github.com:
http://github.com/mschout/apache-authticket/
updated documentation for MP2
addedd a real test suite using DBD::SQLite backing, Apache::Test and
Test::More
Release 0.40
o update to use new Apache::Filter API (you need at least 1.012 now)
view all matches for this distribution
view release on metacpan or search on metacpan
AuthenLDAP.pm view on Meta::CPAN
#
# Revision 1.12 2002/03/07 22:03:23 cgilmore
# see ChangeLog
#
# Revision 1.11 2001/07/17 19:59:04 cgilmore
# updated documentation
#
# Revision 1.10 2001/07/12 14:14:15 cgilmore
# See ChangeLog
#
# Revision 1.9 2001/07/12 14:06:35 cgilmore
AuthenLDAP.pm view on Meta::CPAN
#
# Revision 1.6 2001/01/08 17:26:35 cgilmore
# released
#
# Revision 1.5 2000/09/26 18:26:54 cgilmore
# updated to Apache-general from Tivoli namespace. Updated pod.
#
# Revision 1.4 2000/08/26 15:33:04 cgilmore
# re-designed. See pod.
#
# Revision 1.3 2000/08/21 14:06:45 cgilmore
view all matches for this distribution
view release on metacpan or search on metacpan
smb/.svn/text-base/Changes.svn-base view on Meta::CPAN
0.92 Jan 4 2002
- Added functions for Apache::AuthenNTLM (Gerald Richter)
0.93-0.96 Seg 3 2002
- updated smbval, fixed bugs in smbval VC count handling,
fixed bug in nonce passing
view all matches for this distribution
view release on metacpan or search on metacpan
0.60 Mon Jun 7 14:50:00 1999
- Fixed Smb->Authen::Smb deal in Makefile.PL
- Require Authen::Smb 0.9 or greater due to buffer overflow problem
0.50 Wed Mar 24 15:26:00 1999
- Change Smb to Authen::Smb and updated the documentation
0.20 Wed Jul 1 13:24:00 1998
- Fixed bug where blank username would give you access.
0.10 Fri Apr 17 10:10:10 1998
view all matches for this distribution
view release on metacpan or search on metacpan
2.03 Fri Apr 15 10:47:12 EDT 2005
- made changes to AuthenURL.pm and Cache.pm per new MP2 API
<URL:http://perl.apache.org/docs/2.0/rename.html>
- removed mod_perl prereq from Makefile.PL as it implies MP1
- updated README to note that it does basic authentication
2.02 Wed Dec 8 01:22:28 EST 2004
- fixed $VERSION, why must it be defined above "use modperl" ?
2.01 Fri Dec 3 19:21:45 EST 2004
view all matches for this distribution
view release on metacpan or search on metacpan
AuthzCache.pm view on Meta::CPAN
# Revision 1.12 2002/04/09 21:57:29 cgilmore
# added appropriate handling of require user and require valid-user
# in manage_cache
#
# Revision 1.11 2002/04/04 17:35:45 cgilmore
# updated to handle FileCache and added status
#
# Revision 1.10 2001/07/17 20:05:52 cgilmore
# updated documentation
#
# Revision 1.9 2001/07/12 14:12:48 cgilmore
# see ChangeLog
#
# Revision 1.8 2001/05/29 16:21:35 cgilmore
view all matches for this distribution
view release on metacpan or search on metacpan
AuthzLDAP.pm view on Meta::CPAN
#
# Revision 1.20 2002/04/15 03:24:30 cgilmore
# changed return value for caching purposes to help RT #980
#
# Revision 1.19 2002/03/04 22:53:00 cgilmore
# updated to handle BlueGroups
#
# Revision 1.18 2001/07/17 20:02:49 cgilmore
# updated documentation
#
# Revision 1.17 2001/07/17 20:01:22 cgilmore
# updated documentation
#
# Revision 1.16 2001/07/12 14:18:52 cgilmore
# see ChangeLog
#
# Revision 1.15 2001/05/27 20:47:41 cgilmore
AuthzLDAP.pm view on Meta::CPAN
#
# Revision 1.14 2001/05/27 20:27:15 cgilmore
# removed redeclaration of $msg in same scope
#
# Revision 1.13 2001/05/27 20:22:51 cgilmore
# updated docs to reflect new variable names
#
# Revision 1.12 2001/05/27 20:01:12 cgilmore
# see ChangeLog
#
# Revision 1.11 2001/01/08 17:23:47 cgilmore
# fixed nested group bug and better handled pre-1.26 conditions
#
# Revision 1.10 2000/09/26 18:51:21 cgilmore
# updated to Apache from Tivoli namespace and updated pod.
#
# Revision 1.9 2000/08/26 16:41:49 cgilmore
# corrected fetch bug with userinfo. cleaned up debug statements.
#
# Revision 1.8 2000/08/26 15:34:32 cgilmore
view all matches for this distribution
view release on metacpan or search on metacpan
provides $r->pnotes('INPUT'))
0.93
- several bug fixes
- added sample script for cleaning session dirs
- updated for AxKit 1.6.1 (you definitely need it!)
0.92
- fixed timeout bug (sessions didn't time out)
- fixed AxAddPlugin bug (plugin usage didn't work)
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache/AxKit/Plugin/Upload.pm view on Meta::CPAN
=head1 DESCRIPTION
This plugin allows you to show a progress bar while uploading big files. This works
by opening a small window via JavaScript. That window is directed to a self-refreshing
HTML page which is continuously updated by this plugin.
Usually, three URLs are involved: The page starting the upload, the page receiving the
upload, and the status page. The receiving page I<must> have "axkit_upload_id=..." in
the I<query string>. That ID is used to identify the specific upload. Use a username or
a session ID or even a random number. You cannot have more than one upload for one ID.
view all matches for this distribution
view release on metacpan or search on metacpan
0.02 - upgrade release
- fixed byPerl.c to use the new ServerSlot structure
- added ncpu hash element to serverstats
- updated README and TODO files
0.01 - first public release
view all matches for this distribution
view release on metacpan or search on metacpan
Centipaid.pm view on Meta::CPAN
inspected, and if it exists it is matched with the receipt database. if
it is found, and the expiry date has not been met, then they are granted
access. If the receipt is non existent, or past its expiry date, the
user is prompted to make payment again.
Please reffer to centipaid.com for the most updated version of this
module, since other methods of tracking payment may be available.
=head1 List of tokens
view all matches for this distribution
view release on metacpan or search on metacpan
ChooseLanguage.pm view on Meta::CPAN
# #
# Copyright (c) Nadeau Consultants #
# Billy Nadeau, bill@sanac.net #
# #
# Updated: 09/11/2000 #
# Last updated: 10/16/2002 #
# #
######################################
use strict;
view all matches for this distribution
view release on metacpan or search on metacpan
=item 0.04 - April 14, 1999
added init() function
updated docs
=item 0.03 - April 5, 1999
fix for threaded Perl
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache/AuthDBI.pm view on Meta::CPAN
If a pwd_whereclause exists, it is appended to the SQL-select.
This module supports in addition a simple kind of logging mechanism. Whenever
the handler is called and a log_string is configured, the log_field will be
updated with the log_string. As log_string - depending upon the database -
macros like TODAY can be used.
The SQL-select used for the logging mechanism is as follows:
UPDATE pwd_table SET log_field = log_string WHERE uid_field = user
view all matches for this distribution
view release on metacpan or search on metacpan
- added mark_phases() method, associated internal functions,
and documentation
- made ip() and type() methods return 'ALL' if not set
- changed names of internal methods to start with _
- modified internal methods
- updated pod
- minor code change thanks to Damian Conway
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache/DnsZone.pm view on Meta::CPAN
}
$r->header_out(Location => $location);
}
sub is_updated_SOA {
my $dom_id = shift;
my $new_email = shift;
my $new_refresh = shift;
my $new_retry = shift;
my $new_expire = shift;
lib/Apache/DnsZone.pm view on Meta::CPAN
return 0;
}
return 1;
}
sub is_updated_A {
my $dom_id = shift;
my $a_id = shift;
my $new_host = shift;
my $new_address = shift;
my $new_ttl = shift;
lib/Apache/DnsZone.pm view on Meta::CPAN
return 0;
}
return 1;
}
sub is_updated_AAAA {
my $dom_id = shift;
my $a_id = shift;
my $new_host = shift;
my $new_address = shift;
my $new_ttl = shift;
lib/Apache/DnsZone.pm view on Meta::CPAN
return 0;
}
return 1;
}
sub is_updated_CNAME {
my $dom_id = shift;
my $cname_id = shift;
my $new_host = shift;
my $new_cname = shift;
my $new_ttl = shift;
lib/Apache/DnsZone.pm view on Meta::CPAN
return 0;
}
return 1;
}
sub is_updated_MX {
my $dom_id = shift;
my $mx_id = shift;
my $new_host = shift;
my $new_exchanger = shift;
my $new_preference = shift;
lib/Apache/DnsZone.pm view on Meta::CPAN
return 0;
}
return 1;
}
sub is_updated_NS {
my $dom_id = shift;
my $ns_id = shift;
my $new_host = shift;
my $new_ns = shift;
my $new_ttl = shift;
lib/Apache/DnsZone.pm view on Meta::CPAN
return 0;
}
return 1;
}
sub is_updated_PTR {
my $dom_id = shift;
my $ptr_id = shift;
my $new_host = shift;
my $new_reverse = shift;
my $new_ttl = shift;
lib/Apache/DnsZone.pm view on Meta::CPAN
return 0;
}
return 1;
}
sub is_updated_TXT {
my $dom_id = shift;
my $txt_id = shift;
my $new_host = shift;
my $new_txt = shift;
my $new_ttl = shift;
lib/Apache/DnsZone.pm view on Meta::CPAN
}
if ($all_set) {
my $serial = get_serial_from_zone($dom_id);
$serial++;
$soa_email =~ s/\@/\./;
if (is_updated_SOA($dom_id, $soa_email, $refresh, $retry, $expire, $default_ttl)) {
if (dns_update_SOA($dom_id, $serial, $soa_email, $refresh, $retry, $expire, $default_ttl)) {
Debug(2, qq{dns_update_SOA succeded\n});
} else {
Debug(2, qq{dns_update_SOA failed\n});
}
} else {
Debug(2, qq{Dns record not changed so not updated\n});
}
} else {
my $tpl = new CGI::FastTemplate($cfg->{'cfg'}->{DnsZoneTemplateDir});
$tpl->define(layout => 'layout.tpl', menu => 'menu.tpl');
$tpl->assign(%lang);
lib/Apache/DnsZone.pm view on Meta::CPAN
if ($all_set && check_before_edit_A($dom_id, $record_id, $host, $ip)) {
# update dns! and sql
# check wheter name is the same? so no need for update?
# check wheter an excact copy exists in dns to avoid errors
if (is_updated_A($dom_id, $record_id, $host, $ip, $ttl)) {
if (dns_update_A($dom_id, $record_id, $host, $ip, $ttl)) {
Debug(2, qq{dns_update_A succeded\n});
} else {
Debug(2, qq{dns_update_A failed\n});
}
} else {
Debug(2, qq{Dns record not changed so not updated\n});
}
} else {
my $tpl = new CGI::FastTemplate($cfg->{'cfg'}->{DnsZoneTemplateDir});
$tpl->define(layout => 'layout.tpl', menu => 'menu.tpl');
$tpl->assign(%lang);
lib/Apache/DnsZone.pm view on Meta::CPAN
if ($all_set && check_before_edit_AAAA($dom_id, $record_id, $host, $ipv6)) {
# update dns! and sql
# check wheter name is the same? so no need for update?
# check wheter an excact copy exists in dns to avoid errors
if (is_updated_AAAA($dom_id, $record_id, $host, $ipv6, $ttl)) {
if (dns_update_AAAA($dom_id, $record_id, $host, $ipv6, $ttl)) {
Debug(2, qq{dns_update_AAAA succeded\n});
} else {
Debug(2, qq{dns_update_AAAA failed\n});
}
} else {
Debug(2, qq{Dns record not changed so not updated\n});
}
} else {
my $tpl = new CGI::FastTemplate($cfg->{'cfg'}->{DnsZoneTemplateDir});
$tpl->define(layout => 'layout.tpl', menu => 'menu.tpl');
$tpl->assign(%lang);
lib/Apache/DnsZone.pm view on Meta::CPAN
if ($all_set && check_before_edit_CNAME($dom_id, $record_id, $host, $cname)) {
# update dns! and sql
# check wheter name is the same? so no need for update?
# check wheter an excact copy exists in dns to avoid errors
if (is_updated_CNAME($dom_id, $record_id, $host, $cname, $ttl)) {
if (dns_update_CNAME($dom_id, $record_id, $host, $cname, $ttl)) {
Debug(2, qq{dns_update_CNAME succeded\n});
} else {
Debug(2, qq{dns_update_CNAME failed\n});
}
} else {
Debug(2, qq{Dns record not changed so not updated\n});
}
} else {
my $tpl = new CGI::FastTemplate($cfg->{'cfg'}->{DnsZoneTemplateDir});
$tpl->define(layout => 'layout.tpl', menu => 'menu.tpl');
$tpl->assign(%lang);
lib/Apache/DnsZone.pm view on Meta::CPAN
my $ttl = apr()->param('ttl');
if (!check_ttl($ttl)) {
$all_set = 0;
}
if ($all_set && check_before_edit_MX($dom_id, $record_id, $host, $exchanger, $preference)) {
if (is_updated_MX($dom_id, $record_id, $host, $exchanger, $preference, $ttl)) {
if (dns_update_MX($dom_id, $record_id, $host, $exchanger, $preference, $ttl)) {
Debug(2, qq{dns_update_MX succeded\n});
} else {
Debug(2, qq{dns_update_MX failed\n});
}
} else {
Debug(2, qq{Dns record not changed so not updated\n});
}
} else {
my $tpl = new CGI::FastTemplate($cfg->{'cfg'}->{DnsZoneTemplateDir});
$tpl->define(layout => 'layout.tpl', menu => 'menu.tpl');
$tpl->assign(%lang);
lib/Apache/DnsZone.pm view on Meta::CPAN
my $ttl = apr()->param('ttl');
if (!check_ttl($ttl)) {
$all_set = 0;
}
if ($all_set && check_before_edit_NS($dom_id, $record_id, $zone, $nameserver)) {
if (is_updated_NS($dom_id, $record_id, $zone, $nameserver, $ttl)) {
if (dns_update_NS($dom_id, $record_id, $zone, $nameserver, $ttl)) {
Debug(2, qq{dns_update_NS succeded\n});
} else {
Debug(2, qq{dns_update_NS failed\n});
}
lib/Apache/DnsZone.pm view on Meta::CPAN
if ($all_set && check_before_edit_PTR($dom_id, $record_id, $host, $reverse)) {
# update dns! and sql
# check wheter name is the same? so no need for update?
# check wheter an excact copy exists in dns to avoid errors
if (is_updated_PTR($dom_id, $record_id, $host, $reverse, $ttl)) {
if (dns_update_PTR($dom_id, $record_id, $host, $reverse, $ttl)) {
Debug(2, qq{dns_update_PTR succeded\n});
} else {
Debug(2, qq{dns_update_PTR failed\n});
}
} else {
Debug(2, qq{Dns record not changed so not updated\n});
}
} else {
my $tpl = new CGI::FastTemplate($cfg->{'cfg'}->{DnsZoneTemplateDir});
$tpl->define(layout => 'layout.tpl', menu => 'menu.tpl');
$tpl->assign(%lang);
lib/Apache/DnsZone.pm view on Meta::CPAN
my $ttl = apr()->param('ttl');
if (!check_ttl($ttl)) {
$all_set = 0;
}
if ($all_set && check_before_edit_TXT($dom_id, $record_id, $host, $txtdata)) {
if (is_updated_TXT($dom_id, $record_id, $host, $txtdata, $ttl)) {
if (dns_update_TXT($dom_id, $record_id, $host, $txtdata, $ttl)) {
Debug(2, qq{dns_update_TXT succeded\n});
} else {
Debug(2, qq{dns_update_TXT failed\n});
}
view all matches for this distribution
view release on metacpan or search on metacpan
0.05 Sat Jun 15 18:00:00 2002
- Makefile.PL is fixed in order to survive CPAN tests
25110 Jun 15 18:28 Apache-Dynagzip-0.05.tar.gz
0.04 Mon Jun 03 14:00:00 2002
- README is updated.
- Some typos in main doc were fixed.
24939 Jun 4 14:07 Apache-Dynagzip-0.04.tar.gz
0.03 Sun May 26 14:26:00 2002
- fundamental revision of the code to avoid possible copyright questions from Outlook Technologies, Inc.
view all matches for this distribution
view release on metacpan or search on metacpan
0.03 Tue Sep 3 05:36:05 PDT 2002
correct module name in a_cookie.t
0.02 Tue Sep 3 02:00:52 PDT 2002
added method 'parse'
updated to accept non-scalar values
0.01 Mon Sep 2 15:41:28 PDT 2002
initial release
view all matches for this distribution
view release on metacpan or search on metacpan
0.02 Fri Jun 21 10:30:55 2002 Philip Collins
- made javacript control cut / copy buffer so module user does not
need to call the constructor before sending the header anymore.
- added rsync functionality
- checked for null filenames with javascript in rename and mkdir actions
- updated documentation
0.03 Fri Jun 21 11:00:11 2002 Philip Collins
- added prerequisite modules to 'PREREQ_PM' in Makefile.PL.
0.04 Fri Jun 21 04:30:00 2002 Philip Collins
- display file "type" next to filename. (similar to ls -F)
- Updated delete confirm box message.
- added go to previous directory (..) control
0.13 Thur July 11 14:32:21 Philip Collins
- updated the documentation
0.14 Thur July 11 17:15:10 Philip Collins
- updated look of application
- added the beginnings of the help section
- used CSS tags to to hovering underline
- enlarged the file upload path boxes to 40 (Hardy)
0.15 Friday July 12 20:50:02 Philip Collins
view all matches for this distribution
view release on metacpan or search on metacpan
t/simple_request.t view on Meta::CPAN
use strict;
# Check for Apache::FakeRequest, skip tests otherwise
eval "require Apache::FakeRequest;";
if ($@) {
print "1..0 # Skip looks like Apache2, haven't updated test yet.\n";
exit;
}
# Number of tests.
print "1..2\n";
view all matches for this distribution
view release on metacpan or search on metacpan
0.1.1 Sat Sep 30 01:10:03 2001
- Added src/addcomments.pl script for editing picture
comments.
- Templates have been updated by Erwin Lansing and
Thomas Kjaer and are now much nicer by default!
0.1 Mon Aug 20 19:38:31 2001
- original version; created by h2xs 1.21 with options
-XA -n Apache::Gallery
view all matches for this distribution
view release on metacpan or search on metacpan
Apache/Geo/IP.pm view on Meta::CPAN
=item PerlSetVar GeoIPFlag Standard
Flags can be set to either I<STANDARD>, or for faster performance
(at a cost of using more memory), I<MEMORY_CACHE>. When using memory
cache you can force a reload if the file is updated by setting I<CHECK_CACHE>.
I<INDEX_CACHE> caches the most frequently accessed index portion of the database,
resulting in faster lookups than I<STANDARD>, but less memory usage than
I<MEMORY_CACHE> - this is useful for larger databases such as GeoIP
Organization and GeoIP City. Note, for GeoIP Country, Region and Netspeed databases,
I<INDEX_CACHE> is equivalent to I<MEMORY_CACHE>.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/JAF/DBI.pm view on Meta::CPAN
sub _init {
my $self = shift;
$self->{insert_message} = "Record's inserted";
$self->{update_message} = "Record's updated";
$self->{delete_message} = "Record's deleted";
}
sub error { shift()->{parent}->error(@_) }
sub message { shift()->{parent}->message(@_) }
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache/Keywords.pm view on Meta::CPAN
$new_keywords = $2;
}
}
close(FILE);
# "Touch" the file, so that the ContentHandler really sends the file
# (including the updated cookie)
my $now = time;
utime $now,$now,$r->filename;
# If there are any new keywords from this document, update the user's
# profile and re-store it in the cookie
# Get old "keywords" cookie
lib/Apache/Keywords.pm view on Meta::CPAN
sub new_keywords_asp {
my ($self,$Request,$new_keywords) = @_;
new_keywords($self,$Request->{r},$new_keywords);
}
# Take a content profile e.g. from a page, and updated the profile from
# fetched from a users profile (stored in a cookie)
sub make_profile
{
# Two arguments:
my ($keywords, # e.g. "football: 3, hockey: 2"
view all matches for this distribution
view release on metacpan or search on metacpan
- cleanup Makefile.PL, Perl >= 5.6.0 required.
- Fix README, docs clarifications
- more tests
1.01 - set Vary header if needed
- updated references to Apache2 in the pod
1.02 - set Vary header whenever handler is run
1.03 - avoid $`
- avoid warnings about uninitialised strings
view all matches for this distribution
view release on metacpan or search on metacpan
Revision history for Perl extension Apache::LoadAvgLimit.
note: the module will never be updated for new feature.
0.04 Tue Jun 25 14:20:07 UTC 2013
* marked as deprecated.
* switched to Minilla.
view all matches for this distribution