/*
test.cpp
© Andrey Bushman, 24/06/2013
Chapter 17.5.2
*/
//--------------------------------------------------------------------
#include <iostream>
#include <string>
#include <exception>
using namespace std;
//********************************************************************
namespace Bushman{
//--------------------------------------------------------------------
	struct Link{ // элемент двустороннего списка.
		string value; // значение
		Link* prev; // предыдущий
		Link* succ; // следующий
		Link(const string& v, Link* p = 0, Link* n = 0): value(v), 
		prev(p), succ(n){}		
	};
//--------------------------------------------------------------------
	Link* insert(Link* p, Link* n){ // вставка p перед n
		if(!p || !n) throw runtime_error("void Bushman::insert(Link* "
		"p, Link* n): Invalid argument.");
		p -> prev = n -> prev;
		if(p -> prev) p -> prev -> succ = p; // если не первый элемент
		p -> succ = n;
		n -> prev = p;
		return n;
	}
//--------------------------------------------------------------------
	Link* erase(Link* p){ // удалить p из списка. возвращается след.
		if(p == 0) return 0;		
		if(p -> succ) p -> succ -> prev = p -> prev;
		if(p -> prev) p -> prev -> succ = p -> succ;
		Link* result = p -> succ;
		p -> prev = 0;
		p -> succ = 0;
		return result;
	}
//--------------------------------------------------------------------
	Link* find(Link* p, const string& s){ // найти элемент в списке.
		if(!p) return 0;
		while(p){
			if(p -> value == s) return p;
			p = p -> succ;
		}
		return 0;
	}
//--------------------------------------------------------------------
	Link* advance(Link* p, int n){ // переместиться на n элементов.
		if(!p) return 0;
		if(n > 0){
			while(n--){
				if(p -> succ == 0) return 0;
				p = p -> succ;
			}
		}
		else if(n < 0){
			while(n++){
				if(p -> prev == 0) return 0;
				p = p -> prev;
			}
		}
		return p;
	}
//--------------------------------------------------------------------
	void print_all(Link* p){ // распечатать список
		cout << "{ ";
		while(p){
			cout << p -> value;
			if(p = p -> succ) cout << ", ";
		}
		cout << " }";
	}
}
//====================================================================
int main()
// точка входа
try{
	using namespace Bushman;
	
	// список норвежских богов
	Link* norse_gods = new Link("Thor");
	Link* first = norse_gods;
	norse_gods = insert(norse_gods,new Link("Odin"));
	norse_gods = insert(norse_gods,new Link("Zeus"));
	norse_gods = insert(norse_gods,new Link("Freia"));
	
	// список греческих богов
	Link* greek_gods = new Link("Hera");
	Link* second = greek_gods;
	greek_gods = insert(greek_gods, new Link("Mars"));
	greek_gods = insert(greek_gods, new Link("Poseidon"));
	
	// исправляю ошибки...
	Link* p = find(first, "Zeus"); // зевса переношу к грекам
	if(p){
		erase(p);
		insert(greek_gods,p);
	}	
	
	Link* p2 = find(second, "Mars"); // переименовываю марса
	if(p2) p2 -> value = "Ares";
	
	// печатаю результаты
	print_all(first);
	cout << endl;
	print_all(second);
}
catch(exception& e){
	cerr << e.what() << endl;
	return 1;
}
catch(...){
	cerr << "Unknown exception." << endl;
	return 2;
}