#include <stdio.h>
#include <windows.h>
/* Drag & Drop でファイル名を受け取るプログラムの雛形
gcc -O2 -W -Wall -mno-cygwin -mwindows -o DragAndDropExArg DragAndDropExArg.c
gcc -O2 -W -Wall -mno-cygwin -mwindows -mconsole -o DragAndDropExArg DragAndDropExArg.c
*/
TCHAR    fnameWithPath[MAX_PATH] ;

void messageFromDragAndDrop( char *fnameWithPath )
{// fprintf の使用には、gcc のコンパイルオプションに -mconsole を指定することが必須
    fprintf( stdout, "D&D:%s\n", fnameWithPath ) ;
}

void messageFromClipboard( char *message )
{// fprintf の使用には、gcc のコンパイルオプションに -mconsole を指定することが必須
    fprintf( stdout, "Clipboard:%s\n", message ) ;
}

void messageFromCommandLine( char *message )
{// fprintf の使用には、gcc のコンパイルオプションに -mconsole を指定することが必須
    fprintf( stdout, "CommandLine:%s\n", message ) ;
}
////////////////////////////////////////////////////////////////////////////////
//  ウィンドウプログラム部    // HWND は、対象ウィンドウを特定するハンドル (Window ID)
LRESULT CALLBACK WindowProcedure(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    switch( message ) {
        case WM_CREATE:  // CreateWindowEx(...) で WS_EX_ACCEPTFILES, を指定済み
//          DragAcceptFiles(hWnd, TRUE); // この Drag & Drop操作を有効にする処理は不要
            break;
        case WM_DROPFILES: // ドラッグアンドドロップで呼び出される
            SetForegroundWindow(hWnd); // 他のスレッドよりも若干高い優先順位を割り当て
            {register int i, max;
                for( i=0, max=DragQueryFile( (HDROP)wParam, -1, NULL, 0 ); i<max; i++ ) {
                    DragQueryFile( (HDROP)wParam, i, fnameWithPath, sizeof(fnameWithPath) ) ;
                    messageFromDragAndDrop( fnameWithPath ) ;
                }
            }
            DragFinish((HDROP)wParam);
            break;
        case WM_RBUTTONDOWN: // マウスの右ボタンクリックで呼び出される
            // OLE の drag & drop を使用していないので代替手段、クリップボードの読み出し
            {static char  *error_msg = "Clipboard Open Error!" ;
                if( OpenClipboard(NULL) == 0 ) {
                    messageFromClipboard( error_msg ) ;
                } else {
                    messageFromClipboard( GetClipboardData(CF_TEXT) ) ;
                    CloseClipboard();
                }
            }
            break;
/*      major events
        case WM_LBUTTONDOWN:
            break;
        case WM_MOUSEMOVE:
            break;
        case WM_KEYDOWN:  // MessageBox(hWnd, "WM_KEYDOWN", "キーイベントの発生", MB_OK);
            break;
        case WM_SIZE:     // ウィンドウサイズ調整
            break;        // Send(If it's necessary) PostMessage(hWnd,WM_PAINT,0,0) or No break;
        case WM_PAINT:    // (再)描画処理
            {PAINTSTRUCT ps ;
                HDC  hdc = BeginPaint(hWnd, &ps);
                EndPaint(hWnd, &ps);
            }
            break;
*/
        case WM_CLOSE:    // 必要な確認処理後、DestroyWindow関数を呼び出す
            DestroyWindow( hWnd ) ;
            break;
        case WM_DESTROY:  // ウィンドウを破棄した後に送られるメッセージ
            PostQuitMessage( 0 ) ;
            break;
        default:
            return DefWindowProc( hWnd, message, wParam, lParam ) ;
    }
    return 0;
}

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
{ (void)hInstance, (void)hPrevInstance, (void)lpCmdLine, (void)nCmdShow;
HWND        hWnd ;
WNDCLASSEX  wc ;
MSG         message ;
int         returnedValue ;          // BOOL が本来の正しい型
const char  *ClassName  = "Canvas",  *title  = "drag and drop" ;

    extern int  __argc;
    extern char **__argv;
    { register int i ; // if( strlen(lpCmdLine) != 0 ) messageFromCommandLine( lpCmdLine ) ;
        for( i=1; i<__argc; i++ ) messageFromCommandLine( __argv[i] ) ;
    } // 作成した exe ファイルのアイコンにファイルを Drag&Drop する

    // ウィンドウクラスの情報を設定
    wc.cbSize        = sizeof(WNDCLASSEX) ;                   // 構造体のサイズ
    wc.style         = CS_HREDRAW | CS_VREDRAW | CS_DBLCLKS;  // スタイルの設定
    wc.lpfnWndProc   = WindowProcedure;                       // ウィンドウプロシージャ LRESULT CALLBACK WindowProcedure(..
    wc.cbClsExtra    = 0;                                     // 構造体が使用する extra メモリサイズ
    wc.cbWndExtra    = 0;                                     // ウィンドウが使用する extra メモリサイズ
    wc.hInstance     = hInstance;                             // インスタンスハンドル
    wc.hIcon         = LoadIcon(hInstance, "PRGICON") ;       // アイコン
    wc.hCursor       = LoadCursor(NULL, IDC_ARROW) ;          // マウスカーソル
    wc.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH) ;  // ウィンドウ背景
    wc.lpszMenuName  = NULL,                                  // メニュー名  MAKEINTRESOURCE(..) or TEXT("..") ...
    wc.lpszClassName = TEXT(ClassName) ;                      // ウィンドウクラス名
    wc.hIconSm       = LoadIcon(hInstance, "PRGICON") ;       // 子アイコン
    
    if( RegisterClassEx( &wc ) == 0 ) return 1;               // ウィンドウクラスの登録

    if( (hWnd = CreateWindowEx(       // ウィンドウの生成
            WS_EX_ACCEPTFILES,      // ドラッグ＆ドロップの許可 WS_EX_ACCEPTFILES
                                    // DragAcceptFiles(hWnd, TRUE); は不要
            wc.lpszClassName,       // ウィンドウクラス名
            TEXT(title),            // タイトルバーに表示する文字列
            WS_OVERLAPPED | WS_CAPTION | WS_MINIMIZEBOX | WS_SYSMENU,
                                    // ウィンドウの種類  WS_OVERLAPPEDWINDOW,
            CW_USEDEFAULT,          // ウィンドウを表示する位置（X座標） CW_USEDEFAULT,
            CW_USEDEFAULT,          // ウィンドウを表示する位置（Y座標） CW_USEDEFAULT,
            256,                    // ウィンドウの幅    DEFAULT ⇒  MAIN_LX_SIZE,
            128,                    // ウィンドウの高さ  DEFAULT ⇒  MAIN_LY_SIZE,
            NULL,                   // 親ウィンドウのウィンドウハンドル
            NULL,                   // メニューハンドル
            hInstance,              // インスタンスハンドル
            NULL                    // その他の作成データ
    ) ) == NULL ) return 1;

    ShowWindow( hWnd, SW_SHOW ) ;    // ウィンドウを表示
    UpdateWindow( hWnd ) ;           // ウィンドウの更新
    //  メニューの有効無効設定は、WindowProcedure の WM_CREATE で行うので、
    //  現時点において、hWnd でのアクセスは失敗する。

    while( (returnedValue = GetMessage(&message, NULL, 0, 0)) != 0 ) { // メインループ
        if( returnedValue == -1 ) return -1; // GetMessage() が失敗（-1）なら終了する
        TranslateMessage( &message ) ;
        DispatchMessage( &message ) ;
    }
    return 0;
}