PageRenderTime 22ms CodeModel.GetById 20ms app.highlight 1ms RepoModel.GetById 0ms app.codeStats 0ms

/packages/httpd24/src/apr/apr24.pas

https://github.com/slibre/freepascal
Pascal | 142 lines | 57 code | 17 blank | 68 comment | 0 complexity | 15516577f57ed1092a8187d6cc9dc620 MD5 | raw file
Possible License(s): LGPL-2.0, LGPL-2.1, LGPL-3.0
  1{ Licensed to the Apache Software Foundation (ASF) under one or more
  2 * contributor license agreements.  See the NOTICE file distributed with
  3 * this work for additional information regarding copyright ownership.
  4 * The ASF licenses this file to You under the Apache License, Version 2.0
  5 * (the "License"); you may not use this file except in compliance with
  6 * the License.  You may obtain a copy of the License at
  7 *
  8 *     http://www.apache.org/licenses/LICENSE-2.0
  9 *
 10 * Unless required by applicable law or agreed to in writing, software
 11 * distributed under the License is distributed on an "AS IS" BASIS,
 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 13 * See the License for the specific language governing permissions and
 14 * limitations under the License.
 15  }
 16unit apr24;
 17{$ifdef fpc}
 18  {$mode delphi}{$H+}
 19{$endif}
 20{$ifdef Unix}
 21  {$PACKRECORDS C}
 22{$endif}
 23
 24{$DEFINE Apache2_4}
 25{$DEFINE FPCAPACHE_2_4}
 26
 27interface
 28
 29uses
 30{$ifdef WINDOWS}
 31  Windows,
 32{$ELSE}
 33  UnixType,
 34{$ENDIF}
 35  SysUtils, ctypes;
 36  
 37const
 38{$IFDEF WINDOWS}
 39  LibAPR = 'libapr-1.dll';
 40{$ELSE}
 41  LibAPR = '';
 42{$ENDIF}
 43
 44{$IF DEFINED(WINDOWS) AND NOT DEFINED(WIN64)}//Win64 is same as Linux, no funky function name changes
 45  LibNamePrefix = '_';
 46  LibSuff_ = '_';
 47  LibSuff0 = '@0';
 48  LibSuff4 = '@4';
 49  LibSuff8 = '@8';
 50  LibSuff12 = '@12';
 51  LibSuff16 = '@16';
 52  LibSuff20 = '@20';
 53  LibSuff24 = '@24';
 54  LibSuff28 = '@28';
 55  LibSuff32 = '@32';
 56{$ELSE}
 57  LibNamePrefix = '';
 58  LibSuff_ = '_';
 59  LibSuff0 = '';
 60  LibSuff4 = '';
 61  LibSuff8 = '';
 62  LibSuff12 = '';
 63  LibSuff16 = '';
 64  LibSuff20 = '';
 65  LibSuff24 = '';
 66  LibSuff28 = '';
 67  LibSuff32 = '';
 68{$ENDIF}
 69
 70{**********************************************************}
 71{ Declarations moved here to be on top of all declarations }
 72{**********************************************************}
 73{from apr-util-X.X.X/include/apr_hooks.h}
 74//* Hook orderings */
 75//** run this hook first, before ANYTHING */
 76APR_HOOK_REALLY_FIRST    = (-10);
 77//** run this hook first */
 78APR_HOOK_FIRST           = 0;
 79//** run this hook somewhere */
 80APR_HOOK_MIDDLE		 = 10;
 81//** run this hook after every other hook which is defined*/
 82APR_HOOK_LAST		 = 20;
 83//** run this hook last, after EVERYTHING */
 84APR_HOOK_REALLY_LAST	 = 30;
 85
 86type
 87  apr_int64_t = Int64;
 88  apr_uint64_t = QWord;
 89  apr_off_t = Int64;
 90  Papr_off_t = ^apr_off_t;
 91  apr_size_t = size_t;
 92  Papr_size_t = ^apr_size_t;
 93  apr_int32_t = LongInt;
 94  apr_uint32_t = LongWord;
 95  apr_ino_t = apr_uint64_t;
 96  pid_t = Longint;
 97  Ppid_t = ^pid_t;
 98  time_t = LongInt;//ansi time_t
 99  Papr_file_t = Pointer;//
100  Pap_filter_t = Pointer;//temporary, it is in util_filter.inc
101
102  {from apr_hash.h (real struct is defined in apr_hash.c)}
103  apr_hash_t = record end;
104  Papr_hash_t = ^apr_hash_t;
105
106  {apr_bucket_alloc_t is found in apr-util-X.X.X/buckets/apr_buckets_alloc.c
107   and not .h header file declared}
108  Papr_bucket_alloc_t = Pointer;//^apr_bucket_alloc_t;
109
110{$IFNDEF WINDOWS}
111  va_list = Pointer;
112{$ENDIF}
113
114{$include apr_errno.inc}
115{$include apr_pools.inc}
116//{$include apr_general.inc}
117//{$include apr_dso.inc}
118{$include apr_user.inc}
119{$include apr_time.inc}
120{$include apr_tables.inc}
121{$include apr_file_info.inc}
122//{$include apr_file_io.inc}
123{$include apr_strings.inc}
124//{$include apr_lib.inc}
125//{$include apr_signal.inc}
126//{$include apr_network_io.inc}
127//{$include apr_hash.inc}
128   {.$include apr_portable.inc}
129
130   {.$include ../aprutils/apr_uri.inc}
131
132//{$include apr_thread_proc.inc}
133{$include apr_version.inc}
134//{$include apr_poll.inc}
135
136//moved from http_protocol.h(http_protocol.inc)
137{$include apr_mmap.inc}
138
139implementation
140
141
142end.