#!/usr/bin/env python2.7
# -*- coding: UTF-8 no BOM -*-

import sys,os,re
from optparse import OptionParser
import damask

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

# -----------------------------
def ParseOutputFormat(filename,what,me):
  format = {'outputs':{},'specials':{'brothers':[]}}

  outputmetafile = filename+'.output'+what
  try:
    myFile = open(outputmetafile)
  except:
    print('Could not open file %s'%outputmetafile)
    raise
  else: 
    content = myFile.readlines()
    myFile.close()

  tag = ''
  tagID = 0
  for line in content:
    if re.match("\s*$",line) or re.match("#",line):     # skip blank lines and comments
      continue
    m = re.match("\[(.+)\]",line)             # look for block indicator
    if m:                         # next section
      tag = m.group(1)
      tagID += 1
      format['specials']['brothers'].append(tag)
      if tag == me or (me.isdigit() and tagID == int(me)):
        format['specials']['_id'] = tagID
        format['outputs'] = []
        tag = me
    else:                         # data from section
      if tag == me:
        (output,length) = line.split()
        output.lower()
        if length.isdigit():
          length = int(length)
        if re.match("\((.+)\)",output):         # special data, (e.g. (Ngrains)
          format['specials'][output] = length
        elif length > 0:
          format['outputs'].append([output,length])
  return format

parser = OptionParser(option_class=damask.extendableOption, usage='%prog [option(s)] Marc.Inputfile(s)', description = """
Transfer the output variables requested in the material.config to
properly labelled user-defined variables within the Marc input file (*.dat).

Requires the files 
<modelname_jobname>.output<Homogenization/Crystallite/Constitutive>
that are written during the first run of the model.

Specify which user block format you want to apply by stating the homogenization, crystallite, and phase identifiers.
Or have an existing set of user variables copied over from another *.dat file.

""", version = scriptID)

parser.add_option('-m', dest='number', type='int', metavar = 'int',
                  help='maximum requested User Defined Variable [%default]')
parser.add_option('--homogenization', dest='homog', metavar = 'string',
                  help='homogenization name or index [%default]')
parser.add_option('--crystallite', dest='cryst', metavar = 'string',
                  help='crystallite identifier name or index [%default]')
parser.add_option('--phase', dest='phase', metavar = 'string',
                  help='phase identifier name or index [%default]')
parser.add_option('--use', dest='useFile', metavar = 'string',
                  help='optionally parse output descriptors from '+
                       'outputXXX files of given name')
parser.add_option('--option', dest='damaskOption', metavar = 'string',
                  help='Add DAMASK option to input file, e.g. "periodic x z"')
 
parser.set_defaults(number = 0,
                    homog = '1',
                    cryst = '1',
                    phase = '1')

(options, files) = parser.parse_args()

if not files:
  parser.error('no file(s) specified.')

me = {  'Homogenization':   options.homog,
        'Crystallite':      options.cryst,
        'Constitutive':     options.phase,
     }


for myFile in files:
  damask.util.report(scriptName,myFile)
  if options.useFile is not None:
    formatFile = os.path.splitext(options.useFile)[0]
  else:
    formatFile = os.path.splitext(myFile)[0]
  myFile = os.path.splitext(myFile)[0]+'.dat'
  if not os.path.lexists(myFile):
    print('{} not found'.format(myFile))
    continue
    
  print('Scanning format files of: {}'.format(formatFile))

  if options.number < 1:
    outputFormat = {}

    for what in me:
      outputFormat[what] = ParseOutputFormat(formatFile,what,me[what])
      if '_id' not in outputFormat[what]['specials']:
        print("'{}' not found in <{}>".format(me[what],what))
        print('\n'.join(map(lambda x:'  '+x,outputFormat[what]['specials']['brothers'])))
        sys.exit(1)

    UserVars = ['HomogenizationCount']
    for var in outputFormat['Homogenization']['outputs']:
      if var[1] > 1:
        UserVars += ['%i_%s'%(i+1,var[0]) for i in range(var[1])]
      else:
        UserVars += ['%s'%(var[0]) for i in range(var[1])]

    UserVars += ['GrainCount']

    for grain in range(outputFormat['Homogenization']['specials']['(ngrains)']):
      UserVars += ['%i_CrystalliteCount'%(grain+1)]
      for var in outputFormat['Crystallite']['outputs']:
        if var[1] > 1:
          UserVars += ['%i_%i_%s'%(grain+1,i+1,var[0]) for i in range(var[1])]
        else:
          UserVars += ['%i_%s'%(grain+1,var[0]) for i in range(var[1])]

      UserVars += ['%i_ConstitutiveCount'%(grain+1)]
      for var in outputFormat['Constitutive']['outputs']:
        if var[1] > 1:
          UserVars += ['%i_%i_%s'%(grain+1,i+1,var[0]) for i in range(var[1])]
        else:
          UserVars += ['%i_%s'%(grain+1,var[0]) for i in range(var[1])]

# Now change *.dat file(s)        
  print('Adding labels to:         {}'.format(myFile))
  inFile = open(myFile)
  input = inFile.readlines()
  inFile.close()
  output = open(myFile,'w')
  thisSection = ''
  if options.damaskOption is not None:
    output.write('$damask {0}\n'.format(options.damaskOption))
  for line in input:
    m = re.match('(\w+)\s',line)
    if m:
      lastSection = thisSection
      thisSection = m.group(1)
      if (lastSection == 'post' and thisSection == 'parameters'):
        if options.number > 0:
          for i in range(options.number): 
             output.write('%10i%10i\n'%(-i-1,0))
        else:
          for i in range(len(UserVars)): 
             output.write('%10i%10i%s\n'%(-i-1,0,UserVars[i]))
    if (thisSection != 'post' or not re.match('\s*\-',line)):
      output.write(line)
  output.close()
