summaryrefslogtreecommitdiff
path: root/include
diff options
context:
space:
mode:
authorGeorge Hazan <george.hazan@gmail.com>2013-06-17 21:57:16 +0000
committerGeorge Hazan <george.hazan@gmail.com>2013-06-17 21:57:16 +0000
commit6c4d35fca373a55252f4bce0bd0102f78eb67037 (patch)
tree14041df61249254d4d67a4d0cff411ad59b230e4 /include
parent5ab0462a05c80e52a629255353405d7e5c39e304 (diff)
ProtoServiceExists moved to mir_core
all another copies of it removed git-svn-id: http://svn.miranda-ng.org/main/trunk@5006 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'include')
-rw-r--r--include/delphi/m_core.inc7
-rw-r--r--include/delphi/m_helpers.inc17
-rw-r--r--include/m_core.h5
3 files changed, 12 insertions, 17 deletions
diff --git a/include/delphi/m_core.inc b/include/delphi/m_core.inc
index 0be77bbe48..04801f8702 100644
--- a/include/delphi/m_core.inc
+++ b/include/delphi/m_core.inc
@@ -519,6 +519,13 @@ function mir_vsntprintf(buffer:pWideChar;count:size_t;fmt:pWideChar;va:va_list):
///////////////////////////////////////////////////////////////////////////////
+// protocol functions
+
+function ProtoServiceExists(const szModule, szName:PAnsiChar):int; stdcall;
+ external CoreDLL name 'ProtoServiceExists';
+
+
+///////////////////////////////////////////////////////////////////////////////
// sha1 functions
type
pmir_sha1_byte_t = ^mir_sha1_byte_t;
diff --git a/include/delphi/m_helpers.inc b/include/delphi/m_helpers.inc
index e9bedfd7be..9c3881fe31 100644
--- a/include/delphi/m_helpers.inc
+++ b/include/delphi/m_helpers.inc
@@ -1,7 +1,5 @@
{$IFDEF M_API_UNIT}
-function ProtoServiceExists(const proto,service: PAnsiChar): int;
-
function CreateVersionString(version:dword;buf:PAnsiChar):PAnsiChar;
function CreateVersionStringPlugin(pluginInfo:PPluginInfoEx;buf:PAnsiChar):PAnsiChar;
function PLUGIN_MAKE_VERSION(a,b,c,d: Cardinal): int;
@@ -90,21 +88,6 @@ function Options_OpenPage(ood:POPENOPTIONSDIALOG):HWND;
{$ELSE}
-function ProtoServiceExists(const proto,service: PAnsiChar): int;
-var
- buf:array [0..127] of AnsiChar;
-begin
- if (proto=nil) or (service=nil) then
- begin
- result:=0;
- exit;
- end;
- lStrCpyA(@buf,proto);
- lStrCatA(@buf,service);
- result:=ServiceExists(@buf);
-end;
-
-
function CreateVersionString(version:dword;buf:PAnsiChar):PAnsiChar;
var
vers:array [0..3] of integer;
diff --git a/include/m_core.h b/include/m_core.h
index 8c8602f921..9c315e76d4 100644
--- a/include/m_core.h
+++ b/include/m_core.h
@@ -431,6 +431,11 @@ MIR_CORE_DLL(int) mir_vsnprintf(char *buffer, size_t count, const char* fmt,
MIR_CORE_DLL(int) mir_vsntprintf(TCHAR *buffer, size_t count, const TCHAR* fmt, va_list va);
///////////////////////////////////////////////////////////////////////////////
+// protocol functions
+
+MIR_CORE_DLL(int) ProtoServiceExists(const char *szModule, const char *szService);
+
+///////////////////////////////////////////////////////////////////////////////
// sha1 functions
typedef unsigned char mir_sha1_byte_t;