file.hpp File Reference

#include "url.hpp"

Include dependency graph for file.hpp:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Functions
bool	is_local_and_single (url u)
bool	is_directory (url u)
bool	is_regular (url u)
bool	is_symbolic_link (url u)
bool	is_newer (url which, url than)
bool	is_of_type (url name, string filter)
int	file_size (url u)
int	last_modified (url u)
array< string >	read_directory (url u, bool &error_flag)
url	subdirectories (url u)
void	mkdir (url u)
void	make_dir (url which)
void	rmdir (url u)
void	chdir (url u)
url	url_temp_dir ()
url	url_temp (string suffix="")
void	remove (url u)
void	move (url u1, url u2)
void	copy (url u1, url u2)
bool	load_string (url file_name, string &s, bool fatal)
string	string_load (url u)
bool	save_string (url file_name, const string &s, bool fatal=false)
void	string_save (const string &s, url u)
bool	append_string (url u, const string &s, bool fatal)
void	string_append_to_file (const string &s, url u)
void	append_to (url what, url to)

Function Documentation

is_local_and_single()

bool is_local_and_single

(

url

u

)

Definition at line 22 of file file.cpp.

                            {
  string label   = u.label ();
  string protocol= u.protocol ();
  return ((label == "") || (label == "concat") || (label == "root")) &&
         (protocol == "default" || protocol == "file");
}

is_directory()

bool is_directory

(

url

u

)

Definition at line 38 of file file.cpp.

                     {
  if (!is_local_and_single (u)) return false;
 
  c_string       path (as_local_path (u));
  tb_file_info_t info;
  if (tb_file_info (path, &info)) {
    switch (info.type) {
    case TB_FILE_TYPE_DIRECTORY:
      return true;
    default:
      return false;
    }
  }
  else {
    return false;
  }
}

is_regular()

bool is_regular

(

url

u

)

Definition at line 57 of file file.cpp.

                   {
  if (!is_local_and_single (u)) return false;
 
  c_string       path (as_local_path (u));
  tb_file_info_t info;
  if (tb_file_info (path, &info)) {
    switch (info.type) {
    case TB_FILE_TYPE_FILE:
      return true;
    default:
      return false;
    }
  }
  else {
    return false;
  }
}

is_symbolic_link()

bool is_symbolic_link

(

url

u

)

Definition at line 76 of file file.cpp.

                         {
  if (!is_local_and_single (u)) return false;
 
  c_string       path (as_local_path (u));
  tb_file_info_t info;
  if (tb_file_info (path, &info)) {
    return (info.flags & TB_FILE_FLAG_LINK) != 0;
  }
  else {
    return false;
  }
}

is_newer()

bool is_newer	(	url	which,
		url	than )

Definition at line 90 of file file.cpp.

                               {
  if (!is_local_and_single (which)) return false;
  if (!is_local_and_single (than)) return false;
 
  tb_file_info_t info1, info2;
  if (tb_file_info (c_string (as_local_path (which)), &info1) &
      tb_file_info (c_string (as_local_path (than)), &info2)) {
    return info1.mtime > info2.mtime;
  }
  else {
    return false;
  }
}

is_of_type()

bool is_of_type	(	url	name,
		string	filter )

Definition at line 105 of file file.cpp.

                                     {
  if (is_ramdisc (name)) return true;
 
  if (!is_local_and_single (name)) return false;
 
  if (filter == "") return true;
  int i, n= N (filter);
 
  // Normal files
  if (os_win () || os_mingw ()) {
    string suf;
    if (filter == "x") {
      suf= suffix (name);
      if ((suf != "exe") && (suf != "bat") && (suf != "com")) {
        name= glue (name, ".exe");
        suf = "exe";
      }
    }
  }
  c_string       path (as_local_path (name));
  tb_file_info_t info;
  if (!tb_file_info (path, &info)) {
    return false;
  }
  for (i= 0; i < n; i++)
    switch (filter[i]) {
      // FIXME: should check user id and group id for r, w and x
    case 'f':
      if (info.type != TB_FILE_TYPE_FILE) return false;
      break;
    case 'd':
      if (info.type != TB_FILE_TYPE_DIRECTORY) return false;
      break;
    case 'l':
      if (info.flags != TB_FILE_FLAG_LINK) return false;
      break;
    case 'r':
      if (!tb_file_access (path, TB_FILE_MODE_RO)) return false;
      break;
    case 'w':
      if (!tb_file_access (path, TB_FILE_MODE_WO)) return false;
      break;
    case 'x':
      if (!tb_file_access (path, TB_FILE_MODE_EXEC)) return false;
      break;
    }
  return true;
}

file_size()

int file_size

(

url

u

)

Definition at line 155 of file file.cpp.

                  {
  if (!is_local_and_single (u)) return -1;
 
  c_string       path (as_local_path (u));
  tb_file_info_t info;
  if (tb_file_info (path, &info)) {
    return info.size;
  }
  else {
    return -1;
  }
}

last_modified()

int last_modified

(

url

u

)

Definition at line 169 of file file.cpp.

                      {
  if (!is_local_and_single (u)) return -1;
 
  c_string       path (as_local_path (u));
  tb_file_info_t info;
  if (tb_file_info (path, &info)) {
    return info.mtime;
  }
  else {
    return -1;
  }
}

read_directory()

array< string > read_directory	(	url	u,
		bool &	error_flag )

Definition at line 194 of file file.cpp.

                                         {
  if (!is_local_and_single (u)) {
    error_flag= false;
    return array<string> ();
  }
 
  c_string      path (as_local_path (u));
  array<string> arr_result= array<string> ();
  error_flag              = !is_directory (u);
  if (error_flag) {
    return arr_result;
  }
  tb_directory_walk (path, 0, tb_false, tb_directory_walk_func, &arr_result);
  return arr_result;
}

subdirectories()

url subdirectories

(

url

u

)

Definition at line 211 of file file.cpp.

                       {
  if (is_or (u)) return subdirectories (u[1]) | subdirectories (u[2]);
  else if (is_directory (u)) {
    url           ret= u;
    bool          error_flag;
    array<string> dir= read_directory (u, error_flag);
    for (int i= 0; i < N (dir); i++)
      if (!starts (dir[i], ".") && is_directory (u * dir[i]))
        ret= ret | subdirectories (u * dir[i]);
    return ret;
  }
  else return url_none ();
}

mkdir()

void mkdir

(

url

u

)

Definition at line 226 of file file.cpp.

              {
  string label= u.label ();
  if (label == "none" || label == "root" || label == "wildcard") return;
  if (is_local_and_single (u)) { // label == "" or label == "concat"
    c_string path (as_local_path (u));
    tb_directory_create (path);
  }
  if (is_or (u)) { // label == "or"
    mkdir (u[1]);
    mkdir (u[2]);
  }
}

make_dir()

void make_dir

(

url

which

)

Definition at line 240 of file file.cpp.

                     {
  if (is_none (which)) return;
  if (!is_directory (which)) {
    make_dir (head (which));
    mkdir (which);
  }
}

rmdir()

void rmdir

(

url

u

)

Definition at line 249 of file file.cpp.

              {
  string label= u.label ();
  if (label == "none" || label == "root" || label == "wildcard") return;
  if (is_local_and_single (u)) { // label == "" or label == "concat"
    c_string path (as_local_path (u));
    tb_directory_remove (path);
  }
  if (is_or (u)) { // label == "or"
    rmdir (u[1]);
    rmdir (u[2]);
  }
}

chdir()

void chdir

(

url

u

)

Definition at line 263 of file file.cpp.

              {
  if (is_local_and_single (u)) {
    c_string path (as_local_path (u));
    if (tb_directory_current_set (path) != tb_true) {
      TM_FAILED ("Failed to change the dir");
    }
  }
  else TM_FAILED ("file path invalid");
}

url_temp_dir()

url url_temp_dir

(

)

Definition at line 300 of file file.cpp.

                {
  static url u;
  if (u == url_none ()) {
    u= url_temp_dir_sub ();
    make_dir (u);
  }
  return u;
}

url_temp()

url url_temp

(

string

suffix = ""

)

Definition at line 274 of file file.cpp.

                         {
  string file_name= replace (lolly::hash::uuid_make (), "-", "_");
  if (!is_empty (suffix)) {
    file_name= file_name * string (".") * suffix;
  }
  url u= url_temp_dir () * url (file_name);
  if (file_size (u) == -1) {
    return u;
  }
  else {
    return url_temp (suffix);
  }
}

remove()

void remove

(

url

u

)

Definition at line 326 of file file.cpp.

               {
  string label= u.label ();
  if (label == "none" || label == "root" || label == "wildcard") return;
  if (is_local_and_single (u)) {
    c_string path (as_local_path (u));
    tb_file_remove (path);
  }
  else if (is_or (u)) { // label == "or"
    remove (u[1]);
    remove (u[2]);
  }
}

move()

void move	(	url	u1,
		url	u2 )

Definition at line 310 of file file.cpp.

                      {
  c_string p1 (as_local_path (u1));
  c_string p2 (as_local_path (u2));
 
  tb_file_rename (p1, p2);
}

copy()

void copy	(	url	u1,
		url	u2 )

Definition at line 318 of file file.cpp.

                      {
  c_string p1 (as_local_path (u1));
  c_string p2 (as_local_path (u2));
 
  tb_file_copy (p1, p2, TB_FILE_COPY_LINK);
}

load_string()

bool load_string	(	url	file_name,
		string &	s,
		bool	fatal )

Definition at line 434 of file file.cpp.

                                           {
  file_status stat= load_string_try (u, s);
  return cleanup_and_return_finally (stat, u, fatal, "load url");
}

string_load()

string string_load

(

url

u

)

Definition at line 440 of file file.cpp.

                    {
  string s;
  // file_url f= u;
  (void) load_string (u, s, false);
  return s;
}

save_string()

bool save_string	(	url	file_name,
		const string &	s,
		bool	fatal = false )

Definition at line 490 of file file.cpp.

                                                 {
  file_status stat= save_string_try (u, s);
  return cleanup_and_return_finally (stat, u, fatal, "save to url");
}

string_save()

void string_save	(	const string &	s,
		url	u )

Definition at line 496 of file file.cpp.

                                     {
  (void) save_string (u, s, false);
}

append_string()

bool append_string	(	url	u,
		const string &	s,
		bool	fatal )

Definition at line 543 of file file.cpp.

                                                   {
  file_status stat= append_string_try (u, s);
  return cleanup_and_return_finally (stat, u, fatal, "append to url");
}

string_append_to_file()

void string_append_to_file	(	const string &	s,
		url	u )

Definition at line 549 of file file.cpp.

                                               {
  (void) append_string (u, s, false);
}

append_to()

void append_to	(	url	what,
		url	to )

Definition at line 554 of file file.cpp.

                             {
  string what_s;
  if (load_string (what, what_s, false) || append_string (to, what_s, false))
    cerr << "Append failed for " << to << LF;
}