home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / library / dos / diverses / leda / src / graph / _g_inout.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-11-15  |  3.7 KB  |  181 lines
  1. /*******************************************************************************
  2. +
  3. +  LEDA  2.1.1                                                 11-15-1991
  4. +
  5. +
  6. +  _g_inout.c
  7. +
  8. +
  9. +  Copyright (c) 1991  by  Max-Planck-Institut fuer Informatik
  10. +  Im Stadtwald, 6600 Saarbruecken, FRG     
  11. +  All rights reserved.
  12. + 
  13. *******************************************************************************/
  14.  
  15.  
  16. #include <LEDA/graph.h>
  17.  
  18.  
  19. //--------------------------------------------------------------------------
  20. // graph i/o
  21. //--------------------------------------------------------------------------
  22.  
  23.  
  24. void put_int(filebuf& fb, int n) 
  25. { register char* A = (char*)&n;
  26.            char* E = A+4;
  27.  
  28.   while (A<E) fb.sputc(*(A++)); 
  29. }
  30.  
  31. int get_int(istream& from) 
  32. { int n;
  33.   register char* A = (char*)&n;
  34.            char* E = A+4;
  35.   while (A<E) from.get(*(A++));
  36.   return n;
  37. }
  38.  
  39.  
  40.  
  41. void graph::write(string s) const
  42. { filebuf fbuf;
  43.  
  44.   if (fbuf.open(s.cstring(),output)==0) 
  45.    error_handler(1,"write: cannot open file");
  46.     
  47.   ostream out(&fbuf);  // ~ostream: flushes file buffer
  48.  
  49.   int* A = new int[max_node_index+2];
  50.  
  51.   // nodes get numbers from 1 to |V| (trouble with 0)
  52.  
  53.   int count = 1;
  54.  
  55.   out << "LEDA.GRAPH\n"; 
  56.   out << node_type() << "\n";
  57.   out << edge_type() << "\n";
  58.   
  59.   //put_int(fbuf,V.length());
  60.  
  61.   out << V.length() << "\n";
  62.  
  63.   node v;
  64.   forall_nodes(v,*this)
  65.   { //put_int(fbuf,int(v->contents));  // node entry (integer)
  66.     write_node_entry(out,v->contents);
  67.     out << "\n";
  68.     A[v->i_name] = count++;
  69.    }
  70.  
  71.   //put_int(fbuf,E.length());
  72.   out << E.length() << "\n";
  73.   edge e;
  74.   forall_edges(e,*this)
  75.   { //put_int(fbuf,A[e->s->i_name]);
  76.     //put_int(fbuf,A[e->t->i_name]);
  77.     //put_int(fbuf,int(e->contents)); // edge entry (integer)
  78.     out << A[e->s->i_name] << " " << A[e->t->i_name] << " ";
  79.     write_edge_entry(out,e->contents);
  80.     out << "\n";
  81.    }
  82. delete A;
  83. }
  84.  
  85. int graph::read(string s)
  86. { filebuf fbuf;
  87.   int result = 0;
  88.  
  89.   if (fbuf.open(s.cstring(),input)==0)  return 1;
  90.  
  91.   istream in(&fbuf);
  92.  
  93.   clear();
  94.  
  95.   edge e;
  96.   int n,i,v,w;
  97.  
  98.   string d_type,n_type,e_type;
  99.  
  100.   in >> d_type;
  101.  
  102.  
  103.   if (d_type != "LEDA.GRAPH") return 3;
  104.  
  105.   in >> n_type >> e_type;
  106.  
  107.   in >> n;         // number of nodes
  108.   read_line(in);
  109.  
  110.   node* A = new node[n+1];
  111.  
  112.   if (n_type != node_type())
  113.   { if (node_type() != "void") result = 2;   // incompatible node types
  114.     for (i=1; i<=n; i++) 
  115.     { A[i] = new_node();
  116.       read_line(in);
  117.      }
  118.    }
  119.   else
  120.     for (i=1; i<=n; i++) 
  121.     { A[i] = new_node();
  122.       read_node_entry(in,A[i]->contents);
  123.      }
  124.   
  125.   in >> n;       // number of edges
  126.  
  127.   if (e_type != edge_type())
  128.   { if (edge_type() != "void") result = 2;   // incompatible edge types
  129.     while (n--) { in >> v >> w;
  130.                   e = new_edge(A[v],A[w]); 
  131.                   read_line(in);
  132.                  }
  133.    }
  134.   else
  135.    while (n--) { in >> v >> w;
  136.                  e = new_edge(A[v],A[w]); 
  137.                  read_edge_entry(in,e->contents);
  138.                 }
  139.  
  140.   delete A;
  141.   return result;
  142. }
  143.  
  144.  
  145. void graph::print_node(node v,ostream& o) const
  146. { if (super() != 0)
  147.      super()->print_node(node(graph::inf(v)),o);
  148.   else 
  149.      { o << "[" << index(v) <<"]" ;
  150.        print_node_entry(o,v->contents);
  151.       }
  152. }
  153.  
  154. void graph::print_edge(edge e,ostream& o) const
  155. { if (super() != 0)
  156.      super()->print_edge(edge(graph::inf(e)),o);
  157.   else 
  158.      { o <<   "[" << e->s->i_name << "]--";
  159.        print_edge_entry(o,e->contents);
  160.        o << "-->[" << e->t->i_name << "]";
  161.       }
  162. }
  163.  
  164. void graph::print(string s, ostream& out) const
  165. { node v; 
  166.   edge e;
  167.   out << s << "\n";
  168.   forall_nodes(v,*this)
  169.   { print_node(v,out);
  170.     out << " : ";
  171.     forall(e,v->adj_edges) 
  172.       { print_edge(e,out); 
  173.         out << " "; 
  174.        }
  175.     out << "\n"; 
  176.    }
  177.   // out << "\n space: " << space() << " bytes \n";
  178.   out << "\n";
  179. }
  180.  
  181.