aboutsummaryrefslogtreecommitdiff
path: root/core/path
diff options
context:
space:
mode:
authorgingerBill <bill@gingerbill.org>2020-09-26 20:02:24 +0100
committergingerBill <bill@gingerbill.org>2020-09-26 20:02:24 +0100
commit49eaeccd846868bfa0088f88da190b3ac32799fb (patch)
treede16d99d3e415149dadecf6151ab1881a33ad1c7 /core/path
parent840af6825aa5a728bb7fab3be24edff34aa3d571 (diff)
Remove OS specific stuff from `package path`
Diffstat (limited to 'core/path')
-rw-r--r--core/path/path.odin154
1 files changed, 7 insertions, 147 deletions
diff --git a/core/path/path.odin b/core/path/path.odin
index 9c8228d11..986d02d11 100644
--- a/core/path/path.odin
+++ b/core/path/path.odin
@@ -5,29 +5,14 @@ import "core:runtime"
import "core:unicode/utf8"
// is_separator checks whether the byte is a valid separator character
-is_separator :: proc(c: byte) -> bool {
- switch c {
- case '/': return true;
- case '\\': return ODIN_OS == "windows";
- }
- return false;
+is_separator :: inline proc(c: byte) -> bool {
+ return c == '/';
}
// is_abs checks whether the path is absolute
-is_abs :: proc(path: string) -> bool {
- if len(path) > 0 && path[0] == '/' {
- return true;
- }
- when ODIN_OS == "windows" {
- if len(path) > 2 {
- switch path[0] {
- case 'A'..'Z', 'a'..'z':
- return path[1] == ':' && is_separator(path[2]);
- }
- }
- }
- return false;
+is_abs :: inline proc(path: string) -> bool {
+ return len(path) > 0 && path[0] == '/';
}
@@ -51,7 +36,7 @@ base :: proc(path: string, new := false, allocator := context.allocator) -> (las
for len(path) > 0 && is_separator(path[len(path)-1]) {
path = path[:len(path)-1];
}
- if i := strings.last_index_any(path, OS_SEPARATORS); i >= 0 {
+ if i := strings.last_index(path, "/"); i >= 0 {
path = path[i+1:];
}
@@ -79,13 +64,13 @@ dir :: proc(path: string, allocator := context.allocator) -> string {
// If there is no slash in path, it returns an empty dir and file set to path
// The returned values have the property that path = dir+file
split :: proc(path: string) -> (dir, file: string) {
- i := strings.last_index_any(path, OS_SEPARATORS);
+ i := strings.last_index(path, "/");
return path[:i+1], path[i+1:];
}
// split_elements splits the path elements into slices of the original path string
split_elements :: proc(path: string, allocator := context.allocator) -> []string {
- return strings.split_multi(path, OS_SEPARATORS_ARRAY, true, allocator);
+ return strings.split(path, "/", allocator);
}
// clean returns the shortest path name equivalent to path through lexical analysis only
@@ -206,131 +191,6 @@ name :: proc(path: string, new := false, allocator := context.allocator) -> (nam
-rel :: proc{rel_between, rel_current};
-
-// returns the relative path from one path to another
-rel_between :: proc(from, to: string, allocator := context.allocator) -> string {
- if from == "" || to == "" {
- return "";
- }
-
- from, to := from, to;
- from = full(from, context.temp_allocator);
- to = full(to, context.temp_allocator);
-
- from_is_dir := is_dir(from);
- to_is_dir := is_dir(to);
-
- index, slash := 0, 0;
-
- for {
- if index >= len(from) {
- if index >= len(to) || (from_is_dir && index < len(to) && (to[index] == '/' || to[index] == '\\')) {
- slash = index;
- }
-
- break;
- }
- else if index >= len(to) {
- if index >= len(from) || (to_is_dir && index < len(from) && (from[index] == '/' || from[index] == '\\')) {
- slash = index;
- }
-
- break;
- }
-
- lchar, skip := utf8.decode_rune_in_string(from[index:]);
- rchar, _ := utf8.decode_rune_in_string(to[index:]);
-
- if (lchar == '/' || lchar == '\\') && (rchar == '/' || lchar == '\\') {
- slash = index;
- }
- else if lchar != rchar {
- break;
- }
-
- index += skip;
- }
-
- if slash < 1 {
- // there is no common path, use the absolute `to` path
- return strings.clone(to, allocator);
- }
-
- from_slashes, to_slashes := 0, 0;
-
- if slash < len(from) {
- from = from[slash+1:];
-
- if from_is_dir {
- from_slashes += 1;
- }
- }
- else {
- from = "";
- }
-
- if slash < len(to) {
- to = to[slash+1:];
-
- if to_is_dir {
- to_slashes += 1;
- }
- }
- else {
- to = "";
- }
-
- for char in from {
- if char == '/' || char == '\\' {
- from_slashes += 1;
- }
- }
-
- for char in to {
- if char == '/' || char == '\\' {
- to_slashes += 1;
- }
- }
-
- if from_slashes == 0 {
- buffer := make([]byte, 2 + len(to), allocator);
-
- buffer[0] = '.';
- buffer[1] = '/';
- copy(buffer[2:], to);
-
- return string(buffer);
- }
- else {
- buffer := make([]byte, from_slashes*3 + len(to), allocator);
-
- for i in 0..<from_slashes {
- buffer[i*3+0] = '.';
- buffer[i*3+1] = '.';
- buffer[i*3+2] = '/';
- }
-
- copy(buffer[from_slashes*3:], to);
-
- return string(buffer);
- }
-
- return "";
-}
-
-// returns the relative path from the current directory to another path
-rel_current :: proc(to: string, allocator := context.allocator) -> string {
- return rel_between(current(context.allocator), to, allocator);
-}
-
-
-
-
-
-
-
-
/*
Lazy_Buffer is a lazily made path buffer
When it does allocate, it uses the context.allocator