← Back to branch summary

~ubuntu-branches/ubuntu/breezy/xzip/breezy

« back to all changes in this revision

Viewing changes to fileio.c

  • Committer: Bazaar Package Importer
  • Author(s): Daniel Schepler
  • Date: 2004-04-28 05:06:15 UTC
  • Revision ID: james.westby@ubuntu.com-20040428050615-07kk3bubuck40m0w
Tags: 1:1.8.2-3
* Bump Standards-Version to 3.6.1 (no changes needed).
* Corrected formatting error in debian/copyright (thanks lintian).

Show diffs side-by-side

added added

removed removed

Lines of Context:
fileio.c
78
78
const char *storyname;
79
79
#endif
80
80
{
81
 
    char *dot_pos ;
82
 
    char *slash_pos ;
83
 
    char *home ;
84
 
    char basename[FILENAME_MAX+1] ;
85
 
 
86
 
    /* Find base name */
87
 
    if( slash_pos = strrchr( storyname, '/' ) )
88
 
      strcpy( basename, ++slash_pos ) ;
89
 
    else
90
 
      strcpy( basename, storyname ) ;
91
 
 
92
 
    if( dot_pos = strrchr( basename, '.' ) )
93
 
      *dot_pos = '\0' ;
94
 
 
95
 
    /* Find correct directory */
96
 
    if( home = getenv( "HOME" ) )
97
 
      {
98
 
        strcpy( save_name, home ) ;
99
 
        strcat( save_name, "/.infocom/" ) ;
100
 
        mkdir( save_name, 0777 ) ;
101
 
      }
102
 
 
103
 
    /* Home directory + basename */
104
 
    strcat( save_name, basename ) ;
105
 
 
106
 
    /* Copy to other three strings */
107
 
    strcpy( script_name, save_name ) ;
108
 
    strcpy( record_name, save_name ) ;
109
 
    strcpy( savedata_name, save_name ) ;
110
 
 
111
 
    /* Add extensions */
112
 
    strcat(save_name,".sav");
113
 
    strcat(script_name,".scr");
114
 
    strcat(record_name,".rec");
115
 
    strcat(savedata_name,".dat");
 
81
    char *per_pos=0;
 
82
 
 
83
    /* experimental setting of save_name, added by John Holder 26 July 1995 */
 
84
    per_pos = strrchr(storyname,'.'); /* find last '.' in storyname. */
 
85
    if (per_pos) /* The story file looks like "Odius.dat" or "odieus.z3" */
 
86
    {
 
87
      strcpy(save_name, storyname);
 
88
      per_pos=strrchr(save_name,'.');
 
89
      *(per_pos) = '\0';
 
90
      strcat(save_name,".sav");
 
91
 
 
92
      strcpy(script_name, storyname);
 
93
      per_pos=strrchr(script_name,'.');
 
94
      *(per_pos) = '\0';
 
95
      strcat(script_name,".scr");
 
96
 
 
97
      strcpy(savedata_name, storyname);
 
98
      per_pos=strrchr(savedata_name,'.');
 
99
      *(per_pos) = '\0';
 
100
      strcat(savedata_name,".dat");
 
101
 
 
102
      strcpy(record_name, storyname);
 
103
      per_pos=strrchr(record_name,'.');
 
104
      *(per_pos) = '\0';
 
105
      strcat(record_name,".rec");
 
106
    }
 
107
    else /* The story file looks like: "OdieusQuest" */
 
108
    {
 
109
      strcpy(save_name, storyname);
 
110
      strcat(save_name,".sav");
 
111
 
 
112
      strcpy(script_name, storyname);
 
113
      strcat(script_name,".scr");
 
114
 
 
115
      strcpy(savedata_name, storyname);
 
116
      strcat(savedata_name,".dat");
 
117
 
 
118
      strcpy(record_name, storyname);
 
119
      strcat(record_name,".rec");
 
120
    }
116
121
} /* set_names */
117
122
 
118
123
/*