/[cvs]/eggdrop1.8/src/tclhash.h
ViewVC logotype

Contents of /eggdrop1.8/src/tclhash.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.5 - (show annotations) (download) (as text)
Tue Jun 19 14:27:17 2012 UTC (7 years, 1 month ago) by thommey
Branch: MAIN
CVS Tags: HEAD
Changes since 1.4: +3 -2 lines
File MIME type: text/x-csrc
Partially revert changes to vwait/update as in 1.6.21.

1 /*
2 * tclhash.h
3 *
4 * $Id: tclhash.h,v 1.4 2011/01/27 01:41:08 thommey Exp $
5 */
6 /*
7 * Copyright (C) 1997 Robey Pointer
8 * Copyright (C) 1999 - 2010 Eggheads Development Team
9 *
10 * This program is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU General Public License
12 * as published by the Free Software Foundation; either version 2
13 * of the License, or (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
23 */
24
25 #ifndef _EGG_TCLHASH_H
26 #define _EGG_TCLHASH_H
27
28
29 #define TC_DELETED 0x0001 /* This command/trigger was deleted. */
30
31 typedef struct tcl_cmd_b {
32 struct tcl_cmd_b *next;
33
34 struct flag_record flags;
35 char *func_name; /* Proc name. */
36 /* FIXME: 'hits' could overflow if a bind is triggered enough. */
37 int hits; /* Number of times this proc was triggered. */
38 u_8bit_t attributes; /* Flags for this entry. TC_* */
39 } tcl_cmd_t;
40
41 struct threaddata {
42 int (*mainloopfunc)(int); /* main loop function replacing a single
43 * tcl event loop iteration */
44 sock_list *socklist; /* tcl socket list for threads, else NULL */
45 struct timeval blocktime; /* maximum time to block in select() */
46 int mainthread; /* Is this the main thread? */
47 int MAXSOCKS;
48 };
49
50 #define TBM_DELETED 0x0001 /* This mask was deleted. */
51
52 typedef struct tcl_bind_mask_b {
53 struct tcl_bind_mask_b *next;
54
55 tcl_cmd_t *first; /* List of commands registered for this bind. */
56 char *mask;
57 u_8bit_t flags; /* Flags for this entry. TBM_* */
58 } tcl_bind_mask_t;
59
60
61 #define HT_STACKABLE 0x0001 /* Triggers in this bind list may be stacked. */
62 #define HT_DELETED 0x0002 /* This bind list was already deleted. Do not
63 * use it anymore. */
64
65 typedef struct tcl_bind_list_b {
66 struct tcl_bind_list_b *next;
67
68 tcl_bind_mask_t *first; /* Pointer to registered binds for this list. */
69 char name[5]; /* Name of the bind. */
70 u_8bit_t flags; /* Flags for this element. HT_* */
71 IntFunc func; /* Function used as the Tcl calling interface
72 * for procs actually representing C functions. */
73 } tcl_bind_list_t, *p_tcl_bind_list;
74
75
76 #ifndef MAKING_MODS
77
78 inline void garbage_collect_tclhash(void);
79
80 void init_bind(void);
81 void kill_bind(void);
82 int expmem_tclhash(void);
83
84 tcl_bind_list_t *add_bind_table(const char *nme, int flg, IntFunc func);
85 void del_bind_table(tcl_bind_list_t *tl_which);
86
87 tcl_bind_list_t *find_bind_table(const char *nme);
88
89 int check_tcl_bind(tcl_bind_list_t *, const char *, struct flag_record *,
90 const char *, int);
91 int check_tcl_dcc(const char *, int, const char *);
92 void check_tcl_chjn(const char *, const char *, int, char, int, const char *);
93 void check_tcl_chpt(const char *, const char *, int, int);
94 void check_tcl_bot(const char *, const char *, const char *);
95 void check_tcl_link(const char *, const char *);
96 void check_tcl_disc(const char *);
97 const char *check_tcl_filt(int, const char *);
98 int check_tcl_note(const char *, const char *, const char *);
99 void check_tcl_listen(const char *, int);
100 void check_tcl_time(struct tm *);
101 void check_tcl_cron(struct tm *);
102 void tell_binds(int, char *);
103 void check_tcl_nkch(const char *, const char *);
104 void check_tcl_away(const char *, int, const char *);
105 void check_tcl_chatactbcst(const char *, int, const char *, tcl_bind_list_t *);
106 void check_tcl_event(const char *);
107 int check_tcl_signal(const char *);
108 void check_tcl_die(char *);
109 void check_tcl_log(int, char *, char *);
110 #ifdef TLS
111 int check_tcl_tls(int);
112 #endif
113
114 #define check_tcl_chat(a, b, c) check_tcl_chatactbcst(a ,b, c, H_chat)
115 #define check_tcl_act(a, b, c) check_tcl_chatactbcst(a, b, c, H_act)
116 #define check_tcl_bcst(a, b, c) check_tcl_chatactbcst(a, b, c, H_bcst)
117 void check_tcl_chonof(char *, int, tcl_bind_list_t *);
118
119 #define check_tcl_chon(a, b) check_tcl_chonof(a, b, H_chon)
120 #define check_tcl_chof(a, b) check_tcl_chonof(a, b, H_chof)
121 void check_tcl_loadunld(const char *, tcl_bind_list_t *);
122
123 #define check_tcl_load(a) check_tcl_loadunld(a, H_load)
124 #define check_tcl_unld(a) check_tcl_loadunld(a, H_unld)
125
126 void rem_builtins(tcl_bind_list_t *, cmd_t *);
127 void add_builtins(tcl_bind_list_t *, cmd_t *);
128
129 int check_validity(char *, IntFunc);
130 extern p_tcl_bind_list H_chat, H_act, H_bcst, H_chon, H_chof;
131 extern p_tcl_bind_list H_load, H_unld, H_dcc, H_bot, H_link;
132 extern p_tcl_bind_list H_away, H_nkch, H_filt, H_disc, H_event, H_log;
133
134 #endif /* MAKING_MODS */
135
136 #endif /* _EGG_TCLHASH_H */

webmaster@eggheads.org
ViewVC Help
Powered by ViewVC 1.1.23