source/glsl/compiler.cpp

   1 #include <msp/core/algorithm.h>
   2 #include <msp/strings/format.h>
   3 #include <msp/strings/utils.h>
   4 #include "builtin.h"
   5 #include "compatibility.h"
   6 #include "compiler.h"
   7 #include "debug.h"
   8 #include "error.h"
   9 #include "generate.h"
  10 #include "glsl_error.h"
  11 #include "optimize.h"
  12 #include "output.h"
  13 #include "resources.h"
  14 #include "validate.h"
  15
  16 #undef interface
  17
  18 using namespace std;
  19
  20 namespace Msp {
  21 namespace GL {
  22 namespace SL {
  23
  24 Compiler::Compiler():
  25         features(Features::from_context()),
  26         module(0),
  27         specialized(false)
  28 { }
  29
  30 Compiler::Compiler(const Features &f):
  31         features(f),
  32         module(0),
  33         specialized(false)
  34 { }
  35
  36 Compiler::~Compiler()
  37 {
  38         delete module;
  39 }
  40
  41 void Compiler::clear()
  42 {
  43         delete module;
  44         module = new Module();
  45         imported_names.clear();
  46         module->source_map.set_name(0, "<generated>");
  47 }
  48
  49 void Compiler::set_source(const string &source, const string &src_name)
  50 {
  51         clear();
  52         Parser parser;
  53         imported_names.push_back(src_name);
  54         append_module(parser.parse(source, src_name, 1), 0);
  55 }
  56
  57 void Compiler::load_source(IO::Base &io, DataFile::Collection *res, const string &src_name)
  58 {
  59         clear();
  60         Parser parser;
  61         imported_names.push_back(src_name);
  62         append_module(parser.parse(io, src_name, 1), res);
  63 }
  64
  65 void Compiler::load_source(IO::Base &io, const string &src_name)
  66 {
  67         load_source(io, 0, src_name);
  68 }
  69
  70 void Compiler::specialize(const map<string, int> &sv)
  71 {
  72         specialized = true;
  73         spec_values = sv;
  74 }
  75
  76 void Compiler::compile(Mode mode)
  77 {
  78         for(list<Stage>::iterator i=module->stages.begin(); i!=module->stages.end(); ++i)
  79                 generate(*i, mode);
  80
  81         bool valid = true;
  82         for(list<Stage>::iterator i=module->stages.begin(); i!=module->stages.end(); ++i)
  83                 if(!validate(*i))
  84                         valid = false;
  85         if(!valid)
  86                 throw invalid_shader_source(get_diagnostics());
  87
  88         unsigned n = 0;
  89         for(list<Stage>::iterator i=module->stages.begin(); i!=module->stages.end(); ++n)
  90         {
  91                 OptimizeResult result = optimize(*i);
  92                 if(result==REDO_PREVIOUS)
  93                         i = module->stages.begin();
  94                 else if(result!=REDO_STAGE)
  95                         ++i;
  96         }
  97         for(list<Stage>::iterator i=module->stages.begin(); i!=module->stages.end(); ++i)
  98                 finalize(*i, mode);
  99 }
 100
 101 string Compiler::get_combined_glsl() const
 102 {
 103         string glsl;
 104
 105         unsigned source_count = module->source_map.get_count();
 106         for(unsigned i=1; i<source_count; ++i)
 107                 glsl += format("#pragma MSP source(%d, \"%s\")\n", i, module->source_map.get_name(i));
 108         for(list<Stage>::iterator i=module->stages.begin(); i!=module->stages.end(); ++i)
 109         {
 110                 glsl += format("#pragma MSP stage(%s)\n", Stage::get_stage_name(i->type));
 111                 glsl += Formatter().apply(*i, MODULE);
 112                 glsl += '\n';
 113         }
 114
 115         return glsl;
 116 }
 117
 118 vector<Stage::Type> Compiler::get_stages() const
 119 {
 120         vector<Stage::Type> stage_types;
 121         stage_types.reserve(module->stages.size());
 122         for(list<Stage>::const_iterator i=module->stages.begin(); i!=module->stages.end(); ++i)
 123                 stage_types.push_back(i->type);
 124         return stage_types;
 125 }
 126
 127 string Compiler::get_stage_glsl(Stage::Type stage_type) const
 128 {
 129         for(list<Stage>::iterator i=module->stages.begin(); i!=module->stages.end(); ++i)
 130                 if(i->type==stage_type)
 131                         return Formatter().apply(*i, PROGRAM);
 132         throw key_error(Stage::get_stage_name(stage_type));
 133 }
 134
 135 const map<string, unsigned> &Compiler::get_vertex_attributes() const
 136 {
 137         for(list<Stage>::const_iterator i=module->stages.begin(); i!=module->stages.end(); ++i)
 138                 if(i->type==Stage::VERTEX)
 139                         return i->locations;
 140         throw invalid_operation("Compiler::get_vertex_attributes");
 141 }
 142
 143 const map<string, unsigned> &Compiler::get_fragment_outputs() const
 144 {
 145         for(list<Stage>::const_iterator i=module->stages.begin(); i!=module->stages.end(); ++i)
 146                 if(i->type==Stage::FRAGMENT)
 147                         return i->locations;
 148         throw invalid_operation("Compiler::get_fragment_outputs");
 149 }
 150
 151 const SourceMap &Compiler::get_source_map() const
 152 {
 153         return module->source_map;
 154 }
 155
 156 string Compiler::get_stage_debug(Stage::Type stage_type) const
 157 {
 158         for(list<Stage>::iterator i=module->stages.begin(); i!=module->stages.end(); ++i)
 159                 if(i->type==stage_type)
 160                         return DumpTree().apply(*i);
 161         throw key_error(Stage::get_stage_name(stage_type));
 162 }
 163
 164 string Compiler::get_diagnostics() const
 165 {
 166         string combined;
 167         for(list<Stage>::const_iterator i=module->stages.begin(); i!=module->stages.end(); ++i)
 168                 for(vector<Diagnostic>::const_iterator j=i->diagnostics.begin(); j!=i->diagnostics.end(); ++j)
 169                         if(j->source!=INTERNAL_SOURCE)
 170                                 append(combined, "\n", format("%s:%d: %s", module->source_map.get_name(j->source), j->line, j->message));
 171         return combined;
 172 }
 173
 174 void Compiler::append_module(Module &mod, DataFile::Collection *res)
 175 {
 176         module->source_map.merge_from(mod.source_map);
 177
 178         vector<Import *> imports;
 179         for(NodeList<Statement>::const_iterator i=mod.shared.content.body.begin(); i!=mod.shared.content.body.end(); ++i)
 180                 if(Import *imp = dynamic_cast<Import *>(i->get()))
 181                         imports.push_back(imp);
 182         for(vector<Import *>::iterator i=imports.begin(); i!=imports.end(); ++i)
 183                 import(res, (*i)->module);
 184         NodeRemover().apply(mod.shared, set<Node *>(imports.begin(), imports.end()));
 185
 186         append_stage(mod.shared);
 187         for(list<Stage>::iterator i=mod.stages.begin(); i!=mod.stages.end(); ++i)
 188                 append_stage(*i);
 189 }
 190
 191 void Compiler::append_stage(Stage &stage)
 192 {
 193         Stage *target = 0;
 194         if(stage.type==Stage::SHARED)
 195                 target = &module->shared;
 196         else
 197         {
 198                 list<Stage>::iterator i;
 199                 for(i=module->stages.begin(); (i!=module->stages.end() && i->type<stage.type); ++i) ;
 200                 if(i==module->stages.end() || i->type>stage.type)
 201                 {
 202                         list<Stage>::iterator j = module->stages.insert(i, stage.type);
 203                         if(i!=module->stages.end())
 204                                 i->previous = &*j;
 205                         i = j;
 206                         if(i!=module->stages.begin())
 207                                 i->previous = &*--j;
 208                 }
 209
 210                 target = &*i;
 211         }
 212
 213         if(stage.required_features.glsl_version>target->required_features.glsl_version)
 214                 target->required_features.glsl_version = stage.required_features.glsl_version;
 215         for(NodeList<Statement>::iterator i=stage.content.body.begin(); i!=stage.content.body.end(); ++i)
 216                 target->content.body.push_back(*i);
 217         DeclarationCombiner().apply(*target);
 218 }
 219
 220 void Compiler::import(DataFile::Collection *resources, const string &name)
 221 {
 222         string fn = name+".glsl";
 223         if(find(imported_names, fn)!=imported_names.end())
 224                 return;
 225         imported_names.push_back(fn);
 226
 227         RefPtr<IO::Seekable> io = (resources ? resources->open_raw(fn) : Resources::get_builtins().open(fn));
 228         if(!io)
 229                 throw runtime_error(format("module %s not found", name));
 230         Parser import_parser;
 231         append_module(import_parser.parse(*io, fn, module->source_map.get_count()), resources);
 232 }
 233
 234 void Compiler::generate(Stage &stage, Mode mode)
 235 {
 236         stage.required_features.gl_api = features.gl_api;
 237         if(module->shared.required_features.glsl_version>stage.required_features.glsl_version)
 238                 stage.required_features.glsl_version = module->shared.required_features.glsl_version;
 239
 240         inject_block(stage.content, module->shared.content);
 241         if(const Stage *builtins = get_builtins(stage.type))
 242                 inject_block(stage.content, builtins->content);
 243         if(const Stage *builtins = get_builtins(Stage::SHARED))
 244                 inject_block(stage.content, builtins->content);
 245
 246         // Initial resolving pass
 247         resolve(stage);
 248
 249         /* All variables local to a stage have been resolved.  Resolve non-local
 250         variables through interfaces. */
 251         InterfaceGenerator().apply(stage);
 252         resolve(stage, RESOLVE_BLOCKS|RESOLVE_TYPES|RESOLVE_VARIABLES);
 253
 254         ConstantSpecializer().apply(stage, (mode==PROGRAM && specialized ? &spec_values : 0));
 255         if(mode==PROGRAM)
 256         {
 257                 LegacyConverter().apply(stage, features);
 258                 resolve(stage, RESOLVE_VARIABLES|RESOLVE_FUNCTIONS);
 259         }
 260 }
 261
 262 template<typename T>
 263 bool Compiler::resolve(Stage &stage, unsigned &flags, unsigned bit)
 264 {
 265         if(!(flags&bit))
 266                 return false;
 267
 268         flags &= ~bit;
 269         return T().apply(stage);
 270 }
 271
 272 void Compiler::resolve(Stage &stage, unsigned flags)
 273 {
 274         while(flags)
 275         {
 276                 if(resolve<BlockHierarchyResolver>(stage, flags, RESOLVE_BLOCKS))
 277                         ;
 278                 else if(resolve<TypeResolver>(stage, flags, RESOLVE_TYPES))
 279                         flags |= RESOLVE_BLOCKS|RESOLVE_VARIABLES|RESOLVE_EXPRESSIONS;
 280                 else if(resolve<VariableResolver>(stage, flags, RESOLVE_VARIABLES))
 281                         flags |= RESOLVE_EXPRESSIONS;
 282                 else if(resolve<FunctionResolver>(stage, flags, RESOLVE_FUNCTIONS))
 283                         flags |= RESOLVE_EXPRESSIONS;
 284                 else if(resolve<ExpressionResolver>(stage, flags, RESOLVE_EXPRESSIONS))
 285                         flags |= RESOLVE_VARIABLES;
 286         }
 287 }
 288
 289 bool Compiler::validate(Stage &stage)
 290 {
 291         TypeValidator().apply(stage);
 292         DeclarationValidator().apply(stage);
 293         ReferenceValidator().apply(stage);
 294         ExpressionValidator().apply(stage);
 295
 296         for(vector<Diagnostic>::const_iterator i=stage.diagnostics.begin(); i!=stage.diagnostics.end(); ++i)
 297                 if(i->severity==Diagnostic::ERR)
 298                         return false;
 299
 300         return true;
 301 }
 302
 303 Compiler::OptimizeResult Compiler::optimize(Stage &stage)
 304 {
 305         ConstantConditionEliminator().apply(stage);
 306
 307         bool any_inlined = false;
 308         if(FunctionInliner().apply(stage))
 309         {
 310                 resolve(stage, RESOLVE_TYPES|RESOLVE_VARIABLES|RESOLVE_EXPRESSIONS);
 311                 any_inlined = true;
 312         }
 313         if(ExpressionInliner().apply(stage))
 314         {
 315                 resolve(stage, RESOLVE_VARIABLES|RESOLVE_EXPRESSIONS);
 316                 any_inlined = true;
 317         }
 318
 319         /* Removing variables or functions may cause things from the previous stage
 320         to become unused. */
 321         bool any_removed = UnusedVariableRemover().apply(stage);
 322         any_removed |= UnusedFunctionRemover().apply(stage);
 323         any_removed |= UnusedTypeRemover().apply(stage);
 324
 325         return any_removed ? REDO_PREVIOUS : any_inlined ? REDO_STAGE : NEXT_STAGE;
 326 }
 327
 328 void Compiler::finalize(Stage &stage, Mode mode)
 329 {
 330         if(get_gl_api()==OPENGL_ES2 && mode==PROGRAM)
 331                 DefaultPrecisionGenerator().apply(stage);
 332         else if(mode==MODULE)
 333                 PrecisionRemover().apply(stage);
 334 }
 335
 336 void Compiler::inject_block(Block &target, const Block &source)
 337 {
 338         NodeList<Statement>::iterator insert_point = target.body.begin();
 339         for(NodeList<Statement>::const_iterator i=source.body.begin(); i!=source.body.end(); ++i)
 340                 target.body.insert(insert_point, (*i)->clone());
 341 }
 342
 343 } // namespace SL
 344 } // namespace GL
 345 } // namespace Msp