/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ /* * This file is part of the LibreOffice project. * * This Source Code Form is subject to the terms of the Mozilla Public * License, v. 2.0. If a copy of the MPL was not distributed with this * file, You can obtain one at http://mozilla.org/MPL/2.0/. * * This file incorporates work covered by the following license notice: * * Licensed to the Apache Software Foundation (ASF) under one or more * contributor license agreements. See the NOTICE file distributed * with this work for additional information regarding copyright * ownership. The ASF licenses this file to you under the Apache * License, Version 2.0 (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.apache.org/licenses/LICENSE-2.0 . */ #include #include #include #include #include #include #include #if defined(SAL_W32) #include #endif #ifdef SAL_UNX #include #include #if defined(MACOSX) || defined(FREEBSD) || defined(NETBSD) || \ defined(AIX) || defined(OPENBSD) || defined(DRAGONFLY) #include #else #include #endif #endif #include using namespace ::osl; extern int yyparse(); extern FILE* yyin; extern int yydebug; sal_Int32 lineNumber = 1; static const char TMP[] = "TMP"; static const char TEMP[] = "TEMP"; static sal_Char tmpFilePattern[512]; bool isFileUrl(const OString& fileName) { if (fileName.startsWith("file://") ) return true; return false; } OString convertToAbsoluteSystemPath(const OString& fileName) { OUString uSysFileName; OUString uFileName(fileName.getStr(), fileName.getLength(), osl_getThreadTextEncoding()); if ( isFileUrl(fileName) ) { if (FileBase::getSystemPathFromFileURL(uFileName, uSysFileName) != FileBase::E_None) { OSL_ASSERT(false); } } else { OUString uWorkingDir, uUrlFileName, uTmp; if (osl_getProcessWorkingDir(&uWorkingDir.pData) != osl_Process_E_None) { OSL_ASSERT(false); } if (FileBase::getFileURLFromSystemPath(uFileName, uTmp) != FileBase::E_None) { OSL_ASSERT(false); } if (FileBase::getAbsoluteFileURL(uWorkingDir, uTmp, uUrlFileName) != FileBase::E_None) { OSL_ASSERT(false); } if (FileBase::getSystemPathFromFileURL(uUrlFileName, uSysFileName) != FileBase::E_None) { OSL_ASSERT(false); } } return OUStringToOString(uSysFileName, osl_getThreadTextEncoding()); } OString convertToFileUrl(const OString& fileName) { if ( !isFileUrl(fileName) ) { OString tmp = convertToAbsoluteSystemPath(fileName); OUString uFileName(tmp.getStr(), tmp.getLength(), osl_getThreadTextEncoding()); OUString uUrlFileName; if (FileBase::getFileURLFromSystemPath(uFileName, uUrlFileName) != FileBase::E_None) { OSL_ASSERT(false); } return OUStringToOString(uUrlFileName, osl_getThreadTextEncoding()); } return fileName; } OString makeTempName(const OString& prefix) { OUString uTmpPath; OString tmpPath; if ( osl_getEnvironment(OUString(TMP).pData, &uTmpPath.pData) != osl_Process_E_None ) { if ( osl_getEnvironment(OUString(TEMP).pData, &uTmpPath.pData) != osl_Process_E_None ) { #if defined(SAL_W32) tmpPath = OString("c:\\temp"); #else tmpPath = OString("/tmp"); #endif } } if ( !uTmpPath.isEmpty() ) tmpPath = OUStringToOString(uTmpPath, RTL_TEXTENCODING_UTF8); #if defined(SAL_W32) || defined(SAL_UNX) OSL_ASSERT( sizeof(tmpFilePattern) > (size_t) ( tmpPath.getLength() + RTL_CONSTASCII_LENGTH( PATH_SEPARATOR ) + prefix.getLength() + RTL_CONSTASCII_LENGTH( "XXXXXX") ) ); tmpFilePattern[ sizeof(tmpFilePattern)-1 ] = '\0'; strncpy(tmpFilePattern, tmpPath.getStr(), sizeof(tmpFilePattern)-1); strncat(tmpFilePattern, PATH_SEPARATOR, sizeof(tmpFilePattern)-1-strlen(tmpFilePattern)); strncat(tmpFilePattern, prefix.getStr(), sizeof(tmpFilePattern)-1-strlen(tmpFilePattern)); strncat(tmpFilePattern, "XXXXXX", sizeof(tmpFilePattern)-1-strlen(tmpFilePattern)); #ifdef SAL_UNX // coverity[secure_temp] - https://communities.coverity.com/thread/3179 int nDescriptor = mkstemp(tmpFilePattern); if( -1 == nDescriptor ) { fprintf(stderr, "idlc: mkstemp(\"%s\") failed: %s\n", tmpFilePattern, strerror(errno)); exit( 1 ); } // the file shall later be reopened by stdio functions close( nDescriptor ); #else (void) mktemp(tmpFilePattern); #endif #endif return OString(tmpFilePattern); } bool copyFile(const OString* source, const OString& target) { bool bRet = true; FILE* pSource = source == nullptr ? stdin : fopen(source->getStr(), "rb"); if ( !pSource ) return false; FILE* pTarget = fopen(target.getStr(), "wb"); if ( !pTarget ) { fclose(pSource); return false; } size_t totalSize = 512; char pBuffer[513]; while ( !feof(pSource) ) { size_t readSize; if ( (readSize = fread(pBuffer, 1, totalSize, pSource)) > 0 && !ferror(pSource) ) { if ( (fwrite(pBuffer, 1, readSize, pTarget)) != readSize || ferror(pTarget) ) { if (source != nullptr) { fclose(pSource); } fclose(pTarget); return false; } } } if (source != nullptr) { fclose(pSource); } if ( fflush(pTarget) ) bRet = false; fclose(pTarget); return bRet; } sal_Int32 compileFile(const OString * pathname) { // preprocess input file OString tmpFile = makeTempName(OString("idli_")); OString preprocFile = makeTempName(OString("idlf_")); OString fileName; if (pathname == nullptr) { fileName = "stdin"; } else { fileName = *pathname; } if ( !copyFile(pathname, tmpFile) ) { fprintf(stderr, "%s: could not copy %s%s to %s\n", idlc()->getOptions()->getProgramName().getStr(), pathname == nullptr ? "" : "file ", fileName.getStr(), tmpFile.getStr()); exit(99); } idlc()->setFileName(fileName); idlc()->setMainFileName(fileName); idlc()->setRealFileName(tmpFile); ::std::vector< OUString> lCppArgs; lCppArgs.push_back("-DIDL"); lCppArgs.push_back("-C"); lCppArgs.push_back("-zI"); OStringBuffer cppArgs(256); Options* pOptions = idlc()->getOptions(); OString filePath; sal_Int32 index = fileName.lastIndexOf(SEPARATOR); if ( index > 0) { filePath = fileName.copy(0, index); if ( !filePath.isEmpty() ) { cppArgs.append("-I"); cppArgs.append(filePath); lCppArgs.push_back(OStringToOUString( cppArgs.makeStringAndClear().replace('\\', '/'), RTL_TEXTENCODING_UTF8)); } } if ( pOptions->isValid("-D") ) { OString token, dOpt = pOptions->getOption("-D"); sal_Int32 nIndex = 0; do { token = dOpt.getToken( 0, ' ', nIndex ); if (token.getLength()) lCppArgs.push_back(OStringToOUString("-D" + token, RTL_TEXTENCODING_UTF8)); } while( nIndex != -1 ); } if ( pOptions->isValid("-I") ) { OString token, incOpt = pOptions->getOption("-I"); sal_Int32 nIndex = 0; do { token = incOpt.getToken( 0, ' ', nIndex ); if (token.getLength()) lCppArgs.push_back(OStringToOUString("-I" + token, RTL_TEXTENCODING_UTF8)); } while( nIndex != -1 ); } lCppArgs.push_back(OUString("-o")); cppArgs.append(preprocFile); lCppArgs.push_back(OStringToOUString(cppArgs.makeStringAndClear(), RTL_TEXTENCODING_UTF8)); cppArgs.append(tmpFile); lCppArgs.push_back(OStringToOUString(cppArgs.makeStringAndClear(), RTL_TEXTENCODING_UTF8)); OUString cpp; OUString startDir; #ifndef SYSTEM_UCPP if (osl_getExecutableFile(&cpp.pData) != osl_Process_E_None) { OSL_ASSERT(false); } sal_Int32 idx= cpp.lastIndexOf("idlc"); cpp = cpp.copy(0, idx); #if defined(SAL_W32) cpp += "ucpp.exe"; #else cpp += "ucpp"; #endif #else // SYSTEM_UCPP cpp = OUString(UCPP); #endif oslProcess hProcess = nullptr; oslProcessError procError = osl_Process_E_None; const int nCmdArgs = lCppArgs.size(); rtl_uString** pCmdArgs = nullptr; pCmdArgs = static_cast(rtl_allocateZeroMemory(nCmdArgs * sizeof(rtl_uString*))); ::std::vector< OUString >::iterator iter = lCppArgs.begin(); ::std::vector< OUString >::iterator end = lCppArgs.end(); int i = 0; while ( iter != end ) { pCmdArgs[i++] = (*iter).pData; ++iter; } procError = osl_executeProcess( cpp.pData, pCmdArgs, nCmdArgs, osl_Process_WAIT, nullptr, startDir.pData, nullptr, 0, &hProcess ); oslProcessInfo hInfo; hInfo.Size = (sal_uInt32)(sizeof(oslProcessInfo)); if (osl_getProcessInfo(hProcess, osl_Process_EXITCODE, &hInfo) != osl_Process_E_None) { OSL_ASSERT(false); } if ( procError || (hInfo.Code != 0) ) { if ( procError != osl_Process_E_None ) fprintf(stderr, "%s: starting preprocessor failed\n", pOptions->getProgramName().getStr()); else fprintf(stderr, "%s: preprocessing %s%s failed\n", pOptions->getProgramName().getStr(), pathname == nullptr ? "" : "file ", fileName.getStr()); osl_freeProcessHandle(hProcess); rtl_freeMemory(pCmdArgs); exit(hInfo.Code ? hInfo.Code : 99); } osl_freeProcessHandle(hProcess); rtl_freeMemory(pCmdArgs); if (unlink(tmpFile.getStr()) != 0) { fprintf(stderr, "%s: Could not remove cpp input file %s\n", pOptions->getProgramName().getStr(), tmpFile.getStr()); exit(99); } if ( pOptions->isValid("-E") ) { if (unlink(preprocFile.getStr()) != 0) { fprintf(stderr, "%s: Could not remove parser input file %s\n", pOptions->getProgramName().getStr(), preprocFile.getStr()); exit(99); } exit(0); } // parse file yyin = fopen(preprocFile.getStr(), "r"); if (yyin == nullptr) { fprintf(stderr, "%s: Could not open cpp output file %s\n", pOptions->getProgramName().getStr(), preprocFile.getStr()); exit(99); } //yydebug = 0 no trace information //yydebug = 1 parser produce trace information yydebug = 0; yyparse(); sal_Int32 nErrors = idlc()->getErrorCount(); fclose(yyin); if (unlink(preprocFile.getStr()) != 0) { fprintf(stderr, "%s: Could not remove parser input file %s\n", pOptions->getProgramName().getStr(), preprocFile.getStr()); exit(99); } return nErrors; } /* vim:set shiftwidth=4 softtabstop=4 expandtab: */ ature/calctiledrendering_alt'>feature/calctiledrendering_alt LibreOffice 核心代码仓库文档基金会
summaryrefslogtreecommitdiff
path: root/scaddins/source
AgeCommit message (Expand)Author
2014-02-04fdo#54938 Convert oox and scaddins to cppu::supportsServiceAlexandre Vicenzi
2014-01-20remove now dead MyList classNoel Grandin
2014-01-20convert custom list implementation ScaDoubleList to std::vectorNoel Grandin
2014-01-20convert custom list implementation SortedIndividualInt32ListNoel Grandin
2014-01-20convert custom list implementation FuncDataList to use std::vectorNoel Grandin
2014-01-20convert custom list implement ConvertDataList to std::vectorNoel Grandin
2014-01-20Convert custom list implementation ComplexList to use std::vectorNoel Grandin
2014-01-20remove unused CStrList classNoel Grandin
2014-01-17convert custom list implementation to regular std::vector<OUString>Noel Grandin
2014-01-10Be explicit when using bool as integral valueStephan Bergmann
2013-12-17Adapt all (non-extension, SharedLibrary) .components to environment="..."Stephan Bergmann
2013-12-05Revert "Resolves: fdo#72174 convert_add from "at" or "atm" to "Pa" gives same...Eike Rathke
2013-12-05Revert "Let precise things and put some references"Eike Rathke
2013-12-01Let precise things and put some referencesJulien Nabet
2013-11-30Resolves: fdo#72174 convert_add from "at" or "atm" to "Pa" gives same answerJulien Nabet
2013-11-30typo: Tower -> LowerAndras Timar
2013-11-29typos in UIAndras Timar
2013-11-11convert OUString compareToAscii == 0 to equalsAsciiNoel Grandin
2013-10-22Bin comments that claim to say why some header is includedTor Lillqvist
2013-10-18fdo#70515: Error in stated number of parameter value choices for WEEKNUM_ADDJulien Nabet