(

const Socket &clientSocket,

const std::chrono::milliseconds &timeout,

const std::string &fileName,

const time_t fileTime,

const size_t fileSize,

const std::string &rangeHeader,

const std::string &connectionHeader,

const std::string &dateHeader,

const bool headersOnly

) const

{

size_t delimiter = rangeHeader.find('=');

if (std::string::npos == delimiter)

{

// HTTP 400

std::string headers("HTTP/1.1 400 Bad Request\r\n");

headers += connectionHeader + dateHeader + "\r\n";

clientSocket.nonblock_send(headers, timeout);

return 0;

}

std::string range_unit_name(rangeHeader.cbegin(), rangeHeader.cbegin() + delimiter);

const std::unordered_map<std::string, size_t> ranges_units {

{"bytes", 1}

};

auto it_unit = ranges_units.find(range_unit_name);

if (ranges_units.cend() == it_unit)

{

// HTTP 416

std::string headers("HTTP/1.1 416 Requested Range Not Satisfiable\r\n");

headers += connectionHeader + dateHeader + "\r\n";

clientSocket.nonblock_send(headers, timeout);

return 0;

}

const size_t range_unit = it_unit->second;

std::vector<std::tuple<size_t, size_t> > ranges;

std::string content_range_header("bytes ");

size_t content_length = 0;

for (size_t str_pos; std::string::npos != delimiter; )

{

str_pos = delimiter + 1;

delimiter = rangeHeader.find(',', str_pos);

size_t range_pos = rangeHeader.find('-', str_pos);

if (range_pos < delimiter)

{

const std::string range_begin_str(rangeHeader.cbegin() + str_pos, rangeHeader.cbegin() + range_pos);

const std::string range_end_str(rangeHeader.cbegin() + range_pos + 1, std::string::npos == delimiter ? rangeHeader.cend() : rangeHeader.cbegin() + delimiter);

if (false == range_begin_str.empty() )

{

const size_t range_begin = std::strtoull(range_begin_str.c_str(), nullptr, 10) * range_unit;

if (range_begin < fileSize)

{

if (false == range_end_str.empty() )

{

size_t range_end = std::strtoull(range_end_str.c_str(), nullptr, 10) * range_unit;

if (range_end >= range_begin)

{

if (range_end > fileSize)

{

range_end = fileSize;

}

const size_t length = range_end - range_begin + 1;

content_length += length;

content_range_header += std::to_string(range_begin) + '-' + std::to_string(range_end) + ',';

ranges.emplace_back(std::tuple<size_t, size_t> {range_begin, length});

}

}

else // if range_end_str empty

{

const size_t length = fileSize - range_begin;

content_length += length;

content_range_header += std::to_string(range_begin) + '-' + std::to_string(fileSize - 1) + ',';

ranges.emplace_back(std::tuple<size_t, size_t> {range_begin, length});

}

}

}

else if (false == range_end_str.empty() ) // if range_begin_str empty

{

size_t range_end = std::strtoull(range_end_str.c_str(), nullptr, 10) * range_unit;

const size_t length = range_end < fileSize ? fileSize - range_end : fileSize;

const size_t range_begin = fileSize - length;

range_end = fileSize - range_begin - 1;

content_length += length;

content_range_header += std::to_string(range_begin) + '-' + std::to_string(range_end) + ',';

ranges.emplace_back(std::tuple<size_t, size_t> {range_begin, length});

}

}

}

if (0 == content_length)

{

// HTTP 416

std::string headers("HTTP/1.1 416 Requested Range Not Satisfiable\r\n");

headers += connectionHeader + dateHeader + "\r\n";

clientSocket.nonblock_send(headers, timeout);

return 0;

}

content_range_header.back() = '/';

content_range_header += std::to_string(fileSize);

// Ranges transfer

std::ifstream file(fileName, std::ifstream::binary);

if ( ! file)

{

file.close();

// HTTP 500

std::string headers("HTTP/1.1 500 Internal Server Error\r\n");

headers += connectionHeader + dateHeader + "\r\n";

clientSocket.nonblock_send(headers, timeout);

return 0;

}

const size_t ext_pos = fileName.rfind('.');

std::string file_ext = std::string::npos != ext_pos ? fileName.substr(ext_pos + 1) : "";

std::locale loc;

Utils::tolower(file_ext, loc);

auto it_mime = this->mimes_types.find(file_ext);

std::string file_mime_type = this->mimes_types.cend() != it_mime ? it_mime->second : "application/octet-stream";

std::string headers("HTTP/1.1 206 Partial Content\r\n");

headers += "Content-Type: " + file_mime_type + "\r\n"

+ "Content-Length: " + std::to_string(content_length) + "\r\n"

+ "Accept-Ranges: bytes\r\n"

+ "Content-Range: " + content_range_header + "\r\n"

+ "Last-Modified: " + Utils::getDatetimeStringValue(fileTime, true) + "\r\n"

+ connectionHeader + dateHeader + "\r\n";

// Отправить заголовки

if (std::numeric_limits<size_t>::max() == clientSocket.nonblock_send(headers, timeout) )

{

file.close();

return 0;

}

if (false == headersOnly)

{

for (auto &range : ranges)

{

const size_t length = std::get<1>(range);

std::vector<std::string::value_type> buf(length < 512 * 1024 ? length : 512 * 1024);

file.seekg(std::get<0>(range), file.beg);

size_t send_size_left = length;

size_t send_size;

do

{

if (send_size_left < 512 * 1024)

{

buf.resize(send_size_left);

}

file.read(reinterpret_cast<char *>(buf.data() ), buf.size() );

send_size = clientSocket.nonblock_send(buf, file.gcount(), timeout);

send_size_left -= send_size;

}

while (false == file.eof() && std::numeric_limits<size_t>::max() != send_size && send_size_left);

}

}

file.close();

return 0;

(

const Socket &clientSocket,

const std::chrono::milliseconds &timeout,

const std::string &fileName,

const std::unordered_map<std::string, std::string> &inHeaders,

const std::map<std::string, std::string> &outHeaders,

const std::string &connectionHeader,

const bool headersOnly

) const

{

// Get current time in GMT

const std::string date_header = "Date: " + Utils::getDatetimeStringValue() + "\r\n";

time_t file_time;

size_t file_size;

// Получить размер файла и дату последнего изменения

if (false == System::getFileSizeAndTimeGmt(fileName, &file_size, &file_time) )

{

// HTTP 404

std::string headers("HTTP/1.1 404 Not Found\r\n");

headers += connectionHeader + date_header + "\r\n";

clientSocket.nonblock_send(headers, timeout);

return 0;

}

// Check for If-Modified header

auto it_modified = inHeaders.find("If-Modified-Since");

// Если найден заголовок проверки изменения файла (проверить, изменялся ли файл)

if (inHeaders.cend() != it_modified)

{

const time_t time_in_request = Utils::stringTimeToTimestamp(it_modified->second);

if (file_time == time_in_request)

{

// HTTP 304

std::string headers("HTTP/1.1 304 Not Modified\r\n");

headers += connectionHeader + date_header + "\r\n";

clientSocket.nonblock_send(headers, timeout);

return 0;

}

}

auto it_range = inHeaders.find("Range");

// Range transfer

if (inHeaders.cend() != it_range)

{

return this->transferFilePart(clientSocket, timeout, fileName, file_time, file_size, it_range->second, connectionHeader, date_header, headersOnly);

}

// File transfer

std::ifstream file(fileName, std::ifstream::binary);

if ( ! file)

{

file.close();

// HTTP 500

std::string headers("HTTP/1.1 500 Internal Server Error\r\n");

headers += connectionHeader + date_header + "\r\n";

clientSocket.nonblock_send(headers, timeout);

return 0;

}

const size_t ext_pos = fileName.rfind('.');

std::string file_ext = std::string::npos != ext_pos ? fileName.substr(ext_pos + 1) : "";

std::locale loc;

Utils::tolower(file_ext, loc);

auto it_mime = this->mimes_types.find(file_ext);

std::string file_mime_type = this->mimes_types.cend() != it_mime ? it_mime->second : "application/octet-stream";

std::string headers("HTTP/1.1 200 OK\r\n");

headers += "Content-Type: " + file_mime_type + "\r\n"

+ "Content-Length: " + std::to_string(file_size) + "\r\n"

+ "Accept-Ranges: bytes\r\n"

+ "Last-Modified: " + Utils::getDatetimeStringValue(file_time, true) + "\r\n"

+ connectionHeader + date_header + "\r\n";

// Отправить заголовки

if (std::numeric_limits<size_t>::max() == clientSocket.nonblock_send(headers, timeout) )

{

file.close();

return 0;

}

// Отправить файл

if (false == headersOnly && file_size)

{

std::vector<std::string::value_type> buf(file_size < 512 * 1024 ? file_size : 512 * 1024);

size_t send_size;

do

{

file.read(reinterpret_cast<char *>(buf.data() ), buf.size() );

send_size = clientSocket.nonblock_send(buf, file.gcount(), timeout);

}

while (false == file.eof() && std::numeric_limits<size_t>::max() != send_size);

}

file.close();

return 0;

{

if (uriParams.length() )

{

for (size_t var_pos = 0, var_end = 0; std::string::npos != var_end; var_pos = var_end + 1)

{

// Поиск следующего параметра

var_end = uriParams.find('&', var_pos);

// Поиск значения параметра

size_t delimiter = uriParams.find('=', var_pos);

if (delimiter >= var_end)

{

// Получить имя параметра

std::string var_name = Utils::urlDecode(uriParams.substr(var_pos, std::string::npos != var_end ? var_end - var_pos : std::string::npos) );

// Сохранить параметр с пустым значением

params.emplace(std::move(var_name), "");

}

else

{

// Получить имя параметра

std::string var_name = Utils::urlDecode(uriParams.substr(var_pos, delimiter - var_pos) );

++delimiter;

// Получить значение параметра

std::string var_value = Utils::urlDecode(uriParams.substr(delimiter, std::string::npos != var_end ? var_end - delimiter : std::string::npos) );

// Сохранить параметр и значение

params.emplace(std::move(var_name), std::move(var_value) );

}

}

return true;

}

return false;

{

static const std::unordered_map<size_t, std::string> statuses {

{400, "Bad Request"},

{404, "Not Found"},

{413, "Request Entity Too Large"}

};

auto it = statuses.find(statusCode);

if (statuses.cend() != it)

{

const std::string &status = it->second;

std::string headers("HTTP/1.1 " + std::to_string(statusCode) + ' ' + status + "\r\n\r\n");

clientSocket.nonblock_send(headers, timeout);

}

{

int app_exit_code;

bool connection_upgrade = false;

bool connection_keep_alive;

do

{

app_exit_code = EXIT_FAILURE;

const size_t buf_len = 4096;

std::vector<std::string::value_type> buf(buf_len);

std::string str_buf;

std::unordered_map<std::string, std::string> incoming_headers;

std::unordered_multimap<std::string, std::string> incoming_params;

std::unordered_multimap<std::string, std::string> incoming_data;

std::unordered_multimap<std::string, FileIncoming> incoming_files;

std::map<std::string, std::string> outgoing_headers;

std::string method;

std::string version;

std::string uri_reference;

// Получить данные запроса от клиента

std::chrono::milliseconds timeout(5000);

const size_t recv_len = clientSocket.nonblock_recv(buf, timeout);

if (std::numeric_limits<size_t>::max() == recv_len)

{

#ifdef DEBUG

#ifdef WIN32

std::cout << "Error: " << WSAGetLastError() << std::endl;

#elif POSIX

std::cout << "Error: " << errno << std::endl;

#endif

#endif

break;

}

else if (recv_len) // Если данные были получены

{

str_buf.assign(buf.cbegin(), buf.cbegin() + recv_len);

// Поиск конца заголовков (пустая строка)

size_t headers_end = str_buf.find("\r\n\r\n");

// Если найден конец заголовков

if (std::string::npos != headers_end)

{

headers_end += 2;

size_t str_cur = 0;

// Поиск конца первого заголовка

size_t str_end = str_buf.find("\r\n");

// Если не найден конец заголовка

if (std::string::npos == str_end)

{

sendStatus(clientSocket, timeout, 400);

break;

}

// Установка конца строки (для поиска)

str_buf[str_end] = '\0';

// Разделить метод запроса и параметры запроса

size_t delimiter = str_buf.find(' ', str_cur);

// Получить метод запроса (GET, POST, PUT, DELETE, ...)

method = str_buf.substr(str_cur, delimiter - str_cur);

// Сохранить метод и параметры запроса

incoming_headers[method] = str_buf.substr(delimiter + 1, str_end - delimiter - 1);

delimiter += 1;

// Найти окончание URI

size_t uri_end = str_buf.find(' ', delimiter);

// Если окончание не найдено

if (std::string::npos == uri_end)

{

uri_end = str_end;

// то версия протокола HTTP - 0.9

version = "0.9";

}

else // Если окончание найдено

{

str_buf[uri_end] = '\0';

const size_t ver_beg = uri_end + 6; // Пропустить "HTTP/"

if (ver_beg < str_end)

{

// Получить версию протокола HTTP

version = str_buf.substr(ver_beg, str_end - ver_beg);

}

}

// Поиск именованных параметров запросов (переменных ?)

size_t params_pos = str_buf.find('?', delimiter);

// Сохранить полную ссылку URI (без параметров)

uri_reference = (std::string::npos == params_pos) ? str_buf.substr(delimiter) : str_buf.substr(delimiter, params_pos - delimiter);

if (std::string::npos != params_pos)

{

// Извлекаем параметры запроса из URI

if (false == parseIncomingVars(incoming_params, str_buf.substr(params_pos + 1, uri_end) ) )

{

// HTTP 400 Bad Request

this->sendStatus(clientSocket, timeout, 400);

break;

}

}

// Переход к обработке следующего заголовка

str_cur = str_end + 2;

// Поиск конца заголовка

str_end = str_buf.find("\r\n", str_cur);

// Установка конца заголовка

str_buf[str_end] = '\0';

// Цикл извлечения заголовков запроса

for (; str_cur != headers_end; str_end = str_buf.find("\r\n", str_cur), str_buf[str_end] = '\0')

{

// Поиск разделителя названия заголовка и его значения

delimiter = str_buf.find(':', str_cur);

// Если разделитель найден в текущей строке

if (delimiter < str_end)

{

std::string header_name = str_buf.substr(str_cur, delimiter - str_cur);

std::string header_value = str_buf.substr(delimiter + 1, str_end - delimiter - 1);

// Удалить лишние пробелы в начале и в конце строки

Utils::trim(header_value);

// Сохранить заголовок и его значение

incoming_headers.emplace(std::move(header_name), std::move(header_value) );

}

// Перейти к следующей строке

str_cur = str_end + 2;

}

// Получить доменное имя (или адрес) назначения запроса

auto it_host = incoming_headers.find("Host");

// Если имя задано - продолжить обработку запроса

if (incoming_headers.cend() != it_host)

{

// Поиск разделителя, за которым помещается номер порта (сокета), если указан

size_t delimiter = it_host->second.find(':');

// Получить имя (или адрес)

const std::string host = it_host->second.substr(0, delimiter);

// Получить номер порта

const int port = (std::string::npos != delimiter) ? std::strtol(it_host->second.substr(delimiter + 1).c_str(), nullptr, 10) : 80;

// Поиск настроек приложения по имени

ServerApplicationSettings *app_sets = this->apps_tree.find(host);

// Если приложение найдено

if (app_sets && app_sets->port == port)

{

// Определить вариант данных запроса (заодно проверить, есть ли данные)

auto it = incoming_headers.find("Content-Type");

if (incoming_headers.cend() != it)

{

// Параметры

std::unordered_map<std::string, std::string> content_params;

// Получить значение заголовка

std::string &header_value = it->second;

// Определить, содержит ли тип данных запроса дополнительные параметры

delimiter = header_value.find(';');

std::string data_variant_name; // Название варианта данных запроса

// Если есть дополнительные параметры - извлекаем их

if (std::string::npos != delimiter)

{

data_variant_name = header_value.substr(0, delimiter);

Utils::trim(data_variant_name);

for (size_t str_param_cur = delimiter + 1, str_param_end = 0; std::string::npos != str_param_end; str_param_cur = str_param_end + 1)

{

str_param_end = header_value.find(';', str_param_cur);

delimiter = header_value.find('=', str_param_cur);

if (delimiter >= str_param_end)

{

std::string param_name = header_value.substr(str_param_cur, std::string::npos != str_param_end ? str_param_end - str_param_cur : std::string::npos);

Utils::trim(param_name);

content_params.emplace(std::move(param_name), "");

}

else

{

std::string param_name = header_value.substr(str_param_cur, delimiter - str_param_cur);

Utils::trim(param_name);

++delimiter;

std::string param_value = header_value.substr(delimiter, std::string::npos != str_param_end ? str_param_end - delimiter : std::string::npos);

Utils::trim(param_value);

content_params.emplace(std::move(param_name), std::move(param_value) );

}

}

}

else

{

data_variant_name = header_value;

}

// Поиск варианта данных по имени типа

auto variant = this->variants.find(data_variant_name);

// Если сервер поддерживает формат полученных данных

if (this->variants.cend() != variant)

{

DataVariantAbstract *data_variant = variant->second;

// Получить длину запроса в байтах

size_t data_length = 0;

auto it_len = incoming_headers.find("Content-Length");

if (incoming_headers.cend() != it_len)

{

data_length = std::strtoull(it_len->second.c_str(), nullptr, 10);

}

// Если размер запроса не превышает лимит (если лимит был установлен)

if (data_length <= app_sets->request_max_size || 0 == app_sets->request_max_size)

{

// Сколько осталось получить данных

size_t left_bytes = 0;

if (data_length)

{

left_bytes = data_length - (recv_len - (headers_end + 2) );

}

// Разобрать данные на составляющие

if (false == data_variant->parse(clientSocket, timeout, str_buf.substr(headers_end + 2), left_bytes, content_params, incoming_data, incoming_files) )

{

for (auto &it : incoming_files)

{

remove(it.second.getName().c_str() );

}

// HTTP 400 Bad Request

this->sendStatus(clientSocket, timeout, 400);

break;

}

}

else

{

// HTTP 413 Request Entity Too Large

this->sendStatus(clientSocket, timeout, 413);

}

}

else

{

// HTTP 400 Bad Request

this->sendStatus(clientSocket, timeout, 400);

}

}

Utils::raw_pair *raw_pair_params = nullptr;

Utils::raw_pair *raw_pair_headers = nullptr;

Utils::raw_pair *raw_pair_data = nullptr;

Utils::raw_fileinfo *raw_fileinfo_files = nullptr;

Utils::stlUnorderedMultimapToRawPairs(&raw_pair_params, incoming_params);

Utils::stlUnorderedMapToRawPairs(&raw_pair_headers, incoming_headers);

Utils::stlUnorderedMultimapToRawPairs(&raw_pair_data, incoming_data);

Utils::filesIncomingToRawFilesInfo(&raw_fileinfo_files, incoming_files);

server_request request {

clientSocket.get_handle(),

method.c_str(),

uri_reference.c_str(),

app_sets->root_dir.c_str(),

incoming_params.size(),

raw_pair_params,

incoming_headers.size(),

raw_pair_headers,

incoming_data.size(),

raw_pair_data,

incoming_files.size(),

raw_fileinfo_files

};

server_response response {

clientSocket.get_handle(), 0, nullptr

};

// Попытаться

try

{

// Запустить приложение

app_exit_code = app_sets->application_call(&request, &response);

}

catch (...)

{

app_exit_code = EXIT_FAILURE;

}

if (EXIT_SUCCESS == app_exit_code)

{

Utils::rawPairsToStlMap(outgoing_headers, response.headers, response.headers_count);

}

try

{

app_sets->application_clear(response.headers, response.headers_count);

}

catch (...) {}

Utils::destroyRawPairs(raw_pair_params, incoming_params.size() );

Utils::destroyRawPairs(raw_pair_headers, incoming_headers.size() );

Utils::destroyRawPairs(raw_pair_data, incoming_data.size() );

Utils::destroyRawFilesInfo(raw_fileinfo_files, incoming_files.size() );

}

else

{

// HTTP 404 Not Found

this->sendStatus(clientSocket, timeout, 404);

}

}

else

{

// HTTP 400 Bad Request

this->sendStatus(clientSocket, timeout, 400);

}

}

else

{

// HTTP 400 Bad Request

this->sendStatus(clientSocket, timeout, 400);

}

}

else // Если запрос пустой

{

// HTTP 400 Bad Request

this->sendStatus(clientSocket, timeout, 400);

break;

}

for (auto it : incoming_files)

{

remove(it.second.getName().c_str() );

}

connection_keep_alive = false;

if (EXIT_SUCCESS == app_exit_code)

{

auto it_in_connection = incoming_headers.find("Connection");

auto it_out_connection = outgoing_headers.find("Connection");

if (incoming_headers.cend() != it_in_connection && outgoing_headers.cend() != it_out_connection)

{

std::locale loc;

std::string connection_in = it_in_connection->second;

Utils::tolower(connection_in, loc);

std::string connection_out = it_out_connection->second;

Utils::tolower(connection_out, loc);

if ("keep-alive" == connection_in)

{

if ("keep-alive" == connection_out)

{

connection_keep_alive = true;

}

}

else if ("upgrade" == connection_in)

{

if ("upgrade" == connection_out)

{

connection_upgrade = true;

}

}

}

auto it_x_sendfile = outgoing_headers.find("X-Sendfile");

if (outgoing_headers.cend() != it_x_sendfile)

{

const std::string connection_header = connection_keep_alive ? "Connection: keep-alive\r\n" : "Connection: close\r\n";

const bool headers_only = ("head" == method);

this->transferFile(clientSocket, timeout, it_x_sendfile->second, incoming_headers, outgoing_headers, connection_header, headers_only);

}

}

}

while (connection_keep_alive);

if (false == connection_upgrade)

{

clientSocket.shutdown();

clientSocket.close();

}

return app_exit_code;

{

while (true)

{

Socket clientSocket;

this->eventThreadCycle->wait();

if (false == this->process_flag)

{

break;

}

this->sockets_queue_mtx.lock();

if (sockets.size() )

{

clientSocket = std::move(sockets.front() );

sockets.pop();

}

if (sockets.empty() )

{

this->eventThreadCycle->reset();

this->eventNotFullQueue->notify();

}

this->sockets_queue_mtx.unlock();

if (clientSocket.is_open() )

{

++this->threads_working_count;

this->threadRequestProc(clientSocket);

--this->threads_working_count;

}

}

{

auto it_option = this->settings.find("threads_max_count");

size_t threads_max_count = 0;

if (this->settings.cend() != it_option)

{

threads_max_count = std::strtoull(it_option->second.c_str(), nullptr, 10);

}

if (0 == threads_max_count)

{

threads_max_count = std::thread::hardware_concurrency();

if (0 == threads_max_count)

{

threads_max_count = 1;

}

threads_max_count *= 2;

}

this->threads_working_count = 0;

this->eventThreadCycle = new Event(false, true);

std::function<void(Server *, std::queue<Socket> &)> serverThreadRequestCycle = std::mem_fn(&Server::threadRequestCycle);

std::vector<std::thread> active_threads;

active_threads.reserve(threads_max_count);

// For update applications modules

do

{

if (this->eventUpdateModule->notifed() )

{

updateModules();

}

// Cycle creation threads applications requests

do

{

while (this->threads_working_count == active_threads.size() && active_threads.size() < threads_max_count && sockets.empty() == false)

{

active_threads.emplace_back(serverThreadRequestCycle, this, std::ref(sockets) );

}

size_t notify_count = active_threads.size() - this->threads_working_count;

if (notify_count > sockets.size() )

{

notify_count = sockets.size();

}

this->eventThreadCycle->notify(notify_count);

this->eventProcessQueue->wait();

}

while (this->process_flag);

// Data clear

this->eventThreadCycle->notify();

if (false == active_threads.empty() )

{

// Join threads (wait completion)

for (auto &th : active_threads)

{

th.join();

}

active_threads.clear();

}

this->eventNotFullQueue->notify();

}

while (this->eventUpdateModule->notifed() );

if (false == this->server_sockets.empty() )

{

for (Socket &s : this->server_sockets)

{

s.close();

}

this->server_sockets.clear();

}

delete this->eventThreadCycle;

return 0;

{

std::unordered_set<ServerApplicationSettings *> same;

for (auto &app : applications)

{

if (app->module_index == moduleIndex)

{

same.emplace(app);

try