This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
[No, it's NOT... .I got tired of explaining 'Stop Posting In HTML' and
sending back 51k files filled with crap to say "See? This Is HTML...
This One Time, I will edit the file, strip the frigging HTML parts, get
rid of the 'multipart/alternative' MIME header and give up. -zump]
Ok. Awhile back I posted a problem with raw_kill... That wasn't the
problem...
My muds been crashing when someone slays, kills, saves, quits, and some
other times. I've looked into it and what they all have in common is
save_char_obj...
Well heres the function save_char_obj and the function that follows it
(fwrite_char):
[EMAIL PROTECTED]&*([EMAIL PROTECTED]&[EMAIL PROTECTED] CODE BEGINS [EMAIL
PROTECTED]@#$%^&[EMAIL PROTECTED]
/*
* Save a character and inventory.
* Would be cool to save NPC's too for quest purposes,
* some of the infrastructure is provided.
*/
void save_char_obj (CHAR_DATA * ch)
{
char strsave[MAX_INPUT_LENGTH];
FILE *fp;
if (IS_NPC (ch))
return;
/*
* Fix by Edwin. JR -- 10/15/00
*
* Don't save if the character is invalidated.
* This might happen during the auto-logoff of players.
* (or other places not yet found out)
*/
if ( !IS_VALID(ch)) {
bug("save_char_obj: Trying to save an invalidated character.\n",0);
return;
}
if (ch->desc != NULL && ch->desc->original != NULL)
ch = ch->desc->original;
#if defined(unix)
/* create god log */
if (IS_IMMORTAL (ch) || ch->level >= LEVEL_IMMORTAL)
{
fclose (fpReserve);
sprintf (strsave, "%s%c/%s", GOD_DIR, tolower(ch->name[0]),
capitalize (ch->name));
if ((fp = fopen (strsave, "w")) == NULL)
{
bug ("Save_char_obj: fopen", 0);
perror (strsave);
}
fprintf (fp, "Lev %2d Trust %2d %s%s\n",
ch->level, get_trust (ch), ch->name, ch->pcdata->title);
fclose (fp);
fpReserve = fopen (NULL_FILE, "r");
}
#endif
fclose (fpReserve);
sprintf (strsave, "%s%c/%s", PLAYER_DIR, tolower(ch->name[0]),
capitalize (ch->name));
if ((fp = fopen (TEMP_FILE, "w")) == NULL)
{
bug ("Save_char_obj: fopen", 0);
perror (strsave);
}
else
{
fwrite_char (ch, fp);
if (ch->carrying != NULL)
fwrite_obj (ch, ch->carrying, fp, 0);
/* save the pets */
if (ch->pet != NULL && ch->pet->in_room == ch->in_room)
fwrite_pet (ch->pet, fp);
fprintf (fp, "#END\n");
}
fclose (fp);
rename (TEMP_FILE, strsave);
fpReserve = fopen (NULL_FILE, "r");
return;
}
/*
* Write the char.
*/
void fwrite_char (CHAR_DATA * ch, FILE * fp)
{
AFFECT_DATA *paf;
int sn, gn, pos, i;
fprintf (fp, "#%s\n", IS_NPC (ch) ? "MOB" : "PLAYER");
fprintf (fp, "Name %s~\n", ch->name);
fprintf (fp, "Id %ld\n", ch->id);
fprintf (fp, "LogO %ld\n", current_time);
fprintf (fp, "Vers %d\n", 5);
if (ch->email[0] != '\0')
fprintf( fp, "EmA %s~\n", ch->email );
if (ch->short_descr[0] != '\0')
fprintf (fp, "ShD %s~\n", ch->short_descr);
if (ch->long_descr[0] != '\0')
fprintf (fp, "LnD %s~\n", ch->long_descr);
if (ch->description[0] != '\0')
fprintf (fp, "Desc %s~\n", ch->description);
if (ch->prompt != NULL || !str_cmp (ch->prompt, "<[%hH][%mM][%vV]> ")
|| !str_cmp (ch->prompt, "{B<[%hH][%mM][%vV]>{x "))
fprintf (fp, "Prom %s~\n", ch->prompt);
fprintf (fp, "Race %s~\n", pc_race_table[ch->race].name);
if (ch->clan)
fprintf (fp, "Clan %s~\n", clan_table[ch->clan].name);
fprintf (fp, "Sex %d\n", ch->sex);
fprintf (fp, "Cla %d\n", ch->class);
fwrite_rle(ch->pcdata->explored, fp);
fprintf( fp, "Bp %d\n", ch->bp_points );
fprintf(fp, "Hmtown %d\n", ch->hometown);
fprintf (fp, "Levl %d\n", ch->level);
if (ch->trust != 0)
fprintf (fp, "Tru %d\n", ch->trust);
fprintf (fp, "Sec %d\n", ch->pcdata->security); /* OLC */
fprintf (fp, "Plyd %d\n", ch->played + (int) (current_time -
ch->logon));
fprintf (fp, "Scro %d\n", ch->lines);
fprintf (fp, "Room %d\n", (ch->in_room == get_room_index
(ROOM_VNUM_LIMBO)
&& ch->was_in_room != NULL)
? ch->was_in_room->vnum
: ch->in_room == NULL ? 3001 : ch->in_room->vnum);
if (ch->questpoints != 0)
fprintf( fp, "QuestPnts %d\n", ch->questpoints );
if (ch->nextquest != 0)
fprintf( fp, "QuestNext %d\n", ch->nextquest );
else if (ch->countdown != 0)
fprintf( fp, "QuestNext %d\n", 10 );
fprintf (fp, "HMV %d %d %d %d %d %d\n",
ch->hit, ch->max_hit, ch->mana, ch->max_mana, ch->move,
ch->max_move);
if (ch->gold > 0)
fprintf (fp, "Gold %ld\n", ch->gold);
else
fprintf (fp, "Gold %d\n", 0);
if (ch->silver > 0)
fprintf (fp, "Silv %ld\n", ch->silver);
else
fprintf (fp, "Silv %d\n", 0);
fprintf (fp, "Exp %d\n", ch->exp);
if (ch->act != 0)
fprintf (fp, "Act %s\n", print_flags (ch->act));
if (ch->affected_by != 0)
fprintf (fp, "AfBy %s\n", print_flags (ch->affected_by));
fprintf (fp, "Comm %s\n", print_flags (ch->comm));
if (ch->wiznet)
fprintf (fp, "Wizn %s\n", print_flags (ch->wiznet));
if (ch->info)
fprintf( fp, "Info %s\n", print_flags(ch->info));
if (ch->invis_level)
fprintf (fp, "Invi %d\n", ch->invis_level);
if (ch->incog_level)
fprintf (fp, "Inco %d\n", ch->incog_level);
fprintf (fp, "Pos %d\n",
ch->position == POS_FIGHTING ? POS_STANDING : ch->position);
if (ch->practice != 0)
fprintf (fp, "Prac %d\n", ch->practice);
if (ch->train != 0)
fprintf (fp, "Trai %d\n", ch->train);
if (ch->saving_throw != 0)
fprintf (fp, "Save %d\n", ch->saving_throw);
fprintf (fp, "Alig %d\n", ch->alignment);
if (ch->hitroll != 0)
fprintf (fp, "Hit %d\n", ch->hitroll);
if (ch->damroll != 0)
fprintf (fp, "Dam %d\n", ch->damroll);
fprintf (fp, "ACs %d %d %d %d\n",
ch->armor[0], ch->armor[1], ch->armor[2], ch->armor[3]);
if (ch->wimpy != 0)
fprintf (fp, "Wimp %d\n", ch->wimpy);
fprintf (fp, "Attr %d %d %d %d %d\n",
ch->perm_stat[STAT_STR],
ch->perm_stat[STAT_INT],
ch->perm_stat[STAT_WIS],
ch->perm_stat[STAT_DEX], ch->perm_stat[STAT_CON]);
fprintf (fp, "AMod %d %d %d %d %d\n",
ch->mod_stat[STAT_STR],
ch->mod_stat[STAT_INT],
ch->mod_stat[STAT_WIS],
ch->mod_stat[STAT_DEX], ch->mod_stat[STAT_CON]);
if (IS_NPC (ch))
{
fprintf (fp, "Vnum %d\n", ch->pIndexData->vnum);
}
else
{
fprintf (fp, "Pass %s~\n", ch->pcdata->pwd);
if (ch->pcdata->bamfin[0] != '\0')
fprintf (fp, "Bin %s~\n", ch->pcdata->bamfin);
if (ch->pcdata->bamfout[0] != '\0')
fprintf (fp, "Bout %s~\n", ch->pcdata->bamfout);
fprintf( fp, "Balance %d\n",
ch->pcdata->balance );
fprintf( fp, "Shares %d\n",
ch->pcdata->shares );
fprintf (fp, "Titl %s~\n", ch->pcdata->title);
fprintf (fp, "Pnts %d\n", ch->pcdata->points);
fprintf (fp, "TSex %d\n", ch->pcdata->true_sex);
fprintf (fp, "LLev %d\n", ch->pcdata->last_level);
fprintf (fp, "HMVP %d %d %d\n", ch->pcdata->perm_hit,
ch->pcdata->perm_mana, ch->pcdata->perm_move);
fprintf (fp, "Cnd %d %d %d %d\n",
ch->pcdata->condition[0],
ch->pcdata->condition[1],
ch->pcdata->condition[2], ch->pcdata->condition[3]);
/*
* Write Colour Config Information.
*/
fprintf (fp, "Coloura %d%d%d %d%d%d %d%d%d %d%d%d %d%d%d\n",
ch->pcdata->text[2],
ch->pcdata->text[0],
ch->pcdata->text[1],
ch->pcdata->auction[2],
ch->pcdata->auction[0],
ch->pcdata->auction[1],
ch->pcdata->gossip[2],
ch->pcdata->gossip[0],
ch->pcdata->gossip[1],
ch->pcdata->music[2],
ch->pcdata->music[0],
ch->pcdata->music[1],
ch->pcdata->question[2],
ch->pcdata->question[0], ch->pcdata->question[1]);
fprintf (fp, "Colourb %d%d%d %d%d%d %d%d%d %d%d%d %d%d%d\n",
ch->pcdata->answer[2],
ch->pcdata->answer[0],
ch->pcdata->answer[1],
ch->pcdata->quote[2],
ch->pcdata->quote[0],
ch->pcdata->quote[1],
ch->pcdata->quote_text[2],
ch->pcdata->quote_text[0],
ch->pcdata->quote_text[1],
ch->pcdata->immtalk_text[2],
ch->pcdata->immtalk_text[0],
ch->pcdata->immtalk_text[1],
ch->pcdata->immtalk_type[2],
ch->pcdata->immtalk_type[0],
ch->pcdata->immtalk_type[1]);
fprintf (fp, "Colourc %d%d%d %d%d%d %d%d%d %d%d%d %d%d%d\n",
ch->pcdata->info[2],
ch->pcdata->info[0],
ch->pcdata->info[1],
ch->pcdata->tell[2],
ch->pcdata->tell[0],
ch->pcdata->tell[1],
ch->pcdata->reply[2],
ch->pcdata->reply[0],
ch->pcdata->reply[1],
ch->pcdata->gtell_text[2],
ch->pcdata->gtell_text[0],
ch->pcdata->gtell_text[1],
ch->pcdata->gtell_type[2],
ch->pcdata->gtell_type[0], ch->pcdata->gtell_type[1]);
fprintf (fp, "Colourd %d%d%d %d%d%d %d%d%d %d%d%d %d%d%d\n",
ch->pcdata->room_title[2],
ch->pcdata->room_title[0],
ch->pcdata->room_title[1],
ch->pcdata->room_text[2],
ch->pcdata->room_text[0],
ch->pcdata->room_text[1],
ch->pcdata->room_exits[2],
ch->pcdata->room_exits[0],
ch->pcdata->room_exits[1],
ch->pcdata->room_things[2],
ch->pcdata->room_things[0],
ch->pcdata->room_things[1],
ch->pcdata->prompt[2],
ch->pcdata->prompt[0], ch->pcdata->prompt[1]);
fprintf (fp, "Coloure %d%d%d %d%d%d %d%d%d %d%d%d %d%d%d\n",
ch->pcdata->fight_death[2],
ch->pcdata->fight_death[0],
ch->pcdata->fight_death[1],
ch->pcdata->fight_yhit[2],
ch->pcdata->fight_yhit[0],
ch->pcdata->fight_yhit[1],
ch->pcdata->fight_ohit[2],
ch->pcdata->fight_ohit[0],
ch->pcdata->fight_ohit[1],
ch->pcdata->fight_thit[2],
ch->pcdata->fight_thit[0],
ch->pcdata->fight_thit[1],
ch->pcdata->fight_skill[2],
ch->pcdata->fight_skill[0], ch->pcdata->fight_skill[1]);
fprintf (fp, "Colourf %d%d%d %d%d%d %d%d%d %d%d%d %d%d%d\n",
ch->pcdata->wiznet[2],
ch->pcdata->wiznet[0],
ch->pcdata->wiznet[1],
ch->pcdata->say[2],
ch->pcdata->say[0],
ch->pcdata->say[1],
ch->pcdata->say_text[2],
ch->pcdata->say_text[0],
ch->pcdata->say_text[1],
ch->pcdata->tell_text[2],
ch->pcdata->tell_text[0],
ch->pcdata->tell_text[1],
ch->pcdata->reply_text[2],
ch->pcdata->reply_text[0], ch->pcdata->reply_text[1]);
fprintf (fp, "Colourg %d%d%d %d%d%d %d%d%d %d%d%d %d%d%d\n",
ch->pcdata->auction_text[2],
ch->pcdata->auction_text[0],
ch->pcdata->auction_text[1],
ch->pcdata->gossip_text[2],
ch->pcdata->gossip_text[0],
ch->pcdata->gossip_text[1],
ch->pcdata->music_text[2],
ch->pcdata->music_text[0],
ch->pcdata->music_text[1],
ch->pcdata->question_text[2],
ch->pcdata->question_text[0],
ch->pcdata->question_text[1],
ch->pcdata->answer_text[2],
ch->pcdata->answer_text[0], ch->pcdata->answer_text[1]);
fprintf( fp, "Incr %d\n",
ch->pcdata->incarnations );
/* write alias */
for (pos = 0; pos < MAX_ALIAS; pos++)
{
if (ch->pcdata->alias[pos] == NULL
|| ch->pcdata->alias_sub[pos] == NULL)
break;
fprintf (fp, "Alias %s %s~\n", ch->pcdata->alias[pos],
ch->pcdata->alias_sub[pos]);
}
/* Save note board status */
/* Save number of boards in case that number changes */
fprintf (fp, "Boards %d ", MAX_BOARD);
for (i = 0; i < MAX_BOARD; i++)
fprintf (fp, "%s %ld ", boards[i].short_name,
ch->pcdata->last_note[i]);
fprintf (fp, "\n");
for (sn = 0; sn < MAX_SKILL; sn++)
{
if (skill_table[sn].name != NULL && ch->pcdata->learned[sn] >
0)
{
fprintf (fp, "Sk %d '%s'\n",
ch->pcdata->learned[sn], skill_table[sn].name);
}
}
for (gn = 0; gn < MAX_GROUP; gn++)
{
if (group_table[gn].name != NULL &&
ch->pcdata->group_known[gn])
{
fprintf (fp, "Gr '%s'\n", group_table[gn].name);
}
}
}
for (paf = ch->affected; paf != NULL; paf = paf->next)
{
if (paf->type < 0 || paf->type >= MAX_SKILL)
continue;
fprintf (fp, "Affc '%s' %3d %3d %3d %3d %3d %10d\n",
skill_table[paf->type].name,
paf->where,
paf->level,
paf->duration, paf->modifier, paf->location,
paf->bitvector);
}
#ifdef I3
i3save_char( ch, fp );
#endif
fprintf (fp, "End\n\n");
return;
}
[EMAIL PROTECTED]@[EMAIL PROTECTED] CODE ENDS [EMAIL PROTECTED]@[EMAIL
PROTECTED]
Anyone see ANYTHING funny? If so please help.
I really do thank everyone in advance... without this list i'd have to
start my entire mud over that I've spent so much time on...
I would provide more info, but I would be stuck as to what to give.
Thanks in advance,
Oz
----__JNP_000_2134.4ba5.1c00
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
[Blah blah blah deleted....]
