source: trunk/lib/File.cc @ 610

// $Id: File.cc 610 2008-04-20 17:47:59Z peter $

/*
  Copyright (C) 2005, 2006, 2007 Jari Häkkinen, Peter Johansson

  This file is part of svndigest, http://trac.thep.lu.se/svndigest

  svndigest is free software; you can redistribute it and/or modify it
  under the terms of the GNU General Public License as published by
  the Free Software Foundation; either version 2 of the License, or
  (at your option) any later version.

  svndigest is distributed in the hope that it will be useful, but
  WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  General Public License for more details.

  You should have received a copy of the GNU General Public License
  along with this program; if not, write to the Free Software
  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
  02111-1307, USA.
*/

#include "File.h"

#include "Alias.h"
#include "Configuration.h"
#include "Date.h"
#include "GnuplotFE.h"
#include "html_utility.h"
#include "HtmlStream.h"
#include "Stats.h"
#include "SVNblame.h"
#include "SVNlog.h"

#include <algorithm>
#include <cassert>
#include <cstdio>
#include <ctime>
#include <fstream>
#include <iostream>
#include <map>
#include <string>
#include <sys/stat.h>

namespace theplu{
namespace svndigest{


  File::File(const unsigned int level, const std::string& path, 
             const std::string& output) 
    : Node(level,path,output) 
  {
    output_dir_=output;
    if (!output_dir_.empty())
      output_dir_+='/';
  }


  std::map<int, std::set<Alias> >
  File::copyright_map(std::map<std::string, Alias>& alias) const
  {
    using namespace std;
    map<int, set<Alias> > year_authors;
    SVNlog log(path());
    const Stats& stats = stats_["add"];
    

    for (LogIterator i=log.begin(); i<log.end(); ++i){
      if (i->revision() && 
          (stats(LineTypeParser::code, i->author(), i->revision()) >
           stats(LineTypeParser::code, i->author(), i->revision()-1) || 
           stats(LineTypeParser::comment, i->author(), i->revision()) >
           stats(LineTypeParser::comment, i->author(), i->revision()-1))
          ) {
        
        time_t sec = str2time(i->date());
        tm* timeinfo = gmtime(&sec);
        
        // find username in map of aliases
        std::map<string,Alias>::iterator name(alias.lower_bound(i->author()));
        
        // if alias exist insert alias
        if (name != alias.end() && name->first==i->author())
          year_authors[timeinfo->tm_year].insert(name->second);
        else {
          // else insert user name
          Alias a(i->author(),alias.size());
          year_authors[timeinfo->tm_year].insert(a);
          std::cerr << "svndigest: warning: no copyright alias found for `" 
                    << i->author() << "'\n";
          // insert alias to avoid multiple warnings.
          alias.insert(name, std::make_pair(i->author(), a));
        }
      }
    }
    return year_authors;
  }


  std::string 
  File::copyright_block(const std::map<int, std::set<Alias> >& year_authors,
                        const std::string& prefix) const
  {
    using namespace std;
    stringstream ss;
    for (map<int, set<Alias> >::const_iterator i(year_authors.begin());
         i!=year_authors.end();) {
      ss << prefix << "Copyright (C) "
          << 1900+i->first;
      map<int, set<Alias> >::const_iterator j = i;
      assert(i!=year_authors.end());
      while (++j!=year_authors.end() && 
             i->second == j->second){
        ss << ", " << 1900+(j->first);
      }
      // printing authors
      std::vector<Alias> vec_alias;
      back_insert_iterator<std::vector<Alias> > ii(vec_alias);
      std::copy(i->second.begin(), i->second.end(), ii);
      // sort with respect to id
      std::sort(vec_alias.begin(), vec_alias.end(), IdCompare());
      for (std::vector<Alias>::iterator a=vec_alias.begin();
           a!=vec_alias.end(); ++a){
        if (a!=vec_alias.begin())
          ss << ",";
        ss << " " << a->name();
      }
      ss << "\n";
      i = j;
    }
    return ss.str();
  }

  bool File::detect_copyright(std::string& block, size_t& start_at_line,
                              size_t& end_at_line, std::string& prefix) const
  {
    using namespace std;
    LineTypeParser parser(path());
    std::ifstream is(path().c_str());
    std::string line;
    while (std::getline(is, line)) 
      parser.parse(line);
    if (!parser.copyright_found())
      return false;
    block = parser.block();
    start_at_line = parser.start_line();
    end_at_line = parser.end_line();
    prefix = parser.prefix();
    return true;
  }


  std::string File::href(void) const
  { 
    return name()+".html"; 
  }


  SVNlog File::log_core(void) const
  {
    return SVNlog(path());
  }


  std::string File::node_type(void) const
  {
    return std::string("file");
  }


  std::string File::output_path(void) const
  {
    return output_dir()+name()+".html";
  }


  const StatsCollection& File::parse(bool verbose, bool ignore)
  {
    if (verbose)
      std::cout << "Parsing " << path_ << std::endl; 
    stats_.reset();
    std::string cache_dir = directory_name(path()) + std::string(".svndigest/"); 
    std::string cache_file = cache_dir + name()+std::string(".svndigest-cache");
    if (node_exist(cache_file)){
      std::ifstream is(cache_file.c_str());
      if (stats_.load_cache(is)){
        return stats_;
      }
      is.close();
    }
    else
      stats_.parse(path_);
    if (!node_exist(cache_dir))
      mkdir(cache_dir);
    std::ofstream os(cache_file.c_str());
    stats_.print(os);
    os.close();
    return stats_;
  }


  void File::print_blame(std::ofstream& os) const
  {
    os << "<br /><h3>Blame Information</h3>";
    os << "<table class=\"blame\">\n";
    os << "<thead>\n";
    os << "<tr>\n";
    os << "<th class=\"rev\">Rev</th>\n";
    os << "<th class=\"date\">Date</th>\n";
    os << "<th class=\"author\">Author</th>\n";
    os << "<th class=\"line\">Line</th>\n";
    os << "<th></th>\n";
    os << "</tr>\n</thead>\n";
    os << "<tbody>\n";
    HtmlStream hs(os);
    SVNblame blame(path_);
    LineTypeParser parser(path_);
    while (blame.valid()) {
      parser.parse(blame.line());
      blame.next_line();
    }
    blame.reset();

    std::vector<LineTypeParser::line_type>::const_iterator 
      line_type(parser.type().begin());
    int last=0;
    int first=0;
    bool using_dates=true;
    if (GnuplotFE::instance()->dates().empty()){
      using_dates=false;
      last = stats_["classic"].revision();
    }
    else {
      last = Date(GnuplotFE::instance()->dates().back()).seconds();
      // earliest date corresponds either to revision 0 or revision 1 
      first = std::min(Date(GnuplotFE::instance()->dates()[0]).seconds(),
                       Date(GnuplotFE::instance()->dates()[1]).seconds());
    }
    // color is calculated linearly on time, c = kt + m
    // brightest color (for oldest rev in log) is set to 192.
    double k = 192.0/(first-last);
    double m = -last*k; 
    while (blame.valid()) {
      std::string color;
      if (using_dates)
        color = hex(static_cast<int>(k*Date(blame.date()).seconds()+m),2);
      else
        color = hex(static_cast<int>(k*blame.revision()+m),2);
      os << "<tr>\n<td class=\"rev\">";
      std::stringstream color_ss;
      color_ss << "#" << color << color << color; 
      os << "<font color=\"" << color_ss.str() << "\">"
         << trac_revision(blame.revision(), color_ss.str())
         << "</font></td>\n<td class=\"date\"><font color=\"#" << color 
         << color << color << "\">" ;
      hs << Date(blame.date())("%d %b %y");
      os << "</font></td>\n<td class=\"author\">";
      hs << blame.author();
      os << "</td>\n<td class=\"";
      assert(line_type!=parser.type().end());
      if (*line_type==LineTypeParser::other)
        os << "line-other";
      else if (*line_type==LineTypeParser::comment_or_copy)
        os << "line-comment";
      else
        os << "line-code";
      os << "\">" << blame.line_no()+1
         << "</td>\n<td>";
      hs << blame.line();
      os << "</td>\n</tr>\n";
      blame.next_line();
      ++line_type;
    }
    os << "</tbody>\n";
    os << "</table>\n";
  }


  void File::print_copyright(std::map<std::string, Alias>& alias, 
                             bool verbose) const 
  {
    if (ignore())
      return;

    std::string old_block;
    size_t start_line=0;
    size_t end_line=0;
    std::string prefix;
    if (!detect_copyright(old_block, start_line, end_line, prefix)){
      if (Configuration::instance().missing_copyright_warning())
        std::cerr << "svndigest: warning: no copyright statement found in `" 
                  << path_ << "'\n";
      return;
    }
    std::map<int, std::set<Alias> > map=copyright_map(alias);
    std::string new_block = copyright_block(map, prefix);
    if (old_block==new_block)
      return;
    if (verbose)
      std::cout << "Updating copyright in " << path_ << std::endl; 
    update_copyright(new_block, start_line, end_line);
  }


  void File::print_core(const bool verbose) const 
  {
  }


  void File::print_core(const std::string& stats_type, 
                        const std::string& user, const std::string& line_type,
                        const SVNlog& log) const 
  {
    std::string outpath = stats_type+"/"+user+"/"+line_type+"/"+local_path();
    std::string imagefile = stats_type+"/"+"images/"+line_type+"/"+
      local_path_+".png";
    std::string html_name(outpath + ".html");
    std::ofstream os(html_name.c_str());
    print_header(os, name(), level_+3, user, line_type, local_path()+".html",
                 stats_type);
    path_anchor(os);

    os << "<p class=\"plot\">\n<img src='"; 
    for (size_t i=0; i<level_; ++i)
      os << "../";
    os << "../../../";
    if (user=="all")
      os << stats_[stats_type].plot(imagefile,line_type);
    else
      os << imagefile;
    os << "' alt='[plot]' />\n</p>";

    print_author_summary(os, stats_[stats_type], line_type, log);
    os << "\n";

    print_blame(os);

    print_footer(os);
    os.close(); 
  }

  void File::update_copyright(const std::string& new_block,
                              size_t start_at_line, size_t end_at_line) const
  {
    // Code copied from Gnuplot -r70
    char tmpname[]="/tmp/svndigestXXXXXX";
    int fd=mkstemp(tmpname);  // mkstemp return a file descriptor
    if (fd == -1)
      throw std::runtime_error(std::string("Failed to get unique filename: ") +
                               tmpname);
    // Jari would like to do something like 'std::ofstream tmp(fd);'
    // but has to settle for (which is stupid since the file is
    // already open for writing.
    std::ofstream tmp(tmpname);

    using namespace std;
    ifstream is(path().c_str());
    assert(is.good());
    string line;
    // Copy lines before block
    for (size_t i=1; i<start_at_line; ++i){
      assert(is.good());
      getline(is, line);
      tmp << line << "\n";
    }
    // Printing copyright statement
    tmp << new_block;
    // Ignore old block lines
    for (size_t i=start_at_line; i<end_at_line; ++i){
      assert(is.good());
      getline(is, line);
    }
    // Copy lines after block
    while(is.good()) {
      char ch=is.get();
      if (is.good())
        tmp.put(ch);
    }

    is.close();
    tmp.close();
    close(fd);
    // get file permission
    struct stat nodestat;
    stat(path().c_str(),&nodestat);
    
    // finally copy temporary file to replace original file, and
    // remove the temporary file
    try {
      copy_file(tmpname, path());
    }
    catch (std::runtime_error e) {
      // catch exception, cleanup, and rethrow
      std::cerr << "File::print_copyright: Exception caught, "
                << "removing temporary file " << tmpname << std::endl;
      if (unlink(tmpname))
        throw runtime_error(std::string("File::print_copyright: ") +
                            "failed to unlink temporary file" + tmpname);
      throw;
    }
    if (unlink(tmpname))
      throw runtime_error(std::string("File::print_copyright: ") +
                          "failed to unlink temporary file" + tmpname);

    chmod(path().c_str(), nodestat.st_mode);
  }


}} // end of namespace svndigest and namespace theplu