import torch.utils.data as data

import torch

from os import listdir

from os.path import join

import numpy as np

import nibabel as nib

import glob

import neural_renderer as nr

class TrainDataset(data.Dataset):

    def __init__(self, data_path):

        super(TrainDataset, self).__init__()

        self.data_path = data_path

        self.filename = [f for f in sorted(listdir(self.data_path))]

    def __getitem__(self, index):

        input_sa, input_2ch, input_4ch, contour_sa, contour_2ch, contour_4ch, \

        vertex_ed, faces, affine_inv, affine, origin = load_data(self.data_path, self.filename[index], T_num=50)

        img_sa_t = input_sa[0]

        img_sa_ed = input_sa[1]

        img_2ch_t = input_2ch[0]

        img_2ch_ed = input_2ch[1]

        img_4ch_t = input_4ch[0]

        img_4ch_ed = input_4ch[1]

        return img_sa_t, img_sa_ed, img_2ch_t, img_2ch_ed, img_4ch_t, img_4ch_ed,\

               contour_sa, contour_2ch, contour_4ch, \

               vertex_ed, faces, affine_inv, affine, origin

    def __len__(self):

        return len(self.filename)

class ValDataset(data.Dataset):

    def __init__(self, data_path):

        super(ValDataset, self).__init__()

        self.data_path = data_path

        self.filename = [f for f in sorted(listdir(self.data_path))]

    def __getitem__(self, index):

        input_sa, input_2ch, input_4ch, contour_sa, contour_2ch, contour_4ch, \

        vertex_ed, faces, affine_inv, affine, origin = load_data(self.data_path, self.filename[index], T_num=50,  rand_frame=20)

        img_sa_t = input_sa[0]

        img_sa_ed = input_sa[1]

        img_2ch_t = input_2ch[0]

        img_2ch_ed = input_2ch[1]

        img_4ch_t = input_4ch[0]

        img_4ch_ed = input_4ch[1]

        return img_sa_t, img_sa_ed, img_2ch_t, img_2ch_ed, img_4ch_t, img_4ch_ed,\

               contour_sa, contour_2ch, contour_4ch, \

               vertex_ed, faces, affine_inv, affine, origin

    def __len__(self):

        return len(self.filename)

class TestDataset(data.Dataset):

    def __init__(self, data_path):

        super(TestDataset, self).__init__()

        self.data_path = data_path

        self.filename = [f for f in sorted(listdir(self.data_path))]

        # print (self.filename)

    def __getitem__(self, index):

        input_sa, input_2ch, input_4ch, contour_sa_es, contour_2ch_es, contour_4ch_es, \

        vertex_es, faces, affine_inv, affine, origin = load_data_ES(self.data_path, self.filename[index])

        img_sa_es = input_sa[0]

        img_sa_ed = input_sa[1]

        img_2ch_es = input_2ch[0]

        img_2ch_ed = input_2ch[1]

        img_4ch_es = input_4ch[0]

        img_4ch_ed = input_4ch[1]

        return img_sa_es, img_sa_ed, img_2ch_es, img_2ch_ed, img_4ch_es, img_4ch_ed, \

               contour_sa_es, contour_2ch_es, contour_4ch_es, vertex_es, faces, affine_inv, affine, origin

    def __len__(self):

        return len(self.filename)

def get_data(path, fr):

    nim = nib.load(path)

    image = nim.get_data()[:, :, :, :]  # (h, w, slices, frame)

    image = np.array(image, dtype='float32')

    image_fr = image[..., fr]

    image_fr = image_fr[np.newaxis]

    image_ed = image[..., 0]

    image_ed = image_ed[np.newaxis]

    image_bank = np.concatenate((image_fr, image_ed), axis=0)

    image_bank = np.transpose(image_bank, (0, 3, 1, 2))

    return image_bank

def get_data_ES(path, path_ES):

    nim = nib.load(path)

    image = nim.get_data()[:, :, :, :]  # (h, w, slices, frame)

    image = np.array(image, dtype='float32')

    nim_ES = nib.load(path_ES)

    image_ES = nim_ES.get_data()[:, :, :, :]  # (h, w, slices, frame=0)

    image_ES = np.array(image_ES, dtype='float32')

    image_z_ed = image[..., 0]

    image_z_ed = image_z_ed[np.newaxis]

    image_z_es = image_ES[..., 0]

    image_z_es = image_z_es[np.newaxis]

    image_bank = np.concatenate((image_z_es, image_z_ed), axis=0)

    image_bank = np.transpose(image_bank, (0, 3, 1, 2))

    return image_bank

def load_data(data_path, filename, T_num, rand_frame=None):

    # Load images and labels

    img_sa_path = join(data_path, filename, 'sa_img.nii.gz')  # (H, W, 1, frames)

    img_2ch_path = join(data_path, filename, '2ch_img.nii.gz')

    img_4ch_path = join(data_path, filename, '4ch_img.nii.gz')

    contour_sa_path = join(data_path, filename, 'contour_sa.npy') # (H, W, 9, frames)

    contour_2ch_path = join(data_path, filename, 'contour_2ch.npy') # (H, W, 1, frames)

    contour_4ch_path = join(data_path, filename, 'contour_4ch.npy')# (H, W, 1, frames)

    vertices_path = join(data_path, filename, 'pred_vertices_ED_new.npy')

    faces_path = join(data_path, filename, 'faces_init_myo_ED.npy')

    affine_path = join(data_path, filename, 'affine.npz')

    origin_path = join(data_path, filename, 'origin.npz')

    # generate random index for t and z dimension

    if rand_frame is not None:

        rand_t = rand_frame

    else:

        rand_t = np.random.randint(0, T_num)

    image_sa_bank = get_data(img_sa_path, rand_t)

    image_2ch_bank = get_data(img_2ch_path, rand_t)

    image_4ch_bank = get_data(img_4ch_path, rand_t)

    contour_sa = np.transpose(np.load(contour_sa_path)[:,:,:,rand_t], (2,0,1)) # [H,W,slices,frame]

    contour_2ch = np.load(contour_2ch_path)[:,:, 0, rand_t] # [H,W,1, frame]

    contour_4ch = np.load(contour_4ch_path)[:,:, 0, rand_t] # [H,W,1, frame]

    # load mesh

    vertex_ed = np.load(vertices_path)

    faces = np.load(faces_path)

    # load affine

    aff_sa_inv = np.load(affine_path)['sainv']

    aff_2ch_inv = np.load(affine_path)['la2chinv']

    aff_4ch_inv = np.load(affine_path)['la4chinv']

    affine_inv = np.stack((aff_sa_inv, aff_2ch_inv, aff_4ch_inv), 0)

    aff_sa = np.load(affine_path)['sa']

    aff_2ch = np.load(affine_path)['la2ch']

    aff_4ch = np.load(affine_path)['la4ch']

    affine = np.stack((aff_sa, aff_2ch, aff_4ch), 0)

    # load origin

    origin_sa = np.load(origin_path)['sa']

    origin_2ch = np.load(origin_path)['la2ch']

    origin_4ch = np.load(origin_path)['la4ch']

    origin = np.stack((origin_sa, origin_2ch, origin_4ch), 0)

    return image_sa_bank, image_2ch_bank, image_4ch_bank, contour_sa, contour_2ch, contour_4ch, \

           vertex_ed, faces, affine_inv, affine, origin

def load_data_ES(data_path, filename):

    # Load images and labels

    img_sa_path = join(data_path, filename, 'sa_img.nii.gz')

    img_2ch_path = join(data_path, filename, '2ch_img.nii.gz')

    img_4ch_path = join(data_path, filename, '4ch_img.nii.gz')

    img_sa_ES_path = join(data_path, filename, 'sa_ES_img.nii.gz')

    img_2ch_ES_path = join(data_path, filename, '2ch_ES_img.nii.gz')

    img_4ch_ES_path = join(data_path, filename, '4ch_ES_img.nii.gz')

    contour_sa_path = join(data_path, filename, 'contour_sa_es.npy')

    contour_2ch_path = join(data_path, filename, 'contour_2ch_es.npy')

    contour_4ch_path = join(data_path, filename, 'contour_4ch_es.npy')

    vertices_path = join(data_path, filename, 'pred_vertices_ED_new.npy')

    faces_path = join(data_path, filename, 'faces_init_myo_ED.npy')

    affine_path = join(data_path, filename, 'affine.npz')

    origin_path = join(data_path, filename, 'origin.npz')

    # load obj

    vertex_ed = np.load(vertices_path)

    faces = np.load(faces_path)

    # load affine

    aff_sa_inv = np.load(affine_path)['sainv']

    aff_2ch_inv = np.load(affine_path)['la2chinv']

    aff_4ch_inv = np.load(affine_path)['la4chinv']

    affine_inv = np.stack((aff_sa_inv, aff_2ch_inv, aff_4ch_inv), 0)

    aff_sa = np.load(affine_path)['sa']

    aff_2ch = np.load(affine_path)['la2ch']

    aff_4ch = np.load(affine_path)['la4ch']

    affine = np.stack((aff_sa, aff_2ch, aff_4ch), 0)

    # load origin

    origin_sa = np.load(origin_path)['sa']

    origin_2ch = np.load(origin_path)['la2ch']

    origin_4ch = np.load(origin_path)['la4ch']

    origin = np.stack((origin_sa, origin_2ch, origin_4ch), 0)

    image_sa_ES_bank = get_data_ES(img_sa_path, img_sa_ES_path)

    image_2ch_ES_bank = get_data_ES(img_2ch_path, img_2ch_ES_path)

    image_4ch_ES_bank = get_data_ES(img_4ch_path, img_4ch_ES_path)

    contour_sa_es = np.transpose(np.load(contour_sa_path)[:, :, :, 0], (2, 0, 1))  # [H,W,slices,frame]

    contour_2ch_es = np.load(contour_2ch_path)[:, :, 0, 0]  # [H,W,frame]

    contour_4ch_es = np.load(contour_4ch_path)[:, :, 0, 0]  # [H,W,frame]

    return image_sa_ES_bank, image_2ch_ES_bank, image_4ch_ES_bank, \

           contour_sa_es, contour_2ch_es, contour_4ch_es, vertex_ed, faces, affine_inv, affine, origin