Lines Matching refs:basedir
941 # LINK:target indicates a symlink, pointing to $basedir/target
948 local ($basedir, %dirtree) = @_;
951 &remove_directory_tree ("$basedir");
952 mkdir ($basedir, 0777) || &error ("Couldn't mkdir $basedir: $!\n", 1);
958 mkdir ("$basedir/$path", 0777)
959 || &error ("Couldn't mkdir $basedir/$path: $!\n", 1);
963 &create_file ("$basedir/$path", $1 . "\n");
967 symlink ("$basedir/$1", "$basedir/$path")
968 || &error ("Couldn't symlink $basedir/$path -> $basedir/$1: $!\n", 1);
988 local ($basedir, %dirtree) = @_;
999 opendir (DIR, $basedir) || &error ("Couldn't open $basedir: $!\n", 1);
1004 print "dirtree: (%dirtree)\n$basedir: (@allfiles)\n";
1024 lstat ("$basedir/$path");
1039 if (-d _ && opendir (DIR, "$basedir/$path") )
1067 $contents = &read_file_into_string ("$basedir/$path");
1086 $contents = readlink ("$basedir/$path");
1088 $fulltarget = "$basedir/$target";
