Родословная

#include<string.h> // strlen, strtok
 
 
 
#include<iostream>
#include<iomanip>
 
#include<fstream>
 
#include<algorithm>
#include<vector>
 
 
 
#define MAXMAMBNAMB 50
#define MAXB        1024
 
 
 
class FAMILY_TREE
 {
public:
 char parent[ MAXMAMBNAMB ];
 char child[ MAXMAMBNAMB ];
 int knee; // колено
 };
 
int superTREE = 0;
 
 
bool compare( FAMILY_TREE *a, FAMILY_TREE *b )
 {
return( stricmp(b->child, a->child) > 0 ) ? true : false;
 }
 
 
bool analyse_input( char *buffer, char **child, char **parent )
 {
*child = strtok( buffer, "\t " );
*parent = strtok( NULL, "\t " );
return( *child && *parent ) ? true : false;
 }
 
 
 
 
void make_new_mamber( FAMILY_TREE *mamb, char *child, char *parent, int x )
 {
strncpy( mamb->parent, parent, MAXMAMBNAMB );
strncpy( mamb->child, (( x ) ? child : parent), MAXMAMBNAMB );
return;
 }
 
 
 
 
int get_deep( std::vector<FAMILY_TREE *> &mamb, int index, int &n )
 {
for( int i=mamb.size()-1; i>=0; i-- )
 {
 if( i != index && stricmp(mamb[ i ]->child, mamb[ index ]->parent)==0 )
  {
  if( n > mamb.size() ) break;
 
  get_deep( mamb, i, ++n );
  }
 }
 
return n;
 }
 
 
// FORMATTED
void show_knee( const std::vector<FAMILY_TREE *> &mambers, int lnl, int knee )
 {
int screen_width = 70;
lnl += 2;
 
std::cout << std::setw(screen_width) << std::setfill('=') << "\n" << std::setfill(' ');
std::cout << "Родственники одного колена(братья и сестры)\n\n";
for( int i=0, cnt=lnl; i<mambers.size(); i++ )
 {
 if( mambers[ i ]->knee == knee )
  {
  if( cnt >=screen_width )
   {
   cnt = lnl;
   std::cout << "\n";
   }
  std::cout <<  std::setw(lnl) << mambers[ i ]->child;
  cnt += lnl;
  }
 
 }
std::cout << "\n" << std::setw(screen_width) << std::setfill('=') << "\n" << std::setfill(' ');
 
 }
 
 
 
 
 
 
 
 
 
 
int find_child_index( const std::vector<FAMILY_TREE *> &mambers, const char *name )
 {
int his_index = -1;
for( int i=1; i<mambers.size(); i++ )
 {
 if( stricmp(mambers[ i ]->child, name)==0 )
  {
  his_index = i;
  break;
  }
 }
return his_index;
 }
 
 
 
bool find_general_parents(const std::vector<FAMILY_TREE *> &mambers, int i1, int i2, int cnt )
 {
if( i1==-1 || i2==-1 ) return false;
 
if( stricmp(mambers[ i1 ]->parent, mambers[ i2 ]->parent)!=0 )
 {
 find_general_parents( mambers, find_child_index(mambers, mambers[ i1 ]->parent), find_child_index(mambers, mambers[ i2 ]->parent), ++cnt );
 
 }
else
 {
 std::cout << cnt << ((cnt>1) ? " ю-родный" : " (РОДНОЙ)") << std::endl;
 }
 
return true;
 }
 
 
int get_degree( const std::vector<FAMILY_TREE *> &mambers, const char *name )
 {
 
char his_parent[ MAXMAMBNAMB ];
 
int his_index = find_child_index( mambers, name );
 
if( his_index != -1 )
 {
 strcpy( his_parent, mambers[ his_index ]->parent );
 
 std::cout << " Член семьи " << name << std::endl;
 std::cout << " Степень его родства с: " << std::endl;
 
 for( int i=1; i<mambers.size(); i++ )
  {
  if( i != his_index && mambers[ i ]->knee == mambers[ his_index ]->knee )
   {
   std::cout << std::left << std::setw(20) << mambers[ i ]->child /* << std::endl*/;
   find_general_parents( mambers, his_index, i, 1 );
   }
  }
 }
return 1;
 }
 
 
 
 
int check_kinship( std::vector<FAMILY_TREE *> &mambers )
 {
int max_deph = 0;
for( int i=0, n=0; i<mambers.size(); i++ )
 {
 n = 0;
 get_deep( mambers, i, n );
 mambers[ i ]->knee = n;
 if( max_deph < n ) max_deph = n;
 }
return max_deph;
 }
 
 
 
 
 
int main()
 {
setlocale(LC_ALL, "Rus");
FAMILY_TREE *mamber;
 
std::vector<FAMILY_TREE *> mambers;
 
 
char buffer[ MAXB ];
 
 
std::ifstream inpf( "FTREE.TXT" ); 
 
if( !inpf )
 {
 std::cout << "Can not open FTREE.TXT\n";
 return 1;
 }
 
 
int flag = 1, lnl = 0;
char *child_name = NULL, *parent_name = NULL;
 
for( int c=0, ln=0; inpf.getline(buffer, sizeof(buffer)); ln++ )
 {
 if( buffer[ 0 ]==';' || strlen(buffer)==0 ) continue; // skip comment and null string
 
 
 if( analyse_input(buffer, &child_name, &parent_name ) )
  {
  mamber = new FAMILY_TREE;
 
  if( lnl < strlen(child_name) ) lnl = strlen(child_name); // for output_all_names
  if( lnl < strlen(parent_name) )  lnl = strlen(parent_name);
 
 
  if( !c )
   {
   make_new_mamber( mamber, child_name, parent_name, c++ ); // родоначальник
   mambers.push_back( mamber );
   mamber = new FAMILY_TREE;
   }
 
  make_new_mamber( mamber, child_name, parent_name, c );
 
  mambers.push_back( mamber );
  ++c;
 
  }
 else
  {
  superTREE = 0;
  std::cout << "Incorrect FTREE.TXT (line " << ln+1 << ")" << std::endl;
  break;
  }
 }
 
 
//std::sort( mambers.begin(), mambers.end(), compare );
 
int knee = 1, max_knee = 0;
max_knee = check_kinship( mambers );
 
 
 
std::cout << "Укажите колено родства: [1," << max_knee << "] ";
std::cin >> knee;
std::cin.clear();
//std::cin.ignore( 1, '\n' );
std::cin.ignore( (std::numeric_limits<std::streamsize>::max)(), '\n' );
 
 
if( knee && knee <=max_knee )
 {
 show_knee( mambers, lnl, knee );
 
 std::cout << "Выберете имя, чтоб проверить степень родства с другими: ";
 std::cin.getline( buffer, sizeof(buffer) );
 
 get_degree( mambers, buffer );
 
 }
 
 
 
 
 
// delete vector
for( std::vector<FAMILY_TREE *>::iterator iter=mambers.begin(); iter != mambers.end(); ++iter )
 {
 delete *iter;
 }
 
std::cout << "Нажмите любую клавишу чтоб выйти..." << std::endl;
std::cin.get();
 
 
return 0;
 }