| #!/usr/bin/env python |
| |
| from pprint import pprint |
| import random, atexit, time |
| from random import randrange |
| import re |
| |
| from Enumeration import * |
| from TypeGen import * |
| |
| #### |
| |
| class TypePrinter: |
| def __init__(self, output, outputHeader=None, |
| outputTests=None, outputDriver=None, |
| headerName=None, info=None): |
| self.output = output |
| self.outputHeader = outputHeader |
| self.outputTests = outputTests |
| self.outputDriver = outputDriver |
| self.writeBody = outputHeader or outputTests or outputDriver |
| self.types = {} |
| self.testValues = {} |
| self.testReturnValues = {} |
| self.layoutTests = [] |
| self.declarations = set() |
| |
| if info: |
| for f in (self.output,self.outputHeader,self.outputTests,self.outputDriver): |
| if f: |
| print >>f,info |
| |
| if self.writeBody: |
| print >>self.output, '#include <stdio.h>\n' |
| if self.outputTests: |
| print >>self.outputTests, '#include <stdio.h>' |
| print >>self.outputTests, '#include <string.h>' |
| print >>self.outputTests, '#include <assert.h>\n' |
| |
| if headerName: |
| for f in (self.output,self.outputTests,self.outputDriver): |
| if f is not None: |
| print >>f, '#include "%s"\n'%(headerName,) |
| |
| if self.outputDriver: |
| print >>self.outputDriver, '#include <stdio.h>' |
| print >>self.outputDriver, '#include <stdlib.h>\n' |
| print >>self.outputDriver, 'int main(int argc, char **argv) {' |
| print >>self.outputDriver, ' int index = -1;' |
| print >>self.outputDriver, ' if (argc > 1) index = atoi(argv[1]);' |
| |
| def finish(self): |
| if self.layoutTests: |
| print >>self.output, 'int main(int argc, char **argv) {' |
| print >>self.output, ' int index = -1;' |
| print >>self.output, ' if (argc > 1) index = atoi(argv[1]);' |
| for i,f in self.layoutTests: |
| print >>self.output, ' if (index == -1 || index == %d)' % i |
| print >>self.output, ' %s();' % f |
| print >>self.output, ' return 0;' |
| print >>self.output, '}' |
| |
| if self.outputDriver: |
| print >>self.outputDriver, ' printf("DONE\\n");' |
| print >>self.outputDriver, ' return 0;' |
| print >>self.outputDriver, '}' |
| |
| def addDeclaration(self, decl): |
| if decl in self.declarations: |
| return False |
| |
| self.declarations.add(decl) |
| if self.outputHeader: |
| print >>self.outputHeader, decl |
| else: |
| print >>self.output, decl |
| if self.outputTests: |
| print >>self.outputTests, decl |
| return True |
| |
| def getTypeName(self, T): |
| name = self.types.get(T) |
| if name is None: |
| # Reserve slot |
| self.types[T] = None |
| self.types[T] = name = T.getTypeName(self) |
| return name |
| |
| def writeLayoutTest(self, i, ty): |
| tyName = self.getTypeName(ty) |
| tyNameClean = tyName.replace(' ','_').replace('*','star') |
| fnName = 'test_%s' % tyNameClean |
| |
| print >>self.output,'void %s(void) {' % fnName |
| self.printSizeOfType(' %s'%fnName, tyName, ty, self.output) |
| self.printAlignOfType(' %s'%fnName, tyName, ty, self.output) |
| self.printOffsetsOfType(' %s'%fnName, tyName, ty, self.output) |
| print >>self.output,'}' |
| print >>self.output |
| |
| self.layoutTests.append((i,fnName)) |
| |
| def writeFunction(self, i, FT): |
| args = ', '.join(['%s arg%d'%(self.getTypeName(t),i) for i,t in enumerate(FT.argTypes)]) |
| if not args: |
| args = 'void' |
| |
| if FT.returnType is None: |
| retvalName = None |
| retvalTypeName = 'void' |
| else: |
| retvalTypeName = self.getTypeName(FT.returnType) |
| if self.writeBody or self.outputTests: |
| retvalName = self.getTestReturnValue(FT.returnType) |
| |
| fnName = 'fn%d'%(FT.index,) |
| if self.outputHeader: |
| print >>self.outputHeader,'%s %s(%s);'%(retvalTypeName, fnName, args) |
| elif self.outputTests: |
| print >>self.outputTests,'%s %s(%s);'%(retvalTypeName, fnName, args) |
| |
| print >>self.output,'%s %s(%s)'%(retvalTypeName, fnName, args), |
| if self.writeBody: |
| print >>self.output, '{' |
| |
| for i,t in enumerate(FT.argTypes): |
| self.printValueOfType(' %s'%fnName, 'arg%d'%i, t) |
| |
| if retvalName is not None: |
| print >>self.output, ' return %s;'%(retvalName,) |
| print >>self.output, '}' |
| else: |
| print >>self.output, '{}' |
| print >>self.output |
| |
| if self.outputDriver: |
| print >>self.outputDriver, ' if (index == -1 || index == %d) {' % i |
| print >>self.outputDriver, ' extern void test_%s(void);' % fnName |
| print >>self.outputDriver, ' test_%s();' % fnName |
| print >>self.outputDriver, ' }' |
| |
| if self.outputTests: |
| if self.outputHeader: |
| print >>self.outputHeader, 'void test_%s(void);'%(fnName,) |
| |
| if retvalName is None: |
| retvalTests = None |
| else: |
| retvalTests = self.getTestValuesArray(FT.returnType) |
| tests = map(self.getTestValuesArray, FT.argTypes) |
| print >>self.outputTests, 'void test_%s(void) {'%(fnName,) |
| |
| if retvalTests is not None: |
| print >>self.outputTests, ' printf("%s: testing return.\\n");'%(fnName,) |
| print >>self.outputTests, ' for (int i=0; i<%d; ++i) {'%(retvalTests[1],) |
| args = ', '.join(['%s[%d]'%(t,randrange(l)) for t,l in tests]) |
| print >>self.outputTests, ' %s RV;'%(retvalTypeName,) |
| print >>self.outputTests, ' %s = %s[i];'%(retvalName, retvalTests[0]) |
| print >>self.outputTests, ' RV = %s(%s);'%(fnName, args) |
| self.printValueOfType(' %s_RV'%fnName, 'RV', FT.returnType, output=self.outputTests, indent=4) |
| self.checkTypeValues('RV', '%s[i]' % retvalTests[0], FT.returnType, output=self.outputTests, indent=4) |
| print >>self.outputTests, ' }' |
| |
| if tests: |
| print >>self.outputTests, ' printf("%s: testing arguments.\\n");'%(fnName,) |
| for i,(array,length) in enumerate(tests): |
| for j in range(length): |
| args = ['%s[%d]'%(t,randrange(l)) for t,l in tests] |
| args[i] = '%s[%d]'%(array,j) |
| print >>self.outputTests, ' %s(%s);'%(fnName, ', '.join(args),) |
| print >>self.outputTests, '}' |
| |
| def getTestReturnValue(self, type): |
| typeName = self.getTypeName(type) |
| info = self.testReturnValues.get(typeName) |
| if info is None: |
| name = '%s_retval'%(typeName.replace(' ','_').replace('*','star'),) |
| print >>self.output, '%s %s;'%(typeName,name) |
| if self.outputHeader: |
| print >>self.outputHeader, 'extern %s %s;'%(typeName,name) |
| elif self.outputTests: |
| print >>self.outputTests, 'extern %s %s;'%(typeName,name) |
| info = self.testReturnValues[typeName] = name |
| return info |
| |
| def getTestValuesArray(self, type): |
| typeName = self.getTypeName(type) |
| info = self.testValues.get(typeName) |
| if info is None: |
| name = '%s_values'%(typeName.replace(' ','_').replace('*','star'),) |
| print >>self.outputTests, 'static %s %s[] = {'%(typeName,name) |
| length = 0 |
| for item in self.getTestValues(type): |
| print >>self.outputTests, '\t%s,'%(item,) |
| length += 1 |
| print >>self.outputTests,'};' |
| info = self.testValues[typeName] = (name,length) |
| return info |
| |
| def getTestValues(self, t): |
| if isinstance(t, BuiltinType): |
| if t.name=='float': |
| for i in ['0.0','-1.0','1.0']: |
| yield i+'f' |
| elif t.name=='double': |
| for i in ['0.0','-1.0','1.0']: |
| yield i |
| elif t.name in ('void *'): |
| yield '(void*) 0' |
| yield '(void*) -1' |
| else: |
| yield '(%s) 0'%(t.name,) |
| yield '(%s) -1'%(t.name,) |
| yield '(%s) 1'%(t.name,) |
| elif isinstance(t, EnumType): |
| for i in range(0, len(t.enumerators)): |
| yield 'enum%dval%d_%d' % (t.index, i, t.unique_id) |
| elif isinstance(t, RecordType): |
| nonPadding = [f for f in t.fields |
| if not f.isPaddingBitField()] |
| |
| if not nonPadding: |
| yield '{ }' |
| return |
| |
| # FIXME: Use designated initializers to access non-first |
| # fields of unions. |
| if t.isUnion: |
| for v in self.getTestValues(nonPadding[0]): |
| yield '{ %s }' % v |
| return |
| |
| fieldValues = map(list, map(self.getTestValues, nonPadding)) |
| for i,values in enumerate(fieldValues): |
| for v in values: |
| elements = map(random.choice,fieldValues) |
| elements[i] = v |
| yield '{ %s }'%(', '.join(elements)) |
| |
| elif isinstance(t, ComplexType): |
| for t in self.getTestValues(t.elementType): |
| yield '%s + %s * 1i'%(t,t) |
| elif isinstance(t, ArrayType): |
| values = list(self.getTestValues(t.elementType)) |
| if not values: |
| yield '{ }' |
| for i in range(t.numElements): |
| for v in values: |
| elements = [random.choice(values) for i in range(t.numElements)] |
| elements[i] = v |
| yield '{ %s }'%(', '.join(elements)) |
| else: |
| raise NotImplementedError,'Cannot make tests values of type: "%s"'%(t,) |
| |
| def printSizeOfType(self, prefix, name, t, output=None, indent=2): |
| print >>output, '%*sprintf("%s: sizeof(%s) = %%ld\\n", (long)sizeof(%s));'%(indent, '', prefix, name, name) |
| def printAlignOfType(self, prefix, name, t, output=None, indent=2): |
| print >>output, '%*sprintf("%s: __alignof__(%s) = %%ld\\n", (long)__alignof__(%s));'%(indent, '', prefix, name, name) |
| def printOffsetsOfType(self, prefix, name, t, output=None, indent=2): |
| if isinstance(t, RecordType): |
| for i,f in enumerate(t.fields): |
| if f.isBitField(): |
| continue |
| fname = 'field%d' % i |
| print >>output, '%*sprintf("%s: __builtin_offsetof(%s, %s) = %%ld\\n", (long)__builtin_offsetof(%s, %s));'%(indent, '', prefix, name, fname, name, fname) |
| |
| def printValueOfType(self, prefix, name, t, output=None, indent=2): |
| if output is None: |
| output = self.output |
| if isinstance(t, BuiltinType): |
| value_expr = name |
| if t.name.split(' ')[-1] == '_Bool': |
| # Hack to work around PR5579. |
| value_expr = "%s ? 2 : 0" % name |
| |
| if t.name.endswith('long long'): |
| code = 'lld' |
| elif t.name.endswith('long'): |
| code = 'ld' |
| elif t.name.split(' ')[-1] in ('_Bool','char','short', |
| 'int','unsigned'): |
| code = 'd' |
| elif t.name in ('float','double'): |
| code = 'f' |
| elif t.name == 'long double': |
| code = 'Lf' |
| else: |
| code = 'p' |
| print >>output, '%*sprintf("%s: %s = %%%s\\n", %s);'%( |
| indent, '', prefix, name, code, value_expr) |
| elif isinstance(t, EnumType): |
| print >>output, '%*sprintf("%s: %s = %%d\\n", %s);'%(indent, '', prefix, name, name) |
| elif isinstance(t, RecordType): |
| if not t.fields: |
| print >>output, '%*sprintf("%s: %s (empty)\\n");'%(indent, '', prefix, name) |
| for i,f in enumerate(t.fields): |
| if f.isPaddingBitField(): |
| continue |
| fname = '%s.field%d'%(name,i) |
| self.printValueOfType(prefix, fname, f, output=output, indent=indent) |
| elif isinstance(t, ComplexType): |
| self.printValueOfType(prefix, '(__real %s)'%name, t.elementType, output=output,indent=indent) |
| self.printValueOfType(prefix, '(__imag %s)'%name, t.elementType, output=output,indent=indent) |
| elif isinstance(t, ArrayType): |
| for i in range(t.numElements): |
| # Access in this fashion as a hackish way to portably |
| # access vectors. |
| if t.isVector: |
| self.printValueOfType(prefix, '((%s*) &%s)[%d]'%(t.elementType,name,i), t.elementType, output=output,indent=indent) |
| else: |
| self.printValueOfType(prefix, '%s[%d]'%(name,i), t.elementType, output=output,indent=indent) |
| else: |
| raise NotImplementedError,'Cannot print value of type: "%s"'%(t,) |
| |
| def checkTypeValues(self, nameLHS, nameRHS, t, output=None, indent=2): |
| prefix = 'foo' |
| if output is None: |
| output = self.output |
| if isinstance(t, BuiltinType): |
| print >>output, '%*sassert(%s == %s);' % (indent, '', nameLHS, nameRHS) |
| elif isinstance(t, EnumType): |
| print >>output, '%*sassert(%s == %s);' % (indent, '', nameLHS, nameRHS) |
| elif isinstance(t, RecordType): |
| for i,f in enumerate(t.fields): |
| if f.isPaddingBitField(): |
| continue |
| self.checkTypeValues('%s.field%d'%(nameLHS,i), '%s.field%d'%(nameRHS,i), |
| f, output=output, indent=indent) |
| if t.isUnion: |
| break |
| elif isinstance(t, ComplexType): |
| self.checkTypeValues('(__real %s)'%nameLHS, '(__real %s)'%nameRHS, t.elementType, output=output,indent=indent) |
| self.checkTypeValues('(__imag %s)'%nameLHS, '(__imag %s)'%nameRHS, t.elementType, output=output,indent=indent) |
| elif isinstance(t, ArrayType): |
| for i in range(t.numElements): |
| # Access in this fashion as a hackish way to portably |
| # access vectors. |
| if t.isVector: |
| self.checkTypeValues('((%s*) &%s)[%d]'%(t.elementType,nameLHS,i), |
| '((%s*) &%s)[%d]'%(t.elementType,nameRHS,i), |
| t.elementType, output=output,indent=indent) |
| else: |
| self.checkTypeValues('%s[%d]'%(nameLHS,i), '%s[%d]'%(nameRHS,i), |
| t.elementType, output=output,indent=indent) |
| else: |
| raise NotImplementedError,'Cannot print value of type: "%s"'%(t,) |
| |
| import sys |
| |
| def main(): |
| from optparse import OptionParser, OptionGroup |
| parser = OptionParser("%prog [options] {indices}") |
| parser.add_option("", "--mode", dest="mode", |
| help="autogeneration mode (random or linear) [default %default]", |
| type='choice', choices=('random','linear'), default='linear') |
| parser.add_option("", "--count", dest="count", |
| help="autogenerate COUNT functions according to MODE", |
| type=int, default=0) |
| parser.add_option("", "--min", dest="minIndex", metavar="N", |
| help="start autogeneration with the Nth function type [default %default]", |
| type=int, default=0) |
| parser.add_option("", "--max", dest="maxIndex", metavar="N", |
| help="maximum index for random autogeneration [default %default]", |
| type=int, default=10000000) |
| parser.add_option("", "--seed", dest="seed", |
| help="random number generator seed [default %default]", |
| type=int, default=1) |
| parser.add_option("", "--use-random-seed", dest="useRandomSeed", |
| help="use random value for initial random number generator seed", |
| action='store_true', default=False) |
| parser.add_option("", "--skip", dest="skipTests", |
| help="add a test index to skip", |
| type=int, action='append', default=[]) |
| parser.add_option("-o", "--output", dest="output", metavar="FILE", |
| help="write output to FILE [default %default]", |
| type=str, default='-') |
| parser.add_option("-O", "--output-header", dest="outputHeader", metavar="FILE", |
| help="write header file for output to FILE [default %default]", |
| type=str, default=None) |
| parser.add_option("-T", "--output-tests", dest="outputTests", metavar="FILE", |
| help="write function tests to FILE [default %default]", |
| type=str, default=None) |
| parser.add_option("-D", "--output-driver", dest="outputDriver", metavar="FILE", |
| help="write test driver to FILE [default %default]", |
| type=str, default=None) |
| parser.add_option("", "--test-layout", dest="testLayout", metavar="FILE", |
| help="test structure layout", |
| action='store_true', default=False) |
| |
| group = OptionGroup(parser, "Type Enumeration Options") |
| # Builtins - Ints |
| group.add_option("", "--no-char", dest="useChar", |
| help="do not generate char types", |
| action="store_false", default=True) |
| group.add_option("", "--no-short", dest="useShort", |
| help="do not generate short types", |
| action="store_false", default=True) |
| group.add_option("", "--no-int", dest="useInt", |
| help="do not generate int types", |
| action="store_false", default=True) |
| group.add_option("", "--no-long", dest="useLong", |
| help="do not generate long types", |
| action="store_false", default=True) |
| group.add_option("", "--no-long-long", dest="useLongLong", |
| help="do not generate long long types", |
| action="store_false", default=True) |
| group.add_option("", "--no-unsigned", dest="useUnsigned", |
| help="do not generate unsigned integer types", |
| action="store_false", default=True) |
| |
| # Other builtins |
| group.add_option("", "--no-bool", dest="useBool", |
| help="do not generate bool types", |
| action="store_false", default=True) |
| group.add_option("", "--no-float", dest="useFloat", |
| help="do not generate float types", |
| action="store_false", default=True) |
| group.add_option("", "--no-double", dest="useDouble", |
| help="do not generate double types", |
| action="store_false", default=True) |
| group.add_option("", "--no-long-double", dest="useLongDouble", |
| help="do not generate long double types", |
| action="store_false", default=True) |
| group.add_option("", "--no-void-pointer", dest="useVoidPointer", |
| help="do not generate void* types", |
| action="store_false", default=True) |
| |
| # Enumerations |
| group.add_option("", "--no-enums", dest="useEnum", |
| help="do not generate enum types", |
| action="store_false", default=True) |
| |
| # Derived types |
| group.add_option("", "--no-array", dest="useArray", |
| help="do not generate record types", |
| action="store_false", default=True) |
| group.add_option("", "--no-complex", dest="useComplex", |
| help="do not generate complex types", |
| action="store_false", default=True) |
| group.add_option("", "--no-record", dest="useRecord", |
| help="do not generate record types", |
| action="store_false", default=True) |
| group.add_option("", "--no-union", dest="recordUseUnion", |
| help="do not generate union types", |
| action="store_false", default=True) |
| group.add_option("", "--no-vector", dest="useVector", |
| help="do not generate vector types", |
| action="store_false", default=True) |
| group.add_option("", "--no-bit-field", dest="useBitField", |
| help="do not generate bit-field record members", |
| action="store_false", default=True) |
| group.add_option("", "--no-builtins", dest="useBuiltins", |
| help="do not use any types", |
| action="store_false", default=True) |
| |
| # Tuning |
| group.add_option("", "--no-function-return", dest="functionUseReturn", |
| help="do not generate return types for functions", |
| action="store_false", default=True) |
| group.add_option("", "--vector-types", dest="vectorTypes", |
| help="comma separated list of vector types (e.g., v2i32) [default %default]", |
| action="store", type=str, default='v2i16, v1i64, v2i32, v4i16, v8i8, v2f32, v2i64, v4i32, v8i16, v16i8, v2f64, v4f32, v16f32', metavar="N") |
| group.add_option("", "--bit-fields", dest="bitFields", |
| help="comma separated list 'type:width' bit-field specifiers [default %default]", |
| action="store", type=str, default=( |
| "char:0,char:4,int:0,unsigned:1,int:1,int:4,int:13,int:24")) |
| group.add_option("", "--max-args", dest="functionMaxArgs", |
| help="maximum number of arguments per function [default %default]", |
| action="store", type=int, default=4, metavar="N") |
| group.add_option("", "--max-array", dest="arrayMaxSize", |
| help="maximum array size [default %default]", |
| action="store", type=int, default=4, metavar="N") |
| group.add_option("", "--max-record", dest="recordMaxSize", |
| help="maximum number of fields per record [default %default]", |
| action="store", type=int, default=4, metavar="N") |
| group.add_option("", "--max-record-depth", dest="recordMaxDepth", |
| help="maximum nested structure depth [default %default]", |
| action="store", type=int, default=None, metavar="N") |
| parser.add_option_group(group) |
| (opts, args) = parser.parse_args() |
| |
| if not opts.useRandomSeed: |
| random.seed(opts.seed) |
| |
| # Construct type generator |
| builtins = [] |
| if opts.useBuiltins: |
| ints = [] |
| if opts.useChar: ints.append(('char',1)) |
| if opts.useShort: ints.append(('short',2)) |
| if opts.useInt: ints.append(('int',4)) |
| # FIXME: Wrong size. |
| if opts.useLong: ints.append(('long',4)) |
| if opts.useLongLong: ints.append(('long long',8)) |
| if opts.useUnsigned: |
| ints = ([('unsigned %s'%i,s) for i,s in ints] + |
| [('signed %s'%i,s) for i,s in ints]) |
| builtins.extend(ints) |
| |
| if opts.useBool: builtins.append(('_Bool',1)) |
| if opts.useFloat: builtins.append(('float',4)) |
| if opts.useDouble: builtins.append(('double',8)) |
| if opts.useLongDouble: builtins.append(('long double',16)) |
| # FIXME: Wrong size. |
| if opts.useVoidPointer: builtins.append(('void*',4)) |
| |
| btg = FixedTypeGenerator([BuiltinType(n,s) for n,s in builtins]) |
| |
| bitfields = [] |
| for specifier in opts.bitFields.split(','): |
| if not specifier.strip(): |
| continue |
| name,width = specifier.strip().split(':', 1) |
| bitfields.append(BuiltinType(name,None,int(width))) |
| bftg = FixedTypeGenerator(bitfields) |
| |
| charType = BuiltinType('char',1) |
| shortType = BuiltinType('short',2) |
| intType = BuiltinType('int',4) |
| longlongType = BuiltinType('long long',8) |
| floatType = BuiltinType('float',4) |
| doubleType = BuiltinType('double',8) |
| sbtg = FixedTypeGenerator([charType, intType, floatType, doubleType]) |
| |
| atg = AnyTypeGenerator() |
| artg = AnyTypeGenerator() |
| def makeGenerator(atg, subgen, subfieldgen, useRecord, useArray, useBitField): |
| atg.addGenerator(btg) |
| if useBitField and opts.useBitField: |
| atg.addGenerator(bftg) |
| if useRecord and opts.useRecord: |
| assert subgen |
| atg.addGenerator(RecordTypeGenerator(subfieldgen, opts.recordUseUnion, |
| opts.recordMaxSize)) |
| if opts.useComplex: |
| # FIXME: Allow overriding builtins here |
| atg.addGenerator(ComplexTypeGenerator(sbtg)) |
| if useArray and opts.useArray: |
| assert subgen |
| atg.addGenerator(ArrayTypeGenerator(subgen, opts.arrayMaxSize)) |
| if opts.useVector: |
| vTypes = [] |
| for i,t in enumerate(opts.vectorTypes.split(',')): |
| m = re.match('v([1-9][0-9]*)([if][1-9][0-9]*)', t.strip()) |
| if not m: |
| parser.error('Invalid vector type: %r' % t) |
| count,kind = m.groups() |
| count = int(count) |
| type = { 'i8' : charType, |
| 'i16' : shortType, |
| 'i32' : intType, |
| 'i64' : longlongType, |
| 'f32' : floatType, |
| 'f64' : doubleType, |
| }.get(kind) |
| if not type: |
| parser.error('Invalid vector type: %r' % t) |
| vTypes.append(ArrayType(i, True, type, count * type.size)) |
| |
| atg.addGenerator(FixedTypeGenerator(vTypes)) |
| if opts.useEnum: |
| atg.addGenerator(EnumTypeGenerator([None, '-1', '1', '1u'], 1, 4)) |
| |
| if opts.recordMaxDepth is None: |
| # Fully recursive, just avoid top-level arrays. |
| subFTG = AnyTypeGenerator() |
| subTG = AnyTypeGenerator() |
| atg = AnyTypeGenerator() |
| makeGenerator(subFTG, atg, atg, True, True, True) |
| makeGenerator(subTG, atg, subFTG, True, True, False) |
| makeGenerator(atg, subTG, subFTG, True, False, False) |
| else: |
| # Make a chain of type generators, each builds smaller |
| # structures. |
| base = AnyTypeGenerator() |
| fbase = AnyTypeGenerator() |
| makeGenerator(base, None, None, False, False, False) |
| makeGenerator(fbase, None, None, False, False, True) |
| for i in range(opts.recordMaxDepth): |
| n = AnyTypeGenerator() |
| fn = AnyTypeGenerator() |
| makeGenerator(n, base, fbase, True, True, False) |
| makeGenerator(fn, base, fbase, True, True, True) |
| base = n |
| fbase = fn |
| atg = AnyTypeGenerator() |
| makeGenerator(atg, base, fbase, True, False, False) |
| |
| if opts.testLayout: |
| ftg = atg |
| else: |
| ftg = FunctionTypeGenerator(atg, opts.functionUseReturn, opts.functionMaxArgs) |
| |
| # Override max,min,count if finite |
| if opts.maxIndex is None: |
| if ftg.cardinality is aleph0: |
| opts.maxIndex = 10000000 |
| else: |
| opts.maxIndex = ftg.cardinality |
| opts.maxIndex = min(opts.maxIndex, ftg.cardinality) |
| opts.minIndex = max(0,min(opts.maxIndex-1, opts.minIndex)) |
| if not opts.mode=='random': |
| opts.count = min(opts.count, opts.maxIndex-opts.minIndex) |
| |
| if opts.output=='-': |
| output = sys.stdout |
| else: |
| output = open(opts.output,'w') |
| atexit.register(lambda: output.close()) |
| |
| outputHeader = None |
| if opts.outputHeader: |
| outputHeader = open(opts.outputHeader,'w') |
| atexit.register(lambda: outputHeader.close()) |
| |
| outputTests = None |
| if opts.outputTests: |
| outputTests = open(opts.outputTests,'w') |
| atexit.register(lambda: outputTests.close()) |
| |
| outputDriver = None |
| if opts.outputDriver: |
| outputDriver = open(opts.outputDriver,'w') |
| atexit.register(lambda: outputDriver.close()) |
| |
| info = '' |
| info += '// %s\n'%(' '.join(sys.argv),) |
| info += '// Generated: %s\n'%(time.strftime('%Y-%m-%d %H:%M'),) |
| info += '// Cardinality of function generator: %s\n'%(ftg.cardinality,) |
| info += '// Cardinality of type generator: %s\n'%(atg.cardinality,) |
| |
| if opts.testLayout: |
| info += '\n#include <stdio.h>' |
| |
| P = TypePrinter(output, |
| outputHeader=outputHeader, |
| outputTests=outputTests, |
| outputDriver=outputDriver, |
| headerName=opts.outputHeader, |
| info=info) |
| |
| def write(N): |
| try: |
| FT = ftg.get(N) |
| except RuntimeError,e: |
| if e.args[0]=='maximum recursion depth exceeded': |
| print >>sys.stderr,'WARNING: Skipped %d, recursion limit exceeded (bad arguments?)'%(N,) |
| return |
| raise |
| if opts.testLayout: |
| P.writeLayoutTest(N, FT) |
| else: |
| P.writeFunction(N, FT) |
| |
| if args: |
| [write(int(a)) for a in args] |
| |
| skipTests = set(opts.skipTests) |
| for i in range(opts.count): |
| if opts.mode=='linear': |
| index = opts.minIndex + i |
| else: |
| index = opts.minIndex + int((opts.maxIndex-opts.minIndex) * random.random()) |
| if index in skipTests: |
| continue |
| write(index) |
| |
| P.finish() |
| |
| if __name__=='__main__': |
| main() |
| |