platform/os2.c
author Ryan C. Gordon <icculus@icculus.org>
Sat, 27 Jul 2002 22:41:58 +0000
changeset 416 eadb08626c80
parent 412 f743cf88c61f
child 420 8869f1432112
permissions -rw-r--r--
Lots of fixes...seems to be fully functional, now.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
     1
/*
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
     2
 * OS/2 support routines for PhysicsFS.
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
     3
 *
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
     4
 * Please see the file LICENSE in the source's root directory.
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
     5
 *
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
     6
 *  This file written by Ryan C. Gordon.
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
     7
 */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
     8
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
     9
#if HAVE_CONFIG_H
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    10
#  include <config.h>
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    11
#endif
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    12
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    13
#if (defined OS2)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    14
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    15
#define INCL_DOSSEMAPHORES
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    16
#define INCL_DOSDATETIME
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    17
#define INCL_DOSFILEMGR
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    18
#define INCL_DOSMODULEMGR
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    19
#define INCL_DOSERRORS
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
    20
#define INCL_DOSPROCESS
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    21
#define INCL_DOSDEVICES
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
    22
#define INCL_DOSDEVIOCTL
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
    23
#define INCL_DOSMISC
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    24
#include <os2.h>
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    25
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    26
#include <stdlib.h>
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    27
#include <errno.h>
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    28
#include <string.h>
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    29
#include <assert.h>
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
    30
#include <time.h>
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
    31
#include <ctype.h>
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
    32
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
    33
#define __PHYSICSFS_INTERNAL__
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
    34
#include "physfs_internal.h"
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
    35
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
    36
const char *__PHYSFS_platformDirSeparator = "\\";
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    37
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    38
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    39
static APIRET os2err(APIRET retval)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    40
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    41
    const char *err = NULL;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    42
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    43
    /*
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    44
     * The ones that say "OS/2 reported" are more for PhysicsFS developer
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    45
     *  debugging. We give more generic messages for ones that are likely to
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    46
     *  fall through to an application.
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    47
     */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    48
    switch (retval)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    49
    {
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    50
        case NO_ERROR: /* Don't set the PhysicsFS error message for these... */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    51
        case ERROR_INTERRUPT:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    52
        case ERROR_TIMEOUT:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    53
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    54
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    55
        case ERROR_NOT_ENOUGH_MEMORY:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    56
            err = ERR_OUT_OF_MEMORY;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    57
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    58
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    59
        case ERROR_FILE_NOT_FOUND:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    60
            err = "File not found";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    61
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    62
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    63
        case ERROR_PATH_NOT_FOUND:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    64
            err = "Path not found";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    65
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    66
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    67
        case ERROR_ACCESS_DENIED:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    68
            err = "Access denied";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    69
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    70
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    71
        case ERROR_NOT_DOS_DISK:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    72
            err = "Not a DOS disk";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    73
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    74
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    75
        case ERROR_SHARING_VIOLATION:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    76
            err = "Sharing violation";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    77
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    78
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    79
        case ERROR_CANNOT_MAKE:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    80
            err = "Cannot make";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    81
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    82
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    83
        case ERROR_DEVICE_IN_USE:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    84
            err = "Device already in use";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    85
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    86
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    87
        case ERROR_OPEN_FAILED:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    88
            err = "Open failed";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    89
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    90
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    91
        case ERROR_DISK_FULL:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    92
            err = "Disk is full";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    93
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    94
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
    95
        case ERROR_PIPE_BUSY:
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    96
            err = "Pipe busy";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    97
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    98
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
    99
        case ERROR_SHARING_BUFFER_EXCEEDED:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   100
            err = "Sharing buffer exceeded";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   101
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   102
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   103
        case ERROR_FILENAME_EXCED_RANGE:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   104
        case ERROR_META_EXPANSION_TOO_LONG:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   105
            err = "Filename too big";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   106
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   107
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   108
        case ERROR_TOO_MANY_HANDLES:
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   109
        case ERROR_TOO_MANY_OPEN_FILES:
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   110
        case ERROR_NO_MORE_SEARCH_HANDLES:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   111
            err = "Too many open handles";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   112
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   113
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   114
        case ERROR_SEEK_ON_DEVICE:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   115
            err = "Seek error";  /* Is that what this error means? */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   116
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   117
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   118
        case ERROR_NEGATIVE_SEEK:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   119
            err = "Seek past start of file";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   120
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   121
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   122
        case ERROR_CURRENT_DIRECTORY:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   123
            err = "Trying to delete current working directory";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   124
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   125
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   126
        case ERROR_WRITE_PROTECT:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   127
            err = "Write protect error";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   128
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   129
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   130
        case ERROR_WRITE_FAULT:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   131
            err = "Write fault";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   132
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   133
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   134
        case ERROR_LOCK_VIOLATION:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   135
            err = "Lock violation";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   136
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   137
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   138
        case ERROR_GEN_FAILURE:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   139
            err = "General failure";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   140
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   141
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   142
        case ERROR_UNCERTAIN_MEDIA:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   143
            err = "Uncertain media";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   144
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   145
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   146
        case ERROR_PROTECTION_VIOLATION:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   147
            err = "Protection violation";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   148
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   149
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   150
        case ERROR_INVALID_PARAMETER:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   151
        case ERROR_INVALID_NAME:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   152
        case ERROR_INVALID_DRIVE:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   153
        case ERROR_INVALID_HANDLE:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   154
        case ERROR_INVALID_FUNCTION:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   155
        case ERROR_INVALID_LEVEL:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   156
        case ERROR_INVALID_CATEGORY:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   157
        case ERROR_DUPLICATE_NAME:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   158
        case ERROR_BUFFER_OVERFLOW:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   159
        case ERROR_BAD_LENGTH:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   160
        case ERROR_BAD_DRIVER_LEVEL:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   161
        case ERROR_DIRECT_ACCESS_HANDLE:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   162
            err = "OS/2 reported an invalid parameter to an API function";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   163
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   164
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   165
        case ERROR_NO_VOLUME_LABEL:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   166
            err = "OS/2 reported no volume label";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   167
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   168
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   169
        case ERROR_NO_MORE_FILES:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   170
            err = "OS/2 reported no more files";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   171
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   172
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   173
        case ERROR_MONITORS_NOT_SUPPORTED:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   174
            err = "OS/2 reported monitors not supported";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   175
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   176
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   177
        case ERROR_BROKEN_PIPE:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   178
            err = "OS/2 reported a broken pipe";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   179
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   180
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   181
        case ERROR_MORE_DATA:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   182
            err = "OS/2 reported \"more data\" (?)";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   183
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   184
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   185
        case ERROR_EAS_DIDNT_FIT:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   186
            err = "OS/2 reported Extended Attributes didn't fit";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   187
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   188
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   189
        case ERROR_INVALID_EA_NAME:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   190
            err = "OS/2 reported an invalid Extended Attribute name";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   191
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   192
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   193
        case ERROR_EA_LIST_INCONSISTENT:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   194
            err = "OS/2 reported an inconsistent Extended Attribute list";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   195
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   196
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   197
        case ERROR_SEM_OWNER_DIED:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   198
            err = "OS/2 reported that semaphore owner died";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   199
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   200
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   201
        case ERROR_TOO_MANY_SEM_REQUESTS:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   202
            err = "OS/2 reported too many semaphore requests";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   203
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   204
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   205
        case ERROR_SEM_BUSY:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   206
            err = "OS/2 reported a blocked semaphore";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   207
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   208
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   209
        case ERROR_NOT_OWNER:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   210
            err = "OS/2 reported that we used a resource we don't own.";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   211
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   212
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   213
        default:
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   214
            err = "OS/2 reported back with unrecognized error code";
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   215
            break;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   216
    } /* switch */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   217
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   218
    if (err != NULL)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   219
        __PHYSFS_setError(err);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   220
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   221
    return(retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   222
} /* os2err */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   223
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   224
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   225
static char *baseDir = NULL;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   226
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   227
int __PHYSFS_platformInit(void)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   228
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   229
    char buf[CCHMAXPATH];
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   230
    APIRET rc;
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   231
    PTIB ptib;
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   232
    PPIB ppib;
411
4907a4f94872 Fixed basedir/userdir calculation.
Ryan C. Gordon <icculus@icculus.org>
parents: 407
diff changeset
   233
    PHYSFS_sint32 len;
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   234
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   235
    assert(baseDir == NULL);
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   236
    BAIL_IF_MACRO(os2err(DosGetInfoBlocks(&ptib, &ppib)) != NO_ERROR, NULL, 0);
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   237
    rc = DosQueryModuleName(ppib->pib_hmte, sizeof (buf), (PCHAR) buf);
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   238
    BAIL_IF_MACRO(os2err(rc) != NO_ERROR, NULL, 0);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   239
411
4907a4f94872 Fixed basedir/userdir calculation.
Ryan C. Gordon <icculus@icculus.org>
parents: 407
diff changeset
   240
    /* chop off filename, leave path. */
4907a4f94872 Fixed basedir/userdir calculation.
Ryan C. Gordon <icculus@icculus.org>
parents: 407
diff changeset
   241
    for (len = strlen(buf) - 1; len >= 0; len--)
4907a4f94872 Fixed basedir/userdir calculation.
Ryan C. Gordon <icculus@icculus.org>
parents: 407
diff changeset
   242
    {
4907a4f94872 Fixed basedir/userdir calculation.
Ryan C. Gordon <icculus@icculus.org>
parents: 407
diff changeset
   243
        if (buf[len] == '\\')
4907a4f94872 Fixed basedir/userdir calculation.
Ryan C. Gordon <icculus@icculus.org>
parents: 407
diff changeset
   244
        {
412
f743cf88c61f Minor patch.
Ryan C. Gordon <icculus@icculus.org>
parents: 411
diff changeset
   245
            buf[len] = '\0';
411
4907a4f94872 Fixed basedir/userdir calculation.
Ryan C. Gordon <icculus@icculus.org>
parents: 407
diff changeset
   246
            break;
4907a4f94872 Fixed basedir/userdir calculation.
Ryan C. Gordon <icculus@icculus.org>
parents: 407
diff changeset
   247
        } /* if */
4907a4f94872 Fixed basedir/userdir calculation.
Ryan C. Gordon <icculus@icculus.org>
parents: 407
diff changeset
   248
    } /* for */
4907a4f94872 Fixed basedir/userdir calculation.
Ryan C. Gordon <icculus@icculus.org>
parents: 407
diff changeset
   249
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   250
    assert(len > 0);  /* should have been a "x:\\" on the front on string. */
411
4907a4f94872 Fixed basedir/userdir calculation.
Ryan C. Gordon <icculus@icculus.org>
parents: 407
diff changeset
   251
4907a4f94872 Fixed basedir/userdir calculation.
Ryan C. Gordon <icculus@icculus.org>
parents: 407
diff changeset
   252
    baseDir = (char *) malloc(len + 1);
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   253
    BAIL_IF_MACRO(baseDir == NULL, ERR_OUT_OF_MEMORY, 0);
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   254
    strcpy(baseDir, buf);
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   255
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   256
    return(1);  /* success. */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   257
} /* __PHYSFS_platformInit */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   258
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   259
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   260
int __PHYSFS_platformDeinit(void)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   261
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   262
    assert(baseDir != NULL);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   263
    free(baseDir);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   264
    baseDir = NULL;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   265
    return(1);  /* success. */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   266
} /* __PHYSFS_platformDeinit */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   267
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   268
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   269
static int disc_is_inserted(ULONG drive)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   270
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   271
    int rc;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   272
    char buf[20];
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   273
    DosError(FERR_DISABLEHARDERR | FERR_DISABLEEXCEPTION);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   274
    rc = DosQueryFSInfo(drive + 1, FSIL_VOLSER, buf, sizeof (buf));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   275
    DosError(FERR_ENABLEHARDERR | FERR_ENABLEEXCEPTION);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   276
    return(rc == NO_ERROR);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   277
} /* is_cdrom_inserted */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   278
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   279
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   280
/* looks like "CD01" in ASCII (littleendian)...used for an ioctl. */
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   281
#define CD01 0x31304443
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   282
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   283
static int is_cdrom_drive(ULONG drive)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   284
{
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   285
    PHYSFS_uint32 param, data;
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   286
    ULONG ul1, ul2;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   287
    APIRET rc;
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   288
    HFILE hfile = NULLHANDLE;
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   289
    char drivename[3] = { 'A' + drive, ':', '\0' };
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   290
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   291
    rc = DosOpen(drivename, &hfile, &ul1, 0, 0,
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   292
                 OPEN_ACTION_OPEN_IF_EXISTS | OPEN_ACTION_FAIL_IF_NEW,
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   293
                 OPEN_FLAGS_DASD | OPEN_FLAGS_FAIL_ON_ERROR |
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   294
                 OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYNONE, NULL);
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   295
    BAIL_IF_MACRO(rc != NO_ERROR, NULL, 0);
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   296
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   297
    data = 0;
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   298
    param = PHYSFS_swapULE32(CD01);
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   299
    ul1 = ul2 = sizeof (PHYSFS_uint32);
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   300
    rc = DosDevIOCtl(hfile, IOCTL_CDROMDISK, CDROMDISK_GETDRIVER,
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   301
                     &param, sizeof (param), &ul1, &data, sizeof (data), &ul2);
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   302
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   303
    DosClose(hfile);
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   304
    return((rc == NO_ERROR) && (PHYSFS_swapULE32(data) == CD01));
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   305
} /* is_cdrom_drive */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   306
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   307
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   308
char **__PHYSFS_platformDetectAvailableCDs(void)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   309
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   310
    ULONG dummy;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   311
    ULONG drivemap;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   312
    ULONG i, bit;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   313
    APIRET rc;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   314
    char **retval;
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   315
    PHYSFS_uint32 cd_count = 1;   /* we count the NULL entry. */
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   316
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   317
    retval = (char **) malloc(sizeof (char *));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   318
    BAIL_IF_MACRO(retval == NULL, ERR_OUT_OF_MEMORY, NULL);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   319
    *retval = NULL;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   320
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   321
    rc = DosQueryCurrentDisk(&dummy, &drivemap);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   322
    BAIL_IF_MACRO(os2err(rc) != NO_ERROR, NULL, retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   323
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   324
    /* !!! FIXME: the a, b, and c drives are almost certainly NOT cdroms... */
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   325
    for (i = 0, bit = 1; i < 26; i++, bit <<= 1)
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   326
    {
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   327
        if (drivemap & bit)  /* this logical drive exists. */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   328
        {
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   329
            if ((is_cdrom_drive(i)) && (disc_is_inserted(i)))
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   330
            {
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   331
                char **tmp = realloc(retval, sizeof (char *) * (cd_count + 1));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   332
                if (tmp)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   333
                {
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   334
                    char *str = (char *) malloc(4);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   335
                    retval = tmp;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   336
                    retval[cd_count - 1] = str;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   337
                    if (str)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   338
                    {
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   339
                        str[0] = ('A' + i);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   340
                        str[1] = ':';
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   341
                        str[2] = '\\';
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   342
                        str[3] = '\0';
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   343
                        cd_count++;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   344
                    } /* if */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   345
                } /* if */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   346
            } /* if */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   347
        } /* if */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   348
    } /* for */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   349
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   350
    retval[cd_count - 1] = NULL;
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   351
    return(retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   352
} /* __PHYSFS_platformDetectAvailableCDs */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   353
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   354
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   355
char *__PHYSFS_platformCalcBaseDir(const char *argv0)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   356
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   357
    char *retval = (char *) malloc(strlen(baseDir) + 1);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   358
    BAIL_IF_MACRO(retval == NULL, ERR_OUT_OF_MEMORY, NULL);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   359
    strcpy(retval, baseDir); /* calculated at init time. */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   360
    return(retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   361
} /* __PHYSFS_platformCalcBaseDir */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   362
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   363
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   364
char *__PHYSFS_platformGetUserName(void)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   365
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   366
    return(NULL);  /* (*shrug*) */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   367
} /* __PHYSFS_platformGetUserName */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   368
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   369
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   370
char *__PHYSFS_platformGetUserDir(void)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   371
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   372
    return(__PHYSFS_platformCalcBaseDir(NULL));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   373
} /* __PHYSFS_platformGetUserDir */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   374
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   375
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   376
int __PHYSFS_platformStricmp(const char *x, const char *y)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   377
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   378
    int ux, uy;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   379
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   380
    do
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   381
    {
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   382
        ux = toupper((int) *x);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   383
        uy = toupper((int) *y);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   384
        if (ux > uy)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   385
            return(1);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   386
        else if (ux < uy)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   387
            return(-1);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   388
        x++;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   389
        y++;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   390
    } while ((ux) && (uy));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   391
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   392
    return(0);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   393
} /* __PHYSFS_platformStricmp */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   394
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   395
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   396
int __PHYSFS_platformExists(const char *fname)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   397
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   398
    FILESTATUS3 fs;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   399
    APIRET rc = DosQueryPathInfo(fname, FIL_STANDARD, &fs, sizeof (fs));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   400
    return(os2err(rc) == NO_ERROR);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   401
} /* __PHYSFS_platformExists */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   402
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   403
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   404
int __PHYSFS_platformIsSymLink(const char *fname)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   405
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   406
    return(0);  /* no symlinks in OS/2. */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   407
} /* __PHYSFS_platformIsSymlink */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   408
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   409
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   410
int __PHYSFS_platformIsDirectory(const char *fname)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   411
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   412
    FILESTATUS3 fs;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   413
    APIRET rc = DosQueryPathInfo(fname, FIL_STANDARD, &fs, sizeof (fs));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   414
    BAIL_IF_MACRO(os2err(rc) != NO_ERROR, NULL, 0)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   415
    return((fs.attrFile & FILE_DIRECTORY) != 0);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   416
} /* __PHYSFS_platformIsDirectory */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   417
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   418
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   419
char *__PHYSFS_platformCvtToDependent(const char *prepend,
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   420
                                      const char *dirName,
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   421
                                      const char *append)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   422
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   423
    int len = ((prepend) ? strlen(prepend) : 0) +
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   424
              ((append) ? strlen(append) : 0) +
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   425
              strlen(dirName) + 1;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   426
    char *retval = malloc(len);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   427
    char *p;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   428
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   429
    BAIL_IF_MACRO(retval == NULL, ERR_OUT_OF_MEMORY, NULL);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   430
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   431
    if (prepend)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   432
        strcpy(retval, prepend);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   433
    else
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   434
        retval[0] = '\0';
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   435
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   436
    strcat(retval, dirName);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   437
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   438
    if (append)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   439
        strcat(retval, append);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   440
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   441
    for (p = strchr(retval, '/'); p != NULL; p = strchr(p + 1, '/'))
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   442
        *p = '\\';
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   443
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   444
    return(retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   445
} /* __PHYSFS_platformCvtToDependent */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   446
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   447
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   448
LinkedStringList *__PHYSFS_platformEnumerateFiles(const char *dirname,
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   449
                                                  int omitSymLinks)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   450
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   451
    char spec[CCHMAXPATH];
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   452
    LinkedStringList *ret = NULL, *p = NULL;
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   453
    FILEFINDBUF3 fb;
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   454
    HDIR hdir = HDIR_CREATE;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   455
    ULONG count = 1;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   456
    APIRET rc;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   457
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   458
    BAIL_IF_MACRO(strlen(dirname) > sizeof (spec) - 5, ERR_OS_ERROR, NULL);
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   459
    strcpy(spec, dirname);
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   460
    strcat(spec, (spec[strlen(spec) - 1] != '\\') ? "\\*.*" : "*.*");
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   461
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   462
    rc = DosFindFirst(spec, &hdir,
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   463
                      FILE_DIRECTORY | FILE_ARCHIVED |
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   464
                      FILE_READONLY | FILE_HIDDEN | FILE_SYSTEM,
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   465
                      &fb, sizeof (fb), &count, FIL_STANDARD);
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   466
    BAIL_IF_MACRO(os2err(rc) != NO_ERROR, NULL, 0);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   467
    while (count == 1)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   468
    {
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   469
        if ((strcmp(fb.achName, ".") != 0) && (strcmp(fb.achName, "..") != 0))
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   470
            ret = __PHYSFS_addToLinkedStringList(ret, &p, fb.achName, -1);
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   471
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   472
        DosFindNext(hdir, &fb, sizeof (fb), &count);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   473
    } /* while */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   474
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   475
    DosFindClose(hdir);
416
eadb08626c80 Lots of fixes...seems to be fully functional, now.
Ryan C. Gordon <icculus@icculus.org>
parents: 412
diff changeset
   476
    return(ret);
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   477
} /* __PHYSFS_platformEnumerateFiles */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   478
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   479
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   480
char *__PHYSFS_platformCurrentDir(void)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   481
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   482
    char *retval;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   483
    ULONG currentDisk;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   484
    ULONG dummy;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   485
    ULONG pathSize = 0;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   486
    APIRET rc;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   487
    BYTE byte;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   488
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   489
    rc = DosQueryCurrentDisk(&currentDisk, &dummy);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   490
    BAIL_IF_MACRO(os2err(rc) != NO_ERROR, NULL, NULL);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   491
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   492
    /* The first call just tells us how much space we need for the string. */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   493
    rc = DosQueryCurrentDir(currentDisk, &byte, &pathSize);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   494
    pathSize++; /* Add space for null terminator. */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   495
    retval = (char *) malloc(pathSize + 3);  /* plus "x:\\" */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   496
    BAIL_IF_MACRO(retval == NULL, ERR_OUT_OF_MEMORY, NULL);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   497
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   498
    /* Actually get the string this time. */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   499
    rc = DosQueryCurrentDir(currentDisk, (PBYTE) (retval + 3), &pathSize);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   500
    if (os2err(rc) != NO_ERROR)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   501
    {
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   502
        free(retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   503
        return(NULL);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   504
    } /* if */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   505
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   506
    retval[0] = ('A' + (currentDisk - 1));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   507
    retval[1] = ':';
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   508
    retval[2] = '\\';
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   509
    return(retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   510
} /* __PHYSFS_platformCurrentDir */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   511
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   512
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   513
char *__PHYSFS_platformRealPath(const char *path)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   514
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   515
    char buf[CCHMAXPATH];
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   516
    char *retval;
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   517
    APIRET rc = DosQueryPathInfo(path, FIL_QUERYFULLNAME, buf, sizeof (buf));
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   518
    BAIL_IF_MACRO(os2err(rc) != NO_ERROR, NULL, NULL);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   519
    retval = (char *) malloc(strlen(buf) + 1);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   520
    BAIL_IF_MACRO(retval == NULL, ERR_OUT_OF_MEMORY, NULL);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   521
    strcpy(retval, buf);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   522
    return(retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   523
} /* __PHYSFS_platformRealPath */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   524
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   525
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   526
int __PHYSFS_platformMkDir(const char *path)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   527
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   528
    return(os2err(DosCreateDir(path, NULL)) == NO_ERROR);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   529
} /* __PHYSFS_platformMkDir */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   530
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   531
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   532
void *__PHYSFS_platformOpenRead(const char *filename)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   533
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   534
    ULONG actionTaken = 0;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   535
    HFILE hfile = NULLHANDLE;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   536
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   537
    /*
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   538
     * File must be opened SHARE_DENYWRITE and ACCESS_READONLY, otherwise
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   539
     *  DosQueryFileInfo() will fail if we try to get a file length, etc.
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   540
     */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   541
    os2err(DosOpen(filename, &hfile, &actionTaken, 0, FILE_NORMAL,
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   542
                   OPEN_ACTION_OPEN_IF_EXISTS | OPEN_ACTION_FAIL_IF_NEW,
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   543
                   OPEN_FLAGS_FAIL_ON_ERROR | OPEN_FLAGS_NO_LOCALITY |
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   544
                   OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYWRITE |
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   545
                   OPEN_ACCESS_READONLY, NULL));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   546
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   547
    return((void *) hfile);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   548
} /* __PHYSFS_platformOpenRead */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   549
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   550
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   551
void *__PHYSFS_platformOpenWrite(const char *filename)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   552
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   553
    ULONG actionTaken = 0;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   554
    HFILE hfile = NULLHANDLE;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   555
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   556
    /*
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   557
     * File must be opened SHARE_DENYWRITE and ACCESS_READWRITE, otherwise
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   558
     *  DosQueryFileInfo() will fail if we try to get a file length, etc.
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   559
     */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   560
    os2err(DosOpen(filename, &hfile, &actionTaken, 0, FILE_NORMAL,
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   561
                   OPEN_ACTION_REPLACE_IF_EXISTS | OPEN_ACTION_CREATE_IF_NEW,
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   562
                   OPEN_FLAGS_FAIL_ON_ERROR | OPEN_FLAGS_NO_LOCALITY |
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   563
                   OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYWRITE |
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   564
                   OPEN_ACCESS_READWRITE, NULL));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   565
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   566
    return((void *) hfile);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   567
} /* __PHYSFS_platformOpenWrite */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   568
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   569
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   570
void *__PHYSFS_platformOpenAppend(const char *filename)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   571
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   572
    ULONG dummy = 0;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   573
    HFILE hfile = NULLHANDLE;
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   574
    APIRET rc;
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   575
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   576
    /*
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   577
     * File must be opened SHARE_DENYWRITE and ACCESS_READWRITE, otherwise
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   578
     *  DosQueryFileInfo() will fail if we try to get a file length, etc.
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   579
     */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   580
    rc = os2err(DosOpen(filename, &hfile, &dummy, 0, FILE_NORMAL,
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   581
                   OPEN_ACTION_OPEN_IF_EXISTS | OPEN_ACTION_CREATE_IF_NEW,
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   582
                   OPEN_FLAGS_FAIL_ON_ERROR | OPEN_FLAGS_NO_LOCALITY |
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   583
                   OPEN_FLAGS_NOINHERIT | OPEN_SHARE_DENYWRITE |
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   584
                   OPEN_ACCESS_READWRITE, NULL));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   585
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   586
    if (rc == NO_ERROR)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   587
    {
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   588
        if (os2err(DosSetFilePtr(hfile, 0, FILE_END, &dummy)) != NO_ERROR)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   589
        {
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   590
            DosClose(hfile);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   591
            hfile = NULLHANDLE;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   592
        } /* if */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   593
    } /* if */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   594
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   595
    return((void *) hfile);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   596
} /* __PHYSFS_platformOpenAppend */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   597
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   598
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   599
PHYSFS_sint64 __PHYSFS_platformRead(void *opaque, void *buffer,
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   600
                                    PHYSFS_uint32 size, PHYSFS_uint32 count)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   601
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   602
    HFILE hfile = (HFILE) opaque;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   603
    PHYSFS_sint64 retval;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   604
    ULONG br;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   605
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   606
    for (retval = 0; retval < count; retval++)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   607
    {
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   608
        os2err(DosRead(hfile, buffer, size, &br));
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   609
        if (br < size)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   610
        {
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   611
            DosSetFilePtr(hfile, -br, FILE_CURRENT, &br); /* try to cleanup. */
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   612
            return(retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   613
        } /* if */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   614
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   615
        buffer = (void *) ( ((char *) buffer) + size );
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   616
    } /* for */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   617
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   618
    return(retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   619
} /* __PHYSFS_platformRead */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   620
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   621
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   622
PHYSFS_sint64 __PHYSFS_platformWrite(void *opaque, const void *buffer,
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   623
                                     PHYSFS_uint32 size, PHYSFS_uint32 count)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   624
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   625
    HFILE hfile = (HFILE) opaque;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   626
    PHYSFS_sint64 retval;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   627
    ULONG bw;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   628
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   629
    for (retval = 0; retval < count; retval++)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   630
    {
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   631
        os2err(DosWrite(hfile, buffer, size, &bw));
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   632
        if (bw < size)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   633
        {
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   634
            DosSetFilePtr(hfile, -bw, FILE_CURRENT, &bw); /* try to cleanup. */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   635
            return(retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   636
        } /* if */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   637
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   638
        buffer = (void *) ( ((char *) buffer) + size );
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   639
    } /* for */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   640
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   641
    return(retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   642
} /* __PHYSFS_platformWrite */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   643
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   644
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   645
int __PHYSFS_platformSeek(void *opaque, PHYSFS_uint64 pos)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   646
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   647
    ULONG dummy;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   648
    HFILE hfile = (HFILE) opaque;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   649
    LONG dist = (LONG) pos;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   650
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   651
    /* hooray for 32-bit filesystem limits!  :) */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   652
    BAIL_IF_MACRO((PHYSFS_uint64) dist != pos, ERR_SEEK_OUT_OF_RANGE, 0);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   653
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   654
    return(os2err(DosSetFilePtr(hfile, dist, FILE_BEGIN, &dummy)) == NO_ERROR);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   655
} /* __PHYSFS_platformSeek */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   656
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   657
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   658
PHYSFS_sint64 __PHYSFS_platformTell(void *opaque)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   659
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   660
    ULONG pos;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   661
    HFILE hfile = (HFILE) opaque;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   662
    APIRET rc = os2err(DosSetFilePtr(hfile, 0, FILE_CURRENT, &pos));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   663
    BAIL_IF_MACRO(rc != NO_ERROR, NULL, -1);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   664
    return((PHYSFS_sint64) pos);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   665
} /* __PHYSFS_platformTell */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   666
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   667
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   668
PHYSFS_sint64 __PHYSFS_platformFileLength(void *opaque)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   669
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   670
    FILESTATUS3 fs;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   671
    HFILE hfile = (HFILE) opaque;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   672
    APIRET rc = DosQueryFileInfo(hfile, FIL_STANDARD, &fs, sizeof (fs));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   673
    BAIL_IF_MACRO(os2err(rc) != NO_ERROR, NULL, -1);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   674
    return((PHYSFS_sint64) fs.cbFile);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   675
} /* __PHYSFS_platformFileLength */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   676
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   677
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   678
int __PHYSFS_platformEOF(void *opaque)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   679
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   680
    PHYSFS_sint64 len, pos;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   681
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   682
    len = __PHYSFS_platformFileLength(opaque);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   683
    BAIL_IF_MACRO(len == -1, NULL, 1);  /* (*shrug*) */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   684
    pos = __PHYSFS_platformTell(opaque);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   685
    BAIL_IF_MACRO(pos == -1, NULL, 1);  /* (*shrug*) */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   686
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   687
    return(pos >= len);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   688
} /* __PHYSFS_platformEOF */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   689
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   690
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   691
int __PHYSFS_platformFlush(void *opaque)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   692
{
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   693
    return(os2err(DosResetBuffer((HFILE) opaque) == NO_ERROR));
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   694
} /* __PHYSFS_platformFlush */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   695
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   696
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   697
int __PHYSFS_platformClose(void *opaque)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   698
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   699
    return(os2err(DosClose((HFILE) opaque) == NO_ERROR));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   700
} /* __PHYSFS_platformClose */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   701
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   702
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   703
int __PHYSFS_platformDelete(const char *path)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   704
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   705
    if (__PHYSFS_platformIsDirectory(path))
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   706
        return(os2err(DosDeleteDir(path)) == NO_ERROR);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   707
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   708
    return(os2err(DosDelete(path) == NO_ERROR));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   709
} /* __PHYSFS_platformDelete */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   710
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   711
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   712
PHYSFS_sint64 __PHYSFS_platformGetLastModTime(const char *fname)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   713
{
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   714
    PHYSFS_sint64 retval;
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   715
    struct tm tm;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   716
    FILESTATUS3 fs;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   717
    APIRET rc = DosQueryPathInfo(fname, FIL_STANDARD, &fs, sizeof (fs));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   718
    BAIL_IF_MACRO(os2err(rc) != NO_ERROR, NULL, -1);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   719
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   720
    /* Convert to a format that mktime() can grok... */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   721
    tm.tm_sec = ((PHYSFS_uint32) fs.ftimeLastWrite.twosecs) * 2;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   722
    tm.tm_min = fs.ftimeLastWrite.minutes;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   723
    tm.tm_hour = fs.ftimeLastWrite.hours;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   724
    tm.tm_mday = fs.fdateLastWrite.day;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   725
    tm.tm_mon = fs.fdateLastWrite.month;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   726
    tm.tm_year = ((PHYSFS_uint32) fs.fdateLastWrite.year) + 80;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   727
    tm.tm_wday = -1 /*st_localtz.wDayOfWeek*/;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   728
    tm.tm_yday = -1;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   729
    tm.tm_isdst = -1;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   730
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   731
    /* Convert to a format PhysicsFS can grok... */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   732
    retval = (PHYSFS_sint64) mktime(&tm);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   733
    BAIL_IF_MACRO(retval == -1, strerror(errno), -1);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   734
    return(retval);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   735
} /* __PHYSFS_platformGetLastModTime */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   736
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   737
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   738
/* Much like my college days, try to sleep for 10 milliseconds at a time... */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   739
void __PHYSFS_platformTimeslice(void)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   740
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   741
    DosSleep(10);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   742
} /* __PHYSFS_platformTimeslice(void) */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   743
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   744
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   745
PHYSFS_uint64 __PHYSFS_platformGetThreadID(void)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   746
{
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   747
    PTIB ptib;
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   748
    PPIB ppib;
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   749
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   750
    /*
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   751
     * Allegedly, this API never fails, but we'll punt and return a
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   752
     *  default value (zero might as well do) if it does.
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   753
     */
407
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   754
    BAIL_IF_MACRO(os2err(DosGetInfoBlocks(&ptib, &ppib)) != NO_ERROR, 0, 0);
81646aa3f6f8 Patched to compile...works a little.
Ryan C. Gordon <icculus@icculus.org>
parents: 404
diff changeset
   755
    return((PHYSFS_uint64) ptib->tib_ordinal);
404
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   756
} /* __PHYSFS_platformGetThreadID */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   757
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   758
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   759
void *__PHYSFS_platformCreateMutex(void)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   760
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   761
    HMTX hmtx = NULLHANDLE;
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   762
    os2err(DosCreateMutexSem(NULL, &hmtx, 0, 0));
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   763
    return((void *) hmtx);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   764
} /* __PHYSFS_platformCreateMutex */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   765
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   766
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   767
void __PHYSFS_platformDestroyMutex(void *mutex)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   768
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   769
    DosCloseMutexSem((HMTX) mutex);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   770
} /* __PHYSFS_platformDestroyMutex */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   771
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   772
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   773
int __PHYSFS_platformGrabMutex(void *mutex)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   774
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   775
    /* Do _NOT_ call os2err() (which sets the physfs error msg) in here! */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   776
    return(DosRequestMutexSem((HMTX) mutex, SEM_INDEFINITE_WAIT) == NO_ERROR);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   777
} /* __PHYSFS_platformGrabMutex */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   778
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   779
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   780
void __PHYSFS_platformReleaseMutex(void *mutex)
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   781
{
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   782
    DosReleaseMutexSem((HMTX) mutex);
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   783
} /* __PHYSFS_platformReleaseMutex */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   784
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   785
#endif  /* defined OS2 */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   786
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   787
/* end of os2.c ... */
d08723d994c1 Initial add.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
   788