source: trunk/src/kernel32/old/atom.cpp@ 3136

Last change on this file since 3136 was 955, checked in by sandervl, 26 years ago

Backup copy of old kernel32
File size: 5.4 KB
Line 
1/* $Id: atom.cpp,v 1.1 1999-09-15 23:32:49 sandervl Exp $ */
2
3/*
4 * Win32 ATOM api functions
5 *
6 * Copyright 1998 Sander van Leeuwen (sandervl@xs4all.nl)
7 *
8 *
9 * Project Odin Software License can be found in LICENSE.TXT
10 *
11 */
12#include <os2win.h>
13#include "unicode.h"
14
15//******************************************************************************
16//******************************************************************************
17ATOM WIN32API FindAtomA( LPCSTR arg1)
18{
19 dprintf(("KERNEL32: OS2FindAtomA\n"));
20 return O32_FindAtom(arg1);
21}
22//******************************************************************************
23//******************************************************************************
24ATOM WIN32API FindAtomW(LPCWSTR arg1)
25{
26 ATOM rc;
27 char *astring;
28
29 dprintf(("KERNEL32: OS2FindAtomW"));
30 astring = UnicodeToAsciiString((LPWSTR)arg1);
31 rc = O32_FindAtom(astring);
32 FreeAsciiString(astring);
33 return(rc);
34}
35//******************************************************************************
36//******************************************************************************
37ATOM WIN32API AddAtomA(LPCSTR arg1)
38{
39 dprintf(("KERNEL32: OS2AddAtomA\n"));
40 return O32_AddAtom(arg1);
41}
42//******************************************************************************
43//******************************************************************************
44ATOM WIN32API AddAtomW(LPCWSTR arg1)
45{
46 ATOM rc;
47 char *astring;
48
49 dprintf(("KERNEL32: OS2AddAtomW\n"));
50 astring = UnicodeToAsciiString((LPWSTR)arg1);
51 rc = O32_AddAtom(astring);
52 FreeAsciiString(astring);
53 return(rc);
54}
55//******************************************************************************
56//SvL: 24-6-'97 - Added
57//******************************************************************************
58UINT WIN32API GetAtomNameA( ATOM arg1, LPSTR arg2, int arg3)
59{
60 dprintf(("KERNEL32: OS2GetAtomNameA\n"));
61 return O32_GetAtomName(arg1, arg2, arg3);
62}
63//******************************************************************************
64//SvL: 24-6-'97 - Added
65//******************************************************************************
66UINT WIN32API GetAtomNameW(ATOM arg1, LPWSTR arg2, int arg3)
67{
68 UINT rc;
69 char *astring;
70
71 dprintf(("KERNEL32: OS2GetAtomNameW\n"));
72 astring = UnicodeToAsciiString(arg2);
73 rc = O32_GetAtomName(arg1, astring, arg3);
74 FreeAsciiString(astring);
75 return(rc);
76}
77//******************************************************************************
78//******************************************************************************
79ATOM WIN32API DeleteAtom( ATOM arg1)
80{
81 dprintf(("KERNEL32: OS2DeleteAtom\n"));
82 return O32_DeleteAtom(arg1);
83}
84//******************************************************************************
85//******************************************************************************
86ATOM WIN32API GlobalDeleteAtom( ATOM arg1)
87{
88 dprintf(("KERNEL32: OS2GlobalDeleteAtom\n"));
89 return O32_GlobalDeleteAtom(arg1);
90}
91//******************************************************************************
92//******************************************************************************
93BOOL WIN32API InitAtomTable( DWORD arg1)
94{
95 dprintf(("KERNEL32: OS2InitAtomTable\n"));
96 return O32_InitAtomTable(arg1);
97}
98//******************************************************************************
99//******************************************************************************
100ATOM WIN32API GlobalAddAtomA(LPCSTR arg1)
101{
102 dprintf(("KERNEL32: OS2GlobalAddAtomA %s\n", arg1));
103 return O32_GlobalAddAtom(arg1);
104}
105//******************************************************************************
106//******************************************************************************
107ATOM WIN32API GlobalAddAtomW(LPCWSTR arg1)
108{
109 char *astring;
110 ATOM rc;
111
112 astring = UnicodeToAsciiString((LPWSTR)arg1);
113 dprintf(("KERNEL32: OS2GlobalAddAtomW %s\n", astring));
114 rc = O32_GlobalAddAtom(astring);
115 FreeAsciiString(astring);
116 return(rc);
117}
118//******************************************************************************
119//******************************************************************************
120ATOM WIN32API GlobalFindAtomA( LPCSTR arg1)
121{
122 dprintf(("KERNEL32: OS2GlobalFindAtomA\n"));
123 return O32_GlobalFindAtom(arg1);
124}
125//******************************************************************************
126//******************************************************************************
127ATOM WIN32API GlobalFindAtomW( LPCWSTR arg1)
128{
129 char *astring;
130 ATOM rc;
131
132 dprintf(("KERNEL32: OS2GlobalFindAtomW\n"));
133 astring = UnicodeToAsciiString((LPWSTR)arg1);
134 rc = O32_GlobalFindAtom(astring);
135 FreeAsciiString(astring);
136 return(rc);
137}
138//******************************************************************************
139//******************************************************************************
140UINT WIN32API GlobalGetAtomNameA( ATOM arg1, LPSTR arg2, int arg3)
141{
142 dprintf(("KERNEL32: OS2GlobalGetAtomNameA\n"));
143 return O32_GlobalGetAtomName(arg1, arg2, arg3);
144}
145//******************************************************************************
146//******************************************************************************
147UINT WIN32API GlobalGetAtomNameW( ATOM arg1, LPWSTR arg2, int arg3)
148{
149 char *astring;
150 ATOM rc;
151
152 dprintf(("KERNEL32: OS2GlobalGetAtomNameW\n"));
153 astring = UnicodeToAsciiString((LPWSTR)arg1);
154 rc = O32_GlobalGetAtomName(arg1, astring, arg3);
155 FreeAsciiString(astring);
156 return(rc);
157}
Note: See TracBrowser for help on using the repository browser.