LIBUPCOREAPI UPNONNULLALL
int create_hard_link(wchar_t const* to, wchar_t const* new_hard_link) noexcept {
char* native_to = transcode(to);
if (!native_to) {
return -1;
}
char* native_new = transcode(new_hard_link);
if (!native_new) {
free(native_to);
return -1;
}
int result = create_hard_link(native_to, native_new);
free(native_new);
free(native_to);
return result;
}
/* Name: do_ln()
*
* Description:
*
* This function reads the command line arguments and creates a link
* in an ext2fs file system
*
* Algorithm:
*
* Read any command line switches
* Get the source file specification
* Open the file system
* Get the directory and basename of the source file
* Determine the inode number for the source file
* If the destination file is not given or if it's a .
* use the current directory and the basename of the source file
* Otherwise
* Get the directory and basename of the destination file
* Create the link
*
* Global Variables:
*
* None
*
* Arguments:
*
* int argc; The number of arguments
* char *argv[]; The command line arguments
*
* Return Values:
*
* 0 - the link was created successfully
* an error occurred.
*
* Author: Keith W. Sheffield
* Date: 03/05/2002
*
* Modification History:
*
* MM/DD/YY Name Description
* 03/06/02 K. Sheffield Modified to perform file moves
* 03/20/02 K. Sheffield Moved the mv operation to a separate file
*/
long
do_ln(int argc, char *argv[])
{
int verbose=0;
int force=0;
int symlink=0;
int errcnt=0;
char *cur_filesys = NULL;
ext2_filsys fs = NULL;
ext2_ino_t root;
ext2_ino_t srcd;
ext2_ino_t destd;
ext2_ino_t source_file;
char *src_dir;
char *dest_dir;
char *src_name;
char *dest_name;
long retval;
int c;
#ifdef HAVE_OPTRESET
optreset = 1; /* Makes BSD getopt happy */
#endif
while ((c = getopt(argc, argv, "vfs")) != EOF)
{
switch (c)
{
case 'v':
verbose = 1;
break;
case 'f':
force = E2T_FORCE;
break;
case 's':
symlink = 1;
break;
default:
errcnt++;
break;
}
}
if (errcnt || argc == optind)
{
fputs(USAGE, stderr);
return(1);
}
if (symlink)
{
fputs("Not implemented yet\n", stderr);
return(1);
}
cur_filesys = argv[optind++];
if (NULL == (src_dir = strchr(cur_filesys, ':')))
{
fprintf(stderr, "Invalid file specification: %s\n", cur_filesys);
return(1);
}
*src_dir++ = '\0';
if (*src_dir == '\0')
{
fputs(USAGE, stderr);
return(1);
}
if ((retval = open_filesystem(cur_filesys, &fs, &root, 1)))
{
fprintf(stderr, "%s: %s\n", error_message(retval), cur_filesys);
return retval;
}
/* move to the source directory */
if (get_file_parts(fs, root, src_dir, &srcd, &src_dir, &src_name))
{
ext2fs_close(fs);
return(-1);
}
/* get the inode number for the source file */
if ((retval = ext2fs_namei(fs, srcd, srcd, src_name, &source_file)))
{
fprintf(stderr, "%s: source file %s\n",error_message(retval), src_name);
ext2fs_close(fs);
return(retval);
}
/* get the destination directory */
destd = root;
if (argc == optind || strcmp(dest_dir = argv[optind], ".") == 0)
dest_name = src_name;
else
{
if (get_file_parts(fs, root, dest_dir, &destd, &dest_dir,
&dest_name))
{
ext2fs_close(fs);
return(-1);
}
}
/* now create the link */
if ((retval = create_hard_link(fs, destd, source_file, dest_name, force)))
{
fprintf(stderr, "Error linking %s/%s as %s/%s\n",
((src_dir == NULL) ? "." : src_dir), src_name,
((dest_dir == NULL) ? "." : dest_dir), dest_name);
ext2fs_close(fs);
return(1);
}
if (verbose)
fprintf(stderr, "linked %s/%s as %s/%s\n",
((src_dir == NULL) ? "." : src_dir), src_name,
((dest_dir == NULL) ? "." : dest_dir), dest_name);
ext2fs_close(fs);
return(0);
} /* end of do_ln */
void rotate_files( bool initializing = false )
{
FC_ASSERT( cfg.rotate );
fc::time_point now = time_point::now();
fc::time_point_sec start_time = get_file_start_time( now, cfg.rotation_interval );
string timestamp_string = start_time.to_non_delimited_iso_string();
fc::path link_filename = cfg.filename;
fc::path log_filename = link_filename.parent_path() / (link_filename.filename().string() + "." + timestamp_string);
{
fc::scoped_lock<boost::mutex> lock( slock );
if( !initializing )
{
if( start_time <= _current_file_start_time )
{
_rotation_task = schedule( [this]() { rotate_files(); },
_current_file_start_time + cfg.rotation_interval.to_seconds(),
"rotate_files(2)" );
return;
}
out.flush();
out.close();
}
remove_all(link_filename); // on windows, you can't delete the link while the underlying file is opened for writing
if( fc::exists( log_filename ) )
out.open( log_filename, std::ios_base::out | std::ios_base::app );
else
out.open( log_filename, std::ios_base::out | std::ios_base::app);
create_hard_link(log_filename, link_filename);
}
/* Delete old log files */
fc::time_point limit_time = now - cfg.rotation_limit;
string link_filename_string = link_filename.filename().string();
directory_iterator itr(link_filename.parent_path());
for( ; itr != directory_iterator(); itr++ )
{
try
{
string current_filename = itr->filename().string();
if (current_filename.compare(0, link_filename_string.size(), link_filename_string) != 0 ||
current_filename.size() <= link_filename_string.size() + 1)
continue;
string current_timestamp_str = current_filename.substr(link_filename_string.size() + 1,
timestamp_string.size());
fc::time_point_sec current_timestamp = fc::time_point_sec::from_iso_string( current_timestamp_str );
if( current_timestamp < start_time )
{
if( current_timestamp < limit_time || file_size( current_filename ) <= 0 )
{
remove_all( *itr );
continue;
}
}
}
catch (const fc::canceled_exception&)
{
throw;
}
catch( ... )
{
}
}
_current_file_start_time = start_time;
_rotation_task = schedule( [this]() { rotate_files(); },
_current_file_start_time + cfg.rotation_interval.to_seconds(),
"rotate_files(3)" );
}
/* Name: do_mv()
*
* Description:
*
* This function reads the command line arguments and moves or renames files
* in an ext2fs file system
*
* Algorithm:
*
* Read any command line switches
* Get the first source file specification
* If we are performing a file swap, call do_swap()
* Open the file system
* Get the destination and determine if it is a directory
* If not, then get the destination's directory and basename
* Also check that the number of source files are no more than one
* For each source file
* Get the directory and basename of the source file
* Determine the inode number for the source file
* Create the link
* Unlink the original source file.
*
* Global Variables:
*
* None
*
* Arguments:
*
* int argc; The number of arguments
* char *argv[]; The command line arguments
*
* Return Values:
*
* 0 - the file was move successfully
* an error occurred.
*
* Author: Keith W. Sheffield
* Date: 03/20/2002
*
* Modification History:
*
* MM/DD/YY Name Description
*/
long
do_mv(int argc, char *argv[])
{
int verbose=0;
int force=0;
int swap_files=0;
int errcnt=0;
char *cur_filesys = NULL;
ext2_filsys fs = NULL;
ext2_ino_t root;
ext2_ino_t srcd;
ext2_ino_t destd;
ext2_ino_t source_file;
char *src_dir;
char *dest_dir;
char *src_name;
char *dest_name;
char *result_name;
long retval;
int c;
int curidx;
#ifdef HAVE_OPTRESET
optreset = 1; /* Makes BSD getopt happy */
#endif
while ((c = getopt(argc, argv, "vfs")) != EOF)
{
switch (c)
{
case 'v':
verbose = 1;
break;
case 'f':
force = E2T_FORCE;
break;
case 's':
swap_files = 1;
break;
default:
errcnt++;
break;
}
}
curidx = optind;
force |= E2T_DO_MV;
if (errcnt || argc < curidx+2)
{
fputs(USAGE, stderr);
return(1);
}
if (swap_files)
return(do_swap(force, verbose, curidx, argc, argv));
cur_filesys = argv[curidx++];
if (NULL == (src_dir = strchr(cur_filesys, ':')))
{
fprintf(stderr, "Invalid file specification: %s\n", cur_filesys);
return(1);
}
*src_dir++ = '\0';
if ((retval = open_filesystem(cur_filesys, &fs, &root, 1)))
{
return retval;
}
/* get the destination directory */
dest_name = NULL;
if (strcmp(dest_dir = argv[argc-1], ".") != 0)
{
/* check to see if the file name already exists in the current
* directory and also see if it is a directory.
*/
if ((retval = ext2fs_namei(fs, root, root, dest_dir, &destd)) ||
(retval = ext2fs_check_directory(fs, destd)))
{
if (retval != EXT2_ET_FILE_NOT_FOUND &&
retval != EXT2_ET_NO_DIRECTORY)
{
fprintf(stderr, "%s\n",error_message(retval));
ext2fs_close(fs);
return(retval);
}
/* ok, so it's either not there or it's not a directory, so
* get the real destination directory and file name.
*/
if (curidx+1 < argc)
{
fprintf(stderr, "%s must be a directory!\n", dest_dir);
ext2fs_close(fs);
return(1);
}
if (get_file_parts(fs, root, dest_dir, &destd, &dest_dir,
&dest_name))
{
ext2fs_close(fs);
return(-1);
}
}
else /* we have a directory!!! */
dest_name = NULL;
}
else
{
destd = root;
dest_name = NULL;
}
do
{
/* move to the source directory */
if (get_file_parts(fs, root, src_dir, &srcd, &src_dir, &src_name))
{
ext2fs_close(fs);
return(-1);
}
/* get the inode number for the source file */
if ((retval = ext2fs_namei(fs, srcd, srcd, src_name, &source_file)))
{
fprintf(stderr, "%s: source file %s\n",error_message(retval),
src_name);
ext2fs_close(fs);
return(retval);
}
result_name = (dest_name) ? dest_name : src_name;
/* now create the link */
if ((retval = create_hard_link(fs, destd, source_file, result_name,
force)))
{
fprintf(stderr, "Error renaming %s/%s as %s/%s\n",
((src_dir == NULL) ? "." : src_dir), src_name,
((dest_dir == NULL) ? "." : dest_dir), result_name);
ext2fs_close(fs);
return(1);
}
if ((retval = ext2fs_unlink(fs, srcd, src_name, 0, 0)))
{
fprintf(stderr, "%s - %s\n", src_name, error_message(retval));
ext2fs_close(fs);
return(retval);
}
if (verbose)
fprintf(stderr, "moved %s/%s as %s/%s\n",
((src_dir == NULL) ? "." : src_dir), src_name,
((dest_dir == NULL) ? "." : dest_dir), result_name);
src_dir = argv[curidx++];
}
while (curidx < argc);
ext2fs_close(fs);
return(0);
} /* end of do_mv */
static long
do_swap(int force, int verbose, int curidx, int argc, char **argv)
{
char *cur_filesys = NULL;
ext2_filsys fs = NULL;
ext2_ino_t root;
ext2_ino_t file1_dirno;
ext2_ino_t file2_dirno;
ext2_ino_t file3_dirno;
ext2_ino_t file1_no;
ext2_ino_t file2_no;
char *file1_dir;
char *file2_dir;
char *file3_dir;
char *file1_name;
char *file2_name;
char *file3_name;
long retval;
if (curidx + 2 > argc)
{
fputs(USAGE, stderr);
return(1);
}
cur_filesys = argv[curidx++];
if (NULL == (file1_dir = strchr(cur_filesys, ':')))
{
fprintf(stderr, "Invalid file specification: %s\n", cur_filesys);
return(1);
}
*file1_dir++ = '\0';
if ((retval = open_filesystem(cur_filesys, &fs, &root, 1)))
{
return retval;
}
/* move to the file 1 directory */
if (get_file_parts(fs, root, file1_dir, &file1_dirno, &file1_dir,
&file1_name))
{
ext2fs_close(fs);
return(-1);
}
/* get the inode number for the file 1 file */
if ((retval = ext2fs_namei(fs, file1_dirno, file1_dirno, file1_name,
&file1_no)))
{
fprintf(stderr, "%s: file 1 file %s\n",error_message(retval),
file1_name);
ext2fs_close(fs);
return(retval);
}
/* move to the file 2 directory */
if (get_file_parts(fs, root, argv[curidx++], &file2_dirno, &file2_dir,
&file2_name))
{
ext2fs_close(fs);
return(-1);
}
/* get the inode number for the file 2 file */
if ((retval = ext2fs_namei(fs, file2_dirno, file2_dirno, file2_name,
&file2_no)))
{
fprintf(stderr, "%s: file 2 file %s\n",error_message(retval),
file2_name);
ext2fs_close(fs);
return(retval);
}
if (curidx < argc)
{
/* move to the file 3 directory */
if (get_file_parts(fs, root, argv[curidx++], &file3_dirno, &file3_dir,
&file3_name))
{
ext2fs_close(fs);
return(-1);
}
/* now move the first file to the 3rd */
if ((retval = create_hard_link(fs, file3_dirno, file1_no, file3_name,
force)))
{
fprintf(stderr, "Error renaming %s/%s as %s/%s\n",
((file1_dir == NULL) ? "." : file1_dir), file1_name,
((file3_dir == NULL) ? "." : file3_dir), file3_name);
ext2fs_close(fs);
return(1);
}
if ((retval = ext2fs_unlink(fs, file1_dirno, file1_name, 0, 0)))
{
fprintf(stderr, "%s - %s\n", file1_name, error_message(retval));
ext2fs_close(fs);
return(retval);
}
/* now move the 2nd file to the 1st */
if ((retval = create_hard_link(fs, file1_dirno, file2_no, file1_name,
force)))
{
fprintf(stderr, "Error renaming %s/%s as %s/%s\n",
((file2_dir == NULL) ? "." : file2_dir), file2_name,
((file1_dir == NULL) ? "." : file1_dir), file1_name);
ext2fs_close(fs);
return(1);
}
if ((retval = ext2fs_unlink(fs, file2_dirno, file2_name, 0, 0)))
{
fprintf(stderr, "%s - %s\n", file2_name, error_message(retval));
ext2fs_close(fs);
return(retval);
}
if (verbose)
fprintf(stderr, "renamed file %s/%s as %s/%s\n"
"renamed file %s/%s as %s/%s\n",
((file1_dir == NULL) ? "." : file1_dir), file1_name,
((file3_dir == NULL) ? "." : file3_dir), file3_name,
((file2_dir == NULL) ? "." : file2_dir), file2_name,
((file1_dir == NULL) ? "." : file1_dir), file1_name);
}
else
{
/* now remove the first file */
if ((retval = ext2fs_unlink(fs, file1_dirno, file1_name, 0, 0)))
{
fprintf(stderr, "%s - %s\n", file1_name, error_message(retval));
ext2fs_close(fs);
return(retval);
}
/* now move the 2nd file to the 1st */
if ((retval = create_hard_link(fs, file1_dirno, file2_no, file1_name,
force)))
{
fprintf(stderr, "Error renaming %s/%s as %s/%s\n",
((file2_dir == NULL) ? "." : file2_dir), file2_name,
((file1_dir == NULL) ? "." : file1_dir), file1_name);
ext2fs_close(fs);
return(1);
}
if ((retval = ext2fs_unlink(fs, file2_dirno, file2_name, 0, 0)))
{
fprintf(stderr, "%s - %s\n", file2_name, error_message(retval));
ext2fs_close(fs);
return(retval);
}
if ((retval = create_hard_link(fs, file2_dirno, file1_no, file2_name,
force)))
{
fprintf(stderr, "Error renaming %s/%s as %s/%s\n",
((file1_dir == NULL) ? "." : file1_dir), file1_name,
((file2_dir == NULL) ? "." : file2_dir), file2_name);
ext2fs_close(fs);
return(1);
}
if (verbose)
fprintf(stderr, "swapped files %s/%s <-> %s/%s\n",
((file1_dir == NULL) ? "." : file1_dir), file1_name,
((file2_dir == NULL) ? "." : file2_dir), file2_name);
}
ext2fs_close(fs);
return(0);
} /* end of do_swap */
