#ifndef NALL_SORT_HPP
#define NALL_SORT_HPP

#include <algorithm>
#include <nall/utility.hpp>

//class:   merge sort
//average: O(n log n)
//worst:   O(n log n)
//memory:  O(n)
//stack:   O(log n)
//stable?: yes

//note: merge sort was chosen over quick sort, because:
//* it is a stable sort
//* it lacks O(n^2) worst-case overhead

#define NALL_SORT_INSERTION
//#define NALL_SORT_SELECTION

namespace nall {
  template<typename T, typename Comparator>
  void sort(T list[], unsigned size, const Comparator &lessthan) {
    if(size <= 1) return;  //nothing to sort

    //use insertion sort to quickly sort smaller blocks
    if(size < 64) {
      #if defined(NALL_SORT_INSERTION)
      for(signed i = 1, j; i < size; i++) {
        T copy = std::move(list[i]);
        for(j = i - 1; j >= 0; j--) {
          if(!lessthan(copy, list[j])) break;
          list[j + 1] = std::move(list[j]);
        }
        list[j + 1] = std::move(copy);
      }
      #elif defined(NALL_SORT_SELECTION)
      for(unsigned i = 0; i < size; i++) {
        unsigned min = i;
        for(unsigned j = i + 1; j < size; j++) {
          if(lessthan(list[j], list[min])) min = j;
        }
        if(min != i) std::swap(list[i], list[min]);
      }
      #endif
      return;
    }

    //split list in half and recursively sort both
    unsigned middle = size / 2;
    sort(list, middle, lessthan);
    sort(list + middle, size - middle, lessthan);

    //left and right are sorted here; perform merge sort
    T *buffer = new T[size];
    unsigned offset = 0, left = 0, right = middle;
    while(left < middle && right < size) {
      if(!lessthan(list[right], list[left])) {
        buffer[offset++] = std::move(list[left++]);
      } else {
        buffer[offset++] = std::move(list[right++]);
      }
    }
    while(left < middle) buffer[offset++] = std::move(list[left++]);
    while(right < size)  buffer[offset++] = std::move(list[right++]);

    for(unsigned i = 0; i < size; i++) list[i] = std::move(buffer[i]);
    delete[] buffer;
  }

  template<typename T>
  void sort(T list[], unsigned size) {
    return sort(list, size, [](const T &l, const T &r) { return l < r; });
  }
}

#endif