#include "../inc/swilib.h"
#include "string_util.h"
#include "main.h"
#include "transports_icons.h"

extern const char PATH_TO_PIC[];
const char transports_img_folder[] = "transports\\";
static TransportIconsList * til_top = NULL;

/*
  Загрузить из папки "..\img\transports\" все папки с иконками транспортов.
*/
void LoadTranspostIconsList()
{
  DIR_ENTRY de;
  TransportIconsList * til;
  unsigned int err = NULL;
  char * tr_folder = malloc(strlen(PATH_TO_PIC) + 32);
  strcpy(tr_folder, PATH_TO_PIC);
  strcat(tr_folder, transports_img_folder);
  if (isdir(tr_folder, &err)) // Проверяем есть ли вообще папка "transports"
  {
    strcat(tr_folder, "*.*");
    if (FindFirstFile(&de, tr_folder, &err))
    {
      do
      {
        if (de.file_attr & FA_DIRECTORY) // Нашли папку
        {
          til = malloc(sizeof(TransportIconsList)); // Создаем новый список
          strcpy(til->name, de.file_name); // Копируем имя папки в список
          til->next = NULL;
          if (til_top)
          {
            TransportIconsList * til_r = (TransportIconsList *)&til_top;
            TransportIconsList * til_t = til_top;
            while(stricmp(til_t->name, til->name) < 0)
            {
              til_r = til_t;
              til_t = til_t->next;
              if (!til_t) break;
            }
            til->next = til_t;
            til_r->next = til;
          }
          else
            til_top = til;
        }
      }
      while(FindNextFile(&de, &err));
    }
    FindClose(&de, &err);
  }
  mfree(tr_folder);
}

void FreeTranspostIconsList()
{
  while(til_top)
  {
    TransportIconsList * til = til_top;
    til_top = til_top->next;
    mfree(til);
  }
}

/*
  Добавить в путь к иконке папку с иконками транспорта.
  Имя папки берем из жида контакта транспорта (xxxx@icq.jabber.ru -> icq)
*/
void GetTransportIconsPath(char * path_to_pic, TRESOURCE * resEx)
{
  int len = NULL; // Длина имени транспорта
  char * tr_name = NULL; // Имя транспорта
  TransportIconsList * til = til_top;
  if (!til) return;
  if(resEx->entry_type == T_TRANSPORT) // Сам транспорт
  {
    while(resEx->full_name[len] != '.') // Пока не дошли до точки
      len ++;
    tr_name = malloc(len + 1);
    strncpy(tr_name, resEx->full_name, len); // Копируем имя транспорта
    tr_name[len] = NULL;
  }
  else
  {
    char * tmp = strrchr(resEx->full_name, '@'); // Контакт из транспорта
    if (tmp)
    {
      while(tmp[len + 1] != '.')
        len ++;
      tr_name = malloc(len + 1);
      strncpy(tr_name, tmp + 1, len);
      tr_name[len] = NULL;
    }
  }
  if (!tr_name) return; // Наш контакт не является транспортом. Закрываем лавочку ;)
  while(til) // Ищем в списке нашу папку
  {
    if (!stricmp(til->name, tr_name)) // Нашли!
    {
      strcat(path_to_pic, transports_img_folder); // Добавляем папку "transports" в путь к иконке
      strcat(path_to_pic, til->name); // Добавляем нашу папку в путь к иконке
      strcat(path_to_pic, "\\");
      break;
    }
    til = til->next;
  }
  mfree(tr_name);
}