from __future__ import print_function
from builtins import range
from qgis.PyQt import QtCore
import numpy as np
from ..Utilities.SEBESOLWEIGCommonFiles.shadowingfunction_wallheight_13 import shadowingfunction_wallheight_13
from ..Utilities.SEBESOLWEIGCommonFiles.shadowingfunction_wallheight_23 import shadowingfunction_wallheight_23
import linecache
import sys


class Worker(QtCore.QObject):

    finished = QtCore.pyqtSignal(object)
    error = QtCore.pyqtSignal(object)
    progress = QtCore.pyqtSignal()

    def __init__(self, dsm, scale, building_slope, building_aspect, voxelheight, sizey, sizex, vegdsm, vegdsm2,
                 wheight, waspect, albedo, psi, radmatI, radmatD, radmatR, usevegdem, calc_month, dlg):
        QtCore.QObject.__init__(self)
        self.killed = False

        self.dsm = dsm
        self.scale = scale
        self.building_slope = building_slope
        self.building_aspect = building_aspect
        self.voxelheight = voxelheight
        self.sizey = sizey
        self.sizex = sizex
        self.vegdsm = vegdsm
        self.vegdsm2 = vegdsm2
        self.wheight = wheight
        self.waspect = waspect
        self.albedo = albedo
        self.psi = psi
        self.radmatI = radmatI
        self.radmatD = radmatD
        self.radmatR = radmatR
        self.usevegdem = usevegdem
        self.calc_month = calc_month
        self.dlg = dlg

    def run(self):
        ret = None
        try:
            # Energyyearroof, Energyyearwall, vegdata = SEBE_2015a_calc.SEBE_2015a_calc(self.dsm, self.scale, self.building_slope,
            #         self.building_aspect, self.voxelheight, self.sizey, self.sizex, self.vegdsm, self.vegdsm2, self.wheight,
            #         self.waspect, self.albedo, self.psi, self.radmatI, self.radmatD, self.radmatR, self.usevegdem, self.calc_month)

            #def SEBE_2015a_calc(a, scale, slope, aspect, voxelheight, sizey, sizex, vegdem, vegdem2, walls, dirwalls, albedo, psi, radmatI, radmatD, radmatR, usevegdem, calc_month):

            a = self.dsm
            scale = self.scale
            slope = self.building_slope
            aspect = self.building_aspect
            voxelheight = self.voxelheight
            sizey = self.sizey
            sizex = self.sizex
            vegdem = self.vegdsm
            vegdem2 = self.vegdsm2
            walls = self.wheight
            dirwalls = self.waspect
            albedo = self.albedo
            psi = self.psi
            radmatI = self.radmatI
            radmatD = self.radmatD
            radmatR = self.radmatR
            usevegdem = self.usevegdem
            calc_month = self.calc_month
            #energymonth = output['energymonth']

            # Parameters
            deg2rad = np.pi/180
            Knight = np.zeros((sizex, sizey))
            Energyyearroof = np.copy(Knight)

            # TODO: Month calculation is not prepared
            # if calc_month:
            #     # Energymonthroof = np.zeros(sizey, sizex, 12)
            #     Energymonthroof = np.array([])
            # else:
            #     Energymonthroof = np.array([])

            if usevegdem == 1:
                # amaxvalue
                vegmax = vegdem.max()
                amaxvalue = a.max() - a.min()
                amaxvalue = np.maximum(amaxvalue, vegmax)

                # Elevation vegdsms if buildingDEM includes ground heights
                vegdem = vegdem+a
                vegdem[vegdem == a] = 0
                vegdem2 = vegdem2+a
                vegdem2[vegdem2 == a] = 0

                #% Bush separation
                bush = np.logical_not((vegdem2*vegdem))*vegdem
            else:
                psi = 1

            # Creating wallmatrix (1 meter interval)
            wallcol, wallrow = np.where(np.transpose(walls) > 0)    # row and col for each wall pixel
            # wallrow, wallcol = np.where(walls > 0.2)    #row and col for each wall pixel
            wallstot = np.floor(walls * (1 / voxelheight)) * voxelheight
            wallsections = np.floor(np.max(walls) * (1 / voxelheight))     # finding tallest wall
            wallmatrix = np.zeros((np.shape(wallrow)[0], int(wallsections)))
            Energyyearwall = np.copy(wallmatrix)
            # Energymonthwall = np.zeros(np.shape(wallmatrix[0]), np.shape(wallmatrix[1]), 12)

            # Main loop - Creating skyvault of patches of constant radians (Tregeneza and Sharples, 1993)
            skyvaultaltint = np.array([6, 18, 30, 42, 54, 66, 78, 90])
            aziinterval = np.array([30, 30, 24, 24, 18, 12, 6, 1])

            if usevegdem == 1:
                wallshve = np.zeros(np.shape(a))
                vegrow, vegcol = np.where(vegdem > 0)  # row and col for each veg pixel
                vegdata = np.zeros((np.shape(vegrow)[0], 3))
                for i in range(0, vegrow.shape[0] - 1):
                    vegdata[i, 0] = vegrow[i] + 1
                    vegdata[i, 1] = vegcol[i] + 1
                    vegdata[i, 2] = vegdem[vegrow[i], vegcol[i]]
            else:
                vegdata = 0

            index = 0
            for i in range(skyvaultaltint.size):
                for j in range(aziinterval[i]):

                    if self.killed is True:
                        break

                    #################### SOLAR RADIATION POSITIONS ###################
                    #Solar Incidence angle (Roofs)
                    suniroof = np.sin(slope) * np.cos(radmatI[index, 0] * deg2rad) * \
                               np.cos((radmatI[index, 1]*deg2rad)-aspect) + \
                               np.cos(slope) * np.sin((radmatI[index, 0] * deg2rad))

                    suniroof[suniroof < 0] = 0

                    # Solar Incidence angle (Walls)
                    suniwall = np.abs(np.sin(np.pi/2) * np.cos(radmatI[index, 0] * deg2rad) *
                                      np.cos((radmatI[index, 1] * deg2rad) - dirwalls*deg2rad) + np.cos(np.pi/2) *
                                      np.sin((radmatI[index, 0] * deg2rad)))

                    # Shadow image
                    if usevegdem == 1:
                        vegsh, sh, _, wallsh, wallsun, wallshve, _, facesun = shadowingfunction_wallheight_23(a,
                                            vegdem, vegdem2, radmatI[index, 1], radmatI[index, 0], scale, amaxvalue,
                                                                                        bush, walls, dirwalls * deg2rad)
                        shadow = np.copy(sh-(1.-vegsh)*(1.-psi))
                    else:
                        sh, wallsh, wallsun, facesh, facesun = shadowingfunction_wallheight_13(a, radmatI[index, 1],
                                                                    radmatI[index, 0], scale, walls, dirwalls * deg2rad)
                        shadow = np.copy(sh)

                    # roof irradiance calculation
                    # direct radiation
                    if radmatI[index, 2] > 0:
                        I = shadow * radmatI[index, 2] * suniroof
                    else:
                        I = np.copy(Knight)

                    # roof diffuse and reflected radiation
                    D = radmatD[index, 2] * shadow
                    R = radmatR[index, 2] * (shadow*-1 + 1)

                    Energyyearroof = np.copy(Energyyearroof+D+R+I)

                    # WALL IRRADIANCE
                    # direct radiation
                    if radmatI[index, 2] > 0:
                        Iw = radmatI[index, 2] * suniwall    # wall
                    else:
                        Iw = np.copy(Knight)

                    # wall diffuse and reflected radiation
                    Dw = radmatD[index, 2] * facesun
                    Rw = radmatR[index, 2] * facesun

                    # for each wall level (voxelheight interval)
                    wallsun = np.floor(wallsun*(1/voxelheight)) * voxelheight
                    wallsh = np.floor(wallsh*(1/voxelheight)) * voxelheight
                    if usevegdem == 1:
                        wallshve = np.floor(wallshve*(1/voxelheight)) * voxelheight

                    wallmatrix = wallmatrix * 0

                    for p in range(np.shape(wallmatrix)[0]):
                        if wallsun[wallrow[p], wallcol[p]] > 0:    # Sections in sun
                            if wallsun[int(wallrow[p]), int(wallcol[p])] == wallstot[int(wallrow[p]), int(wallcol[p])]:  # All sections in sun
                                wallmatrix[p, 0:int(wallstot[int(wallrow[p]), int(wallcol[p])] / voxelheight)] = Iw[wallrow[p], wallcol[p]] + Dw[wallrow[p], wallcol[p]] + Rw[wallrow[p], wallcol[p]]
                            else:
                                wallmatrix[p, int((wallstot[wallrow[p], wallcol[p]] - wallsun[wallrow[p], wallcol[p]]) / voxelheight) - 1:int(wallstot[wallrow[p], wallcol[p]] / voxelheight)] = Iw[wallrow[p], wallcol[p]] + Dw[wallrow[p], wallcol[p]] + Rw[wallrow[p], wallcol[p]]

                        if usevegdem == 1 and wallshve[wallrow[p], wallcol[p]] > 0:    # sections in vegetation shade
                            wallmatrix[p, 0:int((wallshve[int(wallrow[p]), int(wallcol[p])] + wallsh[int(wallrow[p]), int(wallcol[p])]) / voxelheight)] = (Iw[wallrow[p], wallcol[p]] + Dw[wallrow[p], wallcol[p]])*psi

                        if wallsh[wallrow[p], wallcol[p]] > 0:    # sections in building shade
                            wallmatrix[p, 0:int(wallsh[wallrow[p], wallcol[p]] / voxelheight)] = Rw[wallrow[p], wallcol[p]]

                    Energyyearwall = Energyyearwall + np.copy(wallmatrix)

                    # if calc_month:
                    #     for t in range(3, 15):
                    #         # ROFF IRRADIANCE
                    #         # direct radiation
                    #         if radmatI[index, t] > 0:
                    #             I = shadow*radmatI[index, t] * suniroof     # roof
                    #         else:
                    #             I = np.copy(Knight)
                    #
                    #         # roof diffuse and reflected radiation
                    #         D = radmatD[index, t] * shadow
                    #         R = radmatR[index, t] * (shadow*-1+1)
                    #         Energymonthroof[:, :, t-3] = Energymonthroof[:, :, t-3] + D + R + I
                    #
                    #         # WALL IRRADIANCE
                    #         # direct radiation
                    #         if radmatI[index, t] > 0:
                    #             Iw = radmatI[index, t] * suniwall    # wall
                    #         else:
                    #             Iw = np.copy(Knight)
                    #
                    #         # wall diffuse and reflected radiation
                    #         Dw = (radmatD[index, t] * facesun)
                    #         Rw = (radmatR[index, t] * facesun)
                    #
                    #         # for each wall level (1 meter interval)
                    #         wallsun = np.floor(wallsun)
                    #         wallsh = np.floor(wallsh)
                    #
                    #         wallshve = np.floor(wallshve)
                    #         wallmatrix = wallmatrix * 0
                    #
                    #         for p in range(np.shape(wallmatrix)[0]):
                    #             if wallsun[wallrow[p], wallcol[p]] > 0:    # Sections in sun
                    #                 if wallsun[wallrow[p], wallcol[p]] == wallstot[wallrow[p], wallcol[p]]:    # Sections in sun
                    #                     wallmatrix[p, 0:wallstot[wallrow[p], wallcol[p]]/voxelheight] = Iw[wallrow[p], wallcol[p]] + \
                    #                                                                                     Dw[wallrow[p], wallcol[p]] + \
                    #                                                                                     Rw[wallrow[p], wallcol[p]]
                    #                 else:
                    #                     wallmatrix[p, (wallstot[wallrow[p], wallcol[p]] -
                    #                                wallsun[wallrow[p], wallcol[p]] / voxelheight) - 1:
                    #                                wallstot[wallrow[p], wallcol[p]] / voxelheight] = Iw[wallrow[p], wallcol[p]] + \
                    #                                                                                  Dw[wallrow[p], wallcol[p]] + \
                    #                                                                                  Rw[wallrow[p], wallcol[p]]
                    #
                    #             if wallshve[wallrow[p], wallcol[p]] > 0:    # sections in vegetation shade
                    #                 wallmatrix[p, 0:wallshve[wallrow[p],
                    #                                          (wallcol[p] + wallsh[wallrow[p], wallcol[p]])]/voxelheight] = \
                    #                     (Iw[wallrow[p], wallcol[p]] + Dw[wallrow[p], wallcol[p]]) * psi
                    #
                    #             if wallsh[wallrow[p], wallcol[p]] > 0:    # sections in building shade
                    #                 wallmatrix[p, 0:wallsh[wallrow[p], wallcol[p]]/voxelheight] = Rw[wallrow[p], wallcol[p]]
                    #
                    #         Energymonthwall[:, :, t-3] = Energymonthwall[:, :, t-3] + np.copy(wallmatrix)
                    #
                    # if calc_month:
                    #     for p in range(len(Dmonth)):
                    #         Iradmonth = (shadow * radmat[index, 3+p] * suniroof)
                    #         DGradmonth = (shadow * Dmonth[p] + (shadow*-1+1) * Gmonth[p] * albedo) * svf
                    #         Energymonthroof[:, :, p] = Energymonthroof[:, :, p] + Iradmonth + DGradmonth

                    index = index + 1

                    self.progress.emit()  # move progressbar forward

            # Including radiation from ground on walls as well as removing pixels high than walls
            # fix_print_with_import
            print(np.copy(Energyyearwall).shape)
            wallmatrixbol = (Energyyearwall > 0).astype(float)
            Energyyearwall = (Energyyearwall + (np.sum(radmatR[:, 2]) * albedo)/2) * wallmatrixbol

            Energyyearroof /= 1000
            Energyyearwall /= 1000
            Energyyearwall = np.transpose(np.vstack((wallrow + 1, wallcol + 1, np.transpose(Energyyearwall))))    # adding 1 to wallrow and wallcol so that the tests pass

            # if calc_month:
            #     for t in range(3, 15):
            #         Energymonthwall[:, :, t-3] = (Energymonthwall[:, :, t-3] + (np.sum(radmatR[:, t])*albedo)/2) * wallmatrixbol
            # else:
            #     Energymonthwall = np.array([])
            #
            # if calc_month:
            #     return Energyyearroof, Energyyearwall, Energymonthroof, Energymonthwall
            # else:
            #     return Energyyearroof, Energyyearwall, vegdata

            # if self.killed is True:
            #     break

            seberesult = {'Energyyearroof': Energyyearroof, 'Energyyearwall': Energyyearwall, 'vegdata': vegdata}

            if self.killed is False:
                self.progress.emit()
                ret = seberesult
        except Exception:
            errorstring = self.print_exception()
            self.error.emit(errorstring)

        self.finished.emit(ret)

    def print_exception(self):
        exc_type, exc_obj, tb = sys.exc_info()
        f = tb.tb_frame
        lineno = tb.tb_lineno
        filename = f.f_code.co_filename
        linecache.checkcache(filename)
        line = linecache.getline(filename, lineno, f.f_globals)
        return 'EXCEPTION IN {}, \nLINE {} "{}" \nERROR MESSAGE: {}'.format(filename, lineno, line.strip(), exc_obj)

    def kill(self):
        self.killed = True


