dlls/infosoft/wordbreaker.c

   1 /*
   2  *    Word splitter Implementation
   3  *
   4  * Copyright 2006 Mike McCormack
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #define COBJMACROS
  22
  23
  24 #include <stdarg.h>
  25
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "winuser.h"
  29 #include "ole2.h"
  30 #include "indexsrv.h"
  31 #include "wine/debug.h"
  32
  33 WINE_DEFAULT_DEBUG_CHANNEL(infosoft);
  34
  35 typedef struct tag_wordbreaker_impl
  36 {
  37     IWordBreaker IWordBreaker_iface;
  38     LONG ref;
  39 } wordbreaker_impl;
  40
  41 static inline wordbreaker_impl *impl_from_IWordBreaker(IWordBreaker *iface)
  42 {
  43     return CONTAINING_RECORD(iface, wordbreaker_impl, IWordBreaker_iface);
  44 }
  45
  46 static HRESULT WINAPI wb_QueryInterface( IWordBreaker *iface,
  47         REFIID riid, LPVOID *ppvObj)
  48 {
  49     wordbreaker_impl *This = impl_from_IWordBreaker(iface);
  50
  51     TRACE("(%p)->(%s)\n",This,debugstr_guid(riid));
  52
  53     *ppvObj = NULL;
  54
  55     if (IsEqualIID(riid, &IID_IUnknown) ||
  56         IsEqualIID(riid, &IID_IWordBreaker))
  57     {
  58         *ppvObj = &This->IWordBreaker_iface;
  59         return S_OK;
  60     }
  61
  62     TRACE("-- E_NOINTERFACE\n");
  63     return E_NOINTERFACE;
  64 }
  65
  66 static ULONG WINAPI wb_AddRef( IWordBreaker *iface )
  67 {
  68     wordbreaker_impl *This = impl_from_IWordBreaker(iface);
  69     return InterlockedIncrement(&This->ref);
  70 }
  71
  72 static ULONG WINAPI wb_Release(IWordBreaker *iface)
  73 {
  74     wordbreaker_impl *This = impl_from_IWordBreaker(iface);
  75     LONG refcount;
  76
  77     refcount = InterlockedDecrement(&This->ref);
  78     if (!refcount)
  79         HeapFree(GetProcessHeap(), 0, This);
  80
  81     return refcount;
  82 }
  83
  84 static HRESULT WINAPI wb_Init( IWordBreaker *iface,
  85         BOOL fQuery, ULONG ulMaxTokenSize, BOOL *pfLicense )
  86 {
  87     TRACE("%d %u\n", fQuery, ulMaxTokenSize);
  88     *pfLicense = FALSE;
  89     return S_OK;
  90 }
  91
  92 static HRESULT call_sink( IWordSink *pWordSink, TEXT_SOURCE *ts, UINT len )
  93 {
  94     HRESULT r;
  95
  96     if (!len)
  97         return S_OK;
  98
  99     TRACE("%d %s\n", len, debugstr_w(&ts->awcBuffer[ts->iCur]));
 100
 101     r = IWordSink_PutWord( pWordSink, len, &ts->awcBuffer[ts->iCur], len, ts->iCur );
 102     ts->iCur += len;
 103
 104     return r;
 105 }
 106
 107 static HRESULT WINAPI wb_BreakText( IWordBreaker *iface,
 108          TEXT_SOURCE *ts, IWordSink *pWordSink, IPhraseSink *pPhraseSink)
 109 {
 110     UINT len, state = 0;
 111     WCHAR ch;
 112
 113     TRACE("%p %p %p\n", ts, pWordSink, pPhraseSink);
 114
 115     if (pPhraseSink)
 116         FIXME("IPhraseSink won't be called\n");
 117
 118     do
 119     {
 120         len = 0;
 121         while ((ts->iCur + len) < ts->iEnd)
 122         {
 123             ch = ts->awcBuffer[ts->iCur + len];
 124
 125             switch (state)
 126             {
 127             case 0: /* skip spaces and punctuation */
 128
 129                 if (!ch || iswpunct(ch) || iswspace(ch))
 130                     ts->iCur ++;
 131                 else
 132                     state = 1;
 133                 break;
 134
 135             case 1: /* find the end of the word */
 136
 137                 if (ch && !iswpunct(ch) && !iswspace(ch))
 138                     len++;
 139                 else
 140                 {
 141                     call_sink( pWordSink, ts, len );
 142                     len = 0;
 143                     state = 0;
 144                 }
 145                 break;
 146
 147             }
 148         }
 149         call_sink( pWordSink, ts, len );
 150
 151     } while (S_OK == ts->pfnFillTextBuffer( ts ));
 152
 153     return S_OK;
 154 }
 155
 156 static HRESULT WINAPI wb_ComposePhrase( IWordBreaker *iface,
 157          const WCHAR *pwcNoun, ULONG cwcNoun,
 158          const WCHAR *pwcModifier, ULONG cwcModifier,
 159          ULONG ulAttachmentType, WCHAR *pwcPhrase, ULONG *pcwcPhrase)
 160 {
 161     FIXME("%p %u %p %u %u %p %p\n", pwcNoun, cwcNoun,
 162           pwcModifier, cwcModifier, ulAttachmentType, pwcPhrase, pcwcPhrase);
 163     return S_OK;
 164 }
 165
 166 static HRESULT WINAPI wb_GetLicenseToUse( IWordBreaker *iface, const WCHAR **ppwcsLicense )
 167 {
 168     FIXME("%p\n", ppwcsLicense);
 169     *ppwcsLicense = NULL;
 170     return S_OK;
 171 }
 172
 173 static const IWordBreakerVtbl wordbreaker_vtbl =
 174 {
 175     wb_QueryInterface,
 176     wb_AddRef,
 177     wb_Release,
 178     wb_Init,
 179     wb_BreakText,
 180     wb_ComposePhrase,
 181     wb_GetLicenseToUse,
 182 };
 183
 184 DECLSPEC_HIDDEN HRESULT WINAPI wb_Constructor(IUnknown* pUnkOuter, REFIID riid, LPVOID *ppvObject)
 185 {
 186     wordbreaker_impl *This;
 187     IWordBreaker *wb;
 188
 189     TRACE("%p %s %p\n", pUnkOuter, debugstr_guid(riid), ppvObject);
 190
 191     This = HeapAlloc(GetProcessHeap(), 0, sizeof *This);
 192     if (!This)
 193         return E_OUTOFMEMORY;
 194
 195     This->ref = 1;
 196     This->IWordBreaker_iface.lpVtbl = &wordbreaker_vtbl;
 197
 198     wb = &This->IWordBreaker_iface;
 199
 200     return IWordBreaker_QueryInterface(wb, riid, ppvObject);
 201 }