source: trunk/src/kernel32/atom.cpp@ 2652

Last change on this file since 2652 was 1605, checked in by sandervl, 26 years ago

EBs fixes + added export for msacm32
File size: 6.1 KB
Line 
1/* $Id: atom.cpp,v 1.6 1999-11-05 09:16:57 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 if (arg1 < (LPCWSTR)0x10000)
31 rc = O32_FindAtom((char*)arg1);
32 else
33 {
34 astring = UnicodeToAsciiString((LPWSTR)arg1);
35 rc = O32_FindAtom(astring);
36 FreeAsciiString(astring);
37 }
38 return(rc);
39}
40//******************************************************************************
41//******************************************************************************
42ATOM WIN32API AddAtomA(LPCSTR arg1)
43{
44 dprintf(("KERNEL32: OS2AddAtomA\n"));
45 return O32_AddAtom(arg1);
46}
47//******************************************************************************
48//******************************************************************************
49ATOM WIN32API AddAtomW(LPCWSTR arg1)
50{
51 ATOM rc;
52 char *astring;
53
54 dprintf(("KERNEL32: OS2AddAtomW\n"));
55 if (arg1 < (LPCWSTR)0x10000)
56 rc = O32_AddAtom((char*)arg1);
57 else
58 {
59 astring = UnicodeToAsciiString((LPWSTR)arg1);
60 rc = O32_AddAtom(astring);
61 FreeAsciiString(astring);
62 }
63 return(rc);
64}
65//******************************************************************************
66//SvL: 24-6-'97 - Added
67//******************************************************************************
68UINT WIN32API GetAtomNameA( ATOM arg1, LPSTR arg2, int arg3)
69{
70 dprintf(("KERNEL32: OS2GetAtomNameA\n"));
71 return O32_GetAtomName(arg1, arg2, arg3);
72}
73//******************************************************************************
74//SvL: 24-6-'97 - Added
75//******************************************************************************
76UINT WIN32API GetAtomNameW(ATOM arg1, LPWSTR arg2, int arg3)
77{
78 UINT rc;
79 char *astring;
80
81 dprintf(("KERNEL32: OS2GetAtomNameW\n"));
82 astring = UnicodeToAsciiString(arg2); /* FIXME! */
83 rc = O32_GetAtomName(arg1, astring, arg3);
84 FreeAsciiString(astring);
85 return(rc);
86}
87//******************************************************************************
88//******************************************************************************
89ATOM WIN32API DeleteAtom( ATOM arg1)
90{
91 dprintf(("KERNEL32: OS2DeleteAtom\n"));
92 return O32_DeleteAtom(arg1);
93}
94//******************************************************************************
95//******************************************************************************
96ATOM WIN32API GlobalDeleteAtom( ATOM arg1)
97{
98 dprintf(("KERNEL32: OS2GlobalDeleteAtom\n"));
99 return O32_GlobalDeleteAtom(arg1);
100}
101//******************************************************************************
102//******************************************************************************
103BOOL WIN32API InitAtomTable( DWORD arg1)
104{
105 dprintf(("KERNEL32: OS2InitAtomTable\n"));
106 return O32_InitAtomTable(arg1);
107}
108//******************************************************************************
109//******************************************************************************
110ATOM WIN32API GlobalAddAtomA(LPCSTR arg1)
111{
112 dprintf(("KERNEL32: OS2GlobalAddAtomA %s\n", arg1));
113 return O32_GlobalAddAtom(arg1);
114}
115//******************************************************************************
116//******************************************************************************
117ATOM WIN32API GlobalAddAtomW(LPCWSTR arg1)
118{
119 char *astring;
120 ATOM rc;
121
122 if (arg1 < (LPCWSTR)0x10000)
123 {
124 dprintf(("KERNEL32: OS2GlobalAddAtomW %#4x\n", astring));
125 rc = O32_GlobalAddAtom((char*)arg1);
126 }
127 else
128 {
129 astring = UnicodeToAsciiString((LPWSTR)arg1);
130 dprintf(("KERNEL32: OS2GlobalAddAtomW %s\n", astring));
131 rc = O32_GlobalAddAtom(astring);
132 FreeAsciiString(astring);
133 }
134 return(rc);
135}
136//******************************************************************************
137//******************************************************************************
138ATOM WIN32API GlobalFindAtomA( LPCSTR arg1)
139{
140 if (arg1 < (LPCSTR)0x10000)
141 dprintf(("KERNEL32: GlobalFindAtomA %#4x\n", arg1));
142 else
143 dprintf(("KERNEL32: GlobalFindAtomA %s\n", arg1));
144 return O32_GlobalFindAtom(arg1);
145}
146//******************************************************************************
147//******************************************************************************
148ATOM WIN32API GlobalFindAtomW( LPCWSTR arg1)
149{
150 char *astring;
151 ATOM rc;
152
153 dprintf(("KERNEL32: OS2GlobalFindAtomW\n"));
154 if (arg1 < (LPCWSTR)0x10000)
155 rc = O32_GlobalFindAtom((char*)arg1);
156 else
157 {
158 astring = UnicodeToAsciiString((LPWSTR)arg1);
159 rc = O32_GlobalFindAtom(astring);
160 FreeAsciiString(astring);
161 }
162 return(rc);
163}
164//******************************************************************************
165//******************************************************************************
166UINT WIN32API GlobalGetAtomNameA( ATOM arg1, LPSTR arg2, int arg3)
167{
168 dprintf(("KERNEL32: OS2GlobalGetAtomNameA\n"));
169 return O32_GlobalGetAtomName(arg1, arg2, arg3);
170}
171//******************************************************************************
172//******************************************************************************
173UINT WIN32API GlobalGetAtomNameW( ATOM arg1, LPWSTR arg2, int arg3)
174{
175 char *astring;
176 ATOM rc;
177
178 dprintf(("KERNEL32: OS2GlobalGetAtomNameW\n"));
179 astring = UnicodeToAsciiString((LPWSTR)arg1); /* FIXME! */
180 rc = O32_GlobalGetAtomName(arg1, astring, arg3);
181 FreeAsciiString(astring);
182 return(rc);
183}
Note: See TracBrowser for help on using the repository browser.