code.kerkeslager.com Git - fur/blob - generation.py

   1 import jinja2
   2
   3 import transformation
   4
   5 ENV = jinja2.Environment(
   6     autoescape=jinja2.select_autoescape([]),
   7     loader=jinja2.FileSystemLoader('templates'),
   8     trim_blocks=True,
   9 )
  10
  11 def generate_integer_literal(c_integer_literal):
  12     return 'integerLiteral({})'.format(c_integer_literal.value)
  13
  14 def generate_string_literal(c_string_literal):
  15     return 'stringLiteral(STRING_LITERAL_LIST[{}] /* string: {} */)'.format(
  16         c_string_literal.index,
  17         repr(c_string_literal.value),
  18     )
  19
  20 def generate_symbol_expression(symbol_expression):
  21     return 'Environment_get(environment, SYMBOL_LIST[{}] /* symbol: {} */)'.format(
  22         symbol_expression.symbol_list_index,
  23         symbol_expression.symbol,
  24     )
  25
  26 def generate_variable_expression(expression):
  27     return expression.variable
  28
  29 def generate_function_call_for_fur_infix_operator(expression):
  30     return 'operator${}({}, {})'.format(
  31         expression.name,
  32         generate_expression(expression.left),
  33         generate_expression(expression.right),
  34     )
  35
  36 def generate_structure_literal_expression(expression):
  37     return 'Structure_construct({}, {}, {})'.format(
  38         expression.field_count,
  39         expression.symbol_list_variable,
  40         expression.value_list_variable,
  41     )
  42
  43 def generate_dot_expression(expression):
  44     return 'Structure_get(&{}, SYMBOL_LIST[{}] /* symbol: "{}" */)'.format(
  45         generate_variable_expression(expression.instance),
  46         expression.symbol_list_index,
  47         expression.symbol,
  48     )
  49
  50 def generate_list_construct_expression(expression):
  51     return 'List_construct({})'.format(expression.allocate)
  52
  53 def generate_list_get_expression(expression):
  54     return 'List_get(&{}, {})'.format(
  55         generate_expression(expression.list_expression),
  56         generate_expression(expression.index_expression),
  57     )
  58
  59 def generate_expression(expression):
  60     return {
  61         transformation.CDotExpression: generate_dot_expression,
  62         transformation.CFunctionCallExpression: generate_function_call,
  63         transformation.CFunctionCallForFurInfixOperator: generate_function_call_for_fur_infix_operator,
  64         transformation.CIntegerLiteral: generate_integer_literal,
  65         transformation.CListConstructExpression: generate_list_construct_expression,
  66         transformation.CListGetExpression: generate_list_get_expression,
  67         transformation.CNegationExpression: generate_negation_expression,
  68         transformation.CStringLiteral: generate_string_literal,
  69         transformation.CStructureLiteralExpression: generate_structure_literal_expression,
  70         transformation.CSymbolExpression: generate_symbol_expression,
  71         transformation.CVariableExpression: generate_variable_expression,
  72     }[type(expression)](expression)
  73
  74 def generate_negation_expression(c_negation_expression):
  75     return 'operator$negate({})'.format(
  76         generate_expression(c_negation_expression.value)
  77     )
  78
  79 def generate_function_call(function_call):
  80     # This gets called twice, so we want to be sure it is efficient and without side effects
  81     assert isinstance(function_call.function_expression, transformation.CVariableExpression)
  82
  83     # TODO Check the type of the things being called
  84     function_expression = generate_variable_expression(function_call.function_expression)
  85     return '{}.instance.closure.call(environmentPool, {}.instance.closure.closed, {}, stack)'.format(
  86         function_expression,
  87         function_expression,
  88         function_call.argument_count,
  89     )
  90
  91 def generate_expression_statement(statement):
  92     return 'Object_deinitialize(&({}));'.format(generate_expression(statement.expression))
  93
  94 def generate_symbol_assignment_statement(statement):
  95     return 'Environment_set(environment, SYMBOL_LIST[{}] /* symbol: {} */, {});'.format(
  96         statement.target_symbol_list_index,
  97         statement.target,
  98         generate_expression(statement.expression),
  99     )
 100
 101 def generate_array_variable_initialization_statement(statement):
 102     return 'Object {}[] = {{ {} }};'.format(
 103         statement.variable,
 104         ', '.join(generate_expression(i) for i in statement.items),
 105     )
 106
 107 def generate_symbol_array_variable_initialization_statement(statement):
 108     return 'const char* {}[] = {{ {} }};'.format(
 109         statement.variable,
 110         ', '.join('SYMBOL_LIST[{}] /* symbol: "{}" */'.format(
 111             statement.symbol_list_indices[i],
 112             statement.symbol_list[i],
 113         ) for i in range(len(statement.symbol_list))),
 114     )
 115
 116 def generate_variable_initialization_statement(statement):
 117     return 'Object {} = {};'.format(
 118         statement.variable,
 119         generate_expression(statement.expression),
 120     )
 121
 122 def generate_variable_reassignment_statement(statement):
 123     return '{} = {};'.format(
 124         statement.variable,
 125         generate_expression(statement.expression),
 126     )
 127
 128
 129 def indent(s):
 130     return '\n'.join(' ' * 2 + l for l in s.split('\n'))
 131
 132 def generate_if_else_statement(statement):
 133     # TODO Check that the argument is boolean
 134     condition_expression = '{}.instance.boolean'.format(
 135         generate_expression(statement.condition_expression),
 136     )
 137
 138     if len(statement.if_statement_list) == 0:
 139         condition_expression = '!({})'.format(condition_expression)
 140         if_statement_list = statement.else_statement_list
 141         else_statement_list = ()
 142     else:
 143         if_statement_list = statement.if_statement_list
 144         else_statement_list = statement.else_statement_list
 145
 146     generated_if_clause = 'if({})'.format(condition_expression)
 147
 148     if len(if_statement_list) == 0:
 149         generated_if_statement_list = ';'
 150     else:
 151         generated_if_statement_list = indent('\n{{\n{}\n}}'.format(
 152             indent('\n'.join(generate_statement(s) for s in if_statement_list)),
 153         ))
 154
 155     if len(else_statement_list) == 0:
 156         generated_else_statement_list = ''
 157     else:
 158         generated_else_statement_list = indent('\nelse\n{{\n{}\n}}'.format(
 159             indent('\n'.join(generate_statement(s) for s in else_statement_list)),
 160         ))
 161
 162     return generated_if_clause + generated_if_statement_list + generated_else_statement_list
 163
 164 def generate_function_declaration(statement):
 165     return 'Environment_set(environment, "{}", (Object){{ CLOSURE, (Instance)(Closure){{ environment, user${}$implementation }} }});'.format(statement.name, statement.name)
 166
 167 def generate_list_append_statement(statement):
 168     return 'List_append(&{}, {});'.format(
 169         generate_expression(statement.list_expression),
 170         generate_expression(statement.item_expression),
 171     )
 172
 173 def generate_push_statement(statement):
 174     return 'Stack_push(stack, {});'.format(generate_expression(statement.expression))
 175
 176 def generate_statement(statement):
 177     return {
 178         transformation.CArrayVariableInitializationStatement: generate_array_variable_initialization_statement,
 179         transformation.CExpressionStatement: generate_expression_statement,
 180         transformation.CFunctionDeclaration: generate_function_declaration,
 181         transformation.CIfElseStatement: generate_if_else_statement,
 182         transformation.CListAppendStatement: generate_list_append_statement,
 183         transformation.CPushStatement: generate_push_statement,
 184         transformation.CSymbolAssignmentStatement: generate_symbol_assignment_statement,
 185         transformation.CSymbolArrayVariableInitializationStatement: generate_symbol_array_variable_initialization_statement,
 186         transformation.CVariableInitializationStatement: generate_variable_initialization_statement,
 187         transformation.CVariableReassignmentStatement: generate_variable_reassignment_statement,
 188     }[type(statement)](statement)
 189
 190 def generate_function_definition(definition):
 191     template = ENV.get_template('function_definition.c')
 192     return template.render(
 193         name=definition.name,
 194         argument_name_list=definition.argument_name_list,
 195         statement_list=list(generate_statement(s) for s in definition.statement_list),
 196     )
 197     return definition
 198
 199 C_ESCAPES = {
 200     '"':    r'\"',
 201 }
 202
 203 def escape_character(ch):
 204     return C_ESCAPES.get(ch, ch)
 205
 206 def escape_string_literal(string_literal):
 207     return  ''.join(escape_character(ch) for ch in string_literal)
 208
 209 def generate(program):
 210     template = ENV.get_template('program.c')
 211     return template.render(
 212         builtins=tuple(sorted(program.builtin_set)),
 213         function_definition_list=list(generate_function_definition(fd) for fd in program.function_definition_list),
 214         infix_declarations=program.operator_declarations,
 215         statements=list(generate_statement(s) for s in program.statements),
 216         standard_libraries=list(sorted(program.standard_libraries)),
 217         string_literal_list=list(escape_string_literal(s) for s in program.string_literal_list),
 218         symbol_list=program.symbol_list,
 219     )
 220
 221 if __name__ == '__main__':
 222     import unittest
 223
 224     unittest.main()