/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ /* ***** BEGIN LICENSE BLOCK ***** * Version: MPL 1.1/GPL 2.0/LGPL 2.1 * * The contents of this file are subject to the Mozilla Public License Version * 1.1 (the "License"); you may not use this file except in compliance with * the License. You may obtain a copy of the License at * http://www.mozilla.org/MPL/ * * Software distributed under the License is distributed on an "AS IS" basis, * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License * for the specific language governing rights and limitations under the * License. * * The Original Code is mozilla.org code. * * The Initial Developer of the Original Code is * Netscape Communications Corporation. * Portions created by the Initial Developer are Copyright (C) 1998 * the Initial Developer. All Rights Reserved. * * Contributor(s): * Masayuki Nakano * * Alternatively, the contents of this file may be used under the terms of * either of the GNU General Public License Version 2 or later (the "GPL"), * or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"), * in which case the provisions of the GPL or the LGPL are applicable instead * of those above. If you wish to allow use of your version of this file only * under the terms of either the GPL or the LGPL, and not to allow others to * use your version of this file under the terms of the MPL, indicate your * decision by deleting the provisions above and replace them with the notice * and other provisions required by the GPL or the LGPL. If you do not delete * the provisions above, a recipient may use your version of this file under * the terms of any one of the MPL, the GPL or the LGPL. * * ***** END LICENSE BLOCK ***** */ // This file is included by nsFileSpec.cp, and includes the Windows-specific // implementations. #include #include #include #include #include "prio.h" #include "nsError.h" #include #include #if (_MSC_VER == 1100) || defined(__GNUC__) #define INITGUID #include DEFINE_OLEGUID(IID_IPersistFile, 0x0000010BL, 0, 0); #endif #include #include #include #ifndef WINCE #ifdef UNICODE #define CreateDirectoryW CreateDirectory #else #define CreateDirectoryA CreateDirectory #endif #endif //---------------------------------------------------------------------------------------- void nsFileSpecHelpers::Canonify(nsSimpleCharString& ioPath, PRBool inMakeDirs) // Canonify, make absolute, and check whether directories exist. This // takes a (possibly relative) native path and converts it into a // fully qualified native path. //---------------------------------------------------------------------------------------- { if (ioPath.IsEmpty()) return; NS_ASSERTION(strchr((const char*)ioPath, '/') == 0, "This smells like a Unix path. Native path expected! " "Please fix."); if (inMakeDirs) { const int mode = 0755; nsSimpleCharString unixStylePath = ioPath; nsFileSpecHelpers::NativeToUnix(unixStylePath); nsFileSpecHelpers::MakeAllDirectories((const char*)unixStylePath, mode); } char buffer[_MAX_PATH]; errno = 0; *buffer = '\0'; char* canonicalPath = _fullpath(buffer, ioPath, _MAX_PATH); if (canonicalPath) { NS_ASSERTION( canonicalPath[0] != '\0', "Uh oh...couldn't convert" ); if (canonicalPath[0] == '\0') return; } ioPath = canonicalPath; } // nsFileSpecHelpers::Canonify //---------------------------------------------------------------------------------------- void nsFileSpecHelpers::UnixToNative(nsSimpleCharString& ioPath) // This just does string manipulation. It doesn't check reality, or canonify, or // anything //---------------------------------------------------------------------------------------- { // Allow for relative or absolute. We can do this in place, because the // native path is never longer. if (ioPath.IsEmpty()) return; // Strip initial slash for an absolute path char* src = (char*)ioPath; if (*src == '/') { if (!src[1]) { // allocate new string by copying from ioPath[1] nsSimpleCharString temp = src + 1; ioPath = temp; return; } // Since it was an absolute path, check for the drive letter char* colonPointer = src + 2; if (strstr(src, "|/") == colonPointer) *colonPointer = ':'; // allocate new string by copying from ioPath[1] nsSimpleCharString temp = src + 1; ioPath = temp; } // Convert '/' to '\'. (Must check EVERY character: consider UNC path // case.) for (src = (char*)ioPath; *src; ++src) { if (*src == '/') *src = '\\'; } } // nsFileSpecHelpers::UnixToNative //---------------------------------------------------------------------------------------- void nsFileSpecHelpers::NativeToUnix(nsSimpleCharString& ioPath) // This just does string manipulation. It doesn't check reality, or canonify, or // anything. The unix path is longer, so we can't do it in place. //---------------------------------------------------------------------------------------- { if (ioPath.IsEmpty()) return; // Convert the drive-letter separator, if present nsSimpleCharString temp("/"); char* cp = (char*)ioPath + 1; if (strstr(cp, ":\\") == cp) *cp = '|'; // absolute path else if (cp[0] == '\\') // unc path cp--; else temp[0] = '\0'; // relative path // Convert '\' to '/' for (; *cp; cp++) { if(IsDBCSLeadByte(*cp) && *(cp+1) != nsnull) { cp++; continue; } if (*cp == '\\') *cp = '/'; } // Add the slash in front. temp += ioPath; ioPath = temp; } //---------------------------------------------------------------------------------------- nsFileSpec::nsFileSpec(const nsFilePath& inPath) //---------------------------------------------------------------------------------------- { // NS_ASSERTION(0, "nsFileSpec is unsupported - use nsIFile!"); *this = inPath; } //---------------------------------------------------------------------------------------- void nsFileSpec::operator = (const nsFilePath& inPath) //---------------------------------------------------------------------------------------- { mPath = (const char*)inPath; nsFileSpecHelpers::UnixToNative(mPath); mError = NS_OK; } // nsFileSpec::operator = //---------------------------------------------------------------------------------------- nsFilePath::nsFilePath(const nsFileSpec& inSpec) //---------------------------------------------------------------------------------------- { *this = inSpec; } // nsFilePath::nsFilePath //---------------------------------------------------------------------------------------- void nsFilePath::operator = (const nsFileSpec& inSpec) //---------------------------------------------------------------------------------------- { mPath = inSpec.mPath; nsFileSpecHelpers::NativeToUnix(mPath); } // nsFilePath::operator = //---------------------------------------------------------------------------------------- void nsFileSpec::SetLeafName(const char* inLeafName) //---------------------------------------------------------------------------------------- { NS_ASSERTION(inLeafName, "Attempt to SetLeafName with a null string"); mPath.LeafReplace('\\', inLeafName); } // nsFileSpec::SetLeafName //---------------------------------------------------------------------------------------- char* nsFileSpec::GetLeafName() const //---------------------------------------------------------------------------------------- { return mPath.GetLeaf('\\'); } // nsFileSpec::GetLeafName //---------------------------------------------------------------------------------------- PRBool nsFileSpec::Exists() const //---------------------------------------------------------------------------------------- { struct stat st; return !mPath.IsEmpty() && 0 == stat(nsNSPRPath(*this), &st); } // nsFileSpec::Exists //---------------------------------------------------------------------------------------- void nsFileSpec::GetModDate(TimeStamp& outStamp) const //---------------------------------------------------------------------------------------- { struct stat st; if (!mPath.IsEmpty() && stat(nsNSPRPath(*this), &st) == 0) outStamp = st.st_mtime; else outStamp = 0; } // nsFileSpec::GetModDate //---------------------------------------------------------------------------------------- PRUint32 nsFileSpec::GetFileSize() const //---------------------------------------------------------------------------------------- { struct stat st; if (!mPath.IsEmpty() && stat(nsNSPRPath(*this), &st) == 0) return (PRUint32)st.st_size; return 0; } // nsFileSpec::GetFileSize //---------------------------------------------------------------------------------------- PRBool nsFileSpec::IsFile() const //---------------------------------------------------------------------------------------- { struct stat st; return !mPath.IsEmpty() && 0 == stat(nsNSPRPath(*this), &st) && (_S_IFREG & st.st_mode); } // nsFileSpec::IsFile //---------------------------------------------------------------------------------------- PRBool nsFileSpec::IsDirectory() const //---------------------------------------------------------------------------------------- { struct stat st; return !mPath.IsEmpty() && 0 == stat(nsNSPRPath(*this), &st) && (_S_IFDIR & st.st_mode); } // nsFileSpec::IsDirectory //---------------------------------------------------------------------------------------- PRBool nsFileSpec::IsHidden() const //---------------------------------------------------------------------------------------- { PRBool hidden = PR_FALSE; if (!mPath.IsEmpty()) { DWORD attr = GetFileAttributes(mPath); if (FILE_ATTRIBUTE_HIDDEN & attr) hidden = PR_TRUE; } return hidden; } // nsFileSpec::IsHidden //---------------------------------------------------------------------------------------- PRBool nsFileSpec::IsSymlink() const //---------------------------------------------------------------------------------------- { HRESULT hres; IShellLink* psl; PRBool isSymlink = PR_FALSE; #ifndef WINCE CoInitialize(NULL); // Get a pointer to the IShellLink interface. hres = CoCreateInstance(CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER, IID_IShellLink, (void**)&psl); if (SUCCEEDED(hres)) { IPersistFile* ppf; // Get a pointer to the IPersistFile interface. hres = psl->QueryInterface(IID_IPersistFile, (void**)&ppf); if (SUCCEEDED(hres)) { WCHAR wsz[MAX_PATH]; // Ensure that the string is Unicode. MultiByteToWideChar(CP_ACP, 0, mPath, -1, wsz, MAX_PATH); // Load the shortcut. hres = ppf->Load(wsz, STGM_READ); if (SUCCEEDED(hres)) { isSymlink = PR_TRUE; } // Release the pointer to the IPersistFile interface. ppf->Release(); } // Release the pointer to the IShellLink interface. psl->Release(); } CoUninitialize(); #endif return isSymlink; } //---------------------------------------------------------------------------------------- nsresult nsFileSpec::ResolveSymlink(PRBool& wasSymlink) //---------------------------------------------------------------------------------------- { wasSymlink = PR_FALSE; // assume failure #ifndef WINCE if (Exists()) return NS_OK; HRESULT hres; IShellLink* psl; CoInitialize(NULL); // Get a pointer to the IShellLink interface. hres = CoCreateInstance(CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER, IID_IShellLink, (void**)&psl); if (SUCCEEDED(hres)) { IPersistFile* ppf; // Get a pointer to the IPersistFile interface. hres = psl->QueryInterface(IID_IPersistFile, (void**)&ppf); if (SUCCEEDED(hres)) { WCHAR wsz[MAX_PATH]; // Ensure that the string is Unicode. MultiByteToWideChar(CP_ACP, 0, mPath, -1, wsz, MAX_PATH); // Load the shortcut. hres = ppf->Load(wsz, STGM_READ); if (SUCCEEDED(hres)) { wasSymlink = PR_TRUE; // Resolve the link. hres = psl->Resolve(nsnull, SLR_NO_UI ); if (SUCCEEDED(hres)) { char szGotPath[MAX_PATH]; WIN32_FIND_DATA wfd; // Get the path to the link target. hres = psl->GetPath( szGotPath, MAX_PATH, &wfd, SLGP_UNCPRIORITY ); if (SUCCEEDED(hres)) { // Here we modify the nsFileSpec; mPath = szGotPath; mError = NS_OK; } } } else { // It wasn't a shortcut. Oh well. Leave it like it was. hres = 0; } // Release the pointer to the IPersistFile interface. ppf->Release(); } // Release the pointer to the IShellLink interface. psl->Release(); } CoUninitialize(); if (SUCCEEDED(hres)) return NS_OK; return NS_FILE_FAILURE; #else return NS_OK; #endif //WINCE } //---------------------------------------------------------------------------------------- void nsFileSpec::GetParent(nsFileSpec& outSpec) const //---------------------------------------------------------------------------------------- { outSpec.mPath = mPath; char* chars = (char*)outSpec.mPath; chars[outSpec.mPath.Length() - 1] = '\0'; // avoid trailing separator, if any unsigned char* cp = _mbsrchr((unsigned char*)chars, '\\'); if (cp++) outSpec.mPath.SetLength(cp - (unsigned char*)chars); // truncate. } // nsFileSpec::GetParent //---------------------------------------------------------------------------------------- void nsFileSpec::operator += (const char* inRelativePath) //---------------------------------------------------------------------------------------- { NS_ASSERTION(inRelativePath, "Attempt to do += with a null string"); if (!inRelativePath || mPath.IsEmpty()) return; if (mPath[mPath.Length() - 1] == '\\') mPath += "x"; else mPath += "\\x"; // If it's a (unix) relative path, make it native nsSimpleCharString dosPath = inRelativePath; nsFileSpecHelpers::UnixToNative(dosPath); SetLeafName(dosPath); } // nsFileSpec::operator += //---------------------------------------------------------------------------------------- void nsFileSpec::CreateDirectory(int /*mode*/) //---------------------------------------------------------------------------------------- { // Note that mPath is canonical! if (!mPath.IsEmpty()) mkdir(nsNSPRPath(*this)); } // nsFileSpec::CreateDirectory //---------------------------------------------------------------------------------------- void nsFileSpec::Delete(PRBool inRecursive) const //---------------------------------------------------------------------------------------- { if (IsDirectory()) { if (inRecursive) { for (nsDirectoryIterator i(*this, PR_FALSE); i.Exists(); i++) { nsFileSpec& child = (nsFileSpec&)i; child.Delete(inRecursive); } } rmdir(nsNSPRPath(*this)); } else if (!mPath.IsEmpty()) { remove(nsNSPRPath(*this)); } } // nsFileSpec::Delete //---------------------------------------------------------------------------------------- void nsFileSpec::RecursiveCopy(nsFileSpec newDir) const //---------------------------------------------------------------------------------------- { if (IsDirectory()) { if (!(newDir.Exists())) { newDir.CreateDirectory(); } for (nsDirectoryIterator i(*this, PR_FALSE); i.Exists(); i++) { nsFileSpec& child = (nsFileSpec&)i; if (child.IsDirectory()) { nsFileSpec tmpDirSpec(newDir); char *leafname = child.GetLeafName(); tmpDirSpec += leafname; nsCRT::free(leafname); child.RecursiveCopy(tmpDirSpec); } else { child.RecursiveCopy(newDir); } } } else if (!mPath.IsEmpty()) { nsFileSpec& filePath = (nsFileSpec&) *this; if (!(newDir.Exists())) { newDir.CreateDirectory(); } filePath.CopyToDir(newDir); } } // nsFileSpec::RecursiveCopy //---------------------------------------------------------------------------------------- nsresult nsFileSpec::Truncate(PRUint32 aNewFileLength) const //---------------------------------------------------------------------------------------- { HANDLE hFile; LARGE_INTEGER li; // Leave it to Microsoft to open an existing file with a function // named "CreateFile". hFile = CreateFile(mPath, GENERIC_WRITE, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); if (hFile == INVALID_HANDLE_VALUE) return NS_FILE_FAILURE; // Seek to new, desired end of file li.QuadPart = aNewFileLength; li.LowPart = SetFilePointer(hFile, li.LowPart, &li.HighPart, FILE_BEGIN); if (0xffffffff == li.LowPart && GetLastError() != NO_ERROR) goto error; // Truncate file at current cursor position if (!SetEndOfFile(hFile)) goto error; if (!CloseHandle(hFile)) return NS_FILE_FAILURE; return NS_OK; error: CloseHandle(hFile); return NS_FILE_FAILURE; } // nsFileSpec::Truncate //---------------------------------------------------------------------------------------- nsresult nsFileSpec::Rename(const char* inNewName) //---------------------------------------------------------------------------------------- { NS_ASSERTION(inNewName, "Attempt to Rename with a null string"); // This function should not be used to move a file on disk. if (strchr(inNewName, '/')) return NS_FILE_FAILURE; char* oldPath = nsCRT::strdup(mPath); SetLeafName(inNewName); if (PR_Rename(oldPath, mPath) != NS_OK) { // Could not rename, set back to the original. mPath = oldPath; return NS_FILE_FAILURE; } nsCRT::free(oldPath); return NS_OK; } // nsFileSpec::Rename //---------------------------------------------------------------------------------------- nsresult nsFileSpec::CopyToDir(const nsFileSpec& inParentDirectory) const //---------------------------------------------------------------------------------------- { // We can only copy into a directory, and (for now) can not copy entire directories if (inParentDirectory.IsDirectory() && (! IsDirectory() ) ) { char *leafname = GetLeafName(); nsSimpleCharString destPath(inParentDirectory.GetCString()); destPath += "\\"; destPath += leafname; nsCRT::free(leafname); // CopyFile returns non-zero if succeeds int copyOK = CopyFile(GetCString(), destPath, PR_TRUE); if (copyOK) return NS_OK; } return NS_FILE_FAILURE; } // nsFileSpec::CopyToDir //---------------------------------------------------------------------------------------- nsresult nsFileSpec::MoveToDir(const nsFileSpec& inNewParentDirectory) //---------------------------------------------------------------------------------------- { // We can only copy into a directory, and (for now) can not copy entire directories if (inNewParentDirectory.IsDirectory() && (! IsDirectory() ) ) { char *leafname = GetLeafName(); nsSimpleCharString destPath(inNewParentDirectory.GetCString()); destPath += "\\"; destPath += leafname; nsCRT::free(leafname); // MoveFile returns non-zero if succeeds int copyOK = MoveFile(GetCString(), destPath); if (copyOK) { *this = inNewParentDirectory + GetLeafName(); return NS_OK; } } return NS_FILE_FAILURE; } // nsFileSpec::MoveToDir //---------------------------------------------------------------------------------------- nsresult nsFileSpec::Execute(const char* inArgs ) const //---------------------------------------------------------------------------------------- { #ifndef WINCE if (!IsDirectory()) { nsSimpleCharString fileNameWithArgs = "\""; fileNameWithArgs += mPath + "\" " + inArgs; int execResult = WinExec( fileNameWithArgs, SW_NORMAL ); if (execResult > 31) return NS_OK; } #endif return NS_FILE_FAILURE; } // nsFileSpec::Execute //---------------------------------------------------------------------------------------- PRInt64 nsFileSpec::GetDiskSpaceAvailable() const //---------------------------------------------------------------------------------------- { #ifndef WINCE PRInt64 int64; LL_I2L(int64 , LONG_MAX); char aDrive[_MAX_DRIVE + 2]; _splitpath( (const char*)mPath, aDrive, NULL, NULL, NULL); if (aDrive[0] == '\0') { // The back end is always trying to pass us paths that look // like /c|/netscape/mail. See if we've got one of them if (mPath.Length() > 2 && mPath[0] == '/' && mPath[2] == '|') { aDrive[0] = mPath[1]; aDrive[1] = ':'; aDrive[2] = '\0'; } else { // Return bogus large number and hope for the best return int64; } } strcat(aDrive, "\\"); // Check disk space DWORD dwSecPerClus, dwBytesPerSec, dwFreeClus, dwTotalClus; ULARGE_INTEGER liFreeBytesAvailableToCaller, liTotalNumberOfBytes, liTotalNumberOfFreeBytes; double nBytes = 0; BOOL (WINAPI* getDiskFreeSpaceExA)(LPCTSTR lpDirectoryName, PULARGE_INTEGER lpFreeBytesAvailableToCaller, PULARGE_INTEGER lpTotalNumberOfBytes, PULARGE_INTEGER lpTotalNumberOfFreeBytes) = NULL; HINSTANCE hInst = LoadLibrary("KERNEL32.DLL"); NS_ASSERTION(hInst != NULL, "COULD NOT LOAD KERNEL32.DLL"); if (hInst != NULL) { getDiskFreeSpaceExA = (BOOL (WINAPI*)(LPCTSTR lpDirectoryName, PULARGE_INTEGER lpFreeBytesAvailableToCaller, PULARGE_INTEGER lpTotalNumberOfBytes, PULARGE_INTEGER lpTotalNumberOfFreeBytes)) GetProcAddress(hInst, "GetDiskFreeSpaceExA"); FreeLibrary(hInst); } if (getDiskFreeSpaceExA && (*getDiskFreeSpaceExA)(aDrive, &liFreeBytesAvailableToCaller, &liTotalNumberOfBytes, &liTotalNumberOfFreeBytes)) { nBytes = (double)(signed __int64)liFreeBytesAvailableToCaller.QuadPart; } else if ( GetDiskFreeSpace(aDrive, &dwSecPerClus, &dwBytesPerSec, &dwFreeClus, &dwTotalClus)) { nBytes = (double)dwFreeClus*(double)dwSecPerClus*(double) dwBytesPerSec; } return (PRInt64)nBytes; #else return (PRInt64)0; #endif } //======================================================================================== // nsDirectoryIterator //======================================================================================== //---------------------------------------------------------------------------------------- nsDirectoryIterator::nsDirectoryIterator(const nsFileSpec& inDirectory, PRBool resolveSymlink) //---------------------------------------------------------------------------------------- : mCurrent(inDirectory) , mDir(nsnull) , mStarting(inDirectory) , mExists(PR_FALSE) , mResoveSymLinks(resolveSymlink) { mDir = PR_OpenDir(inDirectory); mCurrent += "dummy"; mStarting += "dummy"; ++(*this); } // nsDirectoryIterator::nsDirectoryIterator //---------------------------------------------------------------------------------------- nsDirectoryIterator::~nsDirectoryIterator() //---------------------------------------------------------------------------------------- { if (mDir) PR_CloseDir(mDir); } // nsDirectoryIterator::nsDirectoryIterator //---------------------------------------------------------------------------------------- nsDirectoryIterator& nsDirectoryIterator::operator ++ () //---------------------------------------------------------------------------------------- { mExists = PR_FALSE; if (!mDir) return *this; PRDirEntry* entry = PR_ReadDir(mDir, PR_SKIP_BOTH); // Ignore '.' && '..' if (entry) { mExists = PR_TRUE; mCurrent = mStarting; mCurrent.SetLeafName(entry->name); if (mResoveSymLinks) { PRBool ignore; mCurrent.ResolveSymlink(ignore); } } return *this; } // nsDirectoryIterator::operator ++ //---------------------------------------------------------------------------------------- nsDirectoryIterator& nsDirectoryIterator::operator -- () //---------------------------------------------------------------------------------------- { return ++(*this); // can't do it backwards. } // nsDirectoryIterator::operator --