random_house_generator.c

Go to the documentation of this file.

/*
 * Crossfire -- cooperative multi-player graphical RPG and adventure game
 *
 * Copyright (c) 1999-2021 The Crossfire Development Team
 *
 * Crossfire is free software and comes with ABSOLUTELY NO WARRANTY. You are
 * welcome to redistribute it under certain conditions. For details, please
 * see COPYING and LICENSE.
 *
 * The authors can be reached via e-mail at <crossfire@metalforge.org>.
 */
 
#include <stdarg.h>
#include <assert.h>
#include <string.h>
 
#include "global.h"
#include "object.h"
#include "sproto.h"
 
typedef struct house_zone_struct {
    const char *mappath;        
    const char *monsterstyle;   
} house_zone_struct;
 
static const house_zone_struct zones[] = {
    /* Scorn */
    { "/world/world_104_115", "city" },
    { "/world/world_105_115", "city" },
    { "/world/world_104_116", "city" },
    { "/world/world_105_116", "city" },
    /* Navar */
    { "/world/world_122_116", "city" },
    { "/world/world_121_116", "city" },
    { "/world/world_122_117", "city" },
    { "/world/world_121_117", "city" },
    { NULL, NULL }
};
 
static const house_zone_struct *get_map_zone(const mapstruct *map) {
    int zone;
 
    for (zone = 0; zones[zone].mappath != NULL; zone++) {
        if (strcmp(zones[zone].mappath, map->path) == 0)
            return &zones[zone];
    }
 
    return NULL;
}
 
static int is_suitable_exit(object *exit) {
    assert(exit);
 
    if (exit->type != EXIT)
        return 0;
    if (exit->slaying || exit->msg)
        return 0;
 
    return 1;
}
 
static int get_exit_seed(const object *exit, const mapstruct *map) {
    char r[500];
    int seed = 0, len, w = 0;
 
    snprintf(r, sizeof(r), "%s!%d,%d*%s", exit->arch->name, exit->x, exit->y, map->path);
 
    len = strlen(r)-1;
    while (len >= 0) {
        seed ^= ((int)r[len])<<w;
        w += 8;
        w = w%32;
        len--;
    }
 
    return seed;
}
 
static void add_exit_to_item(object *exit, const house_zone_struct *zone, const mapstruct *map) {
    char params[MAX_BUF];
 
    assert(exit);
    assert(zone);
 
    snprintf(params, sizeof(params), "layoutstyle onion\n"
        "floorstyle indoor\n"
        "wallstyle wooden\n"
        "monsterstyle %s\n"
        "dungeon_level 1\n"
        "dungeon_depth 1\n"
        "decorstyle furniture\n"
        "random_seed %d\n",
        zone->monsterstyle,
        get_exit_seed(exit, map));
 
    exit->slaying = add_string("/!");
    exit->msg = add_string(params);
}
 
static void add_exits_to_map(const mapstruct *map) {
    int x, y;
    const house_zone_struct *zone = get_map_zone(map);
 
    if (!zone)
        return;
 
    for (x = 0; x < MAP_WIDTH(map); x++) {
        for (y = 0; y < MAP_HEIGHT(map); y++) {
            FOR_MAP_PREPARE(map, x, y, item) {
                if (is_suitable_exit(item))
                    add_exit_to_item(item, zone, map);
            } FOR_MAP_FINISH();
        }
    }
}
 
static int cfrhg_globalEventListener(int *type, ...) {
    va_list args;
    int rv = 0;
    mapstruct *map;
    int code;
 
    va_start(args, type);
    code = va_arg(args, int);
 
    switch (code) {
    case EVENT_MAPLOAD:
        map = va_arg(args, mapstruct *);
        add_exits_to_map(map);
        break;
    }
    va_end(args);
 
    return rv;
}
 
static event_registration eg;
 
void random_house_generator_init(Settings *settings) {
    eg = events_register_global_handler(EVENT_MAPLOAD, cfrhg_globalEventListener);
 
    /* Disable the plugin in case it's still there */
    linked_char *disable = calloc(1, sizeof(linked_char));
    disable->next = settings->disabled_plugins;
    disable->name = strdup("cfrhg");
    settings->disabled_plugins = disable;
}
 
void random_house_generator_close() {
    events_unregister_global_handler(EVENT_MAPLOAD, eg);
}