geoff 2003/11/17 15:27:11
Modified: xs/maps apr_functions.map apr_structures.map apr_types.map
xs/tables/current/ModPerl FunctionTable.pm
Added: xs/APR/Finfo APR__Finfo.h
Log:
add access to $r->finfo() and related APR::Finfo methods,
such as $r->finfo->size(), $r->finfo->mtime(), and
APR::Finfo::stat()
Revision Changes Path
1.1 modperl-2.0/xs/APR/Finfo/APR__Finfo.h
Index: APR__Finfo.h
===================================================================
static MP_INLINE
apr_finfo_t *mpxs_Apache__RequestRec_finfo(request_rec *r)
{
return &r->finfo;
}
1.60 +5 -2 modperl-2.0/xs/maps/apr_functions.map
Index: apr_functions.map
===================================================================
RCS file: /home/cvs/modperl-2.0/xs/maps/apr_functions.map,v
retrieving revision 1.59
retrieving revision 1.60
diff -u -r1.59 -r1.60
--- apr_functions.map 26 Sep 2003 08:29:26 -0000 1.59
+++ apr_functions.map 17 Nov 2003 23:27:11 -0000 1.60
@@ -301,9 +301,12 @@
apr_filepath_root
apr_filepath_set
--MODULE=APR::Finfo
- apr_lstat
+MODULE=APR::Finfo
+-apr_lstat
apr_stat
+
+PACKAGE=Apache::RequestRec
+ mpxs_Apache__RequestRec_finfo
!MODULE=APR::String
apr_collapse_spaces
1.9 +2 -2 modperl-2.0/xs/maps/apr_structures.map
Index: apr_structures.map
===================================================================
RCS file: /home/cvs/modperl-2.0/xs/maps/apr_structures.map,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -r1.8 -r1.9
--- apr_structures.map 19 May 2002 01:05:30 -0000 1.8
+++ apr_structures.map 17 Nov 2003 23:27:11 -0000 1.9
@@ -28,7 +28,7 @@
> list
</apr_bucket>
-!<apr_finfo_t>
+<apr_finfo_t>
pool
valid
protection
@@ -45,7 +45,7 @@
ctime
fname
name
- filehand
+- filehand
</apr_finfo_t>
!<apr_sockaddr_t>
1.21 +2 -2 modperl-2.0/xs/maps/apr_types.map
Index: apr_types.map
===================================================================
RCS file: /home/cvs/modperl-2.0/xs/maps/apr_types.map,v
retrieving revision 1.20
retrieving revision 1.21
diff -u -r1.20 -r1.21
--- apr_types.map 18 Mar 2003 06:52:41 -0000 1.20
+++ apr_types.map 17 Nov 2003 23:27:11 -0000 1.21
@@ -62,9 +62,9 @@
struct apr_os_dir_t | UNDEFINED
apr_seek_where_t | UNDEFINED
struct apr_pollfd_t | UNDEFINED
-apr_fileperms_t | UNDEFINED
+apr_fileperms_t | IV
struct apr_finfo_t | APR::Finfo
-apr_filetype_e | UNDEFINED
+apr_filetype_e | IV
apr_dev_t | NV
apr_ino_t | IV
1.130 +10 -0 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.129
retrieving revision 1.130
diff -u -r1.129 -r1.130
--- FunctionTable.pm 6 Nov 2003 20:14:07 -0000 1.129
+++ FunctionTable.pm 17 Nov 2003 23:27:11 -0000 1.130
@@ -5632,6 +5632,16 @@
]
},
{
+ 'return_type' => 'apr_finfo_t *',
+ 'name' => 'mpxs_Apache__RequestRec_finfo',
+ 'args' => [
+ {
+ 'type' => 'request_rec *',
+ 'name' => 'r'
+ }
+ ]
+ },
+ {
'return_type' => 'SV *',
'name' => 'mpxs_Apache__RequestRec_pnotes',
'args' => [
