OLD | NEW |
1 // Copyright (c) 2015, the Dartino project authors. Please see the AUTHORS file | 1 // Copyright (c) 2015, the Dartino project authors. Please see the AUTHORS file |
2 // for details. All rights reserved. Use of this source code is governed by a | 2 // for details. All rights reserved. Use of this source code is governed by a |
3 // BSD-style license that can be found in the LICENSE.md file. | 3 // BSD-style license that can be found in the LICENSE.md file. |
4 | 4 |
5 #if defined(FLETCH_TARGET_OS_POSIX) | 5 #if defined(DARTINO_TARGET_OS_POSIX) |
6 | 6 |
7 #include "src/vm/natives.h" | 7 #include "src/vm/natives.h" |
8 | 8 |
9 #include <unistd.h> | 9 #include <unistd.h> |
10 | 10 |
11 #include "src/vm/process.h" | 11 #include "src/vm/process.h" |
12 | 12 |
13 namespace fletch { | 13 namespace dartino { |
14 | 14 |
15 BEGIN_NATIVE(UriBase) { | 15 BEGIN_NATIVE(UriBase) { |
16 char* buffer = reinterpret_cast<char*>(malloc(PATH_MAX + 1)); | 16 char* buffer = reinterpret_cast<char*>(malloc(PATH_MAX + 1)); |
17 char* path = getcwd(buffer, PATH_MAX); | 17 char* path = getcwd(buffer, PATH_MAX); |
18 Object* result = Failure::index_out_of_bounds(); | 18 Object* result = Failure::index_out_of_bounds(); |
19 if (path != NULL) { | 19 if (path != NULL) { |
20 int length = strlen(path); | 20 int length = strlen(path); |
21 path[length++] = '/'; | 21 path[length++] = '/'; |
22 path[length] = 0; | 22 path[length] = 0; |
23 result = process->NewStringFromAscii(List<const char>(path, length)); | 23 result = process->NewStringFromAscii(List<const char>(path, length)); |
24 } | 24 } |
25 free(buffer); | 25 free(buffer); |
26 return result; | 26 return result; |
27 } | 27 } |
28 END_NATIVE() | 28 END_NATIVE() |
29 | 29 |
30 } // namespace fletch | 30 } // namespace dartino |
31 | 31 |
32 #endif // defined FLETCH_TARGET_OS_POSIX | 32 #endif // defined DARTINO_TARGET_OS_POSIX |
OLD | NEW |