/*
 *	shell change notification
 *
 * Copyright 2000 Juergen Schmied
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library 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
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
 */

#define WIN32_NO_STATUS
#define _INC_WINDOWS
#define COBJMACROS
#define NONAMELESSUNION
#define NONAMELESSSTRUCT
#define BUFFER_SIZE 1024

#include <windef.h>
#include <winbase.h>
#include <shlobj.h>
#include <strsafe.h>
#include <undocshell.h>
#include <shlwapi.h>
#include <wine/debug.h>
#include <wine/list.h>
#include <process.h>
#include <shellutils.h>

#include "pidl.h"

WINE_DEFAULT_DEBUG_CHANNEL(shell);

static CRITICAL_SECTION SHELL32_ChangenotifyCS;
static CRITICAL_SECTION_DEBUG critsect_debug =
{
    0, 0, &SHELL32_ChangenotifyCS,
    { &critsect_debug.ProcessLocksList, &critsect_debug.ProcessLocksList },
      0, 0, { (DWORD_PTR)(__FILE__ ": SHELL32_ChangenotifyCS") }
};
static CRITICAL_SECTION SHELL32_ChangenotifyCS = { &critsect_debug, -1, 0, 0, 0, 0 };

#ifdef __REACTOS__
typedef struct {
    PCIDLIST_ABSOLUTE pidl;
    BOOL fRecursive;
    /* File system notification items */
    HANDLE hDirectory; /* Directory handle */
    WCHAR wstrDirectory[MAX_PATH]; /* Directory name */
    OVERLAPPED overlapped; /* Overlapped structure */
    BYTE *buffer; /* Async buffer to fill */
    BYTE *backBuffer; /* Back buffer to swap buffer into */
} SHChangeNotifyEntryInternal, *LPNOTIFYREGISTER;
#else
typedef SHChangeNotifyEntry *LPNOTIFYREGISTER;
#endif

/* internal list of notification clients (internal) */
typedef struct _NOTIFICATIONLIST
{
	struct list entry;
	HWND hwnd;		/* window to notify */
	DWORD uMsg;		/* message to send */
	LPNOTIFYREGISTER apidl; /* array of entries to watch*/
	UINT cidl;		/* number of pidls in array */
	LONG wEventMask;	/* subscribed events */
	DWORD dwFlags;		/* client flags */
	ULONG id;
} NOTIFICATIONLIST, *LPNOTIFICATIONLIST;

#ifdef __REACTOS__
VOID _ProcessNotification(LPNOTIFYREGISTER item);
BOOL _OpenDirectory(LPNOTIFYREGISTER item);
static void CALLBACK _RequestTermination(ULONG_PTR arg);
static void CALLBACK _RequestAllTermination(ULONG_PTR arg);
static void CALLBACK _AddDirectoryProc(ULONG_PTR arg);
static VOID _BeginRead(LPNOTIFYREGISTER item);
static unsigned int WINAPI _RunAsyncThreadProc(LPVOID arg);
#endif

static struct list notifications = LIST_INIT( notifications );
static LONG next_id;

#ifdef __REACTOS__
HANDLE m_hThread;
UINT m_dwThreadId;
BOOL m_bTerminate;
#endif

#define SHCNE_NOITEMEVENTS ( \
   SHCNE_ASSOCCHANGED )

#define SHCNE_ONEITEMEVENTS ( \
   SHCNE_ATTRIBUTES | SHCNE_CREATE | SHCNE_DELETE | SHCNE_DRIVEADD | \
   SHCNE_DRIVEADDGUI | SHCNE_DRIVEREMOVED | SHCNE_FREESPACE | \
   SHCNE_MEDIAINSERTED | SHCNE_MEDIAREMOVED | SHCNE_MKDIR | \
   SHCNE_NETSHARE | SHCNE_NETUNSHARE | SHCNE_RMDIR | \
   SHCNE_SERVERDISCONNECT | SHCNE_UPDATEDIR | SHCNE_UPDATEIMAGE )

#define SHCNE_TWOITEMEVENTS ( \
   SHCNE_RENAMEFOLDER | SHCNE_RENAMEITEM | SHCNE_UPDATEITEM )

/* for dumping events */
static const char * DumpEvent( LONG event )
{
    if( event == SHCNE_ALLEVENTS )
        return "SHCNE_ALLEVENTS";
#define DUMPEV(x)  ,( event & SHCNE_##x )? #x " " : ""
    return wine_dbg_sprintf( "%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s"
    DUMPEV(RENAMEITEM)
    DUMPEV(CREATE)
    DUMPEV(DELETE)
    DUMPEV(MKDIR)
    DUMPEV(RMDIR)
    DUMPEV(MEDIAINSERTED)
    DUMPEV(MEDIAREMOVED)
    DUMPEV(DRIVEREMOVED)
    DUMPEV(DRIVEADD)
    DUMPEV(NETSHARE)
    DUMPEV(NETUNSHARE)
    DUMPEV(ATTRIBUTES)
    DUMPEV(UPDATEDIR)
    DUMPEV(UPDATEITEM)
    DUMPEV(SERVERDISCONNECT)
    DUMPEV(UPDATEIMAGE)
    DUMPEV(DRIVEADDGUI)
    DUMPEV(RENAMEFOLDER)
    DUMPEV(FREESPACE)
    DUMPEV(EXTENDED_EVENT)
    DUMPEV(ASSOCCHANGED)
    DUMPEV(INTERRUPT)
    );
#undef DUMPEV
}

static const char * NodeName(const NOTIFICATIONLIST *item)
{
    const char *str;
    WCHAR path[MAX_PATH];

    if(SHGetPathFromIDListW(item->apidl[0].pidl, path ))
        str = wine_dbg_sprintf("%s", debugstr_w(path));
    else
        str = wine_dbg_sprintf("<not a disk file>" );
    return str;
}

static void DeleteNode(LPNOTIFICATIONLIST item)
{
    UINT i;

    TRACE("item=%p\n", item);

    /* remove item from list */
    list_remove( &item->entry );

    /* free the item */
    for (i=0; i<item->cidl; i++)
#ifdef __REACTOS__
    {
        QueueUserAPC(_RequestTermination, m_hThread, (ULONG_PTR) &item->apidl[i] );
        WaitForSingleObjectEx(m_hThread, 100, FALSE);
#endif
        SHFree((LPITEMIDLIST)item->apidl[i].pidl);
#ifdef __REACTOS__
        SHFree(item->apidl[i].buffer);
        SHFree(item->apidl[i].backBuffer);
    }
#endif
    SHFree(item->apidl);
    SHFree(item);
}

void InitChangeNotifications(void)
{
#ifdef __REACTOS__
    m_hThread = NULL;
#endif
}

void FreeChangeNotifications(void)
{
    LPNOTIFICATIONLIST ptr, next;

    TRACE("\n");

    EnterCriticalSection(&SHELL32_ChangenotifyCS);

    LIST_FOR_EACH_ENTRY_SAFE( ptr, next, &notifications, NOTIFICATIONLIST, entry )
        DeleteNode( ptr );

    LeaveCriticalSection(&SHELL32_ChangenotifyCS);

#ifdef __REACTOS__
    QueueUserAPC(_RequestAllTermination, m_hThread, (ULONG_PTR) NULL );
#endif

    DeleteCriticalSection(&SHELL32_ChangenotifyCS);
}

/*************************************************************************
 * SHChangeNotifyRegister			[SHELL32.2]
 *
 */
ULONG WINAPI
SHChangeNotifyRegister(
    HWND hwnd,
    int fSources,
    LONG wEventMask,
    UINT uMsg,
    int cItems,
    SHChangeNotifyEntry *lpItems)
{
    LPNOTIFICATIONLIST item;
    int i;

    item = SHAlloc(sizeof(NOTIFICATIONLIST));

    TRACE("(%p,0x%08x,0x%08x,0x%08x,%d,%p) item=%p\n",
	hwnd, fSources, wEventMask, uMsg, cItems, lpItems, item);

#ifdef __REACTOS__
    if (!m_hThread)
        m_hThread = (HANDLE) _beginthreadex(NULL, 0, _RunAsyncThreadProc, NULL, 0, &m_dwThreadId);
#endif

    item->cidl = cItems;
#ifdef __REACTOS__
    item->apidl = SHAlloc(sizeof(SHChangeNotifyEntryInternal) * cItems);
#else
    item->apidl = SHAlloc(sizeof(SHChangeNotifyEntry) * cItems);
#endif
    for(i=0;i<cItems;i++)
    {
#ifdef __REACTOS__
        ZeroMemory(&item->apidl[i], sizeof(SHChangeNotifyEntryInternal));
#endif
        item->apidl[i].pidl = ILClone(lpItems[i].pidl);
        item->apidl[i].fRecursive = lpItems[i].fRecursive;
#ifdef __REACTOS__
        item->apidl[i].buffer = SHAlloc(BUFFER_SIZE);
        item->apidl[i].backBuffer = SHAlloc(BUFFER_SIZE);
        item->apidl[i].overlapped.hEvent = &item->apidl[i];

        if (fSources & SHCNRF_InterruptLevel)
        {
            if (_OpenDirectory( &item->apidl[i] ))
            {
                QueueUserAPC( _AddDirectoryProc, m_hThread, (ULONG_PTR) &item->apidl[i] );
            }
        }
#endif
    }
    item->hwnd = hwnd;
    item->uMsg = uMsg;
    item->wEventMask = wEventMask;
    item->dwFlags = fSources;
    item->id = InterlockedIncrement( &next_id );

    TRACE("new node: %s\n", NodeName( item ));

    EnterCriticalSection(&SHELL32_ChangenotifyCS);

    list_add_tail( &notifications, &item->entry );

    LeaveCriticalSection(&SHELL32_ChangenotifyCS);

    return item->id;
}

/*************************************************************************
 * SHChangeNotifyDeregister			[SHELL32.4]
 */
BOOL WINAPI SHChangeNotifyDeregister(ULONG hNotify)
{
    LPNOTIFICATIONLIST node;

    TRACE("(0x%08x)\n", hNotify);

    EnterCriticalSection(&SHELL32_ChangenotifyCS);

    LIST_FOR_EACH_ENTRY( node, &notifications, NOTIFICATIONLIST, entry )
    {
        if (node->id == hNotify)
        {
            DeleteNode( node );
            LeaveCriticalSection(&SHELL32_ChangenotifyCS);
            return TRUE;
        }
    }
    LeaveCriticalSection(&SHELL32_ChangenotifyCS);
    return FALSE;
}

/*************************************************************************
 * SHChangeNotifyUpdateEntryList       		[SHELL32.5]
 */
BOOL WINAPI SHChangeNotifyUpdateEntryList(DWORD unknown1, DWORD unknown2,
			      DWORD unknown3, DWORD unknown4)
{
    FIXME("(0x%08x, 0x%08x, 0x%08x, 0x%08x)\n",
          unknown1, unknown2, unknown3, unknown4);

    return TRUE;
}

struct new_delivery_notification
{
    LONG event;
    DWORD pidl1_size;
    DWORD pidl2_size;
    LPITEMIDLIST pidls[2];
    BYTE data[1];
};

static BOOL should_notify( LPCITEMIDLIST changed, LPCITEMIDLIST watched, BOOL sub )
{
    TRACE("%p %p %d\n", changed, watched, sub );
    if ( !watched )
        return FALSE;
    if (ILIsEqual( watched, changed ) )
        return TRUE;
    if( sub && ILIsParent( watched, changed, FALSE ) )
        return TRUE;
    return FALSE;
}

/*************************************************************************
 * SHChangeNotify				[SHELL32.@]
 */
void WINAPI SHChangeNotify(LONG wEventId, UINT uFlags, LPCVOID dwItem1, LPCVOID dwItem2)
{
    struct notification_recipients {
        struct list entry;
        HWND hwnd;
        DWORD msg;
        DWORD flags;
    } *cur, *next;

    HANDLE shared_data = NULL;
    LPITEMIDLIST Pidls[2];
    LPNOTIFICATIONLIST ptr;
    struct list recipients;

    Pidls[0] = NULL;
    Pidls[1] = NULL;

    TRACE("(0x%08x,0x%08x,%p,%p)\n", wEventId, uFlags, dwItem1, dwItem2);

    if(uFlags & ~(SHCNF_TYPE|SHCNF_FLUSH))
        FIXME("ignoring unsupported flags: %x\n", uFlags);

    if( ( wEventId & SHCNE_NOITEMEVENTS ) && ( dwItem1 || dwItem2 ) )
    {
        TRACE("dwItem1 and dwItem2 are not zero, but should be\n");
        dwItem1 = 0;
        dwItem2 = 0;
        return;
    }
    else if( ( wEventId & SHCNE_ONEITEMEVENTS ) && dwItem2 )
    {
        TRACE("dwItem2 is not zero, but should be\n");
        dwItem2 = 0;
        return;
    }

    if( ( ( wEventId & SHCNE_NOITEMEVENTS ) && 
          ( wEventId & ~(SHCNE_NOITEMEVENTS | SHCNE_INTERRUPT) ) ) ||
        ( ( wEventId & SHCNE_ONEITEMEVENTS ) && 
          ( wEventId & ~(SHCNE_ONEITEMEVENTS | SHCNE_INTERRUPT) ) ) ||
        ( ( wEventId & SHCNE_TWOITEMEVENTS ) && 
          ( wEventId & ~(SHCNE_TWOITEMEVENTS | SHCNE_INTERRUPT) ) ) )
    {
        WARN("mutually incompatible events listed\n");
        return;
    }

    /* convert paths in IDLists*/
    switch (uFlags & SHCNF_TYPE)
    {
    case SHCNF_PATHA:
        if (dwItem1) Pidls[0] = SHSimpleIDListFromPathA(dwItem1); //FIXME
        if (dwItem2) Pidls[1] = SHSimpleIDListFromPathA(dwItem2); //FIXME
        break;
    case SHCNF_PATHW:
        if (dwItem1) Pidls[0] = SHSimpleIDListFromPathW(dwItem1);
        if (dwItem2) Pidls[1] = SHSimpleIDListFromPathW(dwItem2);
#ifdef __REACTOS__
        if (wEventId & (SHCNE_MKDIR | SHCNE_RMDIR | SHCNE_UPDATEDIR | SHCNE_RENAMEFOLDER))
        {
            /*
             * The last items in the ID are currently files. So we chop off the last
             * entry, and create a new one using a find data struct.
             */
            if (dwItem1 && Pidls[0]){
                WIN32_FIND_DATAW wfd;
                LPITEMIDLIST oldpidl, newpidl;
                LPWSTR p = PathFindFileNameW((LPCWSTR)dwItem1);
                ILRemoveLastID(Pidls[0]);
                lstrcpynW(&wfd.cFileName[0], p, MAX_PATH);
                wfd.dwFileAttributes = FILE_ATTRIBUTE_DIRECTORY;
                newpidl = _ILCreateFromFindDataW(&wfd);
                oldpidl = ILClone(Pidls[0]);
                ILFree(Pidls[0]);
                Pidls[0] = ILCombine(oldpidl, newpidl);
                ILFree(newpidl);
                ILFree(oldpidl);
            }
            if (dwItem2 && Pidls[1]){
                WIN32_FIND_DATAW wfd;
                LPITEMIDLIST oldpidl, newpidl;
                LPWSTR p = PathFindFileNameW((LPCWSTR)dwItem2);
                ILRemoveLastID(Pidls[1]);
                lstrcpynW(&wfd.cFileName[0], p, MAX_PATH);
                wfd.dwFileAttributes = FILE_ATTRIBUTE_DIRECTORY;
                newpidl = _ILCreateFromFindDataW(&wfd);
                oldpidl = ILClone(Pidls[0]);
                ILFree(Pidls[1]);
                Pidls[1] = ILCombine(oldpidl, newpidl);
                ILFree(newpidl);
                ILFree(oldpidl);
            }
        }
#endif
        break;
    case SHCNF_IDLIST:
        Pidls[0] = ILClone(dwItem1);
        Pidls[1] = ILClone(dwItem2);
        break;
    case SHCNF_PRINTERA:
    case SHCNF_PRINTERW:
        FIXME("SHChangeNotify with (uFlags & SHCNF_PRINTER)\n");
        return;
    case SHCNF_DWORD:
    default:
        FIXME("unknown type %08x\n", uFlags & SHCNF_TYPE);
        return;
    }

    list_init(&recipients);
    EnterCriticalSection(&SHELL32_ChangenotifyCS);
    LIST_FOR_EACH_ENTRY( ptr, &notifications, NOTIFICATIONLIST, entry )
    {
        struct notification_recipients *item;
        BOOL notify = FALSE;
        DWORD i;

        for( i=0; (i<ptr->cidl) && !notify ; i++ )
        {
            LPCITEMIDLIST pidl = ptr->apidl[i].pidl;
            BOOL subtree = ptr->apidl[i].fRecursive;

            if (wEventId & ptr->wEventMask)
            {
                if( !pidl )          /* all ? */
                    notify = TRUE;
                else if( wEventId & SHCNE_NOITEMEVENTS )
                    notify = TRUE;
                else if( wEventId & ( SHCNE_ONEITEMEVENTS | SHCNE_TWOITEMEVENTS ) )
                    notify = should_notify( Pidls[0], pidl, subtree );
                else if( wEventId & SHCNE_TWOITEMEVENTS )
                    notify = should_notify( Pidls[1], pidl, subtree );
            }
        }

        if( !notify )
            continue;

        item = SHAlloc(sizeof(struct notification_recipients));
        if(!item) {
            ERR("out of memory\n");
            continue;
        }

        item->hwnd = ptr->hwnd;
        item->msg = ptr->uMsg;
        item->flags = ptr->dwFlags;
        list_add_tail(&recipients, &item->entry);
    }
    LeaveCriticalSection(&SHELL32_ChangenotifyCS);

    LIST_FOR_EACH_ENTRY_SAFE(cur, next, &recipients, struct notification_recipients, entry)
    {
        TRACE("notifying %p, event %s(%x)\n", cur->hwnd, DumpEvent(wEventId), wEventId);

        if (cur->flags  & SHCNRF_NewDelivery) {
            if(!shared_data) {
                struct new_delivery_notification *notification;
                UINT size1 = ILGetSize(Pidls[0]), size2 = ILGetSize(Pidls[1]);
                UINT offset = (size1+sizeof(int)-1)/sizeof(int)*sizeof(int);

                notification = SHAlloc(sizeof(struct new_delivery_notification)+offset+size2);
                if(!notification) {
                    ERR("out of memory\n");
                } else {
                    notification->event = wEventId;
                    notification->pidl1_size = size1;
                    notification->pidl2_size = size2;
                    if(size1)
                        memcpy(notification->data, Pidls[0], size1);
                    if(size2)
                        memcpy(notification->data+offset, Pidls[1], size2);

                    shared_data = SHAllocShared(notification,
                        sizeof(struct new_delivery_notification)+size1+size2,
                        GetCurrentProcessId());
                    SHFree(notification);
                }
            }

            if(shared_data)
                SendMessageA(cur->hwnd, cur->msg, (WPARAM)shared_data, GetCurrentProcessId());
            else
                ERR("out of memory\n");
        } else {
            SendMessageA(cur->hwnd, cur->msg, (WPARAM)Pidls, wEventId);
        }

        list_remove(&cur->entry);
        SHFree(cur);
    }
    SHFreeShared(shared_data, GetCurrentProcessId());
    SHFree(Pidls[0]);
    SHFree(Pidls[1]);

#ifndef __REACTOS__
    if (wEventId & SHCNE_ASSOCCHANGED)
    {
        static const WCHAR args[] = {' ','-','a',0 };
        TRACE("refreshing file type associations\n");
        run_winemenubuilder( args );
    }
#endif
}

/*************************************************************************
 * NTSHChangeNotifyRegister            [SHELL32.640]
 * NOTES
 *   Idlist is an array of structures and Count specifies how many items in the array.
 *   count should always be one when calling SHChangeNotifyRegister, or
 *   SHChangeNotifyDeregister will not work properly.
 */
EXTERN_C ULONG WINAPI NTSHChangeNotifyRegister(
    HWND hwnd,
    int fSources,
    LONG fEvents,
    UINT msg,
    int count,
    SHChangeNotifyEntry *idlist)
{
    return SHChangeNotifyRegister(hwnd, fSources | SHCNRF_NewDelivery,
                                  fEvents, msg, count, idlist);
}

/*************************************************************************
 * SHChangeNotification_Lock			[SHELL32.644]
 */
HANDLE WINAPI SHChangeNotification_Lock(
	HANDLE hChange,
	DWORD dwProcessId,
	LPITEMIDLIST **lppidls,
	LPLONG lpwEventId)
{
    struct new_delivery_notification *ndn;
    UINT offset;

    TRACE("%p %08x %p %p\n", hChange, dwProcessId, lppidls, lpwEventId);

    ndn = SHLockShared(hChange, dwProcessId);
    if(!ndn) {
        WARN("SHLockShared failed\n");
        return NULL;
    }

    if(lppidls) {
        offset = (ndn->pidl1_size+sizeof(int)-1)/sizeof(int)*sizeof(int);
        ndn->pidls[0] = ndn->pidl1_size ? (LPITEMIDLIST)ndn->data : NULL;
        ndn->pidls[1] = ndn->pidl2_size ? (LPITEMIDLIST)(ndn->data+offset) : NULL;
        *lppidls = ndn->pidls;
    }

    if(lpwEventId)
        *lpwEventId = ndn->event;

    return ndn;
}

/*************************************************************************
 * SHChangeNotification_Unlock			[SHELL32.645]
 */
BOOL WINAPI SHChangeNotification_Unlock ( HANDLE hLock)
{
    TRACE("%p\n", hLock);
    return SHUnlockShared(hLock);
}

/*************************************************************************
 * NTSHChangeNotifyDeregister			[SHELL32.641]
 */
DWORD WINAPI NTSHChangeNotifyDeregister(ULONG x1)
{
    FIXME("(0x%08x):semi stub.\n",x1);

    return SHChangeNotifyDeregister( x1 );
}

#ifdef __REACTOS__

static
void
CALLBACK
_AddDirectoryProc(ULONG_PTR arg)
{
    LPNOTIFYREGISTER item = (LPNOTIFYREGISTER)arg;
    _BeginRead(item);
}

BOOL _OpenDirectory(LPNOTIFYREGISTER item)
{
    STRRET strFile;
    IShellFolder *psf;
    HRESULT hr;
    LPCITEMIDLIST child;
    ULONG ulAttrs;

    // Makes function idempotent
    if (item->hDirectory && !(item->hDirectory == INVALID_HANDLE_VALUE))
        return TRUE;

    hr = SHBindToParent(item->pidl, &IID_IShellFolder, (LPVOID*)&psf, &child);
    if (FAILED_UNEXPECTEDLY(hr))
        return hr;

    ulAttrs = SFGAO_FILESYSTEM | SFGAO_FOLDER;
    hr = IShellFolder_GetAttributesOf(psf, 1, (LPCITEMIDLIST*)&child, &ulAttrs);
    if (SUCCEEDED(hr))
        hr = IShellFolder_GetDisplayNameOf(psf, child, SHGDN_FORPARSING, &strFile);

    IShellFolder_Release(psf);
    if (FAILED_UNEXPECTEDLY(hr))
        return FALSE;

    hr = StrRetToBufW(&strFile, NULL, item->wstrDirectory, _countof(item->wstrDirectory));
    if (FAILED_UNEXPECTEDLY(hr))
        return FALSE;

    if ((ulAttrs & (SFGAO_FILESYSTEM | SFGAO_FOLDER)) != (SFGAO_FILESYSTEM | SFGAO_FOLDER))
    {
        TRACE("_OpenDirectory ignoring %s\n", debugstr_w(item->wstrDirectory));
        item->hDirectory = INVALID_HANDLE_VALUE;
        return FALSE;
    }

    TRACE("_OpenDirectory %s\n", debugstr_w(item->wstrDirectory));

    item->hDirectory = CreateFileW(item->wstrDirectory, // pointer to the file name
                                   GENERIC_READ | FILE_LIST_DIRECTORY, // access (read/write) mode
                                   FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE, // share mode
                                   NULL, // security descriptor
                                   OPEN_EXISTING, // how to create
                                   FILE_FLAG_BACKUP_SEMANTICS | FILE_FLAG_OVERLAPPED, // file attributes
                                   NULL); // file with attributes to copy

    if (item->hDirectory == INVALID_HANDLE_VALUE)
    {
        ERR("_OpenDirectory failed for %s\n", debugstr_w(item->wstrDirectory));
        return FALSE;
    }
    return TRUE;
}

static void CALLBACK _RequestTermination(ULONG_PTR arg)
{
    LPNOTIFYREGISTER item = (LPNOTIFYREGISTER) arg;
    TRACE("_RequestTermination %p %p \n", item, item->hDirectory);
    if (!item->hDirectory || item->hDirectory == INVALID_HANDLE_VALUE) return;

    CancelIo(item->hDirectory);
    CloseHandle(item->hDirectory);
    item->hDirectory = NULL;
}

static
void
CALLBACK
_NotificationCompletion(DWORD dwErrorCode, // completion code
                        DWORD dwNumberOfBytesTransfered, // number of bytes transferred
                        LPOVERLAPPED lpOverlapped) // I/O information buffer
{
    /* MSDN: The hEvent member of the OVERLAPPED structure is not used by the
       system, so you can use it yourself. We do just this, storing a pointer
       to the working struct in the overlapped structure. */
    LPNOTIFYREGISTER item = (LPNOTIFYREGISTER) lpOverlapped->hEvent;
    TRACE("_NotificationCompletion\n");

#if 0
    if (dwErrorCode == ERROR_OPERATION_ABORTED)
    {
        /* Command was induced by CancelIo in the shutdown procedure. */
        TRACE("_NotificationCompletion ended.\n");
        return;
    }
#endif

#ifdef __REACTOS__
    /* If the FSD doesn't support directory change notifications, there's no
     * no need to retry and requeue notification
     */
    if (dwErrorCode == ERROR_INVALID_FUNCTION)
    {
        WARN("Directory watching not supported\n");
        return;
    }

    /* Also, if the notify operation was canceled (like, user moved to another
     * directory), then, don't requeue notification
     */
    if (dwErrorCode == ERROR_OPERATION_ABORTED)
    {
        TRACE("Notification aborted\n");
        return;
    }

    if (!item)
    {
        ERR("item == NULL\n");
        return;
    }

#endif

    /* This likely means overflow, so force whole directory refresh. */
    if (!dwNumberOfBytesTransfered)
    {
        ERR("_NotificationCompletion overflow\n");

        ZeroMemory(item->buffer, BUFFER_SIZE);
        _BeginRead(item);

        SHChangeNotify(SHCNE_UPDATEITEM | SHCNE_INTERRUPT,
                       SHCNF_IDLIST,
                       item->pidl,
                       NULL);

        return;
    }

    /*
     * Get the new read issued as fast as possible (before we do the
     * processing and message posting). All of the file notification
     * occur on one thread so the buffers should not collide with one another.
     * The extra zero mems are because the FNI size isn't written correctly.
     */

    ZeroMemory(item->backBuffer, BUFFER_SIZE);
    memcpy(item->backBuffer, item->buffer, dwNumberOfBytesTransfered);
    ZeroMemory(item->buffer, BUFFER_SIZE);

    _BeginRead(item);

    _ProcessNotification(item);
}

static VOID _BeginRead(LPNOTIFYREGISTER item )
{
    TRACE("_BeginRead %p \n", item->hDirectory);

    /* This call needs to be reissued after every APC. */
    if (!ReadDirectoryChangesW(item->hDirectory, // handle to directory
                               item->buffer, // read results buffer
                               BUFFER_SIZE, // length of buffer
                               FALSE, // monitoring option (recursion)
                               FILE_NOTIFY_CHANGE_DIR_NAME | FILE_NOTIFY_CHANGE_FILE_NAME, // filter conditions
                               NULL, // bytes returned
                               &item->overlapped, // overlapped buffer
                               _NotificationCompletion)) // completion routine
        ERR("ReadDirectoryChangesW failed. (%p, %p, %p, %p, %p) Code: %u \n",
            item,
            item->hDirectory,
            item->buffer,
            &item->overlapped,
            _NotificationCompletion,
            GetLastError());
}

DWORD _MapAction(DWORD dwAction, BOOL isDir)
{
    switch (dwAction)
    {
       case FILE_ACTION_ADDED : return isDir ? SHCNE_MKDIR : SHCNE_CREATE;
       case FILE_ACTION_REMOVED : return isDir ? SHCNE_RMDIR : SHCNE_DELETE;
       case FILE_ACTION_MODIFIED : return isDir ? SHCNE_UPDATEDIR : SHCNE_UPDATEITEM;
       case FILE_ACTION_RENAMED_OLD_NAME : return isDir ? SHCNE_UPDATEDIR : SHCNE_UPDATEITEM;
       case FILE_ACTION_RENAMED_NEW_NAME : return isDir ? SHCNE_UPDATEDIR : SHCNE_UPDATEITEM;
       default: return SHCNE_UPDATEITEM;
    }
}

VOID _ProcessNotification(LPNOTIFYREGISTER item)
{
    BYTE* pBase = item->backBuffer;
    TRACE("_ProcessNotification\n");

    for (;;)
    {
        FILE_NOTIFY_INFORMATION* fni = (FILE_NOTIFY_INFORMATION*)pBase;
        LPWSTR wszFilename;
        INT len = 0;
        WCHAR wstrFilename[MAX_PATH];
        WCHAR tmp[MAX_PATH];
        StringCchCopy(tmp, fni->FileNameLength, fni->FileName);

        PathCombine(wstrFilename, item->wstrDirectory, tmp);

        /* If it could be a short filename, expand it. */
        wszFilename = PathFindFileNameW(wstrFilename);

        len = lstrlenW(wszFilename);
        /* The maximum length of an 8.3 filename is twelve, including the dot. */
        if (len <= 12 && wcschr(wszFilename, L'~'))
        {
            /* Convert to the long filename form. Unfortunately, this
               does not work for deletions, so it's an imperfect fix. */
            wchar_t wbuf[MAX_PATH];
            if (GetLongPathName(wstrFilename, wbuf, _countof (wbuf)) > 0)
                StringCchCopyW(wstrFilename, MAX_PATH, wbuf);
        }

        /* On deletion of a folder PathIsDirectory will return false even if
           it *was* a directory, so, again, imperfect. */
        SHChangeNotify(_MapAction(fni->Action, PathIsDirectory(wstrFilename)) | SHCNE_INTERRUPT,
                       SHCNF_PATHW,
                       wstrFilename,
                       NULL);

        if (!fni->NextEntryOffset)
            break;
        pBase += fni->NextEntryOffset;
    }
}

static void CALLBACK _RequestAllTermination(ULONG_PTR arg)
{
    m_bTerminate = TRUE;
}

static unsigned int WINAPI _RunAsyncThreadProc(LPVOID arg)
{
    m_bTerminate = FALSE;
    while (!m_bTerminate)
    {
        SleepEx(INFINITE, TRUE);
    }
    return 0;
}

#endif /* __REACTOS__ */