#pragma once
#ifndef THREAD_POOL_H
#define THREAD_POOL_H

#include <vector>
#include <queue>
#include <thread>
#include <atomic>
#include <condition_variable>
#include <future>
#include <functional>
#include <stdexcept>

namespace std
{
#define MAX_THREAD_NUM 256

//線程池,可以提交變參函數(shù)或拉姆達表達式的匿名函數(shù)執(zhí)行,可以獲取執(zhí)行返回值
//不支持類成員函數(shù), 支持類靜態(tài)成員函數(shù)或全局函數(shù),Opteron()函數(shù)等
class threadpool
{
  using Task = std::function<void()>;
  // 線程池
  std::vector<std::thread> pool;
  // 任務(wù)隊列
  std::queue<Task> tasks;
  // 同步
  std::mutex m_lock;
  // 條件阻塞
  std::condition_variable cv_task;
  // 是否關(guān)閉提交
  std::atomic<bool> stoped;
  //空閑線程數(shù)量
  std::atomic<int> idlThrNum;

public:
  inline threadpool(unsigned short size = 4) :stoped{ false }
  {
    idlThrNum = size < 1 ? 1 : size;
    for (size = 0; size < idlThrNum; ++size)
    {  //初始化線程數(shù)量
      pool.emplace_back(
        [this]
        { // 工作線程函數(shù)
          while(!this->stoped)
          {
            std::function<void()> task;
            {  // 獲取一個待執(zhí)行的 task
              std::unique_lock<std::mutex> lock{ this->m_lock };// unique_lock 相比 lock_guard 的好處是：可以隨時 unlock() 和 lock()
              this->cv_task.wait(lock,
                [this] {
                  return this->stoped.load() || !this->tasks.empty();
                }
              ); // wait 直到有 task
              if (this->stoped && this->tasks.empty())
                return;
              task = std::move(this->tasks.front()); // 取一個 task
              this->tasks.pop();
            }
            idlThrNum--;
            task();
            idlThrNum++;
          }
        }
      );
    }
  }
  inline ~threadpool()
  {
    stoped.store(true);
    cv_task.notify_all(); // 喚醒所有線程執(zhí)行
    for (std::thread& thread : pool) {
      //thread.detach(); // 讓線程“自生自滅”
      if(thread.joinable())
        thread.join(); // 等待任務(wù)結(jié)束， 前提：線程一定會執(zhí)行完
    }
  }

public:
  // 提交一個任務(wù)
  // 調(diào)用.get()獲取返回值會等待任務(wù)執(zhí)行完,獲取返回值
  // 有兩種方法可以實現(xiàn)調(diào)用類成員，
  // 一種是使用  bind： .commit(std::bind(&Dog::sayHello, &dog));
  // 一種是用 mem_fn： .commit(std::mem_fn(&Dog::sayHello), &dog)
  template<class F, class... Args>
  auto commit(F&& f, Args&&... args) ->std::future<decltype(f(args...))>
  {
    if (stoped.load())  // stop == true ??
      throw std::runtime_error("commit on ThreadPool is stopped.");

    using RetType = decltype(f(args...)); // typename std::result_of<F(Args...)>::type, 函數(shù) f 的返回值類型
    auto task = std::make_shared<std::packaged_task<RetType()> >(
      std::bind(std::forward<F>(f), std::forward<Args>(args)...)
      );  // wtf !
    std::future<RetType> future = task->get_future();
    {  // 添加任務(wù)到隊列
      std::lock_guard<std::mutex> lock{ m_lock };//對當前塊的語句加鎖 lock_guard 是 mutex 的 stack 封裝類，構(gòu)造的時候 lock()，析構(gòu)的時候 unlock()
      tasks.emplace(
        [task]()
        { // push(Task{...})
          (*task)();
        }
      );
    }
    cv_task.notify_one(); // 喚醒一個線程執(zhí)行

    return future;
  }

  //空閑線程數(shù)量
  int idlCount() { return idlThrNum; }

};

}

#endif

#include "threadpool.h"
#include <iostream>

void fun1(int slp)
{
  printf(" hello, fun1 ! %d\n" ,std::this_thread::get_id());
  if (slp>0) {
    printf(" ======= fun1 sleep %d ========= %d\n",slp, std::this_thread::get_id());
    std::this_thread::sleep_for(std::chrono::milliseconds(slp));
  }
}

struct gfun {
  int operator()(int n) {
    printf("%d hello, gfun ! %d\n" ,n, std::this_thread::get_id() );
    return 42;
  }
};

class A { 
public:
  static int Afun(int n = 0) {  //函數(shù)必須是 static 的才能直接使用線程池
    std::cout << n << " hello, Afun ! " << std::this_thread::get_id() << std::endl;
    return n;
  }

  static std::string Bfun(int n, std::string str, char c) {
    std::cout << n << " hello, Bfun ! "<< str.c_str() <<" " << (int)c <<" " << std::this_thread::get_id() << std::endl;
    return str;
  }
};

int main()
  try {
    std::threadpool executor{ 50 };
    A a;
    std::future<void> ff = executor.commit(fun1,0);
    std::future<int> fg = executor.commit(gfun{},0);
    std::future<int> gg = executor.commit(a.Afun, 9999); //IDE提示錯誤,但可以編譯運行
    std::future<std::string> gh = executor.commit(A::Bfun, 9998,"mult args", 123);
    std::future<std::string> fh = executor.commit([]()->std::string { std::cout << "hello, fh ! " << std::this_thread::get_id() << std::endl; return "hello,fh ret !"; });

    std::cout << " ======= sleep ========= " << std::this_thread::get_id() << std::endl;
    std::this_thread::sleep_for(std::chrono::microseconds(900));

    for (int i = 0; i < 50; i++) {
      executor.commit(fun1,i*100 );
    }
    std::cout << " ======= commit all ========= " << std::this_thread::get_id()<< " idlsize="<<executor.idlCount() << std::endl;

    std::cout << " ======= sleep ========= " << std::this_thread::get_id() << std::endl;
    std::this_thread::sleep_for(std::chrono::seconds(3));

    ff.get(); //調(diào)用.get()獲取返回值會等待線程執(zhí)行完,獲取返回值
    std::cout << fg.get() << " " << fh.get().c_str()<< " " << std::this_thread::get_id() << std::endl;

    std::cout << " ======= sleep ========= " << std::this_thread::get_id() << std::endl;
    std::this_thread::sleep_for(std::chrono::seconds(3));

    std::cout << " ======= fun1,55 ========= " << std::this_thread::get_id() << std::endl;
    executor.commit(fun1,55).get();  //調(diào)用.get()獲取返回值會等待線程執(zhí)行完

    std::cout << "end... " << std::this_thread::get_id() << std::endl;


    std::threadpool pool(4);
    std::vector< std::future<int> > results;

    for (int i = 0; i < 8; ++i) {
      results.emplace_back(
        pool.commit([i] {
          std::cout << "hello " << i << std::endl;
          std::this_thread::sleep_for(std::chrono::seconds(1));
          std::cout << "world " << i << std::endl;
          return i*i;
        })
      );
    }
    std::cout << " ======= commit all2 ========= " << std::this_thread::get_id() << std::endl;

    for (auto && result : results)
      std::cout << result.get() << ' ';
    std::cout << std::endl;
    return 0;
  }
catch (std::exception& e) {
  std::cout << "some unhappy happened... " << std::this_thread::get_id() << e.what() << std::endl;
}