1 # Based on apr's make_export.awk, which is
2 # based on Ryan Bloom's make_export.pl
8 # List of functions that we don't support, yet??
9 #/apr_##name##_set_inherit/{next}
10 #/apr_##name##_unset_inherit/{next}
13 function add_symbol (sym_name) {
17 gsub (/ /, "", sym_name)
18 line = line sym_name ",\n"
26 /^[ \t]*AP[RUI]?_DECLARE[^(]*[(][^)]*[)]([^ ]* )*[^(]+[(]/ {
27 sub("[ \t]*AP[RUI]?_DECLARE[^(]*[(][^)]*[)][ \t]*", "")
29 sub("([^ ]* (^([ \t]*[(])))+", "")
35 /^[ \t]*AP_DECLARE_HOOK[^(]*[(][^)]*/ {
38 sub("^[ \t]+", "", symbol)
39 sub("[ \t]+$", "", symbol)
41 add_symbol("ap_hook_" symbol)
42 add_symbol("ap_hook_get_" symbol)
43 add_symbol("ap_run_" symbol)
47 /^[ \t]*APR_POOL_DECLARE_ACCESSOR[^(]*[(][^)]*[)]/ {
48 sub("[ \t]*APR_POOL_DECLARE_ACCESSOR[^(]*[(]", "", $0)
50 add_symbol("apr_" $0 "_pool_get")
54 /^[ \t]*APR_DECLARE_INHERIT_SET[^(]*[(][^)]*[)]/ {
55 sub("[ \t]*APR_DECLARE_INHERIT_SET[^(]*[(]", "", $0)
57 add_symbol("apr_" $0 "_inherit_set")
61 /^[ \t]*APR_DECLARE_INHERIT_UNSET[^(]*[(][^)]*[)]/ {
62 sub("[ \t]*APR_DECLARE_INHERIT_UNSET[^(]*[(]", "", $0)
64 add_symbol("apr_" $0 "_inherit_unset")
68 /^[ \t]*AP[RUI]?_DECLARE_DATA .*;$/ {
70 gsub( /[*;]/, "", varname);
71 gsub( /\[.*\]/, "", varname);