/***********************************************************************
** FontMap.cpp                                                        **
**                                                                    **
** This file is part of dvisvgm -- the DVI to SVG converter           **
** Copyright (C) 2005-2007 Martin Gieseking <martin.gieseking@uos.de> **
**                                                                    **
** This program 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.             **
**                                                                    **
** This program 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., 51 Franklin Street, Fifth Floor,                 **
** Boston, MA 02110-1301, USA.                                        **
***********************************************************************/
// $Id: FontMap.cpp 44 2007-03-20 23:18:10Z mgieseki $

//#include <dirent.h>
//#include <errno.h>
//#include <sys/stat.h>
#include <fstream>
#include <iostream>
#include <vector>
#include "Directory.h"
#include "FontMap.h"

using namespace std;


/** Helper function: splits a given line of text into several parts. 
 * @param str pointer to line buffer (must be writable) 
 * @param parts the parts are written to this vector 
 * @param max_parts maximal number of parts to be stored (0 = no limit) 
 * @return number of extracted parts */
static int split (char *str, vector<string> *parts, unsigned max_parts=0) {
	if (str && parts) {
		parts->clear();
		while (*str && (max_parts == 0 || parts->size() < max_parts)) {
			char *l = str;
			while (*l == ' ' || *l == '\t')  // skip leading spaces
				l++;
			if (*l && *l != '%') {  // begin of entry found?
				char *r = l;
				while (*r && *r != ' ' && *r != '\t')
					r++;
				str = r;
				if (*r) {		   // end of entry found?		
					*r = 0;        // mark end of entry
					str = r+1;     // next possible entry starts here
				}
				parts->push_back(l);
			}
			else
				*str = 0;         // terminate
		}
		return parts->size();
	}
	return 0;
}


/*
FontMap::FontMap (const string &fname, bool dir) {
	if (dir)
		readMapDir(fname);
	else
		readMapFile(fname);
}*/


FontMap::FontMap (istream &is) {
	read(is);
}


void FontMap::read (istream &is) {
	char buf[256];
	while (is) {
		is.getline(buf, 256);
		vector<string> parts;
		if (split(buf, &parts, 10) < 2)
			continue;

//		cout << '[' << parts[0] << "] -> [" << parts[1] << ']' << endl;
		int target_index = 0;
		if (parts.size() == 2 && parts[1][0] != '-')
			target_index = 1;
		else if (parts.size() > 2)
			target_index = (parts[2][0] == '-') ? 1 : 2;
		// skip names that map to themselves
		if (target_index > 0 && parts[0] != parts[target_index])
			fontMap[parts[0]] = parts[target_index];
	}
}


ostream& FontMap::write (ostream &os) const {
	for (map<string,string>::const_iterator i=fontMap.begin(); i != fontMap.end(); ++i)
		os << i->first << " -> " << i->second << endl;
	return os;
}


void FontMap::readdir (const string &dirname) {
	Directory dir(dirname);
	while (const char *fname = dir.read('f')) {
		if (strlen(fname) >= 4 && strcmp(fname+strlen(fname)-4, ".map") == 0) {
			string path = dirname + "/" + fname;
			ifstream ifs(path.c_str());
			read(ifs);
		}
	}
}

#if 0
bool FontMap::readdir (const string &dirname) {
	DIR *dir = opendir(dirname.c_str());
	if (dir) {
		errno = 0;
		struct dirent *de;
		while ((de = readdir(dir)) != 0) {
			string fname = de->d_name;
			string path = string(dirname) + "/" + fname;
			struct stat stats;
			stat(path.c_str(), &stats);
			if (S_ISDIR(stats.st_mode) && fname.size() > 3 && fname.substr(fname.size()-4) == ".map") {
				ifstream ifs(path.c_str());
				read(ifs);
			}
			else if (errno != 0)
				return false;
		}
		closedir(dir);
		return true;
	}
	return false;
}
#endif

const char* FontMap::lookup (const string &fontname) const {
	ConstIterator it = fontMap.find(fontname);
	if (it == fontMap.end())
		return 0;
	return it->second.c_str();
}