Support QNX platform.

[thun-res]

platform: qnx700, aarch64, c++11 support (POSIX support)

"Operating system currently not supported!"
And It looks like the 'struct dirent' has no 'd_type'
I try to modify:

filesystem.hpp:

...
#elif defined(__QNX__)
#define GHC_OS_QNX
#else
#error "Operating system currently not supported!"
#endif
...

...
      void copyToDirEntry()
        {
            _dir_entry._symlink_status.permissions(perms::unknown);
#ifdef GHC_OS_QNX
            _dir_entry._status.type(file_type::none);
            _dir_entry._status.permissions(perms::unknown);
            _dir_entry._symlink_status.type(file_type::unknown);
#else
            switch (_entry->d_type) {
            case DT_BLK:
                _dir_entry._symlink_status.type(file_type::block);
                break;
            case DT_CHR:
                _dir_entry._symlink_status.type(file_type::character);
                break;
            case DT_DIR:
                _dir_entry._symlink_status.type(file_type::directory);
                break;
            case DT_FIFO:
                _dir_entry._symlink_status.type(file_type::fifo);
                break;
            case DT_LNK:
                _dir_entry._symlink_status.type(file_type::symlink);
                break;
            case DT_REG:
                _dir_entry._symlink_status.type(file_type::regular);
                break;
            case DT_SOCK:
                _dir_entry._symlink_status.type(file_type::socket);
                break;
            default:
                _dir_entry._symlink_status.type(file_type::unknown);
                break;
            }
            if (_entry->d_type != DT_LNK) {
                _dir_entry._status = _dir_entry._symlink_status;
            } else {
                _dir_entry._status.type(file_type::none);
                _dir_entry._status.permissions(perms::unknown);
            }
#endif
            _dir_entry._file_size = static_cast<uintmax_t>(-1);
            _dir_entry._hard_link_count = static_cast<uintmax_t>(-1);
            _dir_entry._last_write_time = 0;
        }
...

I don’t know if the changes are correct, but the compilation passed.

thanks.

[gulrak]

Thank you! That looks like it should work, I'll look into it.

[thun-res]

I tested it briefly and found it crashed(when I create dir it throw)...

[gulrak]

Sadly, contrary to what I expected, I couldn't get access to a QNX installation and didn't want do register and apply for a 30 days evaluation, as that wouldn't allow me to further support it after 30 days, so I currently have no way to check it myself.

[thun-res]

Thanks for trying my suggestion, I have solved it now.

...
#define GHC_OS_WEB
#include <wasi/api.h>
#elif defined(__QNX__)
#define GHC_OS_QNX
#else
#error "Operating system currently not supported!"
#endif
...

...
        void copyToDirEntry()
        {
            _dir_entry._symlink_status.permissions(perms::unknown);
#ifdef GHC_OS_QNX
            struct stat buffer;
            int reval = ::stat(_dir_entry._path.c_str(), &buffer);
            if (reval == 0) {
                if (S_ISDIR(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::directory);
                } else if (S_ISREG(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::regular);
                } else if (S_ISLNK(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::symlink);
                } else if (S_ISCHR(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::character);
                } else if (S_ISFIFO(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::fifo);
                } else if (S_ISBLK(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::block);
                } else if (S_ISSOCK(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::socket);
                } else {
                    _dir_entry._symlink_status.type(file_type::unknown);
                }
                _dir_entry._status = _dir_entry._symlink_status;
            } else {
                _dir_entry._status.type(file_type::none);
                _dir_entry._symlink_status.type(file_type::unknown);
            }
#else
            switch (_entry->d_type) {
            case DT_BLK:
                _dir_entry._symlink_status.type(file_type::block);
                break;
            case DT_CHR:
                _dir_entry._symlink_status.type(file_type::character);
                break;
            case DT_DIR:
                _dir_entry._symlink_status.type(file_type::directory);
                break;
            case DT_FIFO:
                _dir_entry._symlink_status.type(file_type::fifo);
                break;
            case DT_LNK:
                _dir_entry._symlink_status.type(file_type::symlink);
                break;
            case DT_REG:
                _dir_entry._symlink_status.type(file_type::regular);
                break;
            case DT_SOCK:
                _dir_entry._symlink_status.type(file_type::socket);
                break;
            default:
                _dir_entry._symlink_status.type(file_type::unknown);
                break;
            }
            if (_entry->d_type != DT_LNK) {
                _dir_entry._status = _dir_entry._symlink_status;
            } else {
                _dir_entry._status.type(file_type::none);
                _dir_entry._status.permissions(perms::unknown);
            }
#endif
            _dir_entry._file_size = static_cast<uintmax_t>(-1);
            _dir_entry._hard_link_count = static_cast<uintmax_t>(-1);
            _dir_entry._last_write_time = 0;
        }
        path _base;
        directory_options _options;
        DIR* _dir;
        struct ::dirent* _entry;
        directory_entry _dir_entry;
        std::error_code _ec;
    };
...

I have tested and it works, you can add this.

[thun-res]

#ifdef GHC_OS_QNX
            struct stat buffer;
            int reval = ::stat(_dir_entry._path.c_str(), &buffer);
            bool is_link = false;
            if (reval == 0) {
                if (S_ISDIR(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::directory);
                } else if (S_ISREG(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::regular);
                } else if (S_ISLNK(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::symlink);
                    is_link = true;
                } else if (S_ISCHR(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::character);
                } else if (S_ISFIFO(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::fifo);
                } else if (S_ISBLK(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::block);
                } else if (S_ISSOCK(buffer.st_mode)) {
                    _dir_entry._symlink_status.type(file_type::socket);
                } else {
                    _dir_entry._symlink_status.type(file_type::unknown);
                }
                if (is_link) {
                    _dir_entry._status.type(file_type::none);
                    _dir_entry._status.permissions(perms::unknown);
                } else {
                    _dir_entry._status = _dir_entry._symlink_status;
                }
            } else {
                _dir_entry._status.type(file_type::unknown);
                _dir_entry._symlink_status.type(file_type::unknown);
                _dir_entry._status.permissions(perms::unknown);
            }
#else
            switch (_entry->d_type) {
            case DT_BLK:
                _dir_entry._symlink_status.type(file_type::block);
                break;
            case DT_CHR:
                _dir_entry._symlink_status.type(file_type::character);
                break;
            case DT_DIR:
                _dir_entry._symlink_status.type(file_type::directory);
                break;
            case DT_FIFO:
                _dir_entry._symlink_status.type(file_type::fifo);
                break;
            case DT_LNK:
                _dir_entry._symlink_status.type(file_type::symlink);
                break;
            case DT_REG:
                _dir_entry._symlink_status.type(file_type::regular);
                break;
            case DT_SOCK:
                _dir_entry._symlink_status.type(file_type::socket);
                break;
            default:
                _dir_entry._symlink_status.type(file_type::unknown);
                break;
            }
            if (_entry->d_type != DT_LNK) {
                _dir_entry._status = _dir_entry._symlink_status;
            } else {
                _dir_entry._status.type(file_type::none);
                _dir_entry._status.permissions(perms::unknown);
            }
#endif

[gulrak]

Sorry for the delay! The reason I didn't simply use your solution was, that I wanted the way to support systems without dirent.d_type the same way as filesystems reporting DT_UNKNOWN as type and I had thought my default: would be handling those correctly but it didn't. As I couldn't test myself I postponed work on it a bit.

I used a macro to select no-d_type support to allow easier integration for other systems that might need it.

[gulrak]

This is now part of release v1.5.6

[district10]

platform: qnx700, aarch64, c++14 support (POSIX support)

set(CMAKE_CXX_FLAGS "${CMAKE_CXX_FLAGS} -std=gnu++14")
set(CMAKE_CXX_EXTENSIONS ON)

Got error:

// using the most recent ghc_filesystem/1.5.6
filesystem.hpp:178:22: fatal error: langinfo.h: No such file or directory