nuclear@2: #include <string.h>
nuclear@2: #include <string>
nuclear@2: #include <vector>
nuclear@2: #include <stack>
nuclear@2: #ifdef _MSC_VER
nuclear@2: #include <malloc.h>
nuclear@2: #else
nuclear@2: #include <alloca.h>
nuclear@2: #endif
nuclear@2: #include "datapath.h"
nuclear@2: 
nuclear@2: using namespace std;
nuclear@2: 
nuclear@2: static vector<string> first;
nuclear@2: static stack<vector<string>> dpath_stack;
nuclear@2: 
nuclear@2: static void init()
nuclear@2: {
nuclear@2: 	if(dpath_stack.empty()) {
nuclear@2: 		dpath_stack.push(first);
nuclear@2: 	}
nuclear@2: }
nuclear@2: 
nuclear@2: void reset_data_path()
nuclear@2: {
nuclear@2: 	init();
nuclear@2: 
nuclear@2: 	dpath_stack.top().clear();
nuclear@2: }
nuclear@2: 
nuclear@2: void push_data_path()
nuclear@2: {
nuclear@2: 	init();
nuclear@2: 
nuclear@2: 	dpath_stack.push(dpath_stack.top());
nuclear@2: }
nuclear@2: 
nuclear@2: void pop_data_path()
nuclear@2: {
nuclear@2: 	init();
nuclear@2: 
nuclear@2: 	dpath_stack.pop();
nuclear@2: }
nuclear@2: 
nuclear@2: void add_data_path(const char *path)
nuclear@2: {
nuclear@2: 	init();
nuclear@2: 
nuclear@2: 	char *tmp = (char*)alloca(strlen(path) + 1);
nuclear@2: 	strcpy(tmp, path);
nuclear@2: 
nuclear@2: 	char *endp = strrchr(tmp, '/');
nuclear@2: 	if(endp) {
nuclear@2: 		*endp = 0;
nuclear@2: 	}
nuclear@2: 
nuclear@2: 	dpath_stack.top().push_back(tmp);
nuclear@2: }
nuclear@2: 
nuclear@2: bool find_file(const char *fname, char *path)
nuclear@2: {
nuclear@2: 	FILE *fp;
nuclear@2: 
nuclear@2: 	init();
nuclear@2: 
nuclear@2: 	for(size_t i=0; i<dpath_stack.top().size(); i++) {
nuclear@2: 		sprintf(path, "%s/%s", dpath_stack.top()[i].c_str(), fname);
nuclear@2: 
nuclear@2: 		if((fp = fopen(path, "r"))) {
nuclear@2: 			fclose(fp);
nuclear@2: 			return true;
nuclear@2: 		}
nuclear@2: 	}
nuclear@2: 
nuclear@2: 	if((fp = fopen(fname, "r"))) {
nuclear@2: 		fclose(fp);
nuclear@2: 		strcpy(path, fname);
nuclear@2: 		return true;
nuclear@2: 	}
nuclear@2: 	return false;
nuclear@2: }