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


// SOL9
// 2009/08/24

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

namespace SOL {
 
class IPv6TcpTableOwnerModule :public TcpTable {
/*
typedef struct {
  DWORD                   dwNumEntries;
  MIB_TCP6ROW_OWNER_MODULE table[ANY_SIZE];
}MIB_TCP6TABLE_OWNER_MODULE, *PMIB_TCP6TABLE_OWNER_MODULE;
*/
private:
    MIB_TCP6TABLE_OWNER_MODULE *table;


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


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

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

        clear();

        if (GetExtendedTcpTable(NULL,&dwSize, TRUE,
            AF_INET6,
            TCP_TABLE_OWNER_MODULE_ALL, 0) == ERROR_INSUFFICIENT_BUFFER) {
                
            table = (PMIB_TCP6TABLE_OWNER_MODULE)new char[dwSize];
             DWORD r = NO_ERROR;    
            if ((r = GetExtendedTcpTable(
                        table, &dwSize, TRUE,
                    AF_INET6,TCP_TABLE_OWNER_MODULE_ALL, 0)) == NO_ERROR){
                ;//OK
                rc = true;
            } else {
                clear();
                throw r;
            }
        } 
        return rc;
    }

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


protected:
    bool getOwnerModule(PMIB_TCP6ROW_OWNER_MODULE pTcpEntry, _bstr_t& moduleName, _bstr_t& modulePath)
    {
        bool rc = false;

        DWORD dwSize = 0; 
        
        DWORD drc = GetOwnerModuleFromTcp6Entry(
            pTcpEntry,
            TCPIP_OWNER_MODULE_INFO_BASIC ,
            NULL,
            &dwSize);

        TCPIP_OWNER_MODULE_BASIC_INFO* info = (TCPIP_OWNER_MODULE_BASIC_INFO*)new char[dwSize];
            
        if ( GetOwnerModuleFromTcp6Entry(
            pTcpEntry,
            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_TCP6ROW_OWNER_MODULE {
  UCHAR         ucLocalAddr[16];
  DWORD         dwLocalScopeId;
  DWORD         dwLocalPort;
  UCHAR         ucRemoteAddr[16];
  DWORD         dwRemoteScopeId;
  DWORD         dwRemotePort;
  DWORD         dwState;
  DWORD         dwOwningPid;
  LARGE_INTEGER liCreateTimestamp;
  ULONGLONG     OwningModuleInfo[TCPIP_OWNING_MODULE_SIZE];

*/
public:
    virtual void display(MIB_TCP6ROW_OWNER_MODULE& table)
    {
        StringT<char> localIP;
        getIPAddress(table.ucLocalAddr, localIP);
        
        unsigned int localPort = getPort(table.dwLocalPort);
        
        StringT<char> remoteIP; 
        getIPAddress(table.ucRemoteAddr, remoteIP);
 
        unsigned int remotePort = getPort(table.dwRemotePort);
    
        _bstr_t moduleName = L"";
        _bstr_t modulePath = L"";
        getOwnerModule(&table, moduleName, modulePath); 

        printf("TCP6  LocalIP=[%s]:%d\tRemoteIP=[%s]:%d\tState=%s\tPID=%d\tModuleName=%s\tModulePath=%s\n"
                     ,(const char*)localIP
                     ,localPort
                     ,(const char*)remoteIP
                     ,remotePort
                     ,getState(table.dwState),
                     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");
            }
        }
    } 

};

}