// license:BSD-3-Clause // copyright-holders:Aaron Giles,Paul Priest /*************************************************************************** info.c Dumps the MAME internal data as an XML file. ***************************************************************************/ #include "emu.h" #include "info.h" #include "mameopts.h" #include "machine/ram.h" #include "sound/samples.h" #include "config.h" #include "drivenum.h" #include "romload.h" #include "screen.h" #include "softlist_dev.h" #include "speaker.h" #include "xmlfile.h" #include #include #include #define XML_ROOT "mame" #define XML_TOP "machine" //************************************************************************** // GLOBAL VARIABLES //************************************************************************** // DTD string describing the data const char info_xml_creator::s_dtd_string[] = "\n" "\t\n" "\t\n" "\t\n" "\t\n" "\t\t\n" "\t\t\n" "\t\t\n" "\t\t\n" "\t\t\n" "\t\t\n" "\t\t\n" "\t\t\n" "\t\t\n" "\t\t\n" "\t\t\n" "\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\n" "\t\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\t\n" "\t\t\n" "\t\t\t\n" "\t\t\t\n" "]>"; //************************************************************************** // INFO XML CREATOR //************************************************************************** //------------------------------------------------- // info_xml_creator - constructor //------------------------------------------------- info_xml_creator::info_xml_creator(emu_options const &options, bool dtd) : m_output(nullptr) , m_dtd(dtd) { } //------------------------------------------------- // output_mame_xml - print the XML information // for all known games //------------------------------------------------- void info_xml_creator::output(FILE *out, std::vector const &patterns) { m_output = out; std::unique_ptr devfilter(patterns.empty() ? nullptr : new device_type_set); // track which patterns match machines driver_enumerator drivlist(m_lookup_options); std::vector matched(patterns.size(), false); size_t exact_matches = 0; auto const included = [&patterns, &matched, &exact_matches] (char const *const name) -> bool { if (patterns.empty()) return true; bool result = false; auto it = matched.begin(); for (std::string const &pat : patterns) { if (!core_strwildcmp(pat.c_str(), name)) { result = true; if (!*it) { *it = true; if (!core_iswildstr(pat.c_str())) ++exact_matches; } } ++it; } return result; }; // iterate through the drivers, outputting one at a time bool first = true; while (drivlist.next()) { if (included(drivlist.driver().name)) { if (first) { output_header(); first = false; } output_one(drivlist, devfilter.get()); // stop looking if we found everything specified if (!patterns.empty() && exact_matches == patterns.size()) break; } } // iterate through the device types if not everything matches a driver if (!patterns.empty() && exact_matches != patterns.size()) { for (device_type type : registered_device_types) { if (included(type.shortname())) { devfilter->insert(&type); if (exact_matches == patterns.size()) break; } } } // output devices (both devices with roms and slot devices) if (!devfilter || !devfilter->empty()) { if (first) { output_header(); first = false; } output_devices(devfilter.get()); } if (!first) output_footer(); // throw an error if there were unmatched patterns auto it = matched.begin(); for (std::string const &pat : patterns) { if (!*it) throw emu_fatalerror(EMU_ERR_NO_SUCH_GAME, "No matching machines found for '%s'", pat.c_str()); ++it; } } //------------------------------------------------- // output_mame_xml - print the XML information // for a subset of games //------------------------------------------------- void info_xml_creator::output(FILE *out, driver_enumerator &drivlist, bool nodevices) { m_output = out; device_type_set devfilter; output_header(); // iterate through the drivers, outputting one at a time while (drivlist.next()) output_one(drivlist, &devfilter); // output devices (both devices with roms and slot devices) if (!nodevices) output_devices(&devfilter); output_footer(); } //------------------------------------------------- // output_header - print the XML DTD and open // the root element //------------------------------------------------- void info_xml_creator::output_header() { if (m_dtd) { // output the DTD fprintf(m_output, "\n"); std::string dtd(s_dtd_string); strreplace(dtd, "__XML_ROOT__", XML_ROOT); strreplace(dtd, "__XML_TOP__", XML_TOP); fprintf(m_output, "%s\n\n", dtd.c_str()); } // top-level tag fprintf(m_output, "<%s build=\"%s\" debug=\"" #ifdef MAME_DEBUG "yes" #else "no" #endif "\" mameconfig=\"%d\">\n", XML_ROOT, util::xml::normalize_string(emulator_info::get_build_version()), CONFIG_VERSION); } //------------------------------------------------- // output_header - close the root element //------------------------------------------------- void info_xml_creator::output_footer() { // close the top level tag fprintf(m_output, "\n", XML_ROOT); } //------------------------------------------------- // output_one - print the XML information // for one particular game driver //------------------------------------------------- void info_xml_creator::output_one(driver_enumerator &drivlist, device_type_set *devtypes) { const game_driver &driver = drivlist.driver(); std::shared_ptr const config(drivlist.config()); device_iterator iter(config->root_device()); // allocate input ports and build overall emulation status ioport_list portlist; std::string errors; device_t::feature_type overall_unemulated(driver.type.unemulated_features()); device_t::feature_type overall_imperfect(driver.type.imperfect_features()); for (device_t &device : iter) { portlist.append(device, errors); overall_unemulated |= device.type().unemulated_features(); overall_imperfect |= device.type().imperfect_features(); if (devtypes && device.owner()) devtypes->insert(&device.type()); } // renumber player numbers for controller ports int player_offset = 0; // but treat keyboard count separately from players' number int kbd_offset = 0; for (device_t &device : iter) { int nplayers = 0; bool new_kbd = false; for (auto &port : portlist) if (&port.second->device() == &device) for (ioport_field &field : port.second->fields()) if (field.type() >= IPT_START && field.type() < IPT_ANALOG_LAST) { if (field.type() == IPT_KEYBOARD) { if (!new_kbd) new_kbd = true; field.set_player(field.player() + kbd_offset); } else { nplayers = std::max(nplayers, field.player() + 1); field.set_player(field.player() + player_offset); } } player_offset += nplayers; if (new_kbd) kbd_offset++; } // print the header and the machine name fprintf(m_output, "\t<%s name=\"%s\"", XML_TOP, util::xml::normalize_string(driver.name)); // strip away any path information from the source_file and output it const char *start = strrchr(driver.type.source(), '/'); if (!start) start = strrchr(driver.type.source(), '\\'); start = start ? (start + 1) : driver.type.source(); fprintf(m_output, " sourcefile=\"%s\"", util::xml::normalize_string(start)); // append bios and runnable flags if (driver.flags & machine_flags::IS_BIOS_ROOT) fprintf(m_output, " isbios=\"yes\""); if (driver.flags & machine_flags::MECHANICAL) fprintf(m_output, " ismechanical=\"yes\""); // display clone information int clone_of = drivlist.find(driver.parent); if (clone_of != -1 && !(drivlist.driver(clone_of).flags & machine_flags::IS_BIOS_ROOT)) fprintf(m_output, " cloneof=\"%s\"", util::xml::normalize_string(drivlist.driver(clone_of).name)); if (clone_of != -1) fprintf(m_output, " romof=\"%s\"", util::xml::normalize_string(drivlist.driver(clone_of).name)); // display sample information and close the game tag output_sampleof(config->root_device()); fprintf(m_output, ">\n"); // output game description if (driver.type.fullname() != nullptr) fprintf(m_output, "\t\t%s\n", util::xml::normalize_string(driver.type.fullname())); // print the year only if is a number or another allowed character (? or +) if (driver.year != nullptr && strspn(driver.year, "0123456789?+") == strlen(driver.year)) fprintf(m_output, "\t\t%s\n", util::xml::normalize_string(driver.year)); // print the manufacturer information if (driver.manufacturer != nullptr) fprintf(m_output, "\t\t%s\n", util::xml::normalize_string(driver.manufacturer)); // now print various additional information output_bios(config->root_device()); output_rom(&drivlist, config->root_device()); output_device_refs(config->root_device()); output_sample(config->root_device()); output_chips(config->root_device(), ""); output_display(config->root_device(), &drivlist.driver().flags, ""); output_sound(config->root_device()); output_input(portlist); output_switches(portlist, "", IPT_DIPSWITCH, "dipswitch", "diplocation", "dipvalue"); output_switches(portlist, "", IPT_CONFIG, "configuration", "conflocation", "confsetting"); output_ports(portlist); output_adjusters(portlist); output_driver(driver, overall_unemulated, overall_imperfect); output_features(driver.type, overall_unemulated, overall_imperfect); output_images(config->root_device(), ""); output_slots(*config, config->root_device(), "", devtypes); output_software_list(config->root_device()); output_ramoptions(config->root_device()); // close the topmost tag fprintf(m_output, "\t\n", XML_TOP); } //------------------------------------------------- // output_one_device - print the XML info for // a single device //------------------------------------------------- void info_xml_creator::output_one_device(machine_config &config, device_t &device, const char *devtag) { bool has_speaker = false, has_input = false; // check if the device adds speakers to the system sound_interface_iterator snditer(device); if (snditer.first() != nullptr) has_speaker = true; // generate input list and build overall emulation status ioport_list portlist; std::string errors; device_t::feature_type overall_unemulated(device.type().unemulated_features()); device_t::feature_type overall_imperfect(device.type().imperfect_features()); for (device_t &dev : device_iterator(device)) { portlist.append(dev, errors); overall_unemulated |= dev.type().unemulated_features(); overall_imperfect |= dev.type().imperfect_features(); } // check if the device adds player inputs (other than dsw and configs) to the system for (auto &port : portlist) for (ioport_field const &field : port.second->fields()) if (field.type() >= IPT_START1 && field.type() < IPT_UI_FIRST) { has_input = true; break; } // start to output info fprintf(m_output, "\t<%s name=\"%s\"", XML_TOP, util::xml::normalize_string(device.shortname())); std::string src(device.source()); strreplace(src,"../", ""); fprintf(m_output, " sourcefile=\"%s\" isdevice=\"yes\" runnable=\"no\"", util::xml::normalize_string(src.c_str())); output_sampleof(device); fprintf(m_output, ">\n\t\t%s\n", util::xml::normalize_string(device.name())); output_bios(device); output_rom(nullptr, device); output_device_refs(device); if (device.type().type() != typeid(samples_device)) // ignore samples_device itself output_sample(device); output_chips(device, devtag); output_display(device, nullptr, devtag); if (has_speaker) output_sound(device); if (has_input) output_input(portlist); output_switches(portlist, devtag, IPT_DIPSWITCH, "dipswitch", "diplocation", "dipvalue"); output_switches(portlist, devtag, IPT_CONFIG, "configuration", "conflocation", "confsetting"); output_adjusters(portlist); output_features(device.type(), overall_unemulated, overall_imperfect); output_images(device, devtag); output_slots(config, device, devtag, nullptr); fprintf(m_output, "\t\n", XML_TOP); } //------------------------------------------------- // output_devices - print the XML info for // registered device types //------------------------------------------------- void info_xml_creator::output_devices(device_type_set const *filter) { // get config for empty machine machine_config config(GAME_NAME(___empty), m_lookup_options); auto const action = [this, &config] (device_type type) { // add it at the root of the machine config device_t *dev; { machine_config::token const tok(config.begin_configuration(config.root_device())); dev = config.device_add("_tmp", type, 0); } // notify this device and all its subdevices that they are now configured for (device_t &device : device_iterator(*dev)) if (!device.configured()) device.config_complete(); // print details and remove it output_one_device(config, *dev, dev->tag()); machine_config::token const tok(config.begin_configuration(config.root_device())); config.device_remove("_tmp"); }; // run through devices if (filter) { for (std::add_pointer_t type : *filter) action(*type); } else { for (device_type type : registered_device_types) action(type); } } //------------------------------------------------ // output_device_refs - when a machine uses a // subdevice, print a reference //------------------------------------------------- void info_xml_creator::output_device_refs(device_t &root) { for (device_t &device : device_iterator(root)) if (&device != &root) fprintf(m_output, "\t\t\n", util::xml::normalize_string(device.shortname())); } //------------------------------------------------ // output_sampleof - print the 'sampleof' // attribute, if appropriate //------------------------------------------------- void info_xml_creator::output_sampleof(device_t &device) { // iterate over sample devices for (samples_device &samples : samples_device_iterator(device)) { samples_iterator sampiter(samples); if (sampiter.altbasename() != nullptr) { fprintf(m_output, " sampleof=\"%s\"", util::xml::normalize_string(sampiter.altbasename())); // must stop here, as there can only be one attribute of the same name return; } } } //------------------------------------------------- // output_bios - print BIOS sets for a device //------------------------------------------------- void info_xml_creator::output_bios(device_t const &device) { // first determine the default BIOS name char const *defaultname(nullptr); for (tiny_rom_entry const *rom = device.rom_region(); rom && !ROMENTRY_ISEND(rom); ++rom) { if (ROMENTRY_ISDEFAULT_BIOS(rom)) defaultname = rom->name; } // iterate over ROM entries and look for BIOSes for (romload::system_bios const &bios : romload::entries(device.rom_region()).get_system_bioses()) { // output extracted name and descriptions fprintf(m_output, "\t\t\n"); } } //------------------------------------------------- // output_rom - print the roms section of // the XML output //------------------------------------------------- void info_xml_creator::output_rom(driver_enumerator *drivlist, device_t &device) { enum class type { BIOS, NORMAL, DISK }; std::map biosnames; bool bios_scanned(false); auto const get_biosname = [&biosnames, &bios_scanned] (tiny_rom_entry const *rom) -> char const * { u32 const biosflags(ROM_GETBIOSFLAGS(rom)); std::map::const_iterator const found(biosnames.find(biosflags)); if (biosnames.end() != found) return found->second; char const *result(nullptr); if (!bios_scanned) { for (++rom; !ROMENTRY_ISEND(rom); ++rom) { if (ROMENTRY_ISSYSTEM_BIOS(rom)) { u32 const biosno(ROM_GETBIOSFLAGS(rom)); biosnames.emplace(biosno, rom->name); if (biosflags == biosno) result = rom->name; } } bios_scanned = true; } return result; }; auto const rom_file_size = // FIXME: need a common way to do this without the cost of allocating rom_entry [] (tiny_rom_entry const *romp) -> u32 { u32 maxlength = 0; // loop until we run out of reloads do { // loop until we run out of continues/ignores */ u32 curlength(ROM_GETLENGTH(romp++)); while (ROMENTRY_ISCONTINUE(romp) || ROMENTRY_ISIGNORE(romp)) curlength += ROM_GETLENGTH(romp++); // track the maximum length maxlength = (std::max)(maxlength, curlength); } while (ROMENTRY_ISRELOAD(romp)); return maxlength; }; // iterate over 3 different ROM "types": BIOS, ROMs, DISKs bool const do_merge_name = drivlist && dynamic_cast(&device); for (type pass : { type::BIOS, type::NORMAL, type::DISK }) { tiny_rom_entry const *region(nullptr); for (tiny_rom_entry const *rom = device.rom_region(); rom && !ROMENTRY_ISEND(rom); ++rom) { if (ROMENTRY_ISREGION(rom)) region = rom; else if (ROMENTRY_ISSYSTEM_BIOS(rom)) biosnames.emplace(ROM_GETBIOSFLAGS(rom), rom->name); if (!ROMENTRY_ISFILE(rom)) continue; // only list disks on the disk pass bool const is_disk = ROMREGION_ISDISKDATA(region); if ((type::DISK == pass) != is_disk) continue; // BIOS ROMs only apply to bioses // FIXME: disk images associated with a system BIOS will never be listed u32 const biosno(ROM_GETBIOSFLAGS(rom)); if ((type::BIOS == pass) != bool(biosno)) continue; char const *const bios_name((!is_disk && biosno) ? get_biosname(rom) : nullptr); // if we have a valid ROM and we are a clone, see if we can find the parent ROM util::hash_collection const hashes(rom->hashdata); char const *const merge_name((do_merge_name && !hashes.flag(util::hash_collection::FLAG_NO_DUMP)) ? get_merge_name(*drivlist, hashes) : nullptr); // opening tag fprintf(m_output, is_disk ? "\t\tname); if (name && name[0]) fprintf(m_output, " name=\"%s\"", util::xml::normalize_string(name)); if (merge_name) fprintf(m_output, " merge=\"%s\"", util::xml::normalize_string(merge_name)); if (bios_name) fprintf(m_output, " bios=\"%s\"", util::xml::normalize_string(bios_name)); if (!is_disk) fprintf(m_output, " size=\"%u\"", rom_file_size(rom)); // dump checksum information only if there is a known dump if (!hashes.flag(util::hash_collection::FLAG_NO_DUMP)) fprintf(m_output, " %s", hashes.attribute_string().c_str()); // iterate over hash function types and print m_output their values else fprintf(m_output, " status=\"nodump\""); // append a region name fprintf(m_output, " region=\"%s\"", region->name); if (!is_disk) { // for non-disk entries, print offset fprintf(m_output, " offset=\"%x\"", ROM_GETOFFSET(rom)); } else { // for disk entries, add the disk index fprintf(m_output, " index=\"%x\" writable=\"%s\"", DISK_GETINDEX(rom), DISK_ISREADONLY(rom) ? "no" : "yes"); } // add optional flag if (ROM_ISOPTIONAL(rom)) fprintf(m_output, " optional=\"yes\""); fprintf(m_output, "/>\n"); } bios_scanned = true; } } //------------------------------------------------- // output_sample - print a list of all // samples referenced by a game_driver //------------------------------------------------- void info_xml_creator::output_sample(device_t &device) { // iterate over sample devices for (samples_device &samples : samples_device_iterator(device)) { samples_iterator iter(samples); std::unordered_set already_printed; for (const char *samplename = iter.first(); samplename != nullptr; samplename = iter.next()) { // filter out duplicates if (!already_printed.insert(samplename).second) continue; // output the sample name fprintf(m_output, "\t\t\n", util::xml::normalize_string(samplename)); } } } /*------------------------------------------------- output_chips - print a list of CPU and sound chips used by a game -------------------------------------------------*/ void info_xml_creator::output_chips(device_t &device, const char *root_tag) { // iterate over executable devices for (device_execute_interface &exec : execute_interface_iterator(device)) { if (strcmp(exec.device().tag(), device.tag())) { std::string newtag(exec.device().tag()), oldtag(":"); newtag = newtag.substr(newtag.find(oldtag.append(root_tag)) + oldtag.length()); fprintf(m_output, "\t\t\n"); } } // iterate over sound devices for (device_sound_interface &sound : sound_interface_iterator(device)) { if (strcmp(sound.device().tag(), device.tag()) != 0 && sound.issound()) { std::string newtag(sound.device().tag()), oldtag(":"); newtag = newtag.substr(newtag.find(oldtag.append(root_tag)) + oldtag.length()); fprintf(m_output, "\t\t\n"); } } } //------------------------------------------------- // output_display - print a list of all the // displays //------------------------------------------------- void info_xml_creator::output_display(device_t &device, machine_flags::type const *flags, const char *root_tag) { // iterate over screens for (const screen_device &screendev : screen_device_iterator(device)) { if (strcmp(screendev.tag(), device.tag())) { std::string newtag(screendev.tag()), oldtag(":"); newtag = newtag.substr(newtag.find(oldtag.append(root_tag)) + oldtag.length()); fprintf(m_output, "\t\t\n"); } } } //------------------------------------------------- // output_sound - print a list of all the // speakers //------------------------------------------------ void info_xml_creator::output_sound(device_t &device) { speaker_device_iterator spkiter(device); int speakers = spkiter.count(); // if we have no sound, zero m_output the speaker count sound_interface_iterator snditer(device); if (snditer.first() == nullptr) speakers = 0; fprintf(m_output, "\t\t\n", speakers); } //------------------------------------------------- // output_ioport_condition - print condition // required to use I/O port field/setting //------------------------------------------------- void info_xml_creator::output_ioport_condition(const ioport_condition &condition, unsigned indent) { for (unsigned i = 0; indent > i; ++i) fprintf(m_output, "\t"); char const *rel(nullptr); switch (condition.condition()) { case ioport_condition::ALWAYS: throw false; case ioport_condition::EQUALS: rel = "eq"; break; case ioport_condition::NOTEQUALS: rel = "ne"; break; case ioport_condition::GREATERTHAN: rel = "gt"; break; case ioport_condition::NOTGREATERTHAN: rel = "le"; break; case ioport_condition::LESSTHAN: rel = "lt"; break; case ioport_condition::NOTLESSTHAN: rel = "ge"; break; } fprintf(m_output,"\n", util::xml::normalize_string(condition.tag()), condition.mask(), rel, condition.value()); } //------------------------------------------------- // output_input - print a summary of a game's // input //------------------------------------------------- void info_xml_creator::output_input(const ioport_list &portlist) { // enumerated list of control types // NOTE: the order is chosen so that 'spare' button inputs are assigned to the // most-likely-correct input device when info is output (you can think of it as // a sort of likelihood order of having buttons) enum { CTRL_DIGITAL_BUTTONS, CTRL_DIGITAL_JOYSTICK, CTRL_ANALOG_JOYSTICK, CTRL_ANALOG_LIGHTGUN, CTRL_ANALOG_DIAL, CTRL_ANALOG_POSITIONAL, CTRL_ANALOG_TRACKBALL, CTRL_ANALOG_MOUSE, CTRL_ANALOG_PADDLE, CTRL_ANALOG_PEDAL, CTRL_DIGITAL_KEYPAD, CTRL_DIGITAL_KEYBOARD, CTRL_DIGITAL_MAHJONG, CTRL_DIGITAL_HANAFUDA, CTRL_DIGITAL_GAMBLING, CTRL_COUNT }; enum { CTRL_P1, CTRL_P2, CTRL_P3, CTRL_P4, CTRL_P5, CTRL_P6, CTRL_P7, CTRL_P8, CTRL_P9, CTRL_P10, CTRL_PCOUNT }; // directions const uint8_t DIR_UP = 0x01; const uint8_t DIR_DOWN = 0x02; const uint8_t DIR_LEFT = 0x04; const uint8_t DIR_RIGHT = 0x08; // initialize the list of control types struct { const char * type; // general type of input int player; // player which the input belongs to int nbuttons; // total number of buttons int reqbuttons; // total number of non-optional buttons int maxbuttons; // max index of buttons (using IPT_BUTTONn) [probably to be removed soonish] int ways; // directions for joystick bool analog; // is analog input? uint8_t helper[3]; // for dual joysticks [possibly to be removed soonish] int32_t min; // analog minimum value int32_t max; // analog maximum value int32_t sensitivity; // default analog sensitivity int32_t keydelta; // default analog keydelta bool reverse; // default analog reverse setting } control_info[CTRL_COUNT * CTRL_PCOUNT]; memset(&control_info, 0, sizeof(control_info)); // tracking info as we iterate int nplayer = 0; int ncoin = 0; bool service = false; bool tilt = false; // iterate over the ports for (auto &port : portlist) { int ctrl_type = CTRL_DIGITAL_BUTTONS; bool ctrl_analog = false; for (ioport_field &field : port.second->fields()) { // track the highest player number if (nplayer < field.player() + 1) nplayer = field.player() + 1; // switch off of the type switch (field.type()) { // map joysticks case IPT_JOYSTICK_UP: ctrl_type = CTRL_DIGITAL_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "joy"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].ways = field.way(); control_info[field.player() * CTRL_COUNT + ctrl_type].helper[0] |= DIR_UP; break; case IPT_JOYSTICK_DOWN: ctrl_type = CTRL_DIGITAL_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "joy"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].ways = field.way(); control_info[field.player() * CTRL_COUNT + ctrl_type].helper[0] |= DIR_DOWN; break; case IPT_JOYSTICK_LEFT: ctrl_type = CTRL_DIGITAL_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "joy"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].ways = field.way(); control_info[field.player() * CTRL_COUNT + ctrl_type].helper[0] |= DIR_LEFT; break; case IPT_JOYSTICK_RIGHT: ctrl_type = CTRL_DIGITAL_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "joy"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].ways = field.way(); control_info[field.player() * CTRL_COUNT + ctrl_type].helper[0] |= DIR_RIGHT; break; case IPT_JOYSTICKLEFT_UP: ctrl_type = CTRL_DIGITAL_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "joy"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].ways = field.way(); control_info[field.player() * CTRL_COUNT + ctrl_type].helper[1] |= DIR_UP; break; case IPT_JOYSTICKLEFT_DOWN: ctrl_type = CTRL_DIGITAL_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "joy"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].ways = field.way(); control_info[field.player() * CTRL_COUNT + ctrl_type].helper[1] |= DIR_DOWN; break; case IPT_JOYSTICKLEFT_LEFT: ctrl_type = CTRL_DIGITAL_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "joy"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].ways = field.way(); control_info[field.player() * CTRL_COUNT + ctrl_type].helper[1] |= DIR_LEFT; break; case IPT_JOYSTICKLEFT_RIGHT: ctrl_type = CTRL_DIGITAL_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "joy"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].ways = field.way(); control_info[field.player() * CTRL_COUNT + ctrl_type].helper[1] |= DIR_RIGHT; break; case IPT_JOYSTICKRIGHT_UP: ctrl_type = CTRL_DIGITAL_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "joy"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].ways = field.way(); control_info[field.player() * CTRL_COUNT + ctrl_type].helper[2] |= DIR_UP; break; case IPT_JOYSTICKRIGHT_DOWN: ctrl_type = CTRL_DIGITAL_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "joy"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].ways = field.way(); control_info[field.player() * CTRL_COUNT + ctrl_type].helper[2] |= DIR_DOWN; break; case IPT_JOYSTICKRIGHT_LEFT: ctrl_type = CTRL_DIGITAL_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "joy"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].ways = field.way(); control_info[field.player() * CTRL_COUNT + ctrl_type].helper[2] |= DIR_LEFT; break; case IPT_JOYSTICKRIGHT_RIGHT: ctrl_type = CTRL_DIGITAL_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "joy"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].ways = field.way(); control_info[field.player() * CTRL_COUNT + ctrl_type].helper[2] |= DIR_RIGHT; break; // map analog inputs case IPT_AD_STICK_X: case IPT_AD_STICK_Y: case IPT_AD_STICK_Z: ctrl_analog = true; ctrl_type = CTRL_ANALOG_JOYSTICK; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "stick"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].analog = true; break; case IPT_PADDLE: case IPT_PADDLE_V: ctrl_analog = true; ctrl_type = CTRL_ANALOG_PADDLE; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "paddle"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].analog = true; break; case IPT_PEDAL: case IPT_PEDAL2: case IPT_PEDAL3: ctrl_analog = true; ctrl_type = CTRL_ANALOG_PEDAL; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "pedal"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].analog = true; break; case IPT_LIGHTGUN_X: case IPT_LIGHTGUN_Y: ctrl_analog = true; ctrl_type = CTRL_ANALOG_LIGHTGUN; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "lightgun"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].analog = true; break; case IPT_POSITIONAL: case IPT_POSITIONAL_V: ctrl_analog = true; ctrl_type = CTRL_ANALOG_POSITIONAL; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "positional"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].analog = true; break; case IPT_DIAL: case IPT_DIAL_V: ctrl_analog = true; ctrl_type = CTRL_ANALOG_DIAL; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "dial"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].analog = true; break; case IPT_TRACKBALL_X: case IPT_TRACKBALL_Y: ctrl_analog = true; ctrl_type = CTRL_ANALOG_TRACKBALL; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "trackball"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].analog = true; break; case IPT_MOUSE_X: case IPT_MOUSE_Y: ctrl_analog = true; ctrl_type = CTRL_ANALOG_MOUSE; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "mouse"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].analog = true; break; // map buttons case IPT_BUTTON1: case IPT_BUTTON2: case IPT_BUTTON3: case IPT_BUTTON4: case IPT_BUTTON5: case IPT_BUTTON6: case IPT_BUTTON7: case IPT_BUTTON8: case IPT_BUTTON9: case IPT_BUTTON10: case IPT_BUTTON11: case IPT_BUTTON12: case IPT_BUTTON13: case IPT_BUTTON14: case IPT_BUTTON15: case IPT_BUTTON16: ctrl_analog = false; if (control_info[field.player() * CTRL_COUNT + ctrl_type].type == nullptr) { control_info[field.player() * CTRL_COUNT + ctrl_type].type = "only_buttons"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].analog = false; } control_info[field.player() * CTRL_COUNT + ctrl_type].maxbuttons = std::max(control_info[field.player() * CTRL_COUNT + ctrl_type].maxbuttons, field.type() - IPT_BUTTON1 + 1); control_info[field.player() * CTRL_COUNT + ctrl_type].nbuttons++; if (!field.optional()) control_info[field.player() * CTRL_COUNT + ctrl_type].reqbuttons++; break; // track maximum coin index case IPT_COIN1: case IPT_COIN2: case IPT_COIN3: case IPT_COIN4: case IPT_COIN5: case IPT_COIN6: case IPT_COIN7: case IPT_COIN8: case IPT_COIN9: case IPT_COIN10: case IPT_COIN11: case IPT_COIN12: ncoin = std::max(ncoin, field.type() - IPT_COIN1 + 1); break; // track presence of keypads and keyboards case IPT_KEYPAD: ctrl_type = CTRL_DIGITAL_KEYPAD; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "keypad"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].nbuttons++; if (!field.optional()) control_info[field.player() * CTRL_COUNT + ctrl_type].reqbuttons++; break; case IPT_KEYBOARD: ctrl_type = CTRL_DIGITAL_KEYBOARD; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "keyboard"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].nbuttons++; if (!field.optional()) control_info[field.player() * CTRL_COUNT + ctrl_type].reqbuttons++; break; // additional types case IPT_SERVICE: service = true; break; case IPT_TILT: tilt = true; break; default: if (field.type() > IPT_MAHJONG_FIRST && field.type() < IPT_MAHJONG_LAST) { ctrl_type = CTRL_DIGITAL_MAHJONG; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "mahjong"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].nbuttons++; if (!field.optional()) control_info[field.player() * CTRL_COUNT + ctrl_type].reqbuttons++; } else if (field.type() > IPT_HANAFUDA_FIRST && field.type() < IPT_HANAFUDA_LAST) { ctrl_type = CTRL_DIGITAL_HANAFUDA; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "hanafuda"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].nbuttons++; if (!field.optional()) control_info[field.player() * CTRL_COUNT + ctrl_type].reqbuttons++; } else if (field.type() > IPT_GAMBLING_FIRST && field.type() < IPT_GAMBLING_LAST) { ctrl_type = CTRL_DIGITAL_GAMBLING; control_info[field.player() * CTRL_COUNT + ctrl_type].type = "gambling"; control_info[field.player() * CTRL_COUNT + ctrl_type].player = field.player() + 1; control_info[field.player() * CTRL_COUNT + ctrl_type].nbuttons++; if (!field.optional()) control_info[field.player() * CTRL_COUNT + ctrl_type].reqbuttons++; } break; } if (ctrl_analog) { // get the analog stats if (field.minval() != 0) control_info[field.player() * CTRL_COUNT + ctrl_type].min = field.minval(); if (field.maxval() != 0) control_info[field.player() * CTRL_COUNT + ctrl_type].max = field.maxval(); if (field.sensitivity() != 0) control_info[field.player() * CTRL_COUNT + ctrl_type].sensitivity = field.sensitivity(); if (field.delta() != 0) control_info[field.player() * CTRL_COUNT + ctrl_type].keydelta = field.delta(); if (field.analog_reverse() != 0) control_info[field.player() * CTRL_COUNT + ctrl_type].reverse = true; } } } // Clean-up those entries, if any, where buttons were defined in a separate port than the actual controller they belong to. // This is quite often the case, especially for arcades where controls can be easily mapped to separate input ports on PCB. // If such situation would only happen for joystick, it would be possible to work it around by initializing differently // ctrl_type above, but it is quite common among analog inputs as well (for instance, this is the tipical situation // for lightguns) and therefore we really need this separate loop. for (int i = 0; i < CTRL_PCOUNT; i++) { bool fix_done = false; for (int j = 1; j < CTRL_COUNT; j++) if (control_info[i * CTRL_COUNT].type != nullptr && control_info[i * CTRL_COUNT + j].type != nullptr && !fix_done) { control_info[i * CTRL_COUNT + j].nbuttons += control_info[i * CTRL_COUNT].nbuttons; control_info[i * CTRL_COUNT + j].reqbuttons += control_info[i * CTRL_COUNT].reqbuttons; control_info[i * CTRL_COUNT + j].maxbuttons = std::max(control_info[i * CTRL_COUNT + j].maxbuttons, control_info[i * CTRL_COUNT].maxbuttons); memset(&control_info[i * CTRL_COUNT], 0, sizeof(control_info[0])); fix_done = true; } } // Output the input info // First basic info fprintf(m_output, "\t\t\n"); // Then controller specific ones for (auto & elem : control_info) if (elem.type != nullptr) { //printf("type %s - player %d - buttons %d\n", elem.type, elem.player, elem.nbuttons); if (elem.analog) { fprintf(m_output, "\t\t\t 1) fprintf(m_output, " player=\"%d\"", elem.player); if (elem.nbuttons > 0) { fprintf(m_output, " buttons=\"%d\"", strcmp(elem.type, "stick") ? elem.nbuttons : elem.maxbuttons); if (elem.reqbuttons < elem.nbuttons) fprintf(m_output, " reqbuttons=\"%d\"", elem.reqbuttons); } if (elem.min != 0 || elem.max != 0) fprintf(m_output, " minimum=\"%d\" maximum=\"%d\"", elem.min, elem.max); if (elem.sensitivity != 0) fprintf(m_output, " sensitivity=\"%d\"", elem.sensitivity); if (elem.keydelta != 0) fprintf(m_output, " keydelta=\"%d\"", elem.keydelta); if (elem.reverse) fprintf(m_output, " reverse=\"yes\""); fprintf(m_output, "/>\n"); } else { if (elem.helper[1] == 0 && elem.helper[2] != 0) { elem.helper[1] = elem.helper[2]; elem.helper[2] = 0; } if (elem.helper[0] == 0 && elem.helper[1] != 0) { elem.helper[0] = elem.helper[1]; elem.helper[1] = 0; } if (elem.helper[1] == 0 && elem.helper[2] != 0) { elem.helper[1] = elem.helper[2]; elem.helper[2] = 0; } const char *joys = (elem.helper[2] != 0) ? "triple" : (elem.helper[1] != 0) ? "double" : ""; fprintf(m_output, "\t\t\t 1) fprintf(m_output, " player=\"%d\"", elem.player); if (elem.nbuttons > 0) { fprintf(m_output, " buttons=\"%d\"", strcmp(elem.type, "joy") ? elem.nbuttons : elem.maxbuttons); if (elem.reqbuttons < elem.nbuttons) fprintf(m_output, " reqbuttons=\"%d\"", elem.reqbuttons); } for (int lp = 0; lp < 3 && elem.helper[lp] != 0; lp++) { const char *plural = (lp==2) ? "3" : (lp==1) ? "2" : ""; const char *ways; std::string helper; switch (elem.helper[lp] & (DIR_UP | DIR_DOWN | DIR_LEFT | DIR_RIGHT)) { case DIR_UP | DIR_DOWN | DIR_LEFT | DIR_RIGHT: helper = string_format("%d", (elem.ways == 0) ? 8 : elem.ways); ways = helper.c_str(); break; case DIR_LEFT | DIR_RIGHT: ways = "2"; break; case DIR_UP | DIR_DOWN: ways = "vertical2"; break; case DIR_UP: case DIR_DOWN: case DIR_LEFT: case DIR_RIGHT: ways = "1"; break; case DIR_UP | DIR_DOWN | DIR_LEFT: case DIR_UP | DIR_DOWN | DIR_RIGHT: case DIR_UP | DIR_LEFT | DIR_RIGHT: case DIR_DOWN | DIR_LEFT | DIR_RIGHT: ways = (elem.ways == 4) ? "3 (half4)" : "5 (half8)"; break; default: ways = "strange2"; break; } fprintf(m_output, " ways%s=\"%s\"", plural, ways); } fprintf(m_output, "/>\n"); } } fprintf(m_output, "\t\t\n"); } //------------------------------------------------- // output_switches - print the configurations or // DIP switch settings //------------------------------------------------- void info_xml_creator::output_switches(const ioport_list &portlist, const char *root_tag, int type, const char *outertag, const char *loctag, const char *innertag) { // iterate looking for DIP switches for (auto &port : portlist) for (ioport_field const &field : port.second->fields()) if (field.type() == type) { std::string newtag(port.second->tag()), oldtag(":"); newtag = newtag.substr(newtag.find(oldtag.append(root_tag)) + oldtag.length()); // output the switch name information std::string const normalized_field_name(util::xml::normalize_string(field.name())); std::string const normalized_newtag(util::xml::normalize_string(newtag.c_str())); fprintf(m_output, "\t\t<%s name=\"%s\" tag=\"%s\" mask=\"%u\">\n", outertag, normalized_field_name.c_str(), normalized_newtag.c_str(), field.mask()); if (!field.condition().none()) output_ioport_condition(field.condition(), 3); // loop over locations for (ioport_diplocation const &diploc : field.diplocations()) { fprintf(m_output, "\t\t\t<%s name=\"%s\" number=\"%u\"", loctag, util::xml::normalize_string(diploc.name()), diploc.number()); if (diploc.inverted()) fprintf(m_output, " inverted=\"yes\""); fprintf(m_output, "/>\n"); } // loop over settings for (ioport_setting const &setting : field.settings()) { fprintf(m_output, "\t\t\t<%s name=\"%s\" value=\"%u\"", innertag, util::xml::normalize_string(setting.name()), setting.value()); if (setting.value() == field.defvalue()) fprintf(m_output, " default=\"yes\""); if (setting.condition().none()) { fprintf(m_output, "/>\n"); } else { fprintf(m_output, ">\n"); output_ioport_condition(setting.condition(), 4); fprintf(m_output, "\t\t\t\n", innertag); } } // terminate the switch entry fprintf(m_output, "\t\t\n", outertag); } } //------------------------------------------------- // output_ports - print the structure of input // ports in the driver //------------------------------------------------- void info_xml_creator::output_ports(const ioport_list &portlist) { // cycle through ports for (auto &port : portlist) { fprintf(m_output,"\t\t\n", util::xml::normalize_string(port.second->tag())); for (ioport_field const &field : port.second->fields()) { if (field.is_analog()) fprintf(m_output,"\t\t\t\n", field.mask()); } fprintf(m_output,"\t\t\n"); } } //------------------------------------------------- // output_adjusters - print the Analog // Adjusters for a game //------------------------------------------------- void info_xml_creator::output_adjusters(const ioport_list &portlist) { // iterate looking for Adjusters for (auto &port : portlist) for (ioport_field const &field : port.second->fields()) if (field.type() == IPT_ADJUSTER) { fprintf(m_output, "\t\t\n", util::xml::normalize_string(field.name()), field.defvalue()); } } //------------------------------------------------- // output_driver - print driver status //------------------------------------------------- void info_xml_creator::output_driver(game_driver const &driver, device_t::feature_type unemulated, device_t::feature_type imperfect) { fprintf(m_output, "\t\t\n"); } //------------------------------------------------- // output_features - print emulation features of // //------------------------------------------------- void info_xml_creator::output_features(device_type type, device_t::feature_type unemulated, device_t::feature_type imperfect) { static constexpr std::pair features[] = { { device_t::feature::PROTECTION, "protection" }, { device_t::feature::PALETTE, "palette" }, { device_t::feature::GRAPHICS, "graphics" }, { device_t::feature::SOUND, "sound" }, { device_t::feature::CONTROLS, "controls" }, { device_t::feature::KEYBOARD, "keyboard" }, { device_t::feature::MOUSE, "mouse" }, { device_t::feature::MICROPHONE, "microphone" }, { device_t::feature::CAMERA, "camera" }, { device_t::feature::DISK, "disk" }, { device_t::feature::PRINTER, "printer" }, { device_t::feature::LAN, "lan" }, { device_t::feature::WAN, "wan" }, { device_t::feature::TIMING, "timing" } }; device_t::feature_type const flags(type.unemulated_features() | type.imperfect_features() | unemulated | imperfect); for (auto const &feature : features) { if (flags & feature.first) { fprintf(m_output, "\t\t\n"); } } } //------------------------------------------------- // output_images - prints m_output all info on // image devices //------------------------------------------------- void info_xml_creator::output_images(device_t &device, const char *root_tag) { for (const device_image_interface &imagedev : image_interface_iterator(device)) { if (strcmp(imagedev.device().tag(), device.tag())) { bool loadable = imagedev.user_loadable(); std::string newtag(imagedev.device().tag()), oldtag(":"); newtag = newtag.substr(newtag.find(oldtag.append(root_tag)) + oldtag.length()); // print m_output device type fprintf(m_output, "\t\t\n"); if (loadable) { const char *name = imagedev.instance_name().c_str(); const char *shortname = imagedev.brief_instance_name().c_str(); fprintf(m_output, "\t\t\t\n"); std::string extensions(imagedev.file_extensions()); char *ext = strtok((char *)extensions.c_str(), ","); while (ext != nullptr) { fprintf(m_output, "\t\t\t\n", util::xml::normalize_string(ext)); ext = strtok(nullptr, ","); } } fprintf(m_output, "\t\t\n"); } } } //------------------------------------------------- // output_slots - prints all info about slots //------------------------------------------------- void info_xml_creator::output_slots(machine_config &config, device_t &device, const char *root_tag, device_type_set *devtypes) { for (device_slot_interface &slot : slot_interface_iterator(device)) { // shall we list fixed slots as non-configurable? bool const listed(!slot.fixed() && strcmp(slot.device().tag(), device.tag())); if (devtypes || listed) { machine_config::token const tok(config.begin_configuration(slot.device())); std::string newtag(slot.device().tag()), oldtag(":"); newtag = newtag.substr(newtag.find(oldtag.append(root_tag)) + oldtag.length()); // print m_output device type if (listed) fprintf(m_output, "\t\t\n", util::xml::normalize_string(newtag.c_str())); for (auto &option : slot.option_list()) { if (devtypes || (listed && option.second->selectable())) { device_t *const dev = config.device_add("_dummy", option.second->devtype(), option.second->clock()); if (!dev->configured()) dev->config_complete(); if (devtypes) for (device_t &subdevice : device_iterator(*dev)) devtypes->insert(&subdevice.type()); if (listed && option.second->selectable()) { fprintf(m_output, "\t\t\tname())); fprintf(m_output, " devname=\"%s\"", util::xml::normalize_string(dev->shortname())); if (slot.default_option() != nullptr && strcmp(slot.default_option(), option.second->name())==0) fprintf(m_output, " default=\"yes\""); fprintf(m_output, "/>\n"); } config.device_remove("_dummy"); } } if (listed) fprintf(m_output, "\t\t\n"); } } } //------------------------------------------------- // output_software_list - print the information // for all known software lists for this system //------------------------------------------------- void info_xml_creator::output_software_list(device_t &root) { for (const software_list_device &swlist : software_list_device_iterator(root)) { fprintf(m_output, "\t\t\n"); } } //------------------------------------------------- // output_ramoptions - prints m_output all RAM // options for this system //------------------------------------------------- void info_xml_creator::output_ramoptions(device_t &root) { for (const ram_device &ram : ram_device_iterator(root, 1)) { if (!std::strcmp(ram.tag(), ":" RAM_TAG)) { uint32_t const defsize(ram.default_size()); bool havedefault(false); for (ram_device::extra_option const &option : ram.extra_options()) { if (defsize == option.second) { assert(!havedefault); havedefault = true; fprintf(m_output, "\t\t%u\n", util::xml::normalize_string(option.first.c_str()), option.second); } else { fprintf(m_output, "\t\t%u\n", util::xml::normalize_string(option.first.c_str()), option.second); } } if (!havedefault) fprintf(m_output, "\t\t%u\n", ram.default_size_string(), defsize); break; } } } //------------------------------------------------- // get_merge_name - get the rom name from a // parent set //------------------------------------------------- const char *info_xml_creator::get_merge_name(driver_enumerator &drivlist, util::hash_collection const &romhashes) { // walk the parent chain for (int clone_of = drivlist.find(drivlist.driver().parent); 0 <= clone_of; clone_of = drivlist.find(drivlist.driver(clone_of).parent)) { // look in the parent's ROMs for (romload::region const &pregion : romload::entries(drivlist.driver(clone_of).rom).get_regions()) { for (romload::file const &prom : pregion.get_files()) { // stop when we find a match util::hash_collection const phashes(prom.get_hashdata()); if (!phashes.flag(util::hash_collection::FLAG_NO_DUMP) && (romhashes == phashes)) return prom.get_name(); } } } return nullptr; }