#define INCL_DOS
#define INCL_DOSERRORS
#include <os2.h>
#include "httpd.h"
#include "http_log.h"
char *ap_os_case_canonical_filename(pool *pPool, const char *szFile)
{
char buf[HUGE_STRING_LEN];
char buf2[HUGE_STRING_LEN];
int rc, len;
char *pos;
strcpy(buf, szFile);
len = strlen(buf);
if (len > 3 && buf[len-1] == '/')
buf[--len] = 0;
if (buf[0] == '/' && buf[1] == '/') {
if (strchr(buf+2, '/') == NULL) {
return ap_pstrdup(pPool, buf);
}
}
rc = DosQueryPathInfo(buf, FIL_QUERYFULLNAME, buf2, HUGE_STRING_LEN);
if (rc) {
if ( rc != ERROR_INVALID_NAME ) {
ap_log_error(APLOG_MARK, APLOG_ERR|APLOG_NOERRNO, NULL, "OS/2 error %d for file %s", rc, szFile);
}
return ap_pstrdup(pPool, szFile);
}
for (pos=buf2; *pos; pos++)
if (*pos == '\\')
*pos = '/';
return ap_pstrdup(pPool, buf2);
}
static void fix_component(char *path, char *lastcomp)
{
FILEFINDBUF3 fb3;
HDIR hDir = HDIR_CREATE;
ULONG numNames = 1;
ULONG rc = DosFindFirst( (UCHAR *)path, &hDir, FILE_NORMAL|FILE_DIRECTORY, &fb3, sizeof(fb3), &numNames, FIL_STANDARD );
if (rc == 0)
strcpy(lastcomp, fb3.achName);
DosFindClose(hDir);
}
char *ap_os_systemcase_canonical_filename(pool *pPool, const char *szFile)
{
char *szCanonicalFile = ap_os_case_canonical_filename(pPool, szFile);
int startslash = 2, slashnum=0;
char *pos, *prevslash = NULL;
if (szCanonicalFile[0] == '/' && szCanonicalFile[1] == '/')
startslash = 5;
for (pos = szCanonicalFile; *pos; pos++) {
if (*pos == '/') {
slashnum++;
if (slashnum >= startslash) {
*pos = 0;
fix_component(szCanonicalFile, prevslash+1);
*pos = '/';
}
prevslash = pos;
}
}
if (slashnum >= startslash) {
fix_component(szCanonicalFile, prevslash+1);
}
return szCanonicalFile;
}
char *ap_os_canonical_filename(pool *pPool, const char *szFile)
{
char *szCanonicalFile = ap_os_systemcase_canonical_filename(pPool, szFile);
strlwr(szCanonicalFile);
return szCanonicalFile;
}
int ap_os_kill(pid_t pid, int sig)
{
int rc;
if ( sig == SIGTERM ) {
rc = DosSendSignalException( pid, XCPT_SIGNAL_BREAK );
if ( rc ) {
errno = ESRCH;
rc = -1;
}
} else {
rc = kill(pid, sig);
}
return rc;
}
char *ap_os_error_message(int err)
{
static char result[200];
char message[HUGE_STRING_LEN];
ULONG len;
char *pos;
int c;
if (DosGetMessage(NULL, 0, message, HUGE_STRING_LEN, err, "OSO001.MSG", &len) == 0) {
len--;
message[len] = 0;
pos = result;
if (len >= sizeof(result))
len = sizeof(result-1);
for (c=0; c<len; c++) {
while (ap_isspace(message[c]) && ap_isspace(message[c+1]))
c++;
*(pos++) = ap_isspace(message[c]) ? ' ' : message[c];
}
*pos = 0;
} else {
sprintf(result, "OS/2 error %d", err);
}
return result;
}