/* -*- 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 <stdio.h>
#include <string.h>
#include <unistd.h>

#include <sys/stat.h>
#include <tools/stream.hxx>
#include <rtl/strbuf.hxx>
#include "cppdep.hxx"

CppDep::CppDep()
{
}

CppDep::~CppDep()
{
}

void CppDep::Execute()
{
    size_t nCount = m_aSources.size();
    for ( size_t n = 0; n < nCount; ++n )
    {
        const rtl::OString &rStr = m_aSources[n];
        Search(rStr);
    }
}

sal_Bool CppDep::AddSearchPath( const char* pPath )
{
    m_aSearchPath.push_back( rtl::OString(pPath) );
    return sal_False;
}

sal_Bool CppDep::AddSource( const char* pSource )
{
    m_aSources.push_back( rtl::OString(pSource) );
    return sal_False;
}

sal_Bool CppDep::Search(const rtl::OString &rFileName)
{
#ifdef DEBUG_VERBOSE
    fprintf( stderr, "SEARCH : %s\n", rFileName.getStr());
#endif
    sal_Bool bRet = sal_False;

    SvFileStream aFile;
    rtl::OString aReadLine;

    rtl::OUString suFileName(rtl::OStringToOUString(rFileName, osl_getThreadTextEncoding()));

    aFile.Open( suFileName, STREAM_READ );
    while ( aFile.ReadLine( aReadLine ))
    {
        sal_Int32 nPos = aReadLine.indexOfL(
            RTL_CONSTASCII_STRINGPARAM("include"));
        if ( nPos != -1 )
        {
#ifdef DEBUG_VERBOSE
            fprintf( stderr, "found : %d %s\n", nPos, aReadLine.getStr() );
#endif
            rtl::OString aResult = IsIncludeStatement( aReadLine );
#ifdef DEBUG_VERBOSE
            fprintf( stderr, "Result : %s\n", aResult.getStr() );
#endif

            rtl::OString aNewFile;
            if (!aResult.isEmpty())
            if ( !(aNewFile = Exists( aResult )).isEmpty() )
            {
                sal_Bool bFound = sal_False;
                size_t nCount = m_aFileList.size();
                for ( size_t i = 0; i < nCount; ++i )
                {
                    const rtl::OString &rStr = m_aFileList[i];
                    if ( rStr == aNewFile )
                        bFound = sal_True;
                }
#ifdef DEBUG_VERBOSE
                fprintf( stderr, "not in list : %d %s\n", nPos, aReadLine.getStr() );
#endif
                if ( !bFound )
                {
                    m_aFileList.push_back(aNewFile);
#ifdef DEBUG_VERBOSE
                    fprintf( stderr, " CppDep %s\\\n", aNewFile.getStr() );
#endif
                    Search(aNewFile);
                }
            }
        }
    }
    aFile.Close();

    return bRet;
}

rtl::OString CppDep::Exists(const rtl::OString &rFileName)
{
    char pFullName[1023];

#ifdef DEBUG_VERBOSE
    fprintf( stderr, "Searching %s \n", rFileName.getStr() );
#endif

    size_t nCount = m_aSearchPath.size();
    for ( size_t n = 0; n < nCount; ++n )
    {
        struct stat aBuf;
        const rtl::OString &rPathName = m_aSearchPath[n];

        strcpy( pFullName, rPathName.getStr());
        strcat( pFullName, DIR_SEP );
        strcat( pFullName, rFileName.getStr());

#ifdef DEBUG_VERBOSE
        fprintf( stderr, "looking for %s\t ", pFullName );
#endif
        if ( stat( pFullName, &aBuf ) == 0 )
        {
#ifdef DEBUG_VERBOSE
            fprintf( stderr, "Got Dependency %s \\\n", pFullName );
#endif
            return rtl::OString(pFullName);
        }
    }
    return rtl::OString();
}

rtl::OString CppDep::IsIncludeStatement(rtl::OString aLine)
{
    sal_Int32 nIndex;

    nIndex = aLine.indexOf("/*");
    if ( nIndex != -1 )
    {
#ifdef DEBUG_VERBOSE
        fprintf( stderr, "found starting C comment : %s\n", aLine.getStr() );
#endif
        aLine = aLine.copy(0, nIndex);
#ifdef DEBUG_VERBOSE
        fprintf( stderr, "cleaned string : %s\n", aLine.getStr() );
#endif
    }

    nIndex = aLine.indexOf("//");
    if ( nIndex != -1 )
    {
#ifdef DEBUG_VERBOSE
        fprintf( stderr, "found C++ comment : %s\n", aLine.getStr() );
#endif
        aLine = aLine.copy(0, nIndex);
#ifdef DEBUG_VERBOSE
        fprintf( stderr, "cleaned string : %s\n", aLine.getStr() );
#endif
    }
    // WhiteSpacesfressen
    aLine = aLine.replaceAll(rtl::OString(' '), rtl::OString()).
        replaceAll(rtl::OString('\t'), rtl::OString());
#ifdef DEBUG_VERBOSE
    fprintf( stderr, "now : %s\n", aLine.getStr() );
#endif
    // ist der erste Teil ein #include ?
    rtl::OString aRetStr;
    if (
        aLine.getLength() >= 10 &&
        aLine.match(rtl::OString(RTL_CONSTASCII_STRINGPARAM("#include")))
       )
    {
        //#include<foo> or #include"foo"
        aLine = aLine.copy(9, aLine.getLength()-10);
#ifdef DEBUG_VERBOSE
        fprintf( stderr, "Gotcha : %s\n", aLine.getStr() );
#endif
        aRetStr = aLine;
    }
    return aRetStr;
}

#ifdef TEST

int main( int argc, char **argv )
{
    CppDep *pDep = new CppDep();
    pDep->AddSearchPath(".");
    pDep->AddSearchPath("/usr/include");
    pDep->AddSearchPath("/usr/local/include");
    pDep->AddSearchPath("/usr/include/sys");
    pDep->AddSearchPath("/usr/include/X11");
    pDep->Execute();
    delete pDep;
    return 0;
}

#endif

/* vim:set shiftwidth=4 softtabstop=4 expandtab: */