16a8c6cadSSimon Tatham //===- JSONBackend.cpp - Generate a JSON dump of all records. -*- C++ -*-=====//
26a8c6cadSSimon Tatham //
32946cd70SChandler Carruth // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
42946cd70SChandler Carruth // See https://llvm.org/LICENSE.txt for license information.
52946cd70SChandler Carruth // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
66a8c6cadSSimon Tatham //
76a8c6cadSSimon Tatham //===----------------------------------------------------------------------===//
86a8c6cadSSimon Tatham //
96a8c6cadSSimon Tatham // This TableGen back end generates a machine-readable representation
106a8c6cadSSimon Tatham // of all the classes and records defined by the input, in JSON format.
116a8c6cadSSimon Tatham //
126a8c6cadSSimon Tatham //===----------------------------------------------------------------------===//
136a8c6cadSSimon Tatham 
1492f49b89Sserge-sans-paille #include "llvm/ADT/ArrayRef.h"
1592f49b89Sserge-sans-paille #include "llvm/Support/Casting.h"
166a8c6cadSSimon Tatham #include "llvm/Support/Debug.h"
1792f49b89Sserge-sans-paille #include "llvm/Support/ErrorHandling.h"
186a8c6cadSSimon Tatham #include "llvm/Support/JSON.h"
1992f49b89Sserge-sans-paille #include "llvm/TableGen/Record.h"
206a8c6cadSSimon Tatham 
216a8c6cadSSimon Tatham #define DEBUG_TYPE "json-emitter"
226a8c6cadSSimon Tatham 
236a8c6cadSSimon Tatham using namespace llvm;
246a8c6cadSSimon Tatham 
256a8c6cadSSimon Tatham namespace {
266a8c6cadSSimon Tatham 
276a8c6cadSSimon Tatham class JSONEmitter {
286a8c6cadSSimon Tatham private:
296a8c6cadSSimon Tatham   RecordKeeper &Records;
306a8c6cadSSimon Tatham 
316a8c6cadSSimon Tatham   json::Value translateInit(const Init &I);
326a8c6cadSSimon Tatham 
336a8c6cadSSimon Tatham public:
346a8c6cadSSimon Tatham   JSONEmitter(RecordKeeper &R);
356a8c6cadSSimon Tatham 
366a8c6cadSSimon Tatham   void run(raw_ostream &OS);
376a8c6cadSSimon Tatham };
386a8c6cadSSimon Tatham 
396a8c6cadSSimon Tatham } // end anonymous namespace
406a8c6cadSSimon Tatham 
JSONEmitter(RecordKeeper & R)416a8c6cadSSimon Tatham JSONEmitter::JSONEmitter(RecordKeeper &R) : Records(R) {}
426a8c6cadSSimon Tatham 
translateInit(const Init & I)436a8c6cadSSimon Tatham json::Value JSONEmitter::translateInit(const Init &I) {
446a8c6cadSSimon Tatham 
456a8c6cadSSimon Tatham   // Init subclasses that we return as JSON primitive values of one
466a8c6cadSSimon Tatham   // kind or another.
476a8c6cadSSimon Tatham 
486a8c6cadSSimon Tatham   if (isa<UnsetInit>(&I)) {
496a8c6cadSSimon Tatham     return nullptr;
506a8c6cadSSimon Tatham   } else if (auto *Bit = dyn_cast<BitInit>(&I)) {
516a8c6cadSSimon Tatham     return Bit->getValue() ? 1 : 0;
526a8c6cadSSimon Tatham   } else if (auto *Bits = dyn_cast<BitsInit>(&I)) {
536a8c6cadSSimon Tatham     json::Array array;
546a8c6cadSSimon Tatham     for (unsigned i = 0, limit = Bits->getNumBits(); i < limit; i++)
556a8c6cadSSimon Tatham       array.push_back(translateInit(*Bits->getBit(i)));
56c55cf4afSBill Wendling     return std::move(array);
576a8c6cadSSimon Tatham   } else if (auto *Int = dyn_cast<IntInit>(&I)) {
586a8c6cadSSimon Tatham     return Int->getValue();
596a8c6cadSSimon Tatham   } else if (auto *Str = dyn_cast<StringInit>(&I)) {
606a8c6cadSSimon Tatham     return Str->getValue();
616a8c6cadSSimon Tatham   } else if (auto *List = dyn_cast<ListInit>(&I)) {
626a8c6cadSSimon Tatham     json::Array array;
636a8c6cadSSimon Tatham     for (auto val : *List)
646a8c6cadSSimon Tatham       array.push_back(translateInit(*val));
65c55cf4afSBill Wendling     return std::move(array);
666a8c6cadSSimon Tatham   }
676a8c6cadSSimon Tatham 
686a8c6cadSSimon Tatham   // Init subclasses that we return as JSON objects containing a
696a8c6cadSSimon Tatham   // 'kind' discriminator. For these, we also provide the same
706a8c6cadSSimon Tatham   // translation back into TableGen input syntax that -print-records
716a8c6cadSSimon Tatham   // would give.
726a8c6cadSSimon Tatham 
736a8c6cadSSimon Tatham   json::Object obj;
746a8c6cadSSimon Tatham   obj["printable"] = I.getAsString();
756a8c6cadSSimon Tatham 
766a8c6cadSSimon Tatham   if (auto *Def = dyn_cast<DefInit>(&I)) {
776a8c6cadSSimon Tatham     obj["kind"] = "def";
786a8c6cadSSimon Tatham     obj["def"] = Def->getDef()->getName();
79c55cf4afSBill Wendling     return std::move(obj);
806a8c6cadSSimon Tatham   } else if (auto *Var = dyn_cast<VarInit>(&I)) {
816a8c6cadSSimon Tatham     obj["kind"] = "var";
826a8c6cadSSimon Tatham     obj["var"] = Var->getName();
83c55cf4afSBill Wendling     return std::move(obj);
846a8c6cadSSimon Tatham   } else if (auto *VarBit = dyn_cast<VarBitInit>(&I)) {
856a8c6cadSSimon Tatham     if (auto *Var = dyn_cast<VarInit>(VarBit->getBitVar())) {
866a8c6cadSSimon Tatham       obj["kind"] = "varbit";
876a8c6cadSSimon Tatham       obj["var"] = Var->getName();
886a8c6cadSSimon Tatham       obj["index"] = VarBit->getBitNum();
89c55cf4afSBill Wendling       return std::move(obj);
906a8c6cadSSimon Tatham     }
916a8c6cadSSimon Tatham   } else if (auto *Dag = dyn_cast<DagInit>(&I)) {
926a8c6cadSSimon Tatham     obj["kind"] = "dag";
936a8c6cadSSimon Tatham     obj["operator"] = translateInit(*Dag->getOperator());
946a8c6cadSSimon Tatham     if (auto name = Dag->getName())
956a8c6cadSSimon Tatham       obj["name"] = name->getAsUnquotedString();
966a8c6cadSSimon Tatham     json::Array args;
976a8c6cadSSimon Tatham     for (unsigned i = 0, limit = Dag->getNumArgs(); i < limit; ++i) {
986a8c6cadSSimon Tatham       json::Array arg;
996a8c6cadSSimon Tatham       arg.push_back(translateInit(*Dag->getArg(i)));
1006a8c6cadSSimon Tatham       if (auto argname = Dag->getArgName(i))
1016a8c6cadSSimon Tatham         arg.push_back(argname->getAsUnquotedString());
1026a8c6cadSSimon Tatham       else
1036a8c6cadSSimon Tatham         arg.push_back(nullptr);
1046a8c6cadSSimon Tatham       args.push_back(std::move(arg));
1056a8c6cadSSimon Tatham     }
1066a8c6cadSSimon Tatham     obj["args"] = std::move(args);
107c55cf4afSBill Wendling     return std::move(obj);
1086a8c6cadSSimon Tatham   }
1096a8c6cadSSimon Tatham 
1106a8c6cadSSimon Tatham   // Final fallback: anything that gets past here is simply given a
1116a8c6cadSSimon Tatham   // kind field of 'complex', and the only other field is the standard
1126a8c6cadSSimon Tatham   // 'printable' representation.
1136a8c6cadSSimon Tatham 
1146a8c6cadSSimon Tatham   assert(!I.isConcrete());
1156a8c6cadSSimon Tatham   obj["kind"] = "complex";
116c55cf4afSBill Wendling   return std::move(obj);
1176a8c6cadSSimon Tatham }
1186a8c6cadSSimon Tatham 
run(raw_ostream & OS)1196a8c6cadSSimon Tatham void JSONEmitter::run(raw_ostream &OS) {
1206a8c6cadSSimon Tatham   json::Object root;
1216a8c6cadSSimon Tatham 
1226a8c6cadSSimon Tatham   root["!tablegen_json_version"] = 1;
1236a8c6cadSSimon Tatham 
1246a8c6cadSSimon Tatham   // Prepare the arrays that will list the instances of every class.
1256a8c6cadSSimon Tatham   // We mostly fill those in by iterating over the superclasses of
1266a8c6cadSSimon Tatham   // each def, but we also want to ensure we store an empty list for a
1276a8c6cadSSimon Tatham   // class with no instances at all, so we do a preliminary iteration
1286a8c6cadSSimon Tatham   // over the classes, invoking std::map::operator[] to default-
1296a8c6cadSSimon Tatham   // construct the array for each one.
1306a8c6cadSSimon Tatham   std::map<std::string, json::Array> instance_lists;
1316a8c6cadSSimon Tatham   for (const auto &C : Records.getClasses()) {
132*85dadf6dSKazu Hirata     const auto Name = C.second->getNameInitAsString();
1336a8c6cadSSimon Tatham     (void)instance_lists[Name];
1346a8c6cadSSimon Tatham   }
1356a8c6cadSSimon Tatham 
1366a8c6cadSSimon Tatham   // Main iteration over the defs.
1376a8c6cadSSimon Tatham   for (const auto &D : Records.getDefs()) {
138*85dadf6dSKazu Hirata     const auto Name = D.second->getNameInitAsString();
1396a8c6cadSSimon Tatham     auto &Def = *D.second;
1406a8c6cadSSimon Tatham 
1416a8c6cadSSimon Tatham     json::Object obj;
1426a8c6cadSSimon Tatham     json::Array fields;
1436a8c6cadSSimon Tatham 
1446a8c6cadSSimon Tatham     for (const RecordVal &RV : Def.getValues()) {
1456a8c6cadSSimon Tatham       if (!Def.isTemplateArg(RV.getNameInit())) {
1466a8c6cadSSimon Tatham         auto Name = RV.getNameInitAsString();
147aa7968a8SPaul C. Anagnostopoulos         if (RV.isNonconcreteOK())
1486a8c6cadSSimon Tatham           fields.push_back(Name);
1496a8c6cadSSimon Tatham         obj[Name] = translateInit(*RV.getValue());
1506a8c6cadSSimon Tatham       }
1516a8c6cadSSimon Tatham     }
1526a8c6cadSSimon Tatham 
1536a8c6cadSSimon Tatham     obj["!fields"] = std::move(fields);
1546a8c6cadSSimon Tatham 
1556a8c6cadSSimon Tatham     json::Array superclasses;
1566a8c6cadSSimon Tatham     for (const auto &SuperPair : Def.getSuperClasses())
1576a8c6cadSSimon Tatham       superclasses.push_back(SuperPair.first->getNameInitAsString());
1586a8c6cadSSimon Tatham     obj["!superclasses"] = std::move(superclasses);
1596a8c6cadSSimon Tatham 
1606a8c6cadSSimon Tatham     obj["!name"] = Name;
1616a8c6cadSSimon Tatham     obj["!anonymous"] = Def.isAnonymous();
1626a8c6cadSSimon Tatham 
1636a8c6cadSSimon Tatham     root[Name] = std::move(obj);
1646a8c6cadSSimon Tatham 
1656a8c6cadSSimon Tatham     // Add this def to the instance list for each of its superclasses.
1666a8c6cadSSimon Tatham     for (const auto &SuperPair : Def.getSuperClasses()) {
1676a8c6cadSSimon Tatham       auto SuperName = SuperPair.first->getNameInitAsString();
1686a8c6cadSSimon Tatham       instance_lists[SuperName].push_back(Name);
1696a8c6cadSSimon Tatham     }
1706a8c6cadSSimon Tatham   }
1716a8c6cadSSimon Tatham 
1726a8c6cadSSimon Tatham   // Make a JSON object from the std::map of instance lists.
1736a8c6cadSSimon Tatham   json::Object instanceof;
1746a8c6cadSSimon Tatham   for (auto kv: instance_lists)
1756a8c6cadSSimon Tatham     instanceof[kv.first] = std::move(kv.second);
1766a8c6cadSSimon Tatham   root["!instanceof"] = std::move(instanceof);
1776a8c6cadSSimon Tatham 
1786a8c6cadSSimon Tatham   // Done. Write the output.
1796a8c6cadSSimon Tatham   OS << json::Value(std::move(root)) << "\n";
1806a8c6cadSSimon Tatham }
1816a8c6cadSSimon Tatham 
1826a8c6cadSSimon Tatham namespace llvm {
1836a8c6cadSSimon Tatham 
EmitJSON(RecordKeeper & RK,raw_ostream & OS)1846a8c6cadSSimon Tatham void EmitJSON(RecordKeeper &RK, raw_ostream &OS) { JSONEmitter(RK).run(OS); }
1856a8c6cadSSimon Tatham } // end namespace llvm
186