1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
|
{
Miranda IM: the free IM client for Microsoft Windows
Copyright 2000-2003 Miranda ICQ/IM project,
all portions of this codebase are copyrighted to the people
listed in contributors.txt.
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
}
{$IFNDEF M_SYSTEM}
{$DEFINE M_SYSTEM}
{$IFNDEF MIRANDANAME}
{$DEFINE MIRANDANAME}
const
MIRANDANAME = 'Miranda IM';
{$ENDIF}
{$IFNDEF MIRANDACLASS}
{$DEFINE MIRANDACLASS}
const
MIRANDACLASS = 'Miranda';
{$ENDIF}
{ miranda/system/modulesloaded
called after all modules have been successfully initialised
wParam=lParam=0
used to resolve double-dependencies in the module load order
}
const
ME_SYSTEM_MODULESLOADED:PAnsiChar = 'Miranda/System/ModulesLoaded';
{ miranda/system/shutdown event
called just before the application terminates
the database is still guaranteed to be running during this hook.
wParam=lParam=0
}
ME_SYSTEM_SHUTDOWN:PAnsiChar = 'Miranda/System/Shutdown';
{ restarts miranda ( 0.8+ )
wParam=0 or 1. 1 - restart with current profile, 0 - restart in default profile or profile manager
lParam=0
}
MS_SYSTEM_RESTART:PAnsiChar = 'Miranda/System/Restart';
{ miranda/system/oktoexit event
called before the app goes into shutdown routine to make sure everyone is
happy to exit
wParam=lParam=0
return nonzero to stop the exit cycle
}
ME_SYSTEM_OKTOEXIT:PAnsiChar = 'Miranda/System/OkToExitEvent';
{ miranda/system/oktoexit service
Check if everyone is happy to exit
wParam=lParam=0
if everyone acknowleges OK to exit then returns true, otherwise false
}
MS_SYSTEM_OKTOEXIT:PAnsiChar = 'Miranda/System/OkToExit';
{ gets the version number of Miranda encoded as a DWORD v0.1.0.1+
wParam=lParam=0
returns the version number, encoded as one version per byte, therefore
version 1.2.3.10 is 0x0102030a
}
MS_SYSTEM_GETVERSION:PAnsiChar = 'Miranda/System/GetVersion';
{
gets the version number of Miranda encoded as four WORDs v0.92.2+
wParam = 0
lParam = WORD[4]*
returns the version number, encoded as one version per word, therefore
version 1.2.3.3210 is 0x0001, 0x0002, 0x0003, 0x0C8a
}
MS_SYSTEM_GETFILEVERSION:PAnsiChar = 'Miranda/System/GetFileVersion';
{ gets the version of Miranda encoded as text v0.1.0.1+
wParam=cch
lParam=(LPARAM)(AnsiChar*)pszVersion
cch is the size of the buffer pointed to by pszVersion, in bytes
may return a build qualifier, such as "0.1.0.1 alpha"
returns 0 on success, nonzero on failure
}
MS_SYSTEM_GETVERSIONTEXT:PAnsiChar = 'Miranda/System/GetVersionText';
{ Adds a HANDLE to the list to be checked in the main message loop v0.1.2.0+
wParam=(WPARAM)(HANDLE)hObject
lParam=(LPARAM)(const AnsiChar*)pszService
returns 0 on success or nonzero on failure
Causes pszService to be CallService()d (wParam=hObject,lParam=0) from the
main thread whenever hObject is signalled.
The Miranda message loop has a MsgWaitForMultipleObjects() call in it to
implement this feature. See the documentation for that function for
information on what objects are supported.
There is a limit of MAXIMUM_WAIT_OBJECTS minus one (MWO is defined in winnt.h
to be 64) on the number of handles MSFMO() can process. This service will
return nonzero if that many handles are already being waited on.
As of writing, the following parts of Miranda are thread-safe, so can be
called from any thread:
All of modules.h except NotifyEventHooks()
Read-only parts of m_database.h (since the write parts will call hooks)
All of m_langpack.h
for all other routines your mileage may vary, but I would strongly recommend
that you call them from the main thread, or ask about it on plugin-dev if you
think it really ought to work.
Update during 0.1.2.0 development, 16/10/01:
NotifyEventHooks() now translates all calls into the context of the main
thread, which means that all of m_database.h is now completely safe.
Update during 0.1.2.2 development, 17/4/02:
The main thread's message loop now also deals with asynchronous procedure
calls. Loop up QueueUserAPC() for a neater way to accomplish a lot of the
things that used to require ms_system_waitonhandle.
Miranda is compiled with the multithreaded runtime - don't forget to do the
same with your plugin.
}
MS_SYSTEM_WAITONHANDLE:PAnsiChar = 'Miranda/System/WaitOnHandle';
{Removes a HANDLE from the wait list v0.1.2.0+ }
{wParam=(WPARAM)(HANDLE)hObject }
{lParam=0 }
{returns 0 on success or nonzero on failure. }
MS_SYSTEM_REMOVEWAIT:PAnsiChar = 'Miranda/System/RemoveWait';
{
wParam=0
lParam=0
This hook is fired just before the thread unwind stack is used,
it allows MT plugins to shutdown threads if they have any special
processing to do, etc.
}
ME_SYSTEM_PRESHUTDOWN:PAnsiChar = 'Miranda/System/PShutdown';
{
wParam=0
lParam=0
Returns TRUE when Miranda has got WM_QUIT and is in the process
of shutting down
}
MS_SYSTEM_TERMINATED:PAnsiChar = 'Miranda/SysTerm';
{
wParam : 0
lParam : (address) void (__cdecl callback) (void)
Affect : Setup a function pointer to be called after main loop iterations, it allows for
idle processing, See notes
Returns: 1 on success, 0 on failure
Notes : This service will only allow one function to be registered, if one is registered, 0 will be returned
Remember that this uses __cdecl.
Version: Added during 0.3.4+
}
MS_SYSTEM_SETIDLECALLBACK:PAnsiChar = 'Miranda/SetIdleCallback';
{
wParam : 0
lParam : &tick
Affect : return the last window tick where a monitored event was seen, currently WM_CHAR/WM_MOUSEMOVE
Returns: Always returns 0
Version: Added during 0.3.4+ (2004/09/12)
}
MS_SYSTEM_GETIDLE:PAnsiChar = 'Miranda/GetIdle';
{
wParam: cchMax (max length of buffer)
lParam: pointer to buffer to fill
Affect: Returns the build timestamp of the core, as a string of YYYYMMDDhhmmss, this service might
not exist and therefore the build is before 2004-09-30
Returns: zero on success, non zero on failure
Version: 0.3.4a+ (2004/09/30)
DEFUNCT: This service was removed on 0.3.4.3+ (2004/11/19) use APILEVEL
}
MS_SYSTEM_GETBUILDSTRING:PAnsiChar = 'Miranda/GetBuildString';
{
Missing service catcher
Is being called when one calls the non-existent service.
All parameters are stored in the special structure
The event handler takes 0 as wParam and TMissingServiceParams* as lParam.
0.4.3+ addition (2006/03/27)
}
type
PTMissingServiceParams = ^TMissingServiceParams;
TMissingServiceParams = record
name :PAnsiChar;
wParam:WPARAM;
lParam:LPARAM;
end;
const
ME_SYSTEM_MISSINGSERVICE:PAnsiChar = 'System/MissingService';
{ Unhandled exceptions filter
Is being called inside any thread launched via mir_forkthread, including the main thread.
If a plugin's author executes a large piece of code inside __try/__except, he should
obtain this filter and call it inside the __except section
0.8.0+ addition (2008/07/20)
}
const
MS_SYSTEM_GETEXCEPTFILTER:PAnsiChar = 'System/GetExceptFilter';
{$ENDIF}
|