/*
 * UdpTableOwnerModule.h 
 * Copyright (c) 2011 Antillia.com TOSHIYUKI ARAI. ALL RIGHTS RESERVED. 
 */


// SOL9
// 2009/08/22

#pragma once
#include <sol/Object.h>
#include <sol/Arg.h>
#include <sol/net/UdpTable.h> 

namespace SOL {
 
class UdpTableOwnerModule :public UdpTable {
/*
typedef struct {
  DWORD                 dwNumEntries;
  MIB_UDPROW_OWNER_MODULE table[ANY_SIZE];
}MIB_UDPTABLE_OWNER_MODULE, *PMIB_UDPTABLE_OWNER_MODULE;
*/
private:
    MIB_UDPTABLE_OWNER_MODULE *table;

public:

    MIB_UDPTABLE_OWNER_MODULE* getUdpTable()
    {
        return table;
    }

public:
    UdpTableOwnerModule()
    :table(NULL)
    {
    }

public:
    ~UdpTableOwnerModule() 
    {
        clear();
    }

public:
    virtual bool getTable()
    {    
        bool rc = false;
        DWORD dwSize=0;

        clear();

        if (GetExtendedUdpTable(NULL,&dwSize, TRUE,
            AF_INET, UDP_TABLE_OWNER_MODULE, 0) == ERROR_INSUFFICIENT_BUFFER) {

            table = (PMIB_UDPTABLE_OWNER_MODULE)new char[dwSize];
            DWORD r = NO_ERROR;                
            if ((r = GetExtendedUdpTable(table, &dwSize, TRUE,
                    AF_INET, UDP_TABLE_OWNER_MODULE, 0)) == NO_ERROR){
            
                rc = true;
            } else {
                clear();
                throw r;
            }
        } 
        return rc;
    }

public:
    void clear()
    {
        if (table) {
            delete [] (char*)table;
            table = NULL;
        }
    }


protected:

    bool getOwnerModule(PMIB_UDPROW_OWNER_MODULE pEntry, _bstr_t& moduleName, _bstr_t& modulePath)
    {
        bool rc = false;

        DWORD dwSize = 0; 
        
        DWORD drc = GetOwnerModuleFromUdpEntry(
            pEntry,
            TCPIP_OWNER_MODULE_INFO_BASIC ,
            NULL,
            &dwSize);

        TCPIP_OWNER_MODULE_BASIC_INFO* info = (TCPIP_OWNER_MODULE_BASIC_INFO*)new char[dwSize];
            
        if ( GetOwnerModuleFromUdpEntry(
            pEntry,
            TCPIP_OWNER_MODULE_INFO_BASIC, 
            info,
            &dwSize) == NO_ERROR) {

            moduleName = info->pModuleName;
            modulePath = info->pModulePath;

            rc = true;
        }

        delete [] (char*)info;

        return rc;
    }


/*
typedef struct _MIB_UDPROW_OWNER_MODULE {
  DWORD         dwLocalAddr;
  DWORD         dwLocalPort;
  DWORD         dwOwningPid;
  LARGE_INTEGER liCreateTimestamp;
  union {
    struct {
      int SpecificPortBind  :1;
    } ;
    int dwFlags;
  } ;
  ULONGLONG     OwningModuleInfo[TCPIP_OWNING_MODULE_SIZE];
}MIB_UDPROW_OWNER_MODULE, *PMIB_UDPRPW_OWNER_MODULE;
*/
public:
    virtual void display(MIB_UDPROW_OWNER_MODULE& table)
    {
        StringT<char> localIP;
        getIPAddress(table.dwLocalAddr, localIP);
    
 
        unsigned int localPort = getPort(table.dwLocalPort);
        _bstr_t moduleName = L"";
        _bstr_t modulePath = L"";
        
        getOwnerModule(&table, moduleName, modulePath);

        printf("UdpOwnerModule  LocalIP=%s:%d\tPID=%d ModuleName=%s ModulePath=%s\n"
                     ,(const char*)localIP
                     ,localPort
                     ,table.dwOwningPid,
                     (const char*)moduleName,
                     (const char*)modulePath);
    }



public:
    virtual void display()
    {
        if (table == NULL) {
            getTable();
        }
        if (table) {
            for (int i = 0 ; i < (int)table->dwNumEntries; i++) {
                display(table->table[i]);
                printf("\n");
            }
        }
    } 

};

}