cvs commit: modperl-2.0/xs/tables/current/ModPerl FunctionTable.pm
dougm 01/03/26 20:40:37
Modified:xs/Apache/RequestIO Apache__RequestIO.h
xs/tables/current/ModPerl FunctionTable.pm
Log:
fix Apache::RequestRec::TIEHANDLE
Revision ChangesPath
1.4 +4 -3 modperl-2.0/xs/Apache/RequestIO/Apache__RequestIO.h
Index: Apache__RequestIO.h
===
RCS file: /home/cvs/modperl-2.0/xs/Apache/RequestIO/Apache__RequestIO.h,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- Apache__RequestIO.h 2001/03/16 05:32:35 1.3
+++ Apache__RequestIO.h 2001/03/27 04:40:36 1.4
@@ -68,8 +68,9 @@
return nrd;
}
-static MP_INLINE SV *mpxs_Apache__RequestRec_TIEHANDLE(SV *classname,
- SV *obj)
+static MP_INLINE
+request_rec *mpxs_Apache__RequestRec_TIEHANDLE(SV *classname,
+ request_rec *r)
{
-return obj;
+return r;
}
1.2 +4 -4 modperl-2.0/xs/tables/current/ModPerl/FunctionTable.pm
Index: FunctionTable.pm
===
RCS file: /home/cvs/modperl-2.0/xs/tables/current/ModPerl/FunctionTable.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- FunctionTable.pm 2001/03/26 16:06:59 1.1
+++ FunctionTable.pm 2001/03/27 04:40:36 1.2
@@ -2,7 +2,7 @@
# !!
# ! WARNING: generated by ModPerl::ParseSource/0.01
-# ! Mon Mar 26 07:44:14 2001
+# ! Mon Mar 26 20:36:51 2001
# ! do NOT edit, any changes will be lost !
# !!
@@ -2685,15 +2685,15 @@
'name' => 'mpxs_ap_get_client_block'
},
{
-'return_type' => 'SV *',
+'return_type' => 'request_rec *',
'args' => [
{
'name' => 'classname',
'type' => 'SV *'
},
{
-'name' => 'obj',
-'type' => 'SV *'
+'name' => 'r',
+'type' => 'request_rec *'
}
],
'name' => 'mpxs_Apache__RequestRec_TIEHANDLE'
cvs commit: modperl-site/embperl Changes.pod.1.html
richter 01/03/26 20:27:19 Modified:embperl Changes.pod.1.html Log: Embperl Webpages - Changes Revision ChangesPath 1.207 +1 -1 modperl-site/embperl/Changes.pod.1.html Index: Changes.pod.1.html === RCS file: /home/cvs/modperl-site/embperl/Changes.pod.1.html,v retrieving revision 1.206 retrieving revision 1.207 diff -u -r1.206 -r1.207 --- Changes.pod.1.html2001/03/26 17:30:49 1.206 +++ Changes.pod.1.html2001/03/27 04:27:19 1.207 @@ -21,7 +21,7 @@ [HOME] [CONTENT] [PREV (Revision History - Content)] [NEXT (1.3.1 (RELEASE) 13 Feb. 2001)] -Last Update: Mon Mar 26 18:30:30 2001 (MET) +Last Update: Tue Mar 27 06:26:57 2001 (MET) NOTE: This version is only available via "CVS"
cvs commit: modperl-2.0 00README_FIRST
dougm 01/03/26 18:39:47 Modified:.00README_FIRST Log: add a hint about blib Revision ChangesPath 1.15 +8 -0 modperl-2.0/00README_FIRST Index: 00README_FIRST === RCS file: /home/cvs/modperl-2.0/00README_FIRST,v retrieving revision 1.14 retrieving revision 1.15 diff -u -r1.14 -r1.15 --- 00README_FIRST2001/03/26 16:21:35 1.14 +++ 00README_FIRST2001/03/27 02:39:47 1.15 @@ -49,6 +49,14 @@ PerlSwitches -T /home/dougm/test/startup.pl +hint: rather than 'make install' point mod_perl at your blib in startup.pl: + + use blib qw(/home/dougm/ap/modperl-2.0); + +or + + PerlSwitches -Mblib=/home/dougm/ap/modperl-2.0 + it is possible to configure Perl*Handlers and callback into apache, much is the same as 1.x, but plenty is different at the moment. there will be a compat layer in the future.
cvs commit: modperl-2.0/examples/lib/Apache HelloWorld.pm
dougm 01/03/26 18:34:51
Modified:examples/lib/Apache HelloWorld.pm
Log:
need to load these modules for HelloWorld
Revision ChangesPath
1.2 +4 -0 modperl-2.0/examples/lib/Apache/HelloWorld.pm
Index: HelloWorld.pm
===
RCS file: /home/cvs/modperl-2.0/examples/lib/Apache/HelloWorld.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- HelloWorld.pm 2001/03/26 16:21:37 1.1
+++ HelloWorld.pm 2001/03/27 02:34:51 1.2
@@ -5,6 +5,10 @@
# PerlResponseHandler Apache::HelloWorld
#
+use strict;
+use Apache::RequestRec (); #for $r->content_type
+use Apache::RequestIO (); #for $r->puts
+
sub handler {
my $r = shift;
cvs commit: modperl-2.0 Makefile.PL
dougm 01/03/26 18:32:50
Modified:.Makefile.PL
Log:
only one version of the source tables is currently supported, so just hardwire it
for now
Revision ChangesPath
1.29 +3 -2 modperl-2.0/Makefile.PL
Index: Makefile.PL
===
RCS file: /home/cvs/modperl-2.0/Makefile.PL,v
retrieving revision 1.28
retrieving revision 1.29
diff -u -r1.28 -r1.29
--- Makefile.PL 2001/03/26 22:07:12 1.28
+++ Makefile.PL 2001/03/27 02:32:49 1.29
@@ -85,8 +85,9 @@
sub generate_xs {
my $httpd_version = shift;
-my $tables_version =
- $httpd_version =~ /-dev$/ ? 'current' : $httpd_version;
+my $tables_version = 'current';
+#XXX: support versioning
+#$httpd_version =~ /-dev$/ ? 'current' : $httpd_version;
my $tables_dir = "xs/tables/$tables_version";
unshift @INC, $tables_dir;
cvs commit: modperl-2.0/lib/Apache Build.pm
dougm 01/03/26 14:07:13
Modified:.Makefile.PL
lib/Apache Build.pm
Log:
fix apxs locator when BuildConfig.pm does not exist
Revision ChangesPath
1.28 +1 -1 modperl-2.0/Makefile.PL
Index: Makefile.PL
===
RCS file: /home/cvs/modperl-2.0/Makefile.PL,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -r1.27 -r1.28
--- Makefile.PL 2001/03/26 16:17:01 1.27
+++ Makefile.PL 2001/03/26 22:07:12 1.28
@@ -1,6 +1,6 @@
use 5.006;
use strict;
-use warnings;
+use warnings FATAL => 'all';
use lib qw(lib);
use Apache::Build ();
1.37 +3 -3 modperl-2.0/lib/Apache/Build.pm
Index: Build.pm
===
RCS file: /home/cvs/modperl-2.0/lib/Apache/Build.pm,v
retrieving revision 1.36
retrieving revision 1.37
diff -u -r1.36 -r1.37
--- Build.pm 2001/03/13 01:50:19 1.36
+++ Build.pm 2001/03/26 22:07:12 1.37
@@ -33,10 +33,10 @@
sub apxs {
my $self = shift;
-my $build = $self->build_config;
+$self = $self->build_config unless ref $self;
my $apxs;
my @trys = ($Apache::Build::APXS,
-$build->{MP_APXS},
+$self->{MP_APXS},
$ENV{MP_APXS});
unless (IS_MOD_PERL_BUILD) {
@@ -463,7 +463,7 @@
return $self->{ap_includedir} = "$d/include";
}
-$self->{ap_includedir} = Apache::Build->apxs('-q' => 'INCLUDEDIR');
+$self->{ap_includedir} = $self->apxs('-q' => 'INCLUDEDIR');
}
#--- parsing apache *.h files ---
cvs commit: modperl-2.0/src/modules/perl modperl_options.c
dougm 01/03/26 13:43:32
Modified:lib/ModPerl Code.pm
src/modules/perl modperl_options.c
Log:
Clone and Parent options require an ithreads enabled Perl
Revision ChangesPath
1.54 +5 -1 modperl-2.0/lib/ModPerl/Code.pm
Index: Code.pm
===
RCS file: /home/cvs/modperl-2.0/lib/ModPerl/Code.pm,v
retrieving revision 1.53
retrieving revision 1.54
diff -u -r1.53 -r1.54
--- Code.pm 2001/03/26 01:08:28 1.53
+++ Code.pm 2001/03/26 21:43:30 1.54
@@ -88,8 +88,9 @@
#XXX: allow disabling of PerDir hooks on a PerDir basis
my @hook_flags = (map { canon_uc($_) } keys %hooks);
+my @ithread_opts = qw(CLONE PARENT);
my %flags = (
-Srv => [qw(NONE CLONE PARENT ENABLED AUTOLOAD MERGE_HANDLERS),
+Srv => ['NONE', @ithread_opts, qw(ENABLED AUTOLOAD MERGE_HANDLERS),
@hook_flags, 'UNSET'],
Dir => [qw(NONE SEND_HEADER SETUP_ENV MERGE_HANDLERS UNSET)],
Interp => [qw(NONE IN_USE PUTBACK CLONED BASE)],
@@ -376,6 +377,9 @@
print $h_fh "\n#define MpSrvHOOKS_ALL_On(p) MpSrvFLAGS(p) |= (",
(join '|', map { 'MpSrv_f_' . $_ } @hook_flags), ")\n";
+
+print $h_fh "\n#define MpSrvOPT_ITHREAD_ONLY(o) \\\n",
+ (join ' || ', map("(o == MpSrv_f_$_)", @ithread_opts)), "\n";
();
}
1.5 +9 -1 modperl-2.0/src/modules/perl/modperl_options.c
Index: modperl_options.c
===
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_options.c,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- modperl_options.c 2001/03/25 17:42:26 1.4
+++ modperl_options.c 2001/03/26 21:43:31 1.5
@@ -73,7 +73,15 @@
return error;
}
-
+#ifndef USE_ITHREADS
+else {
+if (MpSrvOPT_ITHREAD_ONLY(o)) {
+return apr_pstrcat(p, "PerlOption `", str,
+ "' requires an ithreads enabled Perl", NULL);
+}
+}
+#endif
+
if (action == '-') {
o->opts_remove |= opt;
o->opts_add &= ~opt;
cvs commit: modperl-site/embperl Changes.pod.1.html index.html
richter 01/03/26 09:30:52 Modified:embperl Changes.pod.1.html index.html Log: Embperl Webpages - Changes Revision ChangesPath 1.206 +1 -1 modperl-site/embperl/Changes.pod.1.html Index: Changes.pod.1.html === RCS file: /home/cvs/modperl-site/embperl/Changes.pod.1.html,v retrieving revision 1.205 retrieving revision 1.206 diff -u -r1.205 -r1.206 --- Changes.pod.1.html2001/03/26 06:40:56 1.205 +++ Changes.pod.1.html2001/03/26 17:30:49 1.206 @@ -21,7 +21,7 @@ [HOME] [CONTENT] [PREV (Revision History - Content)] [NEXT (1.3.1 (RELEASE) 13 Feb. 2001)] -Last Update: Mon Mar 26 07:40:49 2001 (MET) +Last Update: Mon Mar 26 18:30:30 2001 (MET) NOTE: This version is only available via "CVS" 1.122 +12 -1 modperl-site/embperl/index.html Index: index.html === RCS file: /home/cvs/modperl-site/embperl/index.html,v retrieving revision 1.121 retrieving revision 1.122 diff -u -r1.121 -r1.122 --- index.html2001/03/26 06:40:56 1.121 +++ index.html2001/03/26 17:30:50 1.122 @@ -2,7 +2,18 @@ -Embperl - Embed Perl in Your HTML Documents + + + + + + + +Embperl - Building dynamic Websites with Perl + @@ -187,7 +198,7 @@ HTML::Embperl - Copyright (c) 1997-2001 Gerald Richter / ECOS <[EMAIL PROTECTED]> - Last Update $Id: index.html,v 1.121 2001/03/26 06:40:56 richter Exp $ + Last Update $Id: index.html,v 1.122 2001/03/26 17:30:50 richter Exp $
cvs commit: modperl-2.0/examples/lib/Apache HelloWorld.pm
dougm 01/03/26 08:21:37
Modified:.00README_FIRST
Added: examples/lib/Apache HelloWorld.pm
Log:
add a hello world example
Revision ChangesPath
1.14 +2 -0 modperl-2.0/00README_FIRST
Index: 00README_FIRST
===
RCS file: /home/cvs/modperl-2.0/00README_FIRST,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -r1.13 -r1.14
--- 00README_FIRST2001/03/26 16:17:00 1.13
+++ 00README_FIRST2001/03/26 16:21:35 1.14
@@ -53,4 +53,6 @@
much is the same as 1.x, but plenty is different at the moment.
there will be a compat layer in the future.
+see the examples/ directory for examples.
+
--dougm 03/26/01
1.1 modperl-2.0/examples/lib/Apache/HelloWorld.pm
Index: HelloWorld.pm
===
package Apache::HelloWorld;
#
# SetHandler modperl
# PerlResponseHandler Apache::HelloWorld
#
sub handler {
my $r = shift;
$r->content_type('text/plain');
#send_http_header API function does not exist in 2.0
$r->puts(__PACKAGE__); #print not yet implemented
0; #constants not yet implemented
}
1;
cvs commit: modperl-2.0/examples/lib/Apache - New directory
dougm 01/03/26 08:20:24 modperl-2.0/examples/lib/Apache - New directory
cvs commit: modperl-2.0/examples/lib - New directory
dougm 01/03/26 08:20:13 modperl-2.0/examples/lib - New directory
cvs commit: modperl-2.0/examples - New directory
dougm 01/03/26 08:20:03 modperl-2.0/examples - New directory
cvs commit: modperl-2.0/pod modperl_dev.pod
dougm 01/03/26 08:17:13
Modified:.00README_FIRST Makefile.PL
lib/ModPerl BuildOptions.pm
pod modperl_dev.pod
Log:
MP_GENERATE_XS option to generate xs code from checked-in tables, since C::Scan
doesnt work on some platforms
Revision ChangesPath
1.13 +3 -16 modperl-2.0/00README_FIRST
Index: 00README_FIRST
===
RCS file: /home/cvs/modperl-2.0/00README_FIRST,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -r1.12 -r1.13
--- 00README_FIRST2001/03/05 04:27:29 1.12
+++ 00README_FIRST2001/03/26 16:17:00 1.13
@@ -28,22 +28,9 @@
% make
% make install
-build the parsed structure and function tables:
-
-NOTE: requires C::Scan 0.75, which at the moment is unreleased, there
-is a working copy here: http://perl.apache.org/~dougm/Scan.pm
-
-NOTE: source_scan.pl is a HEAVY process, do not be alarmed
-should be run each time you update your httpd-2.0 tree
-
-% perl util/source_scan.pl apxs $apache_prefix/bin/apxs
-
-generate xs code from the tables:
-
-% perl util/xs_generate.pl
-
#build libmodperl.so and extension .so's
-% perl Makefile.PL MP_USE_DSO=1 MP_APXS=$apache_prefix/bin/apxs && make
+% perl Makefile.PL MP_GENERATE_XS=1 MP_USE_DSO=1 \
+MP_APXS=$apache_prefix/bin/apxs && make
as for httpd.conf, mine looks something like so at the moment:
@@ -66,4 +53,4 @@
much is the same as 1.x, but plenty is different at the moment.
there will be a compat layer in the future.
---dougm 03/04/01
+--dougm 03/26/01
1.27 +22 -0 modperl-2.0/Makefile.PL
Index: Makefile.PL
===
RCS file: /home/cvs/modperl-2.0/Makefile.PL,v
retrieving revision 1.26
retrieving revision 1.27
diff -u -r1.26 -r1.27
--- Makefile.PL 2001/03/05 04:11:01 1.26
+++ Makefile.PL 2001/03/26 16:17:01 1.27
@@ -57,6 +57,8 @@
#ModPerl::MM will use Apache::BuildConfig in subdir/Makefile.PL's
$build->save;
+
+generate_xs($httpd_version) if $build->{MP_GENERATE_XS};
}
sub post_configure {
@@ -78,6 +80,26 @@
}
$build->save;
+}
+
+sub generate_xs {
+my $httpd_version = shift;
+
+my $tables_version =
+ $httpd_version =~ /-dev$/ ? 'current' : $httpd_version;
+
+my $tables_dir = "xs/tables/$tables_version";
+unshift @INC, $tables_dir;
+
+print "generating XS code using $tables_dir...\n";
+
+require ModPerl::WrapXS;
+
+my $xs = ModPerl::WrapXS->new;
+
+$xs->generate;
+
+shift @INC;
}
sub echo_cmd {
1.6 +1 -0 modperl-2.0/lib/ModPerl/BuildOptions.pm
Index: BuildOptions.pm
===
RCS file: /home/cvs/modperl-2.0/lib/ModPerl/BuildOptions.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -r1.5 -r1.6
--- BuildOptions.pm 2001/03/04 19:41:57 1.5
+++ BuildOptions.pm 2001/03/26 16:17:06 1.6
@@ -147,3 +147,4 @@
APXSPath to apxs
XS_GLUE_DIR Directories containing extension glue
INCLUDE_DIR Add directories to search for header files
+GENERATE_XS Generate XS code based on httpd version
1.10 +17 -0 modperl-2.0/pod/modperl_dev.pod
Index: modperl_dev.pod
===
RCS file: /home/cvs/modperl-2.0/pod/modperl_dev.pod,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -r1.9 -r1.10
--- modperl_dev.pod 2001/03/26 13:37:08 1.9
+++ modperl_dev.pod 2001/03/26 16:17:10 1.10
@@ -46,6 +46,10 @@
Accept default values for all would-be prompts
+=item MP_GENERATE_XS
+
+Generate xs code from parsed source headers in I.
+
=item MP_USE_DSO
Build mod_perl as a DSO
@@ -103,6 +107,19 @@
% ./configure --with-mpm=threaded
% make
+=head2 Howto generate source tables
+
+All mod_perl-2.0 xs code is generated from parsed header files. While
+in pre-release mode, a version of these tables will be checked in to
+I. Should you wish to update these tables, here's
+how:
+
+NOTE: requires C::Scan 0.75, which at the moment is unreleased, there
+is a working copy here: http://perl.apache.org/~dougm/Scan.pm
+
+NOTE: source_scan.pl is a HEAVY process, do not be alarmed.
+
+% perl util/source_scan.pl apxs $apache_prefix/bin/apxs
=head1 mod_perl configuration directives
cvs commit: modperl-2.0/xs/tables/current/ModPerl FunctionTable.pm
dougm 01/03/26 08:07:00
Added: xs/tables/current/ModPerl FunctionTable.pm
Log:
current version of ModPerl::FunctionTable (generated by C::Scan/ModPerl::ParseSource)
Revision ChangesPath
1.1 modperl-2.0/xs/tables/current/ModPerl/FunctionTable.pm
Index: FunctionTable.pm
===
package ModPerl::FunctionTable;
# !!
# ! WARNING: generated by ModPerl::ParseSource/0.01
# ! Mon Mar 26 07:44:14 2001
# ! do NOT edit, any changes will be lost !
# !!
$ModPerl::FunctionTable = [
{
'return_type' => 'U32',
'args' => [
{
'name' => 'str',
'type' => 'const char *'
}
],
'name' => 'modperl_flags_lookup_dir'
},
{
'return_type' => 'U32',
'args' => [
{
'name' => 'str',
'type' => 'const char *'
}
],
'name' => 'modperl_flags_lookup_srv'
},
{
'return_type' => 'int',
'args' => [
{
'name' => 'c',
'type' => 'conn_rec *'
}
],
'name' => 'modperl_pre_connection_handler'
},
{
'return_type' => 'int',
'args' => [
{
'name' => 'c',
'type' => 'conn_rec *'
}
],
'name' => 'modperl_process_connection_handler'
},
{
'return_type' => 'void',
'args' => [
{
'name' => 'p',
'type' => 'apr_pool_t *'
},
{
'name' => 's',
'type' => 'server_rec *'
}
],
'name' => 'modperl_child_init_handler'
},
{
'return_type' => 'int',
'args' => [
{
'name' => 'r',
'type' => 'request_rec *'
}
],
'name' => 'modperl_header_parser_handler'
},
{
'return_type' => 'int',
'args' => [
{
'name' => 'r',
'type' => 'request_rec *'
}
],
'name' => 'modperl_access_handler'
},
{
'return_type' => 'int',
'args' => [
{
'name' => 'r',
'type' => 'request_rec *'
}
],
'name' => 'modperl_authen_handler'
},
{
'return_type' => 'int',
'args' => [
{
'name' => 'r',
'type' => 'request_rec *'
}
],
'name' => 'modperl_authz_handler'
},
{
'return_type' => 'int',
'args' => [
{
'name' => 'r',
'type' => 'request_rec *'
}
],
'name' => 'modperl_type_handler'
},
{
'return_type' => 'int',
'args' => [
{
'name' => 'r',
'type' => 'request_rec *'
}
],
'name' => 'modperl_fixup_handler'
},
{
'return_type' => 'int',
'args' => [
{
'name' => 'r',
'type' => 'request_rec *'
}
],
'name' => 'modperl_log_handler'
},
{
'return_type' => 'int',
'args' => [
{
'name' => 'r',
'type' => 'request_rec *'
}
],
'name' => 'modperl_post_read_request_handler'
},
{
'return_type' => 'int',
'args' => [
{
'name' => 'r',
'type' => 'request_rec *'
}
],
'name' => 'modperl_trans_handler'
},
{
'return_type' => 'void',
'args' => [
{
'name' => 'pconf',
'type' => 'apr_pool_t *'
},
{
'name' => 'plog',
'type' => 'apr_pool_t *'
},
{
'name' => 'ptemp',
'type' => 'apr_pool_t *'
},
{
'name' => 's',
'type' => 'server_rec *'
}
],
'name' => 'modperl_open_logs_handler'
},
{
'return_type' => 'void',
'args' => [
{
'name' => 'pconf',
'type' => 'apr_pool_t *'
},
{
'name' => 'plog',
'type' => 'apr_pool_t *'
},
{
'name' => 'ptemp',
'type' => 'apr_pool_t *'
},
{
'name' => 's',
'type' => 'server_rec *'
}
],
'name' => 'modperl_post_config_handler'
},
{
'return_type' => 'void',
'args' => [],
'name' => 'modperl_register_handler_hooks'
},
{
'return_type' => 'const char *',
'args' => [
{
'name' => 'idx',
'type' => 'int'
}
],
'name' => 'modperl_handler_desc_connection'
},
{
'return_type' => 'const char *',
'args' => [
{
'name' => 'idx',
'type' => 'int'
}
],
'name' => 'modperl_handler_desc_process'
},
{
'return_type' => 'const char *',
'args' =>
cvs commit: modperl-2.0/xs/tables/current/Apache StructureTable.pm
dougm 01/03/26 08:06:23
Added: xs/tables/current/Apache StructureTable.pm
Log:
current version of Apache::StructureTable (generated by C::Scan/Apache::ParseSource)
Revision ChangesPath
1.1 modperl-2.0/xs/tables/current/Apache/StructureTable.pm
Index: StructureTable.pm
===
package Apache::StructureTable;
# !!
# ! WARNING: generated by Apache::ParseSource/0.02
# ! Mon Mar 26 07:44:04 2001
# ! do NOT edit, any changes will be lost !
# !!
$Apache::StructureTable = [
{
'elts' => [
{
'name' => 'first',
'type' => 'union block_hdr *'
},
{
'name' => 'last',
'type' => 'union block_hdr *'
},
{
'name' => 'cleanups',
'type' => 'cleanup *'
},
{
'name' => 'subprocesses',
'type' => 'process_chain *'
},
{
'name' => 'sub_pools',
'type' => 'apr_pool_t *'
},
{
'name' => 'sub_next',
'type' => 'apr_pool_t *'
},
{
'name' => 'sub_prev',
'type' => 'apr_pool_t *'
},
{
'name' => 'parent',
'type' => 'apr_pool_t *'
},
{
'name' => 'free_first_avail',
'type' => 'char *'
},
{
'name' => 'apr_abort',
'type' => 'int(*)(int retcode)'
},
{
'name' => 'prog_data',
'type' => 'apr_hash_t *'
}
],
'type' => 'apr_pool_t'
},
{
'elts' => [
{
'name' => 'data',
'type' => 'unsigned char[16]'
}
],
'type' => 'apr_uuid_t'
},
{
'elts' => [
{
'name' => 'link',
'type' => '_ANON 63'
},
{
'name' => 'type',
'type' => 'const apr_bucket_type_t *'
},
{
'name' => 'length',
'type' => 'apr_off_t'
},
{
'name' => 'start',
'type' => 'apr_off_t'
},
{
'name' => 'data',
'type' => 'void *'
}
],
'type' => 'apr_bucket'
},
{
'elts' => [],
'type' => 'ap_HOOK_post_config_t'
},
{
'elts' => [],
'type' => 'apr_interface_e'
},
{
'elts' => [
{
'name' => 'tv_sec',
'type' => '__time_t'
},
{
'name' => 'tv_usec',
'type' => '__suseconds_t'
}
],
'type' => 'apr_os_imp_time_t'
},
{
'elts' => [
{
'name' => 'pFunc',
'type' => 'ap_HOOK_get_suexec_identity_t *'
},
{
'name' => 'szName',
'type' => 'const char *'
},
{
'name' => 'aszPredecessors',
'type' => 'const char * const *'
},
{
'name' => 'aszSuccessors',
'type' => 'const char * const *'
},
{
'name' => 'nOrder',
'type' => 'int'
}
],
'type' => 'ap_LINK_get_suexec_identity_t'
},
{
'elts' => [
{
'name' => 'pFunc',
'type' => 'ap_HOOK_http_method_t *'
},
{
'name' => 'szName',
'type' => 'const char *'
},
{
'name' => 'aszPredecessors',
'type' => 'const char * const *'
},
{
'name' => 'aszSuccessors',
'type' => 'const char * const *'
},
{
'name' => 'nOrder',
'type' => 'int'
}
],
'type' => 'ap_LINK_http_method_t'
},
{
'elts' => [
{
'name' => 'pool',
'type' => 'apr_pool_t *'
},
{
'name' => 'pconf',
'type' => 'apr_pool_t *'
},
{
'name' => 'argc',
'type' => 'int'
},
{
'name' => 'argv',
'type' => 'const char * const *'
},
{
'name' => 'short_name',
'type' => 'const char *'
}
],
'type' => 'process_rec'
},
{
'elts' => [],
'type' => 'apr_OFN_ap_ssi_parse_string_t'
},
{
'elts' => [],
'type' => 'ap_HOOK_optional_fn_retrieve_t'
},
{
'elts' => [
{
'name' => 'dptr',
'type' => 'char *'
},
{
'name' => 'dsize',
'type' => 'apr_size_t'
}
],
'type' => 'apr_datum_t'
},
{
'elts' => [],
'type' => 'apr_time_t'
},
{
'elts' => [
{
'name' => 'pool',
'type' => 'apr_pool_t *'
},
{
'name' => 'connec
cvs commit: modperl-2.0/xs/tables/current/Apache FunctionTable.pm
dougm 01/03/26 08:05:48
Added: xs/tables/current/Apache FunctionTable.pm
Log:
current version of Apache::FunctionTable (generated by C::Scan/Apache::ParseSource)
Revision ChangesPath
1.1 modperl-2.0/xs/tables/current/Apache/FunctionTable.pm
Index: FunctionTable.pm
===
package Apache::FunctionTable;
# !!
# ! WARNING: generated by Apache::ParseSource/0.02
# ! Mon Mar 26 07:44:02 2001
# ! do NOT edit, any changes will be lost !
# !!
$Apache::FunctionTable = [
{
'return_type' => 'char *',
'args' => [
{
'name' => 'statcode',
'type' => 'apr_status_t'
},
{
'name' => 'buf',
'type' => 'char *'
},
{
'name' => 'bufsize',
'type' => 'apr_size_t'
}
],
'name' => 'apr_strerror'
},
{
'return_type' => 'apr_status_t',
'args' => [
{
'name' => 'globalp',
'type' => 'apr_pool_t *'
}
],
'name' => 'apr_pool_alloc_init'
},
{
'return_type' => 'void',
'args' => [
{
'name' => 'globalp',
'type' => 'apr_pool_t *'
}
],
'name' => 'apr_pool_alloc_term'
},
{
'return_type' => 'apr_status_t',
'args' => [
{
'name' => 'newcont',
'type' => 'apr_pool_t **'
},
{
'name' => 'cont',
'type' => 'apr_pool_t *'
}
],
'name' => 'apr_pool_create'
},
{
'return_type' => 'apr_status_t',
'args' => [
{
'name' => 'data',
'type' => 'const void *'
},
{
'name' => 'key',
'type' => 'const char *'
},
{
'name' => 'arg2',
'type' => 'apr_status_t (*cleanup)(void *)'
},
{
'name' => 'cont',
'type' => 'apr_pool_t *'
}
],
'name' => 'apr_pool_userdata_set'
},
{
'return_type' => 'apr_status_t',
'args' => [
{
'name' => 'data',
'type' => 'void **'
},
{
'name' => 'key',
'type' => 'const char *'
},
{
'name' => 'cont',
'type' => 'apr_pool_t *'
}
],
'name' => 'apr_pool_userdata_get'
},
{
'return_type' => 'apr_pool_t *',
'args' => [
{
'name' => 'p',
'type' => 'apr_pool_t *'
},
{
'name' => 'arg1',
'type' => 'int (*apr_abort)(int retcode)'
}
],
'name' => 'apr_pool_sub_make'
},
{
'return_type' => 'void',
'args' => [
{
'name' => 'p',
'type' => 'apr_pool_t *'
}
],
'name' => 'apr_pool_clear'
},
{
'return_type' => 'void',
'args' => [
{
'name' => 'p',
'type' => 'apr_pool_t *'
}
],
'name' => 'apr_pool_destroy'
},
{
'return_type' => 'apr_size_t',
'args' => [
{
'name' => 'p',
'type' => 'apr_pool_t *'
}
],
'name' => 'apr_pool_num_bytes'
},
{
'return_type' => 'apr_size_t',
'args' => [],
'name' => 'apr_pool_free_blocks_num_bytes'
},
{
'return_type' => 'void *',
'args' => [
{
'name' => 'c',
'type' => 'apr_pool_t *'
},
{
'name' => 'reqsize',
'type' => 'apr_size_t'
}
],
'name' => 'apr_palloc'
},
{
'return_type' => 'void *',
'args' => [
{
'name' => 'p',
'type' => 'apr_pool_t *'
},
{
'name' => 'size',
'type' => 'apr_size_t'
}
],
'name' => 'apr_pcalloc'
},
{
'return_type' => 'void',
'args' => [
{
'name' => 'p',
'type' => 'apr_pool_t *'
},
{
'name' => 'data',
'type' => 'const void *'
},
{
'name' => 'arg2',
'type' => 'apr_status_t (*plain_cleanup)(void *)'
},
{
'name' => 'arg3',
'type' => 'apr_status_t (*child_cleanup)(void *)'
}
],
'name' => 'apr_pool_cleanup_register'
},
{
'return_type' => 'void',
'args' => [
{
'name' => 'p',
'type' => 'apr_pool_t *'
},
{
'name' => 'data',
'type' => 'const void *'
},
{
'name' => 'arg2',
'type' => 'apr_status_t (*cleanup)(void *)'
}
],
'name' => 'apr_pool_cleanup_kill'
},
{
'return_type' =
cvs commit: modperl-2.0/xs/tables/current/ModPerl - New directory
dougm 01/03/26 08:04:45 modperl-2.0/xs/tables/current/ModPerl - New directory
cvs commit: modperl-2.0/xs/tables/current/Apache - New directory
dougm 01/03/26 08:04:44 modperl-2.0/xs/tables/current/Apache - New directory
cvs commit: modperl-2.0/xs/tables/current - New directory
dougm 01/03/26 08:04:32 modperl-2.0/xs/tables/current - New directory
cvs commit: modperl-2.0/xs/tables - New directory
dougm 01/03/26 08:04:22 modperl-2.0/xs/tables - New directory
cvs commit: modperl-2.0/xs/Apache/Module Apache__Module.h
dougm 01/03/26 07:51:51 Modified:xs/Apache/Module Apache__Module.h Log: s/top_module/ap_top_module/ Revision ChangesPath 1.2 +1 -1 modperl-2.0/xs/Apache/Module/Apache__Module.h Index: Apache__Module.h === RCS file: /home/cvs/modperl-2.0/xs/Apache/Module/Apache__Module.h,v retrieving revision 1.1 retrieving revision 1.2 diff -u -r1.1 -r1.2 --- Apache__Module.h 2001/03/25 22:32:10 1.1 +++ Apache__Module.h 2001/03/26 15:51:50 1.2 @@ -1,2 +1,2 @@ #define mpxs_Apache__Module_top_module(CLASS) \ -(CLASS ? top_module : top_module) +(CLASS ? ap_top_module : ap_top_module)
cvs commit: modperl-2.0/pod modperl_dev.pod
sbekman 01/03/26 05:37:08 Modified:pod modperl_dev.pod Log: Geoff's patch Revision ChangesPath 1.9 +2 -2 modperl-2.0/pod/modperl_dev.pod Index: modperl_dev.pod === RCS file: /home/cvs/modperl-2.0/pod/modperl_dev.pod,v retrieving revision 1.8 retrieving revision 1.9 diff -u -r1.8 -r1.9 --- modperl_dev.pod 2001/01/06 02:41:22 1.8 +++ modperl_dev.pod 2001/03/26 13:37:08 1.9 @@ -19,7 +19,7 @@ % cd .. % buildconf % ./configure --prefix=$HOME/apache-2.0 \ - --with-mpm=mpmt_pthread --enable-so + --with-mpm=threaded --enable-so % make && make install For bleeding edge Perl: @@ -100,7 +100,7 @@ =head2 Configure and compile Apache % cd ../httpd-2.0 - % ./configure --with-mpm=mpmt_pthread + % ./configure --with-mpm=threaded % make
