Add is_directory and path_exits functions (using stat)

Author: Thirumalai-Shaktivel

src/lpython/utils.cpp

@@ -69,5 +69,25 @@ std::string get_runtime_library_header_dir()
     return get_runtime_library_dir() + "/impure";
 }
 
+bool is_directory(std::string path) {
+    struct stat buffer;
+    if (stat(path.c_str(), &buffer) == 0) {
+        if (S_ISDIR(buffer.st_mode)) {
+            return true;
+        } else {
+            return false;
+        }
+    }
+    return false;
+}
+
+bool path_exits(std::string path) {
+    struct stat buffer;
+    if (stat(path.c_str(), &buffer) == 0) {
+        return true;
+    } else {
+        return false;
+    }
+}
 
 }

src/lpython/utils.h

@@ -4,11 +4,26 @@
 #include <string>
 #include <libasr/utils.h>
 
+#include <sys/types.h>
+#include <sys/stat.h>
+#ifndef _WIN32
+    #include <unistd.h>
+#endif
+
+#ifdef _WIN32
+    #define stat _stat
+    #if !defined S_ISDIR
+        #define S_ISDIR(m) (((m) & _S_IFDIR) == _S_IFDIR)
+    #endif
+#endif
+
 namespace LFortran {
 
 void get_executable_path(std::string &executable_path, int &dirname_length);
 std::string get_runtime_library_dir();
 std::string get_runtime_library_header_dir();
+bool is_directory(std::string path);
+bool path_exits(std::string path);
 
 } // LFortran