1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
|
<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%">
<BR> <FONT FACE="Arial,Helvetica">#!/usr/bin/perl</FONT><FONT FACE="Arial,Helvetica"></FONT>
<P><FONT FACE="Arial,Helvetica">
# Open the Makefile that has been mangled by 'make depend'</FONT>
<BR><FONT FACE="Arial,Helvetica">
# and suck it into a perl array.</FONT>
<BR><FONT FACE="Arial,Helvetica">open(IF,"<Makefile") || die;</FONT>
<BR><FONT FACE="Arial,Helvetica">@makefile = <IF>;</FONT>
<BR><FONT FACE="Arial,Helvetica">close(IF);</FONT><FONT FACE="Arial,Helvetica"></FONT>
<P><FONT FACE="Arial,Helvetica">
# Now open our .depend file and a temporary Makefile.</FONT>
<BR><FONT FACE="Arial,Helvetica">
# We'll split the original Makefile between these two.</FONT>
<BR><FONT FACE="Arial,Helvetica">open(DF,">.depend") || die;</FONT>
<BR><FONT FACE="Arial,Helvetica">open(MF,">Makefile.tmp") || die;</FONT><FONT FACE="Arial,Helvetica"></FONT>
<P><FONT FACE="Arial,Helvetica">
# For each line we read out of the original file...</FONT>
<BR><FONT FACE="Arial,Helvetica">foreach (@makefile) {</FONT><FONT FACE="Arial,Helvetica"></FONT>
<P><FONT FACE="Arial,Helvetica">
# If we're into the dependency section, write the line</FONT>
<BR><FONT FACE="Arial,Helvetica">
# into the .depend file.</FONT>
<BR><FONT FACE="Arial,Helvetica">
#</FONT>
<BR><FONT FACE="Arial,Helvetica">
if( $depend ) {</FONT>
<BR><FONT FACE="Arial,Helvetica">
print DF $_;</FONT>
<BR><FONT FACE="Arial,Helvetica">
}</FONT>
<BR><FONT FACE="Arial,Helvetica">
else {</FONT>
<BR><FONT FACE="Arial,Helvetica">
# If we haven't gotten to the dependency section yet</FONT>
<BR><FONT FACE="Arial,Helvetica">
# then see if the current line is the separator that</FONT>
<BR><FONT FACE="Arial,Helvetica">
# "make depend" causes to be inserted.</FONT>
<BR><FONT FACE="Arial,Helvetica">
#</FONT>
<BR><FONT FACE="Arial,Helvetica">
if( m/^\Q# DO NOT DELETE THIS LINE -- g++dep uses it.\E/ ) {</FONT><FONT FACE="Arial,Helvetica"></FONT>
<P><FONT FACE="Arial,Helvetica">
# If so, change our "mode" and skip this line.</FONT>
<BR><FONT FACE="Arial,Helvetica">
++$depend;</FONT>
<BR><FONT FACE="Arial,Helvetica">
next;</FONT>
<BR><FONT FACE="Arial,Helvetica">
}</FONT><FONT FACE="Arial,Helvetica"></FONT>
<P><FONT FACE="Arial,Helvetica">
# Also skip the "include .depend" that we insert. If we</FONT>
<BR><FONT FACE="Arial,Helvetica">
# don't do this, it is possible to have a bunch of these</FONT>
<BR><FONT FACE="Arial,Helvetica">
# inserted into the output when we read an unmangled Makefile</FONT>
<BR><FONT FACE="Arial,Helvetica">
next if( m/^include .depend/ );</FONT><FONT FACE="Arial,Helvetica"></FONT>
<P><FONT FACE="Arial,Helvetica">
# Print the non-dependency info to the temporary Makefile</FONT>
<BR><FONT FACE="Arial,Helvetica">
print MF $_;</FONT>
<BR><FONT FACE="Arial,Helvetica">
}</FONT>
<BR><FONT FACE="Arial,Helvetica">}</FONT><FONT FACE="Arial,Helvetica"></FONT>
<P><FONT FACE="Arial,Helvetica"># Tell our new Makefile to include the
dependency file</FONT>
<BR><FONT FACE="Arial,Helvetica">print MF "include .depend\n";</FONT><FONT FACE="Arial,Helvetica"></FONT>
<P><FONT FACE="Arial,Helvetica"># Close the two output files...</FONT>
<BR><FONT FACE="Arial,Helvetica">close(DF);</FONT>
<BR><FONT FACE="Arial,Helvetica">close(MF);</FONT><FONT FACE="Arial,Helvetica"></FONT>
<P><FONT FACE="Arial,Helvetica"># Unlink (remove) the original Makefile
and rename our</FONT>
<BR><FONT FACE="Arial,Helvetica"># temporary file. There's obviously
room for error checking</FONT>
<BR><FONT FACE="Arial,Helvetica"># here but we've got the Makefile checked
into some revision</FONT>
<BR><FONT FACE="Arial,Helvetica"># control system anyway. Don't we?</FONT><FONT FACE="Arial,Helvetica"></FONT>
<P><FONT FACE="Arial,Helvetica">unlink("Makefile");</FONT>
<BR><FONT FACE="Arial,Helvetica">rename("Makefile.tmp","Makefile");</FONT><FONT FACE="Arial,Helvetica"></FONT>
<P><FONT FACE="Arial,Helvetica">exit(0);</FONT>
<P>
<HR WIDTH="100%">
<CENTER>[<A HREF="..">Tutorial
Index</A>] [<A HREF="page08.html">Continue This Tutorial</A>]</CENTER>
</BODY>
</HTML>
|
