#!/usr/bin/env python3

import os
import sys
from io import StringIO
from optparse import OptionParser

from scipy import ndimage
import numpy as np

import damask


scriptName = os.path.splitext(os.path.basename(__file__))[0]
scriptID   = ' '.join([scriptName,damask.version])


def taintedNeighborhood(stencil,trigger=[],size=1):

  me = stencil[stencil.shape[0]//2]
  if len(trigger) == 0:
    return np.any(stencil != me)
  if me in trigger:
    trigger = set(trigger)
    trigger.remove(me)
    trigger = list(trigger)
  return np.any(np.in1d(stencil,np.array(trigger)))


#--------------------------------------------------------------------------------------------------
#                                MAIN
#--------------------------------------------------------------------------------------------------

parser = OptionParser(option_class=damask.extendableOption, usage='%prog options [geomfile(s)]', description = """
Offset microstructure index for points which see a microstructure different from themselves
(or listed as triggers) within a given (cubic) vicinity, i.e. within the region close to a grain/phase boundary.

""", version = scriptID)

parser.add_option('-v', '--vicinity',
                  dest = 'vicinity',
                  type = 'int', metavar = 'int',
                  help = 'voxel distance checked for presence of other microstructure [%default]')
parser.add_option('-m', '--microstructureoffset',
                  dest='offset',
                  type = 'int', metavar = 'int',
                  help='offset (positive or negative) to tag microstructure indices, defaults to max microstructure index + 1')
parser.add_option('-t', '--trigger',
                  dest = 'trigger',
                  action = 'extend', metavar = '<int LIST>',
                  help = 'list of microstructure indices triggering a change')
parser.add_option('-n', '--nonperiodic',
                  dest = 'mode',
                  action = 'store_const', const = 'nearest',
                  help = 'assume geometry to be non-periodic')

parser.set_defaults(vicinity = 1,
                    trigger  = [],
                    mode     = 'wrap',
                   )

(options, filenames) = parser.parse_args()

options.trigger = np.array(options.trigger, dtype=int)


if filenames == []: filenames = [None]

for name in filenames:
  damask.util.report(scriptName,name)
  
  if name is None:
    virt_file = StringIO(''.join(sys.stdin.read()))
    geom = damask.Geom.from_file(virt_file)
  else:
    geom = damask.Geom.from_file(name)
  microstructure = geom.get_microstructure()

  offset = options.offset if options.offset is not None else np.nanmax(microstructure)

  microstructure = np.where(ndimage.filters.generic_filter(microstructure,
                                                           taintedNeighborhood,
                                                           size=1+2*options.vicinity,mode=options.mode,
                                                           extra_arguments=(),
                                                           extra_keywords={"trigger":options.trigger,"size":1+2*options.vicinity}),
                            microstructure + offset,microstructure)

  damask.util.croak(geom.update(microstructure))
  geom.add_comment(scriptID + ' ' + ' '.join(sys.argv[1:]))
  
  if name is None:
    sys.stdout.write(str(geom.show()))
  else:
    geom.to_file(name)