Sophie

Sophie

distrib > Mandriva > 10.0-com > i586 > by-pkgid > 21280410b6ea906d791d7a12afae2579 > files > 77

libace5-doc-5.4-2mdk.i586.rpm

<!-- page07.html,v 1.5 2000/03/19 20:09:22 jcej Exp -->
<HTML>
<HEAD>
   <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
   <META NAME="GENERATOR" CONTENT="Mozilla/4.04 [en] (X11; I; Linux 2.0.32 i486) [Netscape]">
   <META NAME="Author" CONTENT="Billy Quinn">
   <META NAME="Description" CONTENT="A first step towards using ACE productively">
   <TITLE>ACE Tutorial 005</TITLE>
</HEAD>
<BODY TEXT="#000000" BGCOLOR="#FFFFFF" LINK="#000FFF" VLINK="#FF0F0F">

<CENTER><B><FONT SIZE=+2>ACE Tutorial 005</FONT></B></CENTER>

<CENTER><B><FONT SIZE=+2>On the road to a multithreaded server</FONT></B></CENTER>


<P>
<HR WIDTH="100%">

<P>And last (and probably least) is the <A HREF="../fix.Makefile">perl script</A>
that pulls the dependency stuff out of Makefile and into .depend.

<P>
<HR WIDTH="100%">
<PRE>
eval '(exit $?0)' && eval 'exec perl -w -S $0 ${1+"<font color=green>$@</font>"}'
    & eval 'exec perl -S $0 $argv:q'
    if 0;

require "<font color=green>getopts.pl</font>";
&Getopts("<font color=green>f:o:</font>");

$opt_f = "<font color=green>Makefile</font>" if( ! $opt_f );
$opt_o = "<font color=green>.depend</font>"  if( ! $opt_o );

  # Open the Makefile that has been mangled by 'make depend'
  # and suck it into a perl array.
open(IF,"<font color=green>&lt;$opt_f</font>") || die;
@makefile = &lt;IF>;
close(IF);

  # Now open our .depend file and a temporary Makefile.
  # We'll split the original Makefile between these two.
open(DF,"<font color=green>>$opt_o</font>") || die;
open(MF,"<font color=green>>$opt_f.tmp</font>") || die;

  # For each line we read out of the original file...
foreach (@makefile) {

  # If we're into the dependency section, write the line
  # into the .depend file.
  #
  if( $depend ) {
    print DF $_;
  }
  else {
    # If we haven't gotten to the dependency section yet
    # then see if the current line is the separator that
    # "<font color=green>make depend</font>" causes to be inserted.
    #
    if( m/^\Q# DO NOT DELETE THIS LINE -- g++dep uses it.\E/ ) {

      # If so, change our "<font color=green>mode</font>" and skip this line.
      ++$depend;
      next;
    }

    # Also skip the "<font color=green>include .depend</font>" that we insert.  If we
    # don't do this, it is possible to have a bunch of these
    # inserted into the output when we read an unmangled Makefile
    next if( m/^include $opt_o/ );

    # Print the non-dependency info to the temporary Makefile
    print MF $_;
  }
}

# Tell our new Makefile to include the dependency file
print MF "<font color=green>include $opt_o\n</font>";

# Close the two output files...
close(DF);
close(MF);

# Unlink (remove) the original Makefile and rename our
# temporary file.  There's obviously room for error checking
# here but we've got the Makefile checked into some revision
# control system anyway.  Don't we?

unlink("<font color=green>$opt_f</font>");
rename("<font color=green>$opt_f.tmp</font>","<font color=green>$opt_f</font>");

exit(0);
</PRE>
<P><HR WIDTH="100%">
<CENTER>[<A HREF="../online-tutorials.html">Tutorial Index</A>] [<A HREF="page08.html">Continue This Tutorial</A>]</CENTER>