rename.c

Go to the documentation of this file.

/* rename, written by Andreasen. Changes by Tribul */

#if defined(macintosh)
#include <types.h>
#else
#include <sys/types.h>
#endif
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <assert.h>
#include <unistd.h>
#include <string.h>
#include "merc.h"


void do_rename (CHAR_DATA* ch, char* argument)
{
    char old_name[MAX_INPUT_LENGTH], 
         new_name[MAX_INPUT_LENGTH],
         strsave [MAX_INPUT_LENGTH];

    CHAR_DATA* victim;
    FILE* file;
    
    argument = one_argument(argument, old_name); /* find new/old name */
    one_argument (argument, new_name);
    
    /* Trivial checks */
    if (!old_name[0])
    {
        send_to_char ("Rename who?\n\r",ch);
        return;
    }
    
    victim = get_char_world (ch, old_name);
    
    if (!victim)
    {
        send_to_char ("There is no such a person online.\n\r",ch);
        return;
    }
    
    if (IS_NPC(victim))
    {   
        send_to_char ("You cannot use Rename on NPCs.\n\r",ch);
        return;
    }

    /* allow rename self new_name,but otherwise only lower level */ 
    if ( (victim != ch) && (get_trust (victim) >= get_trust (ch)) )
    {
        send_to_char ("You failed.\n\r",ch);
        return;
    }
    
    if (!victim->desc || (victim->desc->connected != CON_PLAYING) )
    {
        send_to_char ("This player has lost his link or is inside a pager or the like.\n\r",ch);
        return;
    }

    if (!new_name[0])
    {
        send_to_char ("Rename to what new name?\n\r",ch);
        return;
    }
    
    /* Insert check for clan here!! */
    /*

    if (victim->clan)
    {
        send_to_char ("This player is member of a clan, remove him from there first.\n\r",ch);
        return;
    }
    */
    
    if (!check_parse_name(new_name))
    {
        send_to_char ("The new name is illegal.\n\r",ch);
        return;
    }

    /* First, check if there is a player named that off-line */ 
    sprintf( strsave, "%s%s", PLAYER_DIR, capitalize( new_name ) );


    fclose (fpReserve); /* close the reserve file */
    file = fopen (strsave, "r"); /* attempt to to open pfile */
    if (file)
    {
        send_to_char ("A player with that name already exists!\n\r",ch);
        fclose (file);
        fpReserve = fopen( NULL_FILE, "r" ); /* is this really necessary these days? */
        return;     
    }
    fpReserve = fopen( NULL_FILE, "r" );  /* reopen the extra file */

    /* Check .gz file ! */
    sprintf( strsave, "%s%s.gz", PLAYER_DIR, capitalize( new_name ) );

    fclose (fpReserve); /* close the reserve file */
    file = fopen (strsave, "r"); /* attempt to to open pfile */
    if (file)
    {
        send_to_char ("A player with that name already exists in a compressed file!\n\r",ch);
        fclose (file);
        fpReserve = fopen( NULL_FILE, "r" ); 
        return;     
    }
    fpReserve = fopen( NULL_FILE, "r" );  /* reopen the extra file */

    if (get_char_world(ch,new_name)) /* check for playing level-1 non-saved */
    {
        send_to_char ("A player with the name you specified already exists!\n\r",ch);
        return;
    }

    /* Save the filename of the old name */

    sprintf( strsave, "%s%s", PLAYER_DIR, capitalize( victim->name ) );



    /* Rename the character and save him to a new file */
    /* NOTE: Players who are level 1 do NOT get saved under a new name */

    free_string (victim->name);
    victim->name = str_dup (capitalize(new_name));
    
    save_char_obj (victim);
    
    /* unlink the old file */
    unlink (strsave); /* unlink does return a value.. but we do not care */

    /* That's it! */
    
    send_to_char ("Character renamed.\n\r",ch);

    victim->position = POS_STANDING; /* I am laaazy */
    act ("$n has renamed you to {R$N{x.",ch,NULL,victim,TO_VICT);
            
} /* do_rename */

---