wneuper/isa: Admin/mira.py@ebbd70082e65

     1 """

     2     Test configuration descriptions for mira.

     3 """

     5 import os

     6 from os import path

     7 from glob import glob

     8 import subprocess

     9 from datetime import datetime

    10 import re

    12 import util

    13 from util import Lazy

    15 from mira.report import Report, Report_Content

    16 from mira.case import Case

    17 from mira.tools import tool

    18 from mira import schedule, misc

    19 from mira.environment import scheduler

    20 from mira import repositories

    22 # build and evaluation tools

    24 default_usedir_options = "$ISABELLE_USEDIR_OPTIONS -d pdf -g true -i true -t true"

    26 def prepare_isabelle_repository(loc_isabelle, loc_contrib, loc_dependency_heaps,

    27   usedir_options=default_usedir_options, more_settings=''):

    29     # prepare components

    30     loc_contrib = path.expanduser(loc_contrib)

    31     if not path.exists(loc_contrib):

    32         raise IOError('Bad file: %s' % loc_contrib)

    33     subprocess.check_call(['ln', '-s', loc_contrib, '%s/contrib' % loc_isabelle])

    35     # provide existing dependencies

    36     if loc_dependency_heaps:

    37         isabelle_path = loc_dependency_heaps + '/$ISABELLE_IDENTIFIER:$ISABELLE_OUTPUT'

    38     else:

    39         isabelle_path = '$ISABELLE_OUTPUT'

    41     # patch settings

    42     extra_settings = '''

    43 ISABELLE_HOME_USER="$ISABELLE_HOME/home_user"

    44 ISABELLE_OUTPUT="$ISABELLE_HOME/heaps"

    45 ISABELLE_BROWSER_INFO="$ISABELLE_HOME/browser_info"

    46 ISABELLE_PATH="%s"

    48 ISABELLE_USEDIR_OPTIONS="%s"

    50 Z3_NON_COMMERCIAL="yes"

    52 source "${ISABELLE_HOME}/Admin/init_components"

    54 %s

    55 ''' % (isabelle_path, usedir_options, more_settings)

    57     writer = open(path.join(loc_isabelle, 'etc', 'settings'), 'a')

    58     writer.write(extra_settings)

    59     writer.close()

    62 def isabelle_getenv(isabelle_home, var):

    64     _, out = env.run_process('%s/bin/isabelle' % isabelle_home, 'getenv', var)

    65     return out.split('=', 1)[1].strip()

    68 def extract_isabelle_run_timing(logdata):

    70     def to_secs(h, m, s):

    71         return (int(h) * 60 + int(m)) * 60 + int(s)

    72     pat = r'Finished (\S+) \((\d+):(\d+):(\d+) elapsed time, (\d+):(\d+):(\d+) cpu time'

    73     pat2 = r'Timing (\S+) \((\d+) threads, (\d+\.\d+)s elapsed time, (\d+\.\d+)s cpu time, (\d+\.\d+)s GC time, factor (\d+\.\d+)\)'

    74     t = dict((name, {'elapsed': to_secs(eh,em,es), 'cpu': to_secs(ch,cm,cs)})

    75              for name, eh, em, es, ch, cm, cs in re.findall(pat, logdata))

    76     for name, threads, elapsed, cpu, gc, factor in re.findall(pat2, logdata):

    78         if name not in t:

    79             t[name] = {}

    81         t[name]['threads'] = int(threads)

    82         t[name]['elapsed_inner'] = elapsed

    83         t[name]['cpu_inner'] = cpu

    84         t[name]['gc'] = gc

    85         t[name]['factor'] = factor

    87     return t

    90 def extract_isabelle_run_summary(logdata):

    92     re_error = re.compile(r'^(?:make: )?\*\*\* (.*)$', re.MULTILINE)

    93     summary = '\n'.join(re_error.findall(logdata))

    94     if summary == '':

    95         summary = 'ok'

    97     return summary

   100 def extract_image_size(isabelle_home):

   102     isabelle_output = isabelle_getenv(isabelle_home, 'ISABELLE_OUTPUT')

   103     return dict((p, path.getsize(path.join(isabelle_output, p))) for p in os.listdir(isabelle_output) if p != "log")

   105 def extract_report_data(isabelle_home, logdata):

   107     return {

   108         'timing': extract_isabelle_run_timing(logdata),

   109         'image_size': extract_image_size(isabelle_home) }

   112 @tool

   113 def import_isatest_log(env, conf, logfile):

   115     """Imports isatest log file as a report."""

   117     def the_match(pat, text, name):

   118         match = re.search(pat, text)

   119         if not match: raise Exception('No match found for ' + name)

   120         return match.groups()

   122     def parse_date(d):

   123         return datetime.strptime(d, '%a %b %d %H:%M:%S %Z %Y')

   125     log = util.readfile(logfile)

   127     (begin_date, host) = the_match(r'-+ starting test -+ ([^-]*) -+ (\S*)', log, 'start tag')

   128     (isabelle_version,) = the_match(r'Isabelle version: ([a-f0-9]{12})', log, 'Isabelle version')

   129     (success, end_date) = the_match(r'-+ test (successful|FAILED) -+ ([^-]*) -', log, 'end tag')

   130     summary = extract_isabelle_run_summary(log)

   131     data = {'timing': extract_isabelle_run_timing(log)}

   132     atts = {'log': Lazy.simple(log)}

   134     content = Report_Content(summary, host, parse_date(begin_date),

   135       parse_date(end_date), Lazy.simple(data), atts)

   136     revision = ('Isabelle', env.repositories.get('Isabelle')[isabelle_version].hex())

   137     case = Case(conf, [revision])

   139     env.report_db.put(case, (success == 'successful'), content)

   142 def isabelle_build(env, case, paths, dep_paths, playground, *cmdargs, **kwargs):

   144     more_settings=kwargs.get('more_settings', '')

   146     isabelle_home = paths[0]

   148     # copy over build results from dependencies

   149     heap_dir = path.join(isabelle_home, 'heaps')

   150     classes_dir = path.join(heap_dir, 'classes')

   151     os.makedirs(classes_dir)

   153     for dep_path in dep_paths:

   154         subprocess.check_call(['cp', '-a'] + glob(dep_path + '/*') + [heap_dir])

   156     subprocess.check_call(['ln', '-s', classes_dir, path.join(isabelle_home, 'lib', 'classes')])

   157     jars = glob(path.join(classes_dir, 'ext', '*.jar'))

   158     if jars:

   159         subprocess.check_call(['touch'] + jars)

   161     # misc preparations

   162     if 'lxbroy10' in misc.hostnames():  # special settings for lxbroy10

   163         more_settings += '''

   164 ML_PLATFORM="x86_64-linux"

   165 ML_HOME="/home/polyml/polyml-5.4.1/x86_64-linux"

   166 ML_SYSTEM="polyml-5.4.1"

   167 ML_OPTIONS="-H 4000 --gcthreads 4"

   169 ISABELLE_GHC="/usr/bin/ghc"

   170 '''

   172     prepare_isabelle_repository(isabelle_home, env.settings.contrib, None,

   173       usedir_options="", more_settings=more_settings)

   174     os.chdir(isabelle_home)

   176     # invoke build tool

   177     (return_code, log) = env.run_process('%s/bin/isabelle' % isabelle_home, 'build', '-s', '-v', *cmdargs)

   179     # collect report

   180     return (return_code == 0, extract_isabelle_run_summary(log),

   181       extract_report_data(isabelle_home, log), {'log': log}, heap_dir)

   185 # Isabelle configurations

   187 @configuration(repos = [Isabelle], deps = [])

   188 def Pure(*args):

   189     """Pure Image"""

   190     return isabelle_build(*(args + ("-b", "Pure")))

   192 @configuration(repos = [Isabelle], deps = [(Pure, [0])])

   193 def HOL(*args):

   194     """HOL Image"""

   195     return isabelle_build(*(args + ("-b", "HOL")))

   197 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   198 def HOL_Library(*args):

   199     """HOL Library"""

   200     return isabelle_build(*(args + ("-b", "HOL-Library")))

   202 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   203 def HOLCF(*args):

   204     """HOLCF"""

   205     return isabelle_build(*(args + ("-b", "HOLCF")))

   207 @configuration(repos = [Isabelle], deps = [(Pure, [0])])

   208 def ZF(*args):

   209     """HOLCF"""

   210     return isabelle_build(*(args + ("-b", "ZF")))

   213 settings64='''

   214 ML_PLATFORM=x86_64-linux

   215 ML_HOME="/home/polyml/polyml-5.4.1/x86_64-linux"

   216 ML_SYSTEM="polyml-5.4.1"

   217 '''

   219 @configuration(repos = [Isabelle], deps = [])

   220 def AFP_images(*args):

   221     """Isabelle images needed for the AFP (64 bit)"""

   222     return isabelle_build(*(args + ("-b", "-j", "2", "Pure", "HOL", "HOLCF", "HOL-Word")), more_settings=settings64)

   224 @configuration(repos = [Isabelle], deps = [])

   225 def Isabelle_makeall(*args):

   226     """Build all sessions"""

   227     return isabelle_build(*(args + ("-j", "6", "-o", "threads=4", "-a")), more_settings=settings64)

   230 # Mutabelle configurations

   232 def invoke_mutabelle(theory, env, case, paths, dep_paths, playground):

   234     """Mutant testing for counterexample generators in Isabelle"""

   236     (loc_isabelle,) = paths

   237     (dep_isabelle,) = dep_paths

   238     more_settings = '''

   239 ISABELLE_GHC="/usr/bin/ghc"

   240 '''

   241     prepare_isabelle_repository(loc_isabelle, env.settings.contrib, dep_isabelle,

   242       more_settings = more_settings)

   243     os.chdir(loc_isabelle)

   245     (return_code, log) = env.run_process('bin/isabelle',

   246       'mutabelle', '-O', playground, theory)

   248     try:

   249         mutabelle_log = util.readfile(path.join(playground, 'log'))

   250     except IOError:

   251         mutabelle_log = ''

   253     mutabelle_data = dict(

   254         (tool, {'counterexample': c, 'no_counterexample': n, 'timeout': t, 'error': e})

   255         for tool, c, n, t, e in re.findall(r'(\S+)\s+: C: (\d+) N: (\d+) T: (\d+) E: (\d+)', log))

   257     return (return_code == 0 and mutabelle_log != '', extract_isabelle_run_summary(log),

   258       {'mutabelle_results': {theory: mutabelle_data}},

   259       {'log': log, 'mutabelle_log': mutabelle_log}, None)

   261 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   262 def Mutabelle_Relation(*args):

   263     """Mutabelle regression suite on Relation theory"""

   264     return invoke_mutabelle('Relation', *args)

   266 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   267 def Mutabelle_List(*args):

   268     """Mutabelle regression suite on List theory"""

   269     return invoke_mutabelle('List', *args)

   271 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   272 def Mutabelle_Set(*args):

   273     """Mutabelle regression suite on Set theory"""

   274     return invoke_mutabelle('Set', *args)

   276 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   277 def Mutabelle_Map(*args):

   278     """Mutabelle regression suite on Map theory"""

   279     return invoke_mutabelle('Map', *args)

   281 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   282 def Mutabelle_Divides(*args):

   283     """Mutabelle regression suite on Divides theory"""

   284     return invoke_mutabelle('Divides', *args)

   286 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   287 def Mutabelle_MacLaurin(*args):

   288     """Mutabelle regression suite on MacLaurin theory"""

   289     return invoke_mutabelle('MacLaurin', *args)

   291 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   292 def Mutabelle_Fun(*args):

   293     """Mutabelle regression suite on Fun theory"""

   294     return invoke_mutabelle('Fun', *args)

   296 mutabelle_confs = 'Mutabelle_Relation Mutabelle_List Mutabelle_Set Mutabelle_Map Mutabelle_Divides Mutabelle_MacLaurin Mutabelle_Fun'.split(' ')

   298 @scheduler()

   299 def mutabelle_scheduler(env):

   300     """Scheduler for Mutabelle."""

   301     return schedule.age_scheduler(env, 'Isabelle', mutabelle_confs)

   304 # Judgement Day configurations

   306 judgement_day_provers = ('e', 'spass', 'vampire', 'z3', 'cvc3', 'yices')

   308 def judgement_day(base_path, theory, opts, env, case, paths, dep_paths, playground):

   309     """Judgement Day regression suite"""

   311     isa = paths[0]

   312     dep_path = dep_paths[0]

   314     os.chdir(path.join(playground, '..', base_path)) # Mirabelle requires specific cwd

   315     prepare_isabelle_repository(isa, env.settings.contrib, dep_path)

   317     output = {}

   318     success_rates = {}

   319     some_success = False

   321     for atp in judgement_day_provers:

   323         log_dir = path.join(playground, 'mirabelle_log_' + atp)

   324         os.makedirs(log_dir)

   326         cmd = ('%s/bin/isabelle mirabelle -q -O %s sledgehammer[prover=%s,%s] %s.thy'

   327                % (isa, log_dir, atp, opts, theory))

   329         os.system(cmd)

   330         output[atp] = util.readfile(path.join(log_dir, theory + '.log'))

   332         percentages = list(re.findall(r'Success rate: (\d+)%', output[atp]))

   333         if len(percentages) == 2:

   334             success_rates[atp] = {

   335                 'sledgehammer': int(percentages[0]),

   336                 'metis': int(percentages[1])}

   337             if success_rates[atp]['sledgehammer'] > 0:

   338                 some_success = True

   339         else:

   340             success_rates[atp] = {}

   343     data = {'success_rates': success_rates}

   344     raw_attachments = dict((atp + "_output", output[atp]) for atp in judgement_day_provers)

   345     # FIXME: summary?

   346     return (some_success, '', data, raw_attachments, None)

   349 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   350 def JD_NS(*args):

   351     """Judgement Day regression suite NS"""

   352     return judgement_day('Isabelle/src/HOL/Auth', 'NS_Shared', 'prover_timeout=10', *args)

   354 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   355 def JD_FTA(*args):

   356     """Judgement Day regression suite FTA"""

   357     return judgement_day('Isabelle/src/HOL/Library', 'Fundamental_Theorem_Algebra', 'prover_timeout=10', *args)

   359 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   360 def JD_Hoare(*args):

   361     """Judgement Day regression suite Hoare"""

   362     return judgement_day('Isabelle/src/HOL/IMPP', 'Hoare', 'prover_timeout=10', *args)

   364 @configuration(repos = [Isabelle], deps = [(HOL, [0])])

   365 def JD_SN(*args):

   366     """Judgement Day regression suite SN"""

   367     return judgement_day('Isabelle/src/HOL/Proofs/Lambda', 'StrongNorm', 'prover_timeout=10', *args)

   370 JD_confs = 'JD_NS JD_FTA JD_Hoare JD_SN JD_Arrow JD_FFT JD_Jinja JD_QE JD_S2S'.split(' ')

   372 @scheduler()

   373 def judgement_day_scheduler(env):

   374     """Scheduler for Judgement Day."""

   375     return schedule.age_scheduler(env, 'Isabelle', JD_confs)

   378 # SML/NJ

   380 smlnj_settings = '''

   381 ML_SYSTEM=smlnj

   382 ML_HOME="/home/smlnj/110.74/bin"

   383 ML_OPTIONS="@SMLdebug=/dev/null @SMLalloc=1024"

   384 ML_PLATFORM=$(eval $("$ML_HOME/.arch-n-opsys" 2>/dev/null); echo "$HEAP_SUFFIX")

   385 '''

   387 @configuration(repos = [Isabelle], deps = [(Pure, [0])])

   388 def SML_HOL(*args):

   389     """HOL image built with SML/NJ"""

   390     return isabelle_build(*(args + ("-b", "HOL")), more_settings=smlnj_settings)

   392 @configuration(repos = [Isabelle], deps = [])

   393 def SML_makeall(*args):

   394     """SML/NJ build of all possible sessions"""

   395     return isabelle_build(*(args + ("-j", "3", "-a")), more_settings=smlnj_settings)

   398 # Legacy Isabelle configurations

   400 # distribution and documentation Build

   402 @configuration(repos = [Isabelle], deps = [])

   403 def Distribution(env, case, paths, dep_paths, playground):

   404     """Build of distribution"""

   405     ## FIXME This is rudimentary; study Admin/CHECKLIST to complete this configuration accordingly

   406     isabelle_home = paths[0]

   407     (return_code, log) = env.run_process(path.join(isabelle_home, 'Admin', 'Release', 'makedist'),

   408       REPOS = repositories.get(Isabelle).local_path, DISTPREFIX = os.getcwd())

   409     return (return_code == 0, '', ## FIXME might add summary here

   410       {}, {'log': log}, None) ## FIXME might add proper result here

   413 def isabelle_dependency_only(env, case, paths, dep_paths, playground):

   415     isabelle_home = paths[0]

   416     result = path.join(isabelle_home, 'heaps')

   417     os.makedirs(result)

   418     for dep_path in dep_paths:

   419         subprocess.check_call(['cp', '-R'] + glob(dep_path + '/*') + [result])

   421     return (True, 'ok', {}, {}, result)

   424 @configuration(repos = [Isabelle], deps = [

   425     (HOL, [0]),

   426     (HOLCF, [0]),

   427     (ZF, [0]),

   428     (HOL_Library, [0])

   429   ])

   430 def Documentation_images(*args):

   431     """Isabelle images needed to build the documentation"""

   432     return isabelle_dependency_only(*args)

   434 @configuration(repos = [Isabelle], deps = [(Documentation_images, [0])])

   435 def Documentation(env, case, paths, dep_paths, playground):

   436     """Build of documentation"""

   437     isabelle_home = paths[0]

   438     dep_path = dep_paths[0]

   439     prepare_isabelle_repository(isabelle_home, env.settings.contrib, dep_path,

   440       usedir_options = default_usedir_options)

   441     (return_code, log) = env.run_process(path.join(isabelle_home, 'Admin', 'build', 'doc-src'))

   442     return (return_code == 0, extract_isabelle_run_summary(log),

   443       extract_report_data(isabelle_home, log), {'log': log}, None)

author	krauss
	Sun, 05 Aug 2012 23:37:26 +0200
changeset 49704	ebbd70082e65
parent 49703	fe611991427a
child 49706	335d60e1e328
permissions	-rw-r--r--