r11761: * fix clearing of event logs by truncating the tdb.
[Samba.git] / source / script / mkproto.awk
bloba0f3096c84207db4fc15241fe791c17172cbc991
1 BEGIN {
2 inheader=0;
3 # use_ldap_define = 0;
4 current_file="";
5 if (headername=="") {
6 headername="_PROTO_H_";
9 print "#ifndef",headername
10 print "#define",headername
11 print ""
12 print "/* This file is automatically generated with \"make proto\". DO NOT EDIT */"
13 print ""
16 END {
17 print ""
18 print "#endif /* ",headername," */"
22 if (FILENAME!=current_file) {
23 # if (use_ldap_define)
24 # {
25 # print "#endif /* USE_LDAP */"
26 # use_ldap_define = 0;
27 # }
28 print ""
29 print "/* The following definitions come from",FILENAME," */"
30 print ""
31 current_file=FILENAME
33 if (inheader) {
34 if (match($0,"[)][ \t]*$")) {
35 inheader = 0;
36 printf "%s;\n",$0;
37 } else {
38 printf "%s\n",$0;
40 next;
44 # we handle the loadparm.c fns separately
46 /^FN_LOCAL_BOOL/ {
47 split($0,a,"[,()]")
48 printf "BOOL %s(int );\n", a[2]
51 /^FN_LOCAL_LIST/ {
52 split($0,a,"[,()]")
53 printf "const char **%s(int );\n", a[2]
56 /^FN_LOCAL_STRING/ {
57 split($0,a,"[,()]")
58 printf "char *%s(int );\n", a[2]
61 /^FN_LOCAL_CONST_STRING/ {
62 split($0,a,"[,()]")
63 printf "const char *%s(int );\n", a[2]
66 /^FN_LOCAL_INT/ {
67 split($0,a,"[,()]")
68 printf "int %s(int );\n", a[2]
71 /^FN_LOCAL_CHAR/ {
72 split($0,a,"[,()]")
73 printf "char %s(int );\n", a[2]
76 /^FN_GLOBAL_BOOL/ {
77 split($0,a,"[,()]")
78 printf "BOOL %s(void);\n", a[2]
81 /^FN_GLOBAL_LIST/ {
82 split($0,a,"[,()]")
83 printf "const char **%s(void);\n", a[2]
86 /^FN_GLOBAL_STRING/ {
87 split($0,a,"[,()]")
88 printf "char *%s(void);\n", a[2]
91 /^FN_GLOBAL_CONST_STRING/ {
92 split($0,a,"[,()]")
93 printf "const char *%s(void);\n", a[2]
96 /^FN_GLOBAL_INT/ {
97 split($0,a,"[,()]")
98 printf "int %s(void);\n", a[2]
101 /^static|^extern/ || !/^[a-zA-Z]/ || /[;]/ {
102 next;
106 # We have to split up the start
107 # matching as we now have so many start
108 # types that it can cause some versions
109 # of nawk/awk to choke and fail on
110 # the full match. JRA.
114 gotstart = 0;
115 if( $0 ~ /^const|^connection_struct|^pipes_struct|^smb_np_struct|^file_fd_struct|^files_struct|^connection_struct|^uid_t|^gid_t|^unsigned|^mode_t|^DIR|^user|^int|^pid_t|^ino_t|^off_t|^double/ ) {
116 gotstart = 1;
119 if( $0 ~ /^vuser_key|^UNISTR2|^LOCAL_GRP|^DOMAIN_GRP|^SMB_STRUCT_DIRENT|^SEC_ACL|^SEC_DESC|^SEC_DESC_BUF|^DOM_SID|^RPC_HND_NODE|^BYTE/ ) {
120 gotstart = 1;
123 if( $0 ~ /^ADS_STRUCT|^ADS_STATUS|^DATA_BLOB|^ASN1_DATA|^TDB_CONTEXT|^TDB_DATA|^smb_ucs2_t|^TALLOC_CTX|^hash_element|^NT_DEVICEMODE|^enum.*\(|^NT_USER_TOKEN|^SAM_ACCOUNT|^NTTIME/ ) {
124 gotstart = 1;
127 if( $0 ~ /^smb_iconv_t|^long|^char|^uint|^NTSTATUS|^WERROR|^CLI_POLICY_HND|^struct|^BOOL|^void|^time|^smb_shm_offset_t|^shm_offset_t|^FILE|^XFILE|^SMB_OFF_T|^size_t|^ssize_t|^SMB_BIG_UINT|^SMB_BIG_INT/ ) {
128 gotstart = 1;
131 if( $0 ~ /^SAM_ACCT_INFO_NODE|^SMB_ACL_T|^ADS_MODLIST|^PyObject|^SORTED_TREE|^REGISTRY_HOOK|^REGISTRY_VALUE|^REGVAL_CTR|^DEVICEMODE|^PAC_DATA|^NET_USER_INFO_3|^smb_event_id_t/ ) {
132 gotstart = 1;
135 if( $0 ~ /^WINBINDD_PW|^WINBINDD_GR|^NT_PRINTER_INFO_LEVEL_2|^LOGIN_CACHE|^krb5_error_code|^LDAP|^u32|^LUID_ATTR|^NSS_STATUS/ ) {
136 gotstart = 1;
139 if( $0 ~ /^NODE_STATUS_STRUCT|SMB_STRUCT_DIR|ELOG_TDB/ ) {
140 gotstart = 1;
143 if(!gotstart) {
144 next;
149 /[(].*[)][ \t]*$/ {
150 printf "%s;\n",$0;
151 next;
154 /[(]/ {
155 inheader=1;
156 printf "%s\n",$0;
157 next;