olc_save.c File Reference

#include <sys/types.h>
#include <ctype.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include "merc.h"
#include "tables.h"
#include "olc.h"

Include dependency graph for olc_save.c:

Go to the source code of this file.

Defines
#define	DIF(a, b)   (~((~a)|(b)))
Functions
void	do_asave (CHAR_DATA *ch, char *argument)
char *	fix_string (const char *str)
char *	fwrite_flag (long flags, char buf[])
void	save_area (AREA_DATA *pArea)
void	save_area_list ()
void	save_door_resets (FILE *fp, AREA_DATA *pArea)
void	save_helps ()
void	save_mobile (FILE *fp, MOB_INDEX_DATA *pMobIndex)
void	save_mobiles (FILE *fp, AREA_DATA *pArea)
void	save_mobprogs (FILE *fp, AREA_DATA *pArea)
void	save_object (FILE *fp, OBJ_INDEX_DATA *pObjIndex)
void	save_objects (FILE *fp, AREA_DATA *pArea)
void	save_resets (FILE *fp, AREA_DATA *pArea)
void	save_rooms (FILE *fp, AREA_DATA *pArea)
void	save_shops (FILE *fp, AREA_DATA *pArea)
void	save_specials (FILE *fp, AREA_DATA *pArea)

---

Define Documentation

#define DIF (  a, b   )     (~((~a)|(b)))

Definition at line 36 of file olc_save.c. Referenced by save_mobile().

---

Function Documentation

void do_asave (  CHAR_DATA *  ch, char *  argument )

Definition at line 996 of file olc_save.c. References AREA_CHANGED, area_first, area_data::area_flags, ED_AREA, ED_HELP, ED_MOBILE, ED_NONE, ED_OBJECT, ED_ROOM, area_data::file_name, get_area_data(), IS_BUILDER, IS_NPC, is_number(), IS_SET, log_string(), MAX_INPUT_LENGTH, area_data::name, area_data::next, REMOVE_BIT, save_area(), save_area_list(), save_helps(), send_to_char(), smash_tilde(), and str_cmp(). { char arg1[MAX_INPUT_LENGTH]; AREA_DATA *pArea; FILE *fp; int value, sec; fp = NULL; if (!ch) /* Do an autosave */ sec = 9; else if (!IS_NPC (ch)) sec = ch->pcdata->security; else sec = 0; /* { save_area_list(); for( pArea = area_first; pArea; pArea = pArea->next ) { save_area( pArea ); REMOVE_BIT( pArea->area_flags, AREA_CHANGED ); } return; } */ smash_tilde (argument); strcpy (arg1, argument); if (arg1[0] == '\0') { if (ch) { send_to_char ("Syntax:\n\r", ch); send_to_char (" asave <vnum> - saves a particular area\n\r", ch); send_to_char (" asave list - saves the area.lst file\n\r", ch); send_to_char (" asave area - saves the area being edited\n\r", ch); send_to_char (" asave changed - saves all changed zones\n\r", ch); send_to_char (" asave world - saves the world! (db dump)\n\r", ch); send_to_char( " asave helps - saves the help files\n\r", ch ); send_to_char ("\n\r", ch); } return; } /* Snarf the value (which need not be numeric). */ value = atoi (arg1); if (!(pArea = get_area_data (value)) && is_number (arg1)) { if (ch) send_to_char ("That area does not exist.\n\r", ch); return; } /* Save area of given vnum. */ /* ------------------------ */ if (is_number (arg1)) { if (ch && !IS_BUILDER (ch, pArea)) { send_to_char ("You are not a builder for this area.\n\r", ch); return; } save_area_list (); save_area (pArea); return; } /* Save the world, only authorized areas. */ /* -------------------------------------- */ if (!str_cmp ("world", arg1)) { save_area_list (); for (pArea = area_first; pArea; pArea = pArea->next) { /* Builder must be assigned this area. */ if (ch && !IS_BUILDER (ch, pArea)) continue; save_area (pArea); REMOVE_BIT (pArea->area_flags, AREA_CHANGED); } if (ch) send_to_char ("You saved the world.\n\r", ch); //save_other_helps (NULL); return; } /* Save changed areas, only authorized areas. */ /* ------------------------------------------ */ if (!str_cmp ("changed", arg1)) { char buf[MAX_INPUT_LENGTH]; save_area_list (); if (ch) send_to_char ("Saved zones:\n\r", ch); else log_string ("Saved zones:"); sprintf (buf, "None.\n\r"); for (pArea = area_first; pArea; pArea = pArea->next) { /* Builder must be assigned this area. */ if (ch && !IS_BUILDER (ch, pArea)) continue; /* Save changed areas. */ if (IS_SET (pArea->area_flags, AREA_CHANGED)) { save_area (pArea); sprintf (buf, "%24s - '%s'", pArea->name, pArea->file_name); if (ch) { send_to_char (buf, ch); send_to_char ("\n\r", ch); } else log_string (buf); REMOVE_BIT (pArea->area_flags, AREA_CHANGED); } } //save_other_helps (ch); if (!str_cmp (buf, "None.\n\r")) { if (ch) send_to_char (buf, ch); else log_string ("None."); } return; } /* Save the area.lst file. */ /* ----------------------- */ if (!str_cmp (arg1, "list")) { save_area_list (); return; } /* Save area being edited, if authorized. */ /* -------------------------------------- */ if (!str_cmp (arg1, "area")) { if (!ch || !ch->desc) return; /* Is character currently editing. */ if (ch->desc->editor == ED_NONE) { send_to_char ("You are not editing an area, " "therefore an area vnum is required.\n\r", ch); return; } /* Find the area to save. */ switch (ch->desc->editor) { case ED_AREA: pArea = (AREA_DATA *) ch->desc->pEdit; break; case ED_ROOM: pArea = ch->in_room->area; break; case ED_OBJECT: pArea = ((OBJ_INDEX_DATA *) ch->desc->pEdit)->area; break; case ED_MOBILE: pArea = ((MOB_INDEX_DATA *) ch->desc->pEdit)->area; break; case ED_HELP: send_to_char ("Grabando area : ", ch); //save_other_helps (ch); return; default: pArea = ch->in_room->area; break; } if (!IS_BUILDER (ch, pArea)) { send_to_char ("You are not a builder for this area.\n\r", ch); return; } save_area_list (); save_area (pArea); REMOVE_BIT (pArea->area_flags, AREA_CHANGED); send_to_char ("Area saved.\n\r", ch); return; } /* Save Help File */ if(!str_cmp(arg1, "helps")) { save_helps(); send_to_char( "Helps Saved.\n\r", ch); return; } /* Show correct syntax. */ /* -------------------- */ if (ch) do_asave (ch, ""); return; }

Here is the call graph for this function:

char* fix_string (  const char *  str  )

Definition at line 50 of file olc_save.c. References MAX_STRING_LENGTH. Referenced by save_area(), save_helps(), save_mobile(), save_mobprogs(), save_object(), and save_rooms(). { static char strfix[MAX_STRING_LENGTH * 2]; int i; int o; if (str == NULL) return '\0'; for (o = i = 0; str[i + o] != '\0'; i++) { if (str[i + o] == '\r' || str[i + o] == '~') o++; strfix[i] = str[i + o]; } strfix[i] = '\0'; return strfix; }

char* fwrite_flag (  long  flags, char  buf[] )

Definition at line 126 of file olc_save.c. Referenced by save_mobile(), and save_object(). { char offset; char *cp; buf[0] = '\0'; if (flags == 0) { strcpy (buf, "0"); return buf; } /* 32 -- number of bits in a long */ for (offset = 0, cp = buf; offset < 32; offset++) if (flags & ((long) 1 << offset)) { if (offset <= 'Z' - 'A') *(cp++) = 'A' + offset; else *(cp++) = 'a' + offset - ('Z' - 'A' + 1); } *cp = '\0'; return buf; }

void save_area (  AREA_DATA *  pArea  )

Definition at line 947 of file olc_save.c. References bug(), cont_lookup(), fix_string(), fpReserve, save_mobiles(), save_mobprogs(), save_objects(), save_resets(), save_rooms(), save_shops(), and save_specials(). Referenced by do_asave(). { FILE *fp; if (pArea->adelete) return; fclose (fpReserve); if (!(fp = fopen (pArea->file_name, "w"))) { bug ("Open_area: fopen", 0); perror (pArea->file_name); } fprintf (fp, "#AREADATA\n"); fprintf (fp, "Name %s~\n", pArea->name); fprintf (fp, "Builders %s~\n", fix_string (pArea->builders)); fprintf (fp, "VNUMs %d %d\n", pArea->min_vnum, pArea->max_vnum); fprintf (fp, "Credits %s~\n", pArea->credits); fprintf (fp, "Security %d\n", pArea->security); if (pArea->cont == NULL || (cont_lookup(pArea->cont) == 0)) fprintf(fp,"Cont None~\n"); else fprintf (fp, "Cont %s~\n", pArea->cont); fprintf (fp, "End\n\n\n\n"); save_mobiles (fp, pArea); save_objects (fp, pArea); save_rooms (fp, pArea); save_specials (fp, pArea); save_resets (fp, pArea); save_shops (fp, pArea); save_mobprogs (fp, pArea); //if (pArea->helps && pArea->helps->first) // save_helps (fp, pArea->helps); fprintf (fp, "#$\n"); fclose (fp); fpReserve = fopen (NULL_FILE, "r"); return; }

Here is the call graph for this function:

void save_area_list (   )

Definition at line 76 of file olc_save.c. References area_data::adelete, help_area_data::area, area_first, bug(), area_data::file_name, help_area_data::filename, had_list, area_data::next, and help_area_data::next. Referenced by do_asave(). { FILE *fp; AREA_DATA *pArea; extern HELP_AREA *had_list; HELP_AREA *ha; if ((fp = fopen ("area.lst", "w")) == NULL) { bug ("Save_area_list: fopen", 0); perror ("area.lst"); } else { /* * Add any help files that need to be loaded at * startup to this section. */ fprintf (fp, "social.are\n"); /* ROM OLC */ for (ha = had_list; ha; ha = ha->next) if (ha->area == NULL) fprintf (fp, "%s\n", ha->filename); for (pArea = area_first; pArea; pArea = pArea->next) { if (pArea->adelete) continue; fprintf (fp, "%s\n", pArea->file_name); } fprintf (fp, "$\n"); fclose (fp); } return; }

Here is the call graph for this function:

void save_door_resets (  FILE *  fp, AREA_DATA *  pArea )

Definition at line 664 of file olc_save.c. References area_data::adelete, room_index_data::area, dir_name, EX_CLOSED, EX_LOCKED, room_index_data::exit, IS_SET, MAX_DIR, MAX_KEY_HASH, room_index_data::name, room_index_data::next, exit_data::orig_door, room_index_hash, exit_data::rs_flags, exit_data::to_room, exit_data::u1, and room_index_data::vnum. Referenced by save_resets(). { int iHash; ROOM_INDEX_DATA *pRoomIndex; EXIT_DATA *pExit; int door; for (iHash = 0; iHash < MAX_KEY_HASH; iHash++) { for (pRoomIndex = room_index_hash[iHash]; pRoomIndex; pRoomIndex = pRoomIndex->next) { if (pRoomIndex->area == pArea) { for (door = 0; door < MAX_DIR; door++) { if ((pExit = pRoomIndex->exit[door]) && pExit->u1.to_room && (IS_SET (pExit->rs_flags, EX_CLOSED) || IS_SET (pExit->rs_flags, EX_LOCKED))) { if (pExit->u1.to_room->area->adelete) continue; #if defined( VERBOSE ) fprintf (fp, "D 0 %d %d %d The %s door of %s is %s\n", pRoomIndex->vnum, pExit->orig_door, IS_SET (pExit->rs_flags, EX_LOCKED) ? 2 : 1, dir_name[pExit->orig_door], pRoomIndex->name, IS_SET (pExit->rs_flags, EX_LOCKED) ? "closed and locked" : "closed"); #endif #if !defined( VERBOSE ) if (pExit->u1.to_room->area->adelete) continue; fprintf (fp, "D 0 %d %d %d\n", pRoomIndex->vnum, pExit->orig_door, IS_SET (pExit->rs_flags, EX_LOCKED) ? 2 : 1); #endif } } } } } return; }

void save_helps (   )

Definition at line 1220 of file olc_save.c. References bug(), help_data::delete, fix_string(), help_first, help_data::keyword, help_data::level, help_data::next, and help_data::text. Referenced by do_asave(). { HELP_DATA * pHelp; FILE * fp; if (! (fp = fopen( "help.are", "w") ) ) { bug( "Open_help: fopen", 0); perror( "help.are"); } fprintf(fp, "#HELPS\n"); for ( pHelp = help_first; pHelp != NULL; pHelp = pHelp->next ) { if(pHelp->delete) continue; fprintf(fp, "%d %s~\n\n%s~\n", pHelp->level, pHelp->keyword, fix_string(pHelp->text)); } fprintf(fp,"0 $~\n\n#$\n"); fclose(fp); return; }

Here is the call graph for this function:

void save_mobile (  FILE *  fp, MOB_INDEX_DATA *  pMobIndex )

Definition at line 182 of file olc_save.c. References AC_BASH, AC_EXOTIC, AC_PIERCE, AC_SLASH, race_type::act, act, attack_table, DICE_BONUS, DICE_NUMBER, DICE_TYPE, DIF, fix_string(), race_type::form, fwrite_flag(), IS_NULLSTR, MAX_STRING_LENGTH, mprog_type_to_name(), size_type::name, sex_type::name, attack_type::name, mprog_list::next, race_type::parts, position_table, race_table, sex_table, position_type::short_name, size_table, mprog_list::trig_phrase, mprog_list::trig_type, and mprog_list::vnum. Referenced by save_mobiles(). { sh_int race = pMobIndex->race; MPROG_LIST *pMprog; char buf[MAX_STRING_LENGTH]; long temp; if (pMobIndex->area->adelete) return; fprintf (fp, "#%d\n", pMobIndex->vnum); fprintf (fp, "%s~\n", pMobIndex->player_name); fprintf (fp, "%s~\n", pMobIndex->short_descr); fprintf (fp, "%s~\n", fix_string (pMobIndex->long_descr)); fprintf (fp, "%s~\n", fix_string (pMobIndex->description)); fprintf (fp, "%s~\n", race_table[race].name); fprintf (fp, "%s ", fwrite_flag (pMobIndex->act, buf)); fprintf (fp, "%s ", fwrite_flag (pMobIndex->affected_by, buf)); fprintf (fp, "%d %d\n", pMobIndex->alignment, pMobIndex->group); fprintf (fp, "%d ", pMobIndex->level); fprintf (fp, "%d ", pMobIndex->hitroll); fprintf (fp, "%dd%d+%d ", pMobIndex->hit[DICE_NUMBER], pMobIndex->hit[DICE_TYPE], pMobIndex->hit[DICE_BONUS]); fprintf (fp, "%dd%d+%d ", pMobIndex->mana[DICE_NUMBER], pMobIndex->mana[DICE_TYPE], pMobIndex->mana[DICE_BONUS]); fprintf (fp, "%dd%d+%d ", pMobIndex->damage[DICE_NUMBER], pMobIndex->damage[DICE_TYPE], pMobIndex->damage[DICE_BONUS]); fprintf (fp, "%s\n", attack_table[pMobIndex->dam_type].name); fprintf (fp, "%d %d %d %d\n", pMobIndex->ac[AC_PIERCE] / 10, pMobIndex->ac[AC_BASH] / 10, pMobIndex->ac[AC_SLASH] / 10, pMobIndex->ac[AC_EXOTIC] / 10); fprintf (fp, "%s ", fwrite_flag (pMobIndex->off_flags, buf)); fprintf (fp, "%s ", fwrite_flag (pMobIndex->imm_flags, buf)); fprintf (fp, "%s ", fwrite_flag (pMobIndex->res_flags, buf)); fprintf (fp, "%s\n", fwrite_flag (pMobIndex->vuln_flags, buf)); fprintf (fp, "%s %s %s %ld\n", position_table[pMobIndex->start_pos].short_name, position_table[pMobIndex->default_pos].short_name, sex_table[pMobIndex->sex].name, pMobIndex->wealth); fprintf (fp, "%s ", fwrite_flag (pMobIndex->form, buf)); fprintf (fp, "%s ", fwrite_flag (pMobIndex->parts, buf)); fprintf (fp, "%s ", size_table[pMobIndex->size].name); fprintf (fp, "%s\n", IS_NULLSTR (pMobIndex-> material) ? pMobIndex->material : "unknown"); if ((temp = DIF (race_table[race].act, pMobIndex->act))) fprintf (fp, "F act %s\n", fwrite_flag (temp, buf)); if ((temp = DIF (race_table[race].aff, pMobIndex->affected_by))) fprintf (fp, "F aff %s\n", fwrite_flag (temp, buf)); if ((temp = DIF (race_table[race].off, pMobIndex->off_flags))) fprintf (fp, "F off %s\n", fwrite_flag (temp, buf)); if ((temp = DIF (race_table[race].imm, pMobIndex->imm_flags))) fprintf (fp, "F imm %s\n", fwrite_flag (temp, buf)); if ((temp = DIF (race_table[race].res, pMobIndex->res_flags))) fprintf (fp, "F res %s\n", fwrite_flag (temp, buf)); if ((temp = DIF (race_table[race].vuln, pMobIndex->vuln_flags))) fprintf (fp, "F vul %s\n", fwrite_flag (temp, buf)); if ((temp = DIF (race_table[race].form, pMobIndex->form))) fprintf (fp, "F for %s\n", fwrite_flag (temp, buf)); if ((temp = DIF (race_table[race].parts, pMobIndex->parts))) fprintf (fp, "F par %s\n", fwrite_flag (temp, buf)); for (pMprog = pMobIndex->mprogs; pMprog; pMprog = pMprog->next) { fprintf (fp, "M %s %d %s~\n", mprog_type_to_name (pMprog->trig_type), pMprog->vnum, pMprog->trig_phrase); } return; }

Here is the call graph for this function:

void save_mobiles (  FILE *  fp, AREA_DATA *  pArea )

Definition at line 271 of file olc_save.c. References get_mob_index(), and save_mobile(). Referenced by save_area(). { int i; MOB_INDEX_DATA *pMob; if (pArea->adelete) return; fprintf (fp, "#MOBILES\n"); for (i = pArea->min_vnum; i <= pArea->max_vnum; i++) { //f (pMob->area->adelete) // continue; if ((pMob = get_mob_index (i))) save_mobile (fp, pMob); } fprintf (fp, "#0\n\n\n\n"); return; }

Here is the call graph for this function:

void save_mobprogs (  FILE *  fp, AREA_DATA *  pArea )

Definition at line 155 of file olc_save.c. References mprog_code::code, fix_string(), and get_mprog_index(). Referenced by save_area(). { MPROG_CODE *pMprog; int i; fprintf (fp, "#MOBPROGS\n"); for (i = pArea->min_vnum; i <= pArea->max_vnum; i++) { if ((pMprog = get_mprog_index (i)) != NULL) { fprintf (fp, "#%d\n", i); fprintf (fp, "%s~\n", fix_string (pMprog->code)); } } fprintf (fp, "#0\n\n"); return; }

Here is the call graph for this function:

void save_object (  FILE *  fp, OBJ_INDEX_DATA *  pObjIndex )

Definition at line 302 of file olc_save.c. References attack_table, affect_data::bitvector, bug(), extra_descr_data::description, fix_string(), fwrite_flag(), ITEM_CONTAINER, ITEM_DRINK_CON, ITEM_FOUNTAIN, item_name(), ITEM_PILL, ITEM_POTION, ITEM_SCROLL, ITEM_STAFF, ITEM_WAND, ITEM_WEAPON, extra_descr_data::keyword, liq_type::liq_name, liq_table, affect_data::location, MAX_STRING_LENGTH, affect_data::modifier, skill_type::name, attack_type::name, extra_descr_data::next, affect_data::next, skill_table, TO_AFFECTS, TO_IMMUNE, TO_OBJECT, TO_RESIST, TO_VULN, weapon_name(), and affect_data::where. Referenced by save_objects(). { char letter; AFFECT_DATA *pAf; EXTRA_DESCR_DATA *pEd; char buf[MAX_STRING_LENGTH]; if (pObjIndex->area->adelete) return; fprintf (fp, "#%d\n", pObjIndex->vnum); fprintf (fp, "%s~\n", pObjIndex->name); fprintf (fp, "%s~\n", pObjIndex->short_descr); fprintf (fp, "%s~\n", fix_string (pObjIndex->description)); fprintf (fp, "%s~\n", pObjIndex->material); fprintf (fp, "%s ", item_name (pObjIndex->item_type)); fprintf (fp, "%s ", fwrite_flag (pObjIndex->extra_flags, buf)); fprintf (fp, "%s\n", fwrite_flag (pObjIndex->wear_flags, buf)); /* * Using fwrite_flag to write most values gives a strange * looking area file, consider making a case for each * item type later. */ switch (pObjIndex->item_type) { default: fprintf (fp, "%s ", fwrite_flag (pObjIndex->value[0], buf)); fprintf (fp, "%s ", fwrite_flag (pObjIndex->value[1], buf)); fprintf (fp, "%s ", fwrite_flag (pObjIndex->value[2], buf)); fprintf (fp, "%s ", fwrite_flag (pObjIndex->value[3], buf)); fprintf (fp, "%s\n", fwrite_flag (pObjIndex->value[4], buf)); break; case ITEM_DRINK_CON: case ITEM_FOUNTAIN: fprintf (fp, "%d %d '%s' %d %d\n", pObjIndex->value[0], pObjIndex->value[1], liq_table[pObjIndex->value[2]].liq_name, pObjIndex->value[3], pObjIndex->value[4]); break; case ITEM_CONTAINER: fprintf (fp, "%d %s %d %d %d\n", pObjIndex->value[0], fwrite_flag (pObjIndex->value[1], buf), pObjIndex->value[2], pObjIndex->value[3], pObjIndex->value[4]); break; case ITEM_WEAPON: fprintf (fp, "%s %d %d %s %s\n", weapon_name (pObjIndex->value[0]), pObjIndex->value[1], pObjIndex->value[2], attack_table[pObjIndex->value[3]].name, fwrite_flag (pObjIndex->value[4], buf)); break; case ITEM_PILL: case ITEM_POTION: case ITEM_SCROLL: fprintf (fp, "%d '%s' '%s' '%s' '%s'\n", pObjIndex->value[0] > 0 ? /* no negative numbers */ pObjIndex->value[0] : 0, pObjIndex->value[1] != -1 ? skill_table[pObjIndex->value[1]].name : "", pObjIndex->value[2] != -1 ? skill_table[pObjIndex->value[2]].name : "", pObjIndex->value[3] != -1 ? skill_table[pObjIndex->value[3]].name : "", pObjIndex->value[4] != -1 ? skill_table[pObjIndex->value[4]].name : ""); break; case ITEM_STAFF: case ITEM_WAND: fprintf (fp, "%d %d %d '%s' %d\n", pObjIndex->value[0], pObjIndex->value[1], pObjIndex->value[2], pObjIndex->value[3] != -1 ? skill_table[pObjIndex->value[3]].name : "", pObjIndex->value[4]); break; } fprintf (fp, "%d ", pObjIndex->level); fprintf (fp, "%d ", pObjIndex->weight); fprintf (fp, "%d ", pObjIndex->cost); if (pObjIndex->condition > 90) letter = 'P'; else if (pObjIndex->condition > 75) letter = 'G'; else if (pObjIndex->condition > 50) letter = 'A'; else if (pObjIndex->condition > 25) letter = 'W'; else if (pObjIndex->condition > 10) letter = 'D'; else if (pObjIndex->condition > 0) letter = 'B'; else letter = 'R'; fprintf (fp, "%c\n", letter); for (pAf = pObjIndex->affected; pAf; pAf = pAf->next) { if (pAf->where == TO_OBJECT || pAf->bitvector == 0) fprintf (fp, "A\n%d %d\n", pAf->location, pAf->modifier); else { fprintf (fp, "F\n"); switch (pAf->where) { case TO_AFFECTS: fprintf (fp, "A "); break; case TO_IMMUNE: fprintf (fp, "I "); break; case TO_RESIST: fprintf (fp, "R "); break; case TO_VULN: fprintf (fp, "V "); break; default: bug ("olc_save: Invalid Affect->where", 0); break; } fprintf (fp, "%d %d %s\n", pAf->location, pAf->modifier, fwrite_flag (pAf->bitvector, buf)); } } for (pEd = pObjIndex->extra_descr; pEd; pEd = pEd->next) { fprintf (fp, "E\n%s~\n%s~\n", pEd->keyword, fix_string (pEd->description)); } return; }

Here is the call graph for this function:

void save_objects (  FILE *  fp, AREA_DATA *  pArea )

Definition at line 464 of file olc_save.c. References get_obj_index(), and save_object(). Referenced by save_area(). { int i; OBJ_INDEX_DATA *pObj; if (pArea->adelete) return; fprintf (fp, "#OBJECTS\n"); for (i = pArea->min_vnum; i <= pArea->max_vnum; i++) { if ((pObj = get_obj_index (i))) save_object (fp, pObj); } fprintf (fp, "#0\n\n\n\n"); return; }

Here is the call graph for this function:

void save_resets (  FILE *  fp, AREA_DATA *  pArea )

Definition at line 724 of file olc_save.c. References area_data::adelete, obj_index_data::area, mob_index_data::area, room_index_data::area, reset_data::arg1, reset_data::arg2, reset_data::arg3, reset_data::arg4, bug(), capitalize(), reset_data::command, flag_string(), get_mob_index(), get_obj_index(), get_room_index(), MAX_KEY_HASH, MAX_STRING_LENGTH, room_index_data::name, reset_data::next, room_index_data::next, room_index_data::reset_first, room_index_hash, save_door_resets(), obj_index_data::short_descr, mob_index_data::short_descr, and wear_loc_strings. Referenced by save_area(). { RESET_DATA *pReset; MOB_INDEX_DATA *pLastMob = NULL; OBJ_INDEX_DATA *pLastObj; ROOM_INDEX_DATA *pRoom; char buf[MAX_STRING_LENGTH]; int iHash; fprintf (fp, "#RESETS\n"); save_door_resets (fp, pArea); for (iHash = 0; iHash < MAX_KEY_HASH; iHash++) { for (pRoom = room_index_hash[iHash]; pRoom; pRoom = pRoom->next) { if (pRoom->area == pArea) { for (pReset = pRoom->reset_first; pReset; pReset = pReset->next) { switch (pReset->command) { default: bug ("Save_resets: bad command %c.", pReset->command); break; case 'M': pLastMob = get_mob_index (pReset->arg1); if (pLastMob->area->adelete) break; fprintf (fp, "M 0 %d %d %d %d Load %s\n", pReset->arg1, pReset->arg2, pReset->arg3, pReset->arg4, pLastMob->short_descr); break; case 'O': pLastObj = get_obj_index (pReset->arg1); if (pLastObj->area->adelete) break; pRoom = get_room_index (pReset->arg3); fprintf (fp, "O 0 %d 0 %d %s loaded to %s\n", pReset->arg1, pReset->arg3, capitalize (pLastObj->short_descr), pRoom->name); break; case 'P': pLastObj = get_obj_index (pReset->arg1); if (pLastObj->area->adelete) break; fprintf (fp, "P 0 %d %d %d %d %s put inside %s\n", pReset->arg1, pReset->arg2, pReset->arg3, pReset->arg4, capitalize (get_obj_index (pReset->arg1)->short_descr), pLastObj->short_descr); break; case 'G': if ((get_obj_index(pReset->arg1))->area->adelete) break; fprintf (fp, "G 0 %d 0 %s is given to %s\n", pReset->arg1, capitalize (get_obj_index (pReset->arg1)->short_descr), pLastMob ? pLastMob->short_descr : "!NO_MOB!"); if (!pLastMob) { sprintf (buf, "Save_resets: !NO_MOB! in [%s]", pArea->file_name); bug (buf, 0); } break; case 'E': if (get_obj_index(pReset->arg1)->area->adelete) break; fprintf (fp, "E 0 %d 0 %d %s is loaded %s of %s\n", pReset->arg1, pReset->arg3, capitalize (get_obj_index (pReset->arg1)->short_descr), flag_string (wear_loc_strings, pReset->arg3), pLastMob ? pLastMob->short_descr : "!NO_MOB!"); if (!pLastMob) { sprintf (buf, "Save_resets: !NO_MOB! in [%s]", pArea->file_name); bug (buf, 0); } break; case 'D': break; case 'R': pRoom = get_room_index (pReset->arg1); if (pRoom->area->adelete) break; fprintf (fp, "R 0 %d %d Randomize %s\n", pReset->arg1, pReset->arg2, pRoom->name); break; } } } /* End if correct area */ } /* End for pRoom */ } /* End for iHash */ fprintf (fp, "S\n\n\n\n"); return; }

Here is the call graph for this function:

void save_rooms (  FILE *  fp, AREA_DATA *  pArea )

Definition at line 494 of file olc_save.c. References area_data::adelete, room_index_data::area, room_index_data::clan, clan_table, exit_data::description, extra_descr_data::description, room_index_data::description, EX_CLOSED, EX_EASY, EX_HARD, EX_INFURIATING, EX_ISDOOR, EX_LOCKED, EX_NOCLOSE, EX_NOLOCK, EX_NOPASS, EX_PICKPROOF, room_index_data::exit, room_index_data::extra_descr, FALSE, fix_string(), room_index_data::heal_rate, IS_NULLSTR, IS_SET, exit_data::key, exit_data::keyword, extra_descr_data::keyword, room_index_data::mana_rate, MAX_DIR, MAX_KEY_HASH, room_index_data::name, extra_descr_data::next, room_index_data::next, room_index_data::night_description, exit_data::orig_door, room_index_data::owner, room_index_data::rdelete, REMOVE_BIT, room_index_data::room_flags, room_index_data::room_flags_extra, room_index_hash, exit_data::rs_flags, room_index_data::sector_type, SET_BIT, exit_data::to_room, room_index_data::travel_route, room_index_data::travel_state, room_index_data::travel_type, exit_data::u1, and room_index_data::vnum. Referenced by save_area(). { ROOM_INDEX_DATA *pRoomIndex; EXTRA_DESCR_DATA *pEd; EXIT_DATA *pExit; int iHash; int door; fprintf (fp, "#ROOMS\n"); for (iHash = 0; iHash < MAX_KEY_HASH; iHash++) { for (pRoomIndex = room_index_hash[iHash]; pRoomIndex; pRoomIndex = pRoomIndex->next) { if (pRoomIndex->area == pArea) { if (pRoomIndex->rdelete) continue; fprintf (fp, "#%d\n", pRoomIndex->vnum); fprintf (fp, "%s~\n", pRoomIndex->name); fprintf (fp, "%d\n", pRoomIndex->travel_route == FALSE ? 0 : 1); fprintf (fp, "%d\n", pRoomIndex->travel_type); fprintf (fp, "%d\n", pRoomIndex->travel_state); fprintf (fp, "%s~\n", fix_string (pRoomIndex->description)); if (pRoomIndex->night_description == NULL) pRoomIndex->night_description = pRoomIndex->description; fprintf (fp, "%s~\n", fix_string (pRoomIndex->night_description)); fprintf (fp, "0 "); fprintf (fp, "%d ", pRoomIndex->room_flags); if (pRoomIndex->room_flags_extra <= 0) { fprintf(fp, "0 "); } else { fprintf (fp, "%d ", pRoomIndex->room_flags_extra); } fprintf (fp, "%d\n", pRoomIndex->sector_type); for (pEd = pRoomIndex->extra_descr; pEd; pEd = pEd->next) { fprintf (fp, "E\n%s~\n%s~\n", pEd->keyword, fix_string (pEd->description)); } for (door = 0; door < MAX_DIR; door++) { /* I hate this! */ if ((pExit = pRoomIndex->exit[door]) && pExit->u1.to_room) { int locks = 0; if (pExit->u1.to_room->rdelete) continue; if (pExit->u1.to_room->area->adelete) continue; /* HACK : TO PREVENT EX_LOCKED etc without EX_ISDOOR to stop booting the mud */ if (IS_SET (pExit->rs_flags, EX_CLOSED) || IS_SET (pExit->rs_flags, EX_LOCKED) || IS_SET (pExit->rs_flags, EX_PICKPROOF) || IS_SET (pExit->rs_flags, EX_NOPASS) || IS_SET (pExit->rs_flags, EX_EASY) || IS_SET (pExit->rs_flags, EX_HARD) || IS_SET (pExit->rs_flags, EX_INFURIATING) || IS_SET (pExit->rs_flags, EX_NOCLOSE) || IS_SET (pExit->rs_flags, EX_NOLOCK)) SET_BIT (pExit->rs_flags, EX_ISDOOR); else REMOVE_BIT (pExit->rs_flags, EX_ISDOOR); /* THIS SUCKS but it's backwards compatible */ /* NOTE THAT EX_NOCLOSE NOLOCK etc aren't being saved */ if (IS_SET (pExit->rs_flags, EX_ISDOOR) && (!IS_SET (pExit->rs_flags, EX_PICKPROOF)) && (!IS_SET (pExit->rs_flags, EX_NOPASS))) locks = 1; if (IS_SET (pExit->rs_flags, EX_ISDOOR) && (IS_SET (pExit->rs_flags, EX_PICKPROOF)) && (!IS_SET (pExit->rs_flags, EX_NOPASS))) locks = 2; if (IS_SET (pExit->rs_flags, EX_ISDOOR) && (!IS_SET (pExit->rs_flags, EX_PICKPROOF)) && (IS_SET (pExit->rs_flags, EX_NOPASS))) locks = 3; if (IS_SET (pExit->rs_flags, EX_ISDOOR) && (IS_SET (pExit->rs_flags, EX_PICKPROOF)) && (IS_SET (pExit->rs_flags, EX_NOPASS))) locks = 4; fprintf (fp, "D%d\n", pExit->orig_door); fprintf (fp, "%s~\n", fix_string (pExit->description)); fprintf (fp, "%s~\n", pExit->keyword); fprintf (fp, "%d %d %d\n", locks, pExit->key, pExit->u1.to_room->vnum); } } if (pRoomIndex->mana_rate != 100 || pRoomIndex->heal_rate != 100) fprintf (fp, "M %d H %d\n", pRoomIndex->mana_rate, pRoomIndex->heal_rate); if (pRoomIndex->clan > 0) fprintf (fp, "C %s~\n", clan_table[pRoomIndex->clan].name); if (!IS_NULLSTR (pRoomIndex->owner)) fprintf (fp, "O %s~\n", pRoomIndex->owner); fprintf (fp, "S\n"); } } } fprintf (fp, "#0\n\n\n\n"); return; }

Here is the call graph for this function:

void save_shops (  FILE *  fp, AREA_DATA *  pArea )

Definition at line 854 of file olc_save.c. References mob_index_data::area, shop_data::buy_type, shop_data::close_hour, shop_data::keeper, MAX_KEY_HASH, MAX_TRADE, mob_index_hash, mob_index_data::next, shop_data::open_hour, shop_data::profit_buy, shop_data::profit_sell, and mob_index_data::pShop. Referenced by save_area(). { SHOP_DATA *pShopIndex; MOB_INDEX_DATA *pMobIndex; int iTrade; int iHash; fprintf (fp, "#SHOPS\n"); for (iHash = 0; iHash < MAX_KEY_HASH; iHash++) { for (pMobIndex = mob_index_hash[iHash]; pMobIndex; pMobIndex = pMobIndex->next) { if (pMobIndex && pMobIndex->area == pArea && pMobIndex->pShop) { pShopIndex = pMobIndex->pShop; fprintf (fp, "%d ", pShopIndex->keeper); for (iTrade = 0; iTrade < MAX_TRADE; iTrade++) { if (pShopIndex->buy_type[iTrade] != 0) { fprintf (fp, "%d ", pShopIndex->buy_type[iTrade]); } else fprintf (fp, "0 "); } fprintf (fp, "%d %d ", pShopIndex->profit_buy, pShopIndex->profit_sell); fprintf (fp, "%d %d\n", pShopIndex->open_hour, pShopIndex->close_hour); } } } fprintf (fp, "0\n\n\n\n"); return; }

void save_specials (  FILE *  fp, AREA_DATA *  pArea )

Definition at line 623 of file olc_save.c. References area_data::adelete, mob_index_data::area, MAX_KEY_HASH, mob_index_hash, mob_index_data::next, mob_index_data::short_descr, mob_index_data::spec_fun, spec_name(), and mob_index_data::vnum. Referenced by save_area(). { int iHash; MOB_INDEX_DATA *pMobIndex; fprintf (fp, "#SPECIALS\n"); for (iHash = 0; iHash < MAX_KEY_HASH; iHash++) { for (pMobIndex = mob_index_hash[iHash]; pMobIndex; pMobIndex = pMobIndex->next) { if (pMobIndex->area->adelete) continue; if (pMobIndex && pMobIndex->area == pArea && pMobIndex->spec_fun) { #if defined( VERBOSE ) fprintf (fp, "M %d %s Load to: %s\n", pMobIndex->vnum, spec_name (pMobIndex->spec_fun), pMobIndex->short_descr); #else fprintf (fp, "M %d %s\n", pMobIndex->vnum, spec_name (pMobIndex->spec_fun)); #endif } } } fprintf (fp, "S\n\n\n\n"); return; }

Here is the call graph for this function:

---