#ifndef _ThreadPool_H_
#define _ThreadPool_H_
#pragma warning(disable: 4530)
#pragma warning(disable: 4786)
#include <cassert>
#include <vector>
#include <queue>
#include <windows.h>

using namespace std;

class ThreadJob  //工作基類
{
public:
 //供執行緒池呼叫的虛擬函式
 virtual void DoJob(void *pPara) = 0;
};

class ThreadPool
{
public:
 //dwNum 執行緒池規模
 ThreadPool(DWORD dwNum = 4) : _lThreadNum(0), _lRunningNum(0)
 {
  InitializeCriticalSection(&_csThreadVector);
  InitializeCriticalSection(&_csWorkQueue);
  _EventComplete = CreateEvent(0, false, false, NULL);
  _EventEnd = CreateEvent(0, true, false, NULL);
  _SemaphoreCall = CreateSemaphore(0, 0,  0x7FFFFFFF, NULL);
  _SemaphoreDel =  CreateSemaphore(0, 0,  0x7FFFFFFF, NULL);
  assert(_SemaphoreCall != INVALID_HANDLE_VALUE);
  assert(_EventComplete != INVALID_HANDLE_VALUE);
  assert(_EventEnd != INVALID_HANDLE_VALUE);
  assert(_SemaphoreDel != INVALID_HANDLE_VALUE);
  AdjustSize(dwNum <= 0 ? 4 : dwNum);
 }

 ~ThreadPool()
 {
  DeleteCriticalSection(&_csWorkQueue);
  CloseHandle(_EventEnd);
  CloseHandle(_EventComplete);
  CloseHandle(_SemaphoreCall);
  CloseHandle(_SemaphoreDel);

  vector<ThreadItem*>::iterator iter;
  for(iter = _ThreadVector.begin(); iter != _ThreadVector.end(); iter++)
  {
   if(*iter)
    delete *iter;
  }

  DeleteCriticalSection(&_csThreadVector);
 }
 //調整執行緒池規模
 int AdjustSize(int iNum)
 {
  if(iNum > 0)
  {
   ThreadItem *pNew;
   EnterCriticalSection(&_csThreadVector);
   for(int _i=0; _i<iNum; _i++)
   {
    _ThreadVector.push_back(pNew = new ThreadItem(this));
    assert(pNew);
    pNew->_Handle = CreateThread(NULL, 0, DefaultJobProc, pNew, 0, NULL);
    // set priority
    SetThreadPriority(pNew->_Handle, THREAD_PRIORITY_BELOW_NORMAL);
    assert(pNew->_Handle);
   }
   LeaveCriticalSection(&_csThreadVector);
  }
  else
  {
   iNum= -1;
   ReleaseSemaphore(_SemaphoreDel,  iNum > _lThreadNum ? _lThreadNum : iNum, NULL);
  }
  return (int)_lThreadNum;
 }
 //呼叫執行緒池
 void Call(void (*pFunc)(void  *), void *pPara = NULL)
 {
  assert(pFunc);
  EnterCriticalSection(&_csWorkQueue);
  _JobQueue.push(new JobItem(pFunc, pPara));
  LeaveCriticalSection(&_csWorkQueue);
  ReleaseSemaphore(_SemaphoreCall, 1, NULL);
 }
 //呼叫執行緒池
 inline void Call(ThreadJob * p, void *pPara = NULL)
 {
  Call(CallProc, new CallProcPara(p, pPara));
 }
 //結束執行緒池, 並同步等待
 bool EndAndWait(DWORD dwWaitTime = INFINITE)
 {
  SetEvent(_EventEnd);
  return WaitForSingleObject(_EventComplete, dwWaitTime) == WAIT_OBJECT_0;
 }
 //結束執行緒池
 inline void End()
 {
  SetEvent(_EventEnd);
 }
 inline DWORD Size()
 {
  return (DWORD)_lThreadNum;
 }
 inline DWORD GetRunningSize()
 {
  return (DWORD)_lRunningNum;
 }
 bool IsRunning()
 {
  return _lRunningNum > 0;
 }
protected:
 //工作執行緒
 static DWORD WINAPI DefaultJobProc(LPVOID lpParameter = NULL)
 {
  ThreadItem *pThread = static_cast<ThreadItem*>(lpParameter);
  assert(pThread);
  ThreadPool *pThreadPoolObj = pThread->_pThis;
  assert(pThreadPoolObj);
  InterlockedIncrement(&pThreadPoolObj->_lThreadNum);
  HANDLE hWaitHandle[3];
  hWaitHandle[0] = pThreadPoolObj->_SemaphoreCall;
  hWaitHandle[1] = pThreadPoolObj->_SemaphoreDel;
  hWaitHandle[2] = pThreadPoolObj->_EventEnd;
  JobItem *pJob;
  bool fHasJob;

  for(;;)
  {
   DWORD wr = WaitForMultipleObjects(3, hWaitHandle, false, INFINITE);
   //響應刪除執行緒訊號
   if(wr == WAIT_OBJECT_0 + 1) 
    break;

   //從佇列裡取得使用者作業
   EnterCriticalSection(&pThreadPoolObj->_csWorkQueue);
   if(fHasJob = !pThreadPoolObj->_JobQueue.empty())
   {
    pJob = pThreadPoolObj->_JobQueue.front();
    pThreadPoolObj->_JobQueue.pop();
    assert(pJob);
   }
   LeaveCriticalSection(&pThreadPoolObj->_csWorkQueue);
   //受到結束執行緒訊號 確定是否結束執行緒(結束執行緒訊號 && 是否還有工作)
   if(wr == WAIT_OBJECT_0 + 2 && !fHasJob) 
    break;
   if(fHasJob && pJob)
   {
    InterlockedIncrement(&pThreadPoolObj->_lRunningNum);
    pThread->_dwLastBeginTime = GetTickCount();
    pThread->_dwCount++;
    pThread->_fIsRunning = true;
    pJob->_pFunc(pJob->_pPara); //執行使用者作業
    delete pJob;
    pThread->_fIsRunning = false;
    InterlockedDecrement(&pThreadPoolObj->_lRunningNum);
   }
  }
  //刪除自身結構
  EnterCriticalSection(&pThreadPoolObj->_csThreadVector);
  pThreadPoolObj->_ThreadVector.erase(find(pThreadPoolObj->_ThreadVector.begin(), pThreadPoolObj->_ThreadVector.end(), pThread));
  LeaveCriticalSection(&pThreadPoolObj->_csThreadVector);
  delete pThread;
  InterlockedDecrement(&pThreadPoolObj->_lThreadNum);
  if(!pThreadPoolObj->_lThreadNum)  //所有執行緒結束
   SetEvent(pThreadPoolObj->_EventComplete);
  return 0;
 }
 //呼叫使用者物件虛擬函式
 static void CallProc(void *pPara)
 {
  CallProcPara *cp = static_cast<CallProcPara *>(pPara);
  assert(cp);
  if(cp)
  {
   cp->_pObj->DoJob(cp->_pPara);
   delete cp;
  }
 }
 //使用者物件結構
 struct CallProcPara 
 {
  ThreadJob* _pObj;//使用者物件
  void *_pPara;//使用者引數
  CallProcPara(ThreadJob* p, void *pPara) : _pObj(p), _pPara(pPara) { };
 };
 //使用者函式結構
 struct JobItem
 {
  void (*_pFunc)(void  *);//函式
  void *_pPara; //引數
  JobItem(void (*pFunc)(void  *) = NULL, void *pPara = NULL) : _pFunc(pFunc), _pPara(pPara) { };
 };
 //執行緒池中的執行緒結構
 struct ThreadItem
 {
  HANDLE _Handle; //執行緒控制代碼
  ThreadPool *_pThis;  //執行緒池的指標
  DWORD _dwLastBeginTime; //最後一次執行開始時間
  DWORD _dwCount; //執行次數
  bool _fIsRunning;
  ThreadItem(ThreadPool *pthis) : _pThis(pthis), _Handle(NULL), _dwLastBeginTime(0), _dwCount(0), _fIsRunning(false) { };
  ~ThreadItem()
  {
   if(_Handle)
   {
    CloseHandle(_Handle);
    _Handle = NULL;
   }
  }
 };

 std::queue<JobItem *> _JobQueue;  //工作佇列
 std::vector<ThreadItem *>  _ThreadVector; //執行緒資料
 CRITICAL_SECTION _csThreadVector, _csWorkQueue; //工作佇列臨界, 執行緒資料臨界
 HANDLE _EventEnd, _EventComplete, _SemaphoreCall, _SemaphoreDel;//結束通知, 完成事件, 工作訊號， 刪除執行緒訊號
 long _lThreadNum, _lRunningNum; //執行緒數, 執行的執行緒數
};
#endif //_ThreadPool_H_

#include <iostream>
#include "head.h"
using namespace std;

class CMyThreadJob
   :public ThreadJob
{
public:
 void DoJob(void *pPara)
 {
        cout<<"我的執行緒工作物件，列印資料： "<< *((int*)pPara)<<endl;
 }
};

void threadfunc(void *p)
{
  cout<<"我的執行緒函式，列印資料： "<< *((int*)p)<<endl;
}

int main()
{

 //ThreadPool tp;
 //for(int i=0; i<100; i++)
 // tp.Call(threadfunc);

 ThreadPool tp(20);//20為初始執行緒池規模

 int* pData = new int(1011);
 tp.Call(threadfunc, pData);

 int* pData2 = new int(8888);
 CMyThreadJob myjob;
 tp.Call(&myjob, pData2);

    Sleep(10000);
 return 0;
}

//...
}
ThreadPool tp;
for(i=0; i<100; i++)
  tp.Call(threadfunc);

ThreadPool tp(20);//20為初始執行緒池規模

tp.Call(threadfunc, lpPara);