using UnityEngine;
using System;
using System.Collections;
using System.Collections.Generic;

public class CombineQueue : MonoBehaviour
{
  public GameObject destroyObj;
  public int maxFrame = 100; //Указывает максимальное колличество комбинирования в 1 кадр
  int curFrame; //Указывает сколько будет обработано объектов в текущий кадр. Current Frame
   
  List<BuildingClass> InstanceList = new List<BuildingClass> ();
  List<GameObject> Buildings = new List<GameObject> ();
  List<CombineInstance> Instance = new List<CombineInstance> ();
  List<Transform> Objects = new List<Transform> ();
   
  //CombineInstance[] combine;
  //instanceClass newInstance = new instanceClass();
  //newInstance.subject = "subject";
  //newInstance.body = "body";
  //public GameObject[] Building;
  //public CombineInstance[] Instance;
   
  int i = 0;
  int frame = 0;
  bool cc = true;
  bool allow = false;
  string curStatus = "";
  Material emptyMat;
   
  void Start ()
  {
   emptyMat = (Material)Resources.Load ("Diffuse");
   //maxFrame--;
  }

  public void AddToQueue (CombineInstance[] insList, Transform[] cube, GameObject caller)
  {
   //Debug.Log ("New instances! Count : " + insList.Length + " . Caller: " + caller.name);
   for (int i = 0; i < insList.Length - 1; i++) { //Внимание! Мы не проверяем последний item, так как он дубликат первого item!!!
    BuildingClass newInstance = new BuildingClass ();
    newInstance.instance = insList [i];
    newInstance.cube = cube [i];
    newInstance.gameobject = caller;
    InstanceList.Add (newInstance);
   }
   /*
   foreach (CombineInstance ins in insList) {
    BuildingClass newInstance = new BuildingClass ();
    newInstance.instance = ins;
    newInstance.gameobject = caller;
    InstanceList.Add (newInstance);
   }
   */
   //Debug.Log ("Instances added! Length: " + InstanceList.Count);
  }
   
  IEnumerator CoroutineCombine (GameObject go, CombineInstance[] instances, int verts)
  {   
   BuildingMeshes bMeshes = go.GetComponent<BuildingMeshes> ();
   if (bMeshes.Meshes.Count == 0) { //Если у здания нету ещё не одной скомбинированной группы
    GameObject obj = new GameObject ();
    obj.AddComponent ("MeshFilter");
    obj.AddComponent ("MeshRenderer");
    obj.renderer.material = emptyMat;
    obj.transform.parent = go.gameObject.transform;
    obj.name = go.name + "_Combined_1";
    obj.GetComponent<MeshFilter> ().mesh = new Mesh ();
    obj.GetComponent<MeshFilter> () .mesh.CombineMeshes (instances);
    obj.AddComponent ("MeshCollider");
    obj.gameObject.active = true;
     
    CombinedMeshes newInstance = new CombinedMeshes ();
    newInstance.mesh = obj;
    newInstance.vertices = obj.GetComponent<MeshFilter> ().mesh.vertexCount;
    bMeshes.Meshes.Add (newInstance);
   } else if (bMeshes.Meshes.Count > 0) { //Если у здания уже есть хотя бы одна скомбинированная группа
    int vCount = bMeshes.Meshes [bMeshes.Meshes.Count - 1].vertices;
    if (vCount < 60000) {
     if (60000 - vCount >= verts) {
      GameObject newOne = bMeshes.Meshes [bMeshes.Meshes.Count - 1].mesh;
      //bMeshes.Meshes[bMeshes.Meshes.Count -1].mesh.GetComponent<MeshFilter> () .mesh.CombineMeshes (AddOne(instances,newOne));
      //bMeshes.Meshes[bMeshes.Meshes.Count -1]
       
       
      GameObject obj = new GameObject ();
      obj.AddComponent ("MeshFilter");
      obj.AddComponent ("MeshRenderer");
      obj.renderer.material = emptyMat;
      obj.transform.parent = go.gameObject.transform;
      obj.name = go.name + "_Combined_" + bMeshes.Meshes.Count;
      //obj.GetComponent<MeshFilter> ().mesh = new Mesh ();
      obj.GetComponent<MeshFilter> () .mesh.CombineMeshes (AddOne (instances, newOne));
      obj.AddComponent ("MeshCollider");
      obj.gameObject.active = true;
       
      Destroy (bMeshes.Meshes [bMeshes.Meshes.Count - 1].mesh);
      Resources.UnloadUnusedAssets();
      //System.GC.Collect();
      bMeshes.Meshes [bMeshes.Meshes.Count - 1].mesh = obj;
      //GameObject gameObj = bMeshes.Meshes[bMeshes.Meshes.Count - 1].mesh;
      //Mesh mesh = bMeshes.Meshes[bMeshes.Meshes.Count - 1].mesh.GetComponent<MeshFilter> ().mesh;
      //Transform transform = bMeshes.Meshes[bMeshes.Meshes.Count - 1].mesh.transform;
       
      //gameObj.GetComponent<MeshFilter> ().mesh = new Mesh ();
      //gameObj.GetComponent<MeshFilter> ().mesh.CombineMeshes (AddOne(instances,mesh,transform));
       
      //GameObject destroyObj = bMeshes.Meshes[bMeshes.Meshes.Count - 1].mesh;
      //int vert = bMeshes.Meshes[bMeshes.Meshes.Count - 1].vertices;
      //bMeshes.Meshes.RemoveAt(bMeshes.Meshes.Count - 1);
       
      //destroyObj.GetComponent<MeshFilter> ().mesh = null;
      //Destroy(destroyObj);
      //destroyObj = null;
      //newOne = null;
      //bMeshes.Meshes[bMeshes.Meshes.Count -1].mesh = obj;
      //CombinedMeshes newInstance = new CombinedMeshes();
      //newInstance.mesh = obj;
      //newInstance.vertices = vert;
      //bMeshes.Meshes.Add(newInstance);
     }
    }
   }
   StopCoroutine("CoroutineCombine");
   yield return 0;
  }

  void Update ()
  {
   if (Input.GetKeyDown (KeyCode.H)) {
    Resources.UnloadUnusedAssets();
   }
    
   //Считаем сколько объектов будет обработано в следующий кадр
   if (InstanceList.Count - 1 >= maxFrame) {
    curFrame = maxFrame - 1;
    curStatus = "maxFrame  ";
   } else if (InstanceList.Count - 1 < maxFrame) {
    curFrame = InstanceList.Count - 1;
    curStatus = "elseFrame  ";
    //Debug.Log(InstanceList.Count + "     " + curFrame);
   }
    
   if (InstanceList.Count != 0) {
    
    //Считаем сколько разных групп
    for (int i = 0; i <= curFrame; i++) {
     GameObject go = InstanceList [i].gameobject;
     if (!Exists (go))
      Buildings.Add (go);
    }
    //Пробуем работать с каждой группой
    foreach (GameObject go in Buildings) {
     Instance.Clear (); //Очищаем список для создания нового списка комбинирования
     Objects.Clear (); //Очищаем список для создания нового списка объектов (это для распределения по мешам в 60к вершин)
     for (int i = 0; i <= curFrame; i++) { //Копаем 100 первых BuildingClass объектов
      GameObject instanceObj = null;
      if (i < InstanceList.Count)
       instanceObj = InstanceList [i].cube.gameObject;
      else if (i >= InstanceList.Count)
       instanceObj = InstanceList [InstanceList.Count - 1].cube.gameObject;
       
      //Debug.Log(instanceObj);
      if (instanceObj != null) {
       if (instanceObj.GetComponent<BlockInfo> () != null) {
        if (InstanceList [0].gameobject == go) {
         //Debug.Log("i = " + i + "  " + curStatus + "CurFrame: " + curFrame + "    " + "Count: " + InstanceList.Count + "    " + frame);
         Instance.Add (InstanceList [0].instance);
         Objects.Add (InstanceList [0].cube.gameObject.transform);
         InstanceList [0].cube.gameObject.SetActive (false);
         InstanceList.RemoveAt (0);
         //Debug.Log(InstanceList.Count);
         //curFrame--;
         allow = true;
        }
       }
      }
     }
      
     //Debug.Log(Buildings.Count);
     if (allow)
      //Combine (go, ToBuiltin (Instance), vertexCount (Objects));
      StartCoroutine(CoroutineCombine(go,ToBuiltin (Instance),vertexCount (Objects)));
     allow = false;
    }
    frame++;
   }
  }

  void Combine (GameObject go, CombineInstance[] instances, int verts)
  {   
   BuildingMeshes bMeshes = go.GetComponent<BuildingMeshes> ();
   if (bMeshes.Meshes.Count == 0) { //Если у здания нету ещё не одной скомбинированной группы
    GameObject obj = new GameObject ();
    obj.AddComponent ("MeshFilter");
    obj.AddComponent ("MeshRenderer");
    obj.renderer.material = emptyMat;
    obj.transform.parent = go.gameObject.transform;
    obj.name = go.name + "_Combined_1";
    obj.GetComponent<MeshFilter> ().mesh = new Mesh ();
    obj.GetComponent<MeshFilter> () .mesh.CombineMeshes (instances);
    obj.AddComponent ("MeshCollider");
    obj.gameObject.active = true;
     
    CombinedMeshes newInstance = new CombinedMeshes ();
    newInstance.mesh = obj;
    newInstance.vertices = obj.GetComponent<MeshFilter> ().mesh.vertexCount;
    bMeshes.Meshes.Add (newInstance);
   } else if (bMeshes.Meshes.Count > 0) { //Если у здания уже есть хотя бы одна скомбинированная группа
    int vCount = bMeshes.Meshes [bMeshes.Meshes.Count - 1].vertices;
    if (vCount < 60000) {
     if (60000 - vCount >= verts) {
      GameObject newOne = bMeshes.Meshes [bMeshes.Meshes.Count - 1].mesh;
      //bMeshes.Meshes[bMeshes.Meshes.Count -1].mesh.GetComponent<MeshFilter> () .mesh.CombineMeshes (AddOne(instances,newOne));
      //bMeshes.Meshes[bMeshes.Meshes.Count -1]
       
       
      GameObject obj = new GameObject ();
      obj.AddComponent ("MeshFilter");
      obj.AddComponent ("MeshRenderer");
      obj.renderer.material = emptyMat;
      obj.transform.parent = go.gameObject.transform;
      obj.name = go.name + "_Combined_" + bMeshes.Meshes.Count;
      //obj.GetComponent<MeshFilter> ().mesh = new Mesh ();
      obj.GetComponent<MeshFilter> () .mesh.CombineMeshes (AddOne (instances, newOne));
      obj.AddComponent ("MeshCollider");
      obj.gameObject.active = true;
       
      Destroy (bMeshes.Meshes [bMeshes.Meshes.Count - 1].mesh);
      bMeshes.Meshes [bMeshes.Meshes.Count - 1].mesh = obj;
      //GameObject gameObj = bMeshes.Meshes[bMeshes.Meshes.Count - 1].mesh;
      //Mesh mesh = bMeshes.Meshes[bMeshes.Meshes.Count - 1].mesh.GetComponent<MeshFilter> ().mesh;
      //Transform transform = bMeshes.Meshes[bMeshes.Meshes.Count - 1].mesh.transform;
       
      //gameObj.GetComponent<MeshFilter> ().mesh = new Mesh ();
      //gameObj.GetComponent<MeshFilter> ().mesh.CombineMeshes (AddOne(instances,mesh,transform));
       
      //GameObject destroyObj = bMeshes.Meshes[bMeshes.Meshes.Count - 1].mesh;
      //int vert = bMeshes.Meshes[bMeshes.Meshes.Count - 1].vertices;
      //bMeshes.Meshes.RemoveAt(bMeshes.Meshes.Count - 1);
       
      //destroyObj.GetComponent<MeshFilter> ().mesh = null;
      //Destroy(destroyObj);
      //destroyObj = null;
      //newOne = null;
      //bMeshes.Meshes[bMeshes.Meshes.Count -1].mesh = obj;
      //CombinedMeshes newInstance = new CombinedMeshes();
      //newInstance.mesh = obj;
      //newInstance.vertices = vert;
      //bMeshes.Meshes.Add(newInstance);
     }
    }
   }
   //Resources.UnloadUnusedAssets(); //Чистим память от мусора что бы не забивать её
  }

  bool Exists (GameObject inputGo)
  {
   foreach (GameObject go in Buildings) {
    if (inputGo == go)
     return true;
   }
   return false;
  }

  CombineInstance[] ToBuiltin (List<CombineInstance> input)
  {
   CombineInstance[] combine = new CombineInstance[input.Count];
   int i = 0;
   foreach (CombineInstance instance in input) {
    combine [i] = instance;
    i++;
   }
   return combine;
  }
   
  int vertexCount (List<Transform> objects)
  {
   if (objects.Count > 0) {
    int verts = 0;
    foreach (Transform tr in objects) {
     verts += tr.gameObject.GetComponent<MeshFilter> ().mesh.vertexCount;
    }
    return verts;
   } else
    return 0;
  }
   
  CombineInstance[] AddOne (CombineInstance[] array, GameObject newObj)
  {
   CombineInstance[] combine = new CombineInstance[array.Length + 1];
   for (int i = 0; i < array.Length; i++) {
    combine [i] = array [i];
   }
   combine [combine.Length - 1].mesh = newObj.GetComponent<MeshFilter> ().mesh;
   combine [combine.Length - 1].transform = newObj.transform.localToWorldMatrix;
   //Debug.Log("Input: " + array.Length + "    " + "Output: " + combine.Length);
   return combine;
  }
   
  CombineInstance[] AddOne (CombineInstance[] array, Mesh mesh, Transform trans)
  {
   CombineInstance[] combine = new CombineInstance[array.Length];
   for (int i = 0; i < array.Length; i++) {
    combine [i] = array [i];
   }
   combine [combine.Length - 1].mesh = mesh;
   combine [combine.Length - 1].transform = trans.localToWorldMatrix;
   return combine;
  }
}

public class BuildingClass
{
  public CombineInstance instance;
  public Transform cube;
  public GameObject gameobject;
}

using UnityEngine;
using System.Collections;
using System.Threading;

public class MeshMerger  : MonoBehaviour
{
  //Этот скрипт получает объект который нужно скомбинировать
  //Сортирует, делит по массивам, отправляет на переработку в CombineQueue
   
  MeshFilter[] meshFilters;
  Transform[] cubes;
  CombineInstance[] combine;
   
  //Функция Combine с массивом объектов пока отключена!
  public void Combine(GameObject[] GameObjects,GameObject father){
   for(int i = 0;i < GameObjects.Length;i++){
    meshFilters[i] = GameObjects[i].GetComponent<MeshFilter> ();
   }
    
    
    
   combine = new CombineInstance[meshFilters.Length];
   int a = 0;
   while (a < meshFilters.Length) {
    combine [a].mesh = meshFilters [a].mesh;
    combine [a].transform = meshFilters [a].transform.localToWorldMatrix;
    //meshFilters [i].gameObject.active = false;
    a++;
   }
   //GetComponent<CombineQueue>().AddToQueue(combine,GameObjects,father);
   //Debug.Log("Request from CombineMesh. Sent request to CombineQueue as multiple objects");
  }
  public void Combine (GameObject GameObj)
  {
   meshFilters = GameObj.GetComponentsInChildren<MeshFilter> ();
   cubes = GameObj.GetComponentsInChildren<Transform> ();
   cubes[0] = cubes[cubes.Length - 1];
   cubes[cubes.Length - 1] = null;
   combine = new CombineInstance[meshFilters.Length];
   int i = 0;
    
   while (i < meshFilters.Length) {
    combine [i].mesh = meshFilters [i].mesh;
    combine [i].transform = meshFilters [i].transform.localToWorldMatrix;
    //meshFilters [i].gameObject.active = false;
    i++;
   }
   GetComponent<CombineQueue>().AddToQueue(combine,cubes,GameObj);
   //Debug.Log("Request from CombineMesh. Sent request to CombineQueue as one object");
  }
}