cli_ure/source/native/path.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include "sal/config.h"
  21
  22 #if defined WNT
  23
  24 #include <cstddef>
  25
  26 #define WIN32_LEAN_AND_MEAN
  27 #include <windows.h>
  28
  29 #include "sal/types.h"
  30
  31 namespace cli_ure {
  32
  33 SAL_DLLPUBLIC_EXPORT WCHAR * filename(WCHAR * path) {
  34     WCHAR * f = path;
  35     for (WCHAR * p = path;;) {
  36         switch (*p++) {
  37         case L'\0':
  38             return f;
  39         case L'\\':
  40             f = p;
  41             break;
  42         }
  43     }
  44 }
  45
  46 WCHAR * buildPath(
  47     WCHAR * path, WCHAR const * frontBegin, WCHAR const * frontEnd,
  48     WCHAR const * backBegin, std::size_t backLength)
  49 {
  50     // Remove leading ".." segments in the second path together with matching
  51     // segments in the first path that are neither empty nor "." nor ".." nor
  52     // end in ":" (which is not foolprove, as it can erroneously erase the start
  53     // of a UNC path, but only if the input is bad data):
  54     while (backLength >= 2 && backBegin[0] == L'.' && backBegin[1] == L'.' &&
  55            (backLength == 2 || backBegin[2] == L'\\'))
  56     {
  57         if (frontEnd - frontBegin < 2 || frontEnd[-1] != L'\\' ||
  58             frontEnd[-2] == L'\\' || frontEnd[-2] == L':' ||
  59             (frontEnd[-2] == L'.' &&
  60              (frontEnd - frontBegin < 3 || frontEnd[-3] == L'\\' ||
  61               (frontEnd[-3] == L'.' &&
  62                (frontEnd - frontBegin < 4 || frontEnd[-4] == L'\\')))))
  63         {
  64             break;
  65         }
  66         WCHAR const * p = frontEnd - 1;
  67         while (p != frontBegin && p[-1] != L'\\') {
  68             --p;
  69         }
  70         if (p == frontBegin) {
  71             break;
  72         }
  73         frontEnd = p;
  74         if (backLength == 2) {
  75             backBegin += 2;
  76             backLength -= 2;
  77         } else {
  78             backBegin += 3;
  79             backLength -= 3;
  80         }
  81     }
  82     if (backLength <
  83         static_cast< std::size_t >(MAX_PATH - (frontEnd - frontBegin)))
  84         // hopefully std::size_t is large enough
  85     {
  86         WCHAR * p;
  87         if (frontBegin == path) {
  88             p = const_cast< WCHAR * >(frontEnd);
  89         } else {
  90             p = path;
  91             while (frontBegin != frontEnd) {
  92                 *p++ = *frontBegin++;
  93             }
  94         }
  95         for (; backLength > 0; --backLength) {
  96             *p++ = *backBegin++;
  97         }
  98         *p = L'\0';
  99         return p;
 100     } else {
 101         SetLastError(ERROR_FILENAME_EXCED_RANGE);
 102         return NULL;
 103     }
 104 }
 105
 106 WCHAR * resolveLink(WCHAR * path) {
 107     HANDLE h = CreateFileW(
 108         path, FILE_READ_DATA, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, NULL);
 109     if (h == INVALID_HANDLE_VALUE) {
 110         return NULL;
 111     }
 112     char p1[MAX_PATH];
 113     DWORD n;
 114     BOOL ok = ReadFile(h, p1, MAX_PATH, &n, NULL);
 115     CloseHandle(h);
 116     if (!ok) {
 117         return NULL;
 118     }
 119     WCHAR p2[MAX_PATH];
 120     std::size_t n2 = 0;
 121     bool colon = false;
 122     for (DWORD i = 0; i < n;) {
 123         unsigned char c = static_cast< unsigned char >(p1[i++]);
 124         switch (c) {
 125         case '\0':
 126             SetLastError(ERROR_BAD_PATHNAME);
 127             return NULL;
 128         case '\x0A':
 129         case '\x0D':
 130             if (n2 == MAX_PATH) {
 131                 SetLastError(ERROR_FILENAME_EXCED_RANGE);
 132                 return NULL;
 133             }
 134             p2[n2] = L'\0';
 135             break;
 136         case ':':
 137             colon = true;
 138             // fall through
 139         default:
 140             // Convert from UTF-8 to UTF-16:
 141             if (c <= 0x7F) {
 142                 p2[n2++] = c;
 143             } else if (c >= 0xC2 && c <= 0xDF && i < n &&
 144                        static_cast< unsigned char >(p1[i]) >= 0x80 &&
 145                        static_cast< unsigned char >(p1[i]) <= 0xBF)
 146             {
 147                 p2[n2++] = ((c & 0x1F) << 6) |
 148                     (static_cast< unsigned char >(p1[i++]) & 0x3F);
 149             } else if (n - i > 1 &&
 150                        ((c == 0xE0 &&
 151                          static_cast< unsigned char >(p1[i]) >= 0xA0 &&
 152                          static_cast< unsigned char >(p1[i]) <= 0xBF) ||
 153                         ((c >= 0xE1 && c <= 0xEC || c >= 0xEE && c <= 0xEF) &&
 154                          static_cast< unsigned char >(p1[i]) >= 0x80 &&
 155                          static_cast< unsigned char >(p1[i]) <= 0xBF) ||
 156                         (c == 0xED &&
 157                          static_cast< unsigned char >(p1[i]) >= 0x80 &&
 158                          static_cast< unsigned char >(p1[i]) <= 0x9F)) &&
 159                        static_cast< unsigned char >(p1[i + 1]) >= 0x80 &&
 160                        static_cast< unsigned char >(p1[i + 1]) <= 0xBF)
 161             {
 162                 p2[n2++] = ((c & 0x0F) << 12) |
 163                     ((static_cast< unsigned char >(p1[i]) & 0x3F) << 6) |
 164                     (static_cast< unsigned char >(p1[i + 1]) & 0x3F);
 165                 i += 2;
 166             } else if (n - 2 > 1 &&
 167                        ((c == 0xF0 &&
 168                          static_cast< unsigned char >(p1[i]) >= 0x90 &&
 169                          static_cast< unsigned char >(p1[i]) <= 0xBF) ||
 170                         (c >= 0xF1 && c <= 0xF3 &&
 171                          static_cast< unsigned char >(p1[i]) >= 0x80 &&
 172                          static_cast< unsigned char >(p1[i]) <= 0xBF) ||
 173                         (c == 0xF4 &&
 174                          static_cast< unsigned char >(p1[i]) >= 0x80 &&
 175                          static_cast< unsigned char >(p1[i]) <= 0x8F)) &&
 176                        static_cast< unsigned char >(p1[i + 1]) >= 0x80 &&
 177                        static_cast< unsigned char >(p1[i + 1]) <= 0xBF &&
 178                        static_cast< unsigned char >(p1[i + 2]) >= 0x80 &&
 179                        static_cast< unsigned char >(p1[i + 2]) <= 0xBF)
 180             {
 181                 sal_Int32 u = ((c & 0x07) << 18) |
 182                     ((static_cast< unsigned char >(p1[i]) & 0x3F) << 12) |
 183                     ((static_cast< unsigned char >(p1[i + 1]) & 0x3F) << 6) |
 184                     (static_cast< unsigned char >(p1[i + 2]) & 0x3F);
 185                 i += 3;
 186                 p2[n2++] = static_cast< WCHAR >(((u - 0x10000) >> 10) | 0xD800);
 187                 p2[n2++] = static_cast< WCHAR >(
 188                     ((u - 0x10000) & 0x3FF) | 0xDC00);
 189             } else {
 190                 SetLastError(ERROR_BAD_PATHNAME);
 191                 return NULL;
 192             }
 193             break;
 194         }
 195     }
 196     WCHAR * end;
 197     if (colon || p2[0] == L'\\') {
 198         // Interpret p2 as an absolute path:
 199         end = path;
 200     } else {
 201         // Interpret p2 as a relative path:
 202         end = filename(path);
 203     }
 204     return buildPath(path, path, end, p2, n2);
 205 }
 206
 207 }
 208
 209 #endif
 210
 211 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */