10
0
mirror of https://gitlab.com/scemama/irpf90.git synced 2024-12-08 05:23:31 +01:00
irpf90/src/command_line.py

152 lines
4.6 KiB
Python
Raw Normal View History

2009-09-02 20:45:53 +02:00
#!/usr/bin/python
2009-09-23 12:51:27 +02:00
# IRPF90 is a Fortran90 preprocessor written in Python for programming using
# the Implicit Reference to Parameters (IRP) method.
# Copyright (C) 2009 Anthony SCEMAMA
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#
# Anthony Scemama
# LCPQ - IRSAMC - CNRS
# Universite Paul Sabatier
# 118, route de Narbonne
# 31062 Toulouse Cedex 4
# scemama@irsamc.ups-tlse.fr
2009-09-23 12:51:27 +02:00
2009-09-02 20:45:53 +02:00
import getopt, sys
from version import version
description = "IRPF90 Fortran preprocessor."
options = {}
options['d'] = [ 'debug' , 'Activate debug', 0 ]
options['v'] = [ 'version' , 'Print version of irpf90', 0 ]
options['a'] = [ 'assert' , 'Activate assertions', 0 ]
options['h'] = [ 'help' , 'Print this help', 0 ]
options['i'] = [ 'init' , 'Initialize current directory', 0 ]
2009-09-03 23:12:32 +02:00
options['D'] = [ 'define' , 'Define variable', 1 ]
options['o'] = [ 'checkopt' , 'Show where optimization may be required', 0 ]
2009-09-16 15:59:13 +02:00
options['p'] = [ 'preprocess' , 'Preprocess file', 1 ]
2010-08-31 11:53:34 +02:00
options['t'] = [ 'touch' , 'Display which entities are touched', 1 ]
2009-11-02 16:16:13 +01:00
options['m'] = [ 'memory' , 'Debug memory info', 0 ]
2010-08-31 11:53:34 +02:00
options['z'] = [ 'openmp' , 'Automatic openMP tasks (may not work)', 0 ]
2009-09-02 20:45:53 +02:00
class CommandLine(object):
def __init__(self):
2009-09-03 23:12:32 +02:00
global options
2009-09-03 00:46:11 +02:00
self._opts = None
2009-09-03 23:12:32 +02:00
self.argv = list(sys.argv)
self.executable_name = self.argv[0]
2009-09-02 20:45:53 +02:00
2009-09-03 23:12:32 +02:00
def defined(self):
2009-09-04 15:11:42 +02:00
if '_defined' not in self.__dict__:
2009-09-03 23:12:32 +02:00
self._defined = []
for o,a in self.opts:
if o in [ "-D", options['D'][0] ]:
self._defined.append(a)
return self._defined
defined = property(fget=defined)
2009-09-02 20:45:53 +02:00
2009-09-16 15:59:13 +02:00
def preprocessed(self):
if '_preprocessed' not in self.__dict__:
self._preprocessed = []
for o,a in self.opts:
if o in [ "-p", options['p'][0] ]:
self._preprocessed.append(a)
return self._preprocessed
preprocessed = property(fget=preprocessed)
2010-08-31 11:53:34 +02:00
def touched(self):
if '_touched' not in self.__dict__:
self._touched = []
for o,a in self.opts:
if o in [ "-t", options['t'][0] ]:
self._touched.append(a.lower())
2010-08-31 11:53:34 +02:00
return self._touched
touched = property(fget=touched)
2009-09-02 20:45:53 +02:00
def usage(self):
t = """
$EXE - $DESCR
Usage:
$EXE [OPTION]
Options:
"""
t = t.replace("$EXE",self.executable_name)
t = t.replace("$DESCR",description)
print t
sorted = options.keys()
sorted.sort()
for o in sorted:
print " -%s , --%15s : %s"%(o,options[o][0].ljust(15),options[o][1])
if options[o][2] == 1:
print " Requires an argument"
print ""
print "Version : ", version
print ""
def opts(self):
2009-09-03 00:46:11 +02:00
if self._opts is None:
optlist = ["",[]]
for o in options.keys():
b = [o]+options[o]
if b[3] == 1:
b[0] = b[0]+":"
b[1] = b[1]+"="
optlist[0] += b[0]
optlist[1] += [b[1]]
try:
2009-09-03 23:12:32 +02:00
self._opts, args = getopt.getopt(self.argv[1:], optlist[0], optlist[1])
2009-09-03 00:46:11 +02:00
except getopt.GetoptError, err:
# print help information and exit:
self.usage()
print str(err) # will print something like "option -a not recognized"
sys.exit(2)
return self._opts
opts = property(fget=opts)
2009-09-02 20:45:53 +02:00
t = """
def do_$LONG(self):
2009-09-04 15:11:42 +02:00
if '_do_$LONG' not in self.__dict__:
2009-09-03 00:46:11 +02:00
self._do_$LONG = False
for o,a in self.opts:
if o in ("-$SHORT", "--$LONG"):
self._do_$LONG = True
break
return self._do_$LONG
do_$LONG = property(fget=do_$LONG)
2009-09-02 20:45:53 +02:00
"""
for short in options.keys():
long = options[short][0]
exec t.replace("$LONG",long).replace("$SHORT",short)
def do_run(self):
2009-09-04 15:11:42 +02:00
if '_do_run' not in self.__dict__:
self._do_run = not ( \
self.do_version or \
self.do_help or \
self.do_preprocess or \
self.do_touch or \
self.do_init )
2009-09-03 00:46:11 +02:00
return self._do_run
do_run = property(fget=do_run)
2009-09-02 20:45:53 +02:00
command_line = CommandLine()