cvs commit: modperl-2.0/lib/Apache ParseSource.pm

2001-09-06 Thread dougm

dougm   01/09/06 09:40:11

  Modified:lib/Apache ParseSource.pm
  Log:
  only generate table .pm's if content has changed
  Submitted by:  Stas Bekman [EMAIL PROTECTED]
  Reviewed by:  dougm
  
  Revision  ChangesPath
  1.26  +26 -4 modperl-2.0/lib/Apache/ParseSource.pm
  
  Index: ParseSource.pm
  ===
  RCS file: /home/cvs/modperl-2.0/lib/Apache/ParseSource.pm,v
  retrieving revision 1.25
  retrieving revision 1.26
  diff -u -r1.25 -r1.26
  --- ParseSource.pm2001/09/06 05:26:52 1.25
  +++ ParseSource.pm2001/09/06 16:40:11 1.26
  @@ -410,8 +410,6 @@
   $file = $tdir/$subdir/$file;
   }
   
  -open my $pm, '', $file or die open $file: $!;
  -
   # sort the hashes (including nested ones) for a consistent dump
   canonsort(\$data);
   
  @@ -422,7 +420,7 @@
   my $version = $self-VERSION;
   my $date = scalar localtime;
   
  -print $pm EOF;
  +my $new_content =  EOF;
   package $name;
   
   # !!
  @@ -435,7 +433,31 @@
   
   1;
   EOF
  -close $pm;
  +
  +my $old_content = '';
  +if (-e $file) {
  +open my $pm, '', $file or die open $file: $!;
  +local $/ = undef; # slurp the file
  +$old_content = $pm;
  +close $pm;
  +}
  +
  +my $overwrite = 1;
  +if ($old_content) {
  +# strip the date line, which will never be the same before
  +# comparing
  +my $table_header = qr{^\#\s!.*};
  +(my $old = $old_content) =~ s/$table_header//mg;
  +(my $new = $new_content) =~ s/$table_header//mg;
  +$overwrite = 0 if $old eq $new;
  +}
  +
  +if ($overwrite) {
  +open my $pm, '', $file or die open $file: $!;
  +print $pm $new_content;
  +close $pm;
  +}
  +
   }
   
   # canonsort(\$data);
  
  
  



cvs commit: modperl-2.0/xs/tables/current/Apache FunctionTable.pm StructureTable.pm

2001-09-06 Thread dougm

dougm   01/09/06 09:41:30

  Modified:xs/tables/current/Apache FunctionTable.pm StructureTable.pm
  Log:
  sync
  
  Revision  ChangesPath
  1.17  +277 -2modperl-2.0/xs/tables/current/Apache/FunctionTable.pm
  
  Index: FunctionTable.pm
  ===
  RCS file: /home/cvs/modperl-2.0/xs/tables/current/Apache/FunctionTable.pm,v
  retrieving revision 1.16
  retrieving revision 1.17
  diff -u -r1.16 -r1.17
  --- FunctionTable.pm  2001/09/06 05:16:25 1.16
  +++ FunctionTable.pm  2001/09/06 16:41:29 1.17
  @@ -2,7 +2,7 @@
   
   # !!
   # ! WARNING: generated by Apache::ParseSource/0.02
  -# !  Sun Aug 19 10:32:09 2001
  +# !  Thu Sep  6 09:45:43 2001
   # !  do NOT edit, any changes will be lost !
   # !!
   
  @@ -208,6 +208,20 @@
   ]
 },
 {
  +'return_type' = 'void',
  +'name' = 'ap_basic_http_header',
  +'args' = [
  +  {
  +'type' = 'request_rec *',
  +'name' = 'r'
  +  },
  +  {
  +'type' = 'apr_bucket_brigade *',
  +'name' = 'bb'
  +  }
  +]
  +  },
  +  {
   'return_type' = 'apr_bucket *',
   'name' = 'ap_bucket_error_create',
   'args' = [
  @@ -554,6 +568,28 @@
   ]
 },
 {
  +'return_type' = 'apr_status_t',
  +'name' = 'ap_dechunk_filter',
  +'args' = [
  +  {
  +'type' = 'ap_filter_t *',
  +'name' = 'f'
  +  },
  +  {
  +'type' = 'apr_bucket_brigade *',
  +'name' = 'b'
  +  },
  +  {
  +'type' = 'ap_input_mode_t',
  +'name' = 'mode'
  +  },
  +  {
  +'type' = 'apr_off_t *',
  +'name' = 'readbytes'
  +  }
  +]
  +  },
  +  {
   'return_type' = 'const char *',
   'name' = 'ap_default_type',
   'args' = [
  @@ -589,6 +625,16 @@
 },
 {
   'return_type' = 'int',
  +'name' = 'ap_directory_walk',
  +'args' = [
  +  {
  +'type' = 'request_rec *',
  +'name' = 'r'
  +  }
  +]
  +  },
  +  {
  +'return_type' = 'int',
   'name' = 'ap_discard_request_body',
   'args' = [
 {
  @@ -717,6 +763,16 @@
   ]
 },
 {
  +'return_type' = 'int',
  +'name' = 'ap_file_walk',
  +'args' = [
  +  {
  +'type' = 'request_rec *',
  +'name' = 'r'
  +  }
  +]
  +  },
  +  {
   'return_type' = 'apr_status_t',
   'name' = 'ap_filter_flush',
   'args' = [
  @@ -1545,6 +1601,11 @@
   'args' = []
 },
 {
  +'return_type' = 'apr_array_header_t *',
  +'name' = 'ap_hook_get_map_to_storage',
  +'args' = []
  +  },
  +  {
   'return_type' = 'void',
   'name' = 'ap_hook_get_mgmt_items',
   'args' = [
  @@ -1755,6 +1816,28 @@
 },
 {
   'return_type' = 'void',
  +'name' = 'ap_hook_map_to_storage',
  +'args' = [
  +  {
  +'type' = 'ap_HOOK_map_to_storage_t *',
  +'name' = 'pf'
  +  },
  +  {
  +'type' = 'const char * const *',
  +'name' = 'aszPre'
  +  },
  +  {
  +'type' = 'const char * const *',
  +'name' = 'aszSucc'
  +  },
  +  {
  +'type' = 'int',
  +'name' = 'nOrder'
  +  }
  +]
  +  },
  +  {
  +'return_type' = 'void',
   'name' = 'ap_hook_open_logs',
   'args' = [
 {
  @@ -2019,6 +2102,28 @@
 },
 {
   'return_type' = 'apr_status_t',
  +'name' = 'ap_http_filter',
  +'args' = [
  +  {
  +'type' = 'ap_filter_t *',
  +'name' = 'f'
  +  },
  +  {
  +'type' = 'apr_bucket_brigade *',
  +'name' = 'b'
  +  },
  +  {
  +'type' = 'ap_input_mode_t',
  +'name' = 'mode'
  +  },
  +  {
  +'type' = 'apr_off_t *',
  +'name' = 'readbytes'
  +  }
  +]
  +  },
  +  {
  +'return_type' = 'apr_status_t',
   'name' = 'ap_http_header_filter',
   'args' = [
 {
  @@ -2194,6 +2299,16 @@
   ]
 },
 {
  +'return_type' = 'int',
  +'name' = 'ap_location_walk',
  +'args' = [
  +  {
  +'type' = 'request_rec *',
  +'name' = 'r'
  +  }
  +]
  +  },
  +  {
   'return_type' = 'void',
   'name' = 'ap_log_assert',
   'args' = [
  @@ -2996,6 +3111,20 @@
   ]
 },
 {
  +'return_type' = 'int',
  +'name' = 'ap_os_is_path_absolute',
  +'args' = [
  +  {
  +'type' = 'apr_pool_t *',
  +'name' = 'p'
  +  },
  +  {
  +'type' = 'const char *',
  +'name' = 'dir'
  +  }
  +]
  +  },
  +  {
   'return_type' = 'void',
   'name' = 'ap_parse_uri',
   'args' = [
  @@ -3222,6 +3351,16 @@
   ]
 },
 {
  +'return_type' = 'int',
  +'name' = 'ap_process_request_internal',