diff --git a/cde/admin/BuildTools/fnrclone/Makefile b/cde/admin/BuildTools/fnrclone/Makefile deleted file mode 100644 index 70ed5cec0..000000000 --- a/cde/admin/BuildTools/fnrclone/Makefile +++ /dev/null @@ -1,95 +0,0 @@ -# $XConsortium: Makefile /main/3 1996/05/13 11:41:59 drk $ -# use the load* target to force building - -all:: - -findnewrcs.700.90:findnewrcs.c - rm -f $@ - cc +DA1.0 +O1 -o $@ findnewrcs.c -loadfindnewrcs.700.90: - rm -f findnewrcs.700.90 - cc +DA1.0 +O1 -o findnewrcs.700.90 findnewrcs.c - -findnewrcs.700.807:findnewrcs.c - rm -f $@ - cc +O1 -o $@ findnewrcs.c -loadfindnewrcs.700.807: - rm -f findnewrcs.700.807 - cc +O1 -o findnewrcs.700.807 findnewrcs.c - -findnewrcs.800.90:findnewrcs.c - rm -f $@ - cc +DA1.0 +O1 -o $@ findnewrcs.c -loadfindnewrcs.800.90: - rm -f findnewrcs.800.90 - cc +DA1.0 +O1 -o findnewrcs.800.90 findnewrcs.c - -findnewrcs.800.80:findnewrcs.c - rm -f $@ - cc +O1 -o $@ findnewrcs.c -loadfindnewrcs.800.80: - rm -f findnewrcs.800.80 - cc +O1 -o findnewrcs.800.80 findnewrcs.c - -findnewrcs.800.70:findnewrcs.c - rm -f $@ - cc +O1 -o $@ findnewrcs.c -loadfindnewrcs.800.70: - rm -f findnewrcs.800.70 - cc +O1 -o findnewrcs.800.70 findnewrcs.c - -findnewrcs.300.90:findnewrcs.c - rm -f $@ - cc +O1 -o $@ findnewrcs.c -loadfindnewrcs.300.90: - rm -f findnewrcs.300.90 - cc +O1 -o findnewrcs.300.90 findnewrcs.c - -findnewrcs.300.80:findnewrcs.c - rm -f $@ - cc +O1 -o $@ findnewrcs.c -loadfindnewrcs.300.80: - rm -f findnewrcs.300.80 - cc +O1 -o findnewrcs.300.80 findnewrcs.c - -findnewrcs.SunOS:findnewrcs.c - rm -f $@ - cc -o $@ findnewrcs.c -loadfindnewrcs.SunOS: - rm -f findnewrcs.SunOS - cc -o findnewrcs.SunOS findnewrcs.c - -findnewrcs.SunOS_PPC:findnewrcs.c - rm -f $@ - cc -o $@ findnewrcs.c -loadfindnewrcs.SunOS_PPC: - rm -f findnewrcs.SunOS_PPC - cc -o findnewrcs.SunOS_PPC findnewrcs.c - -findnewrcs.AIX:findnewrcs.c - rm -f $@ - cc -o $@ findnewrcs.c -loadfindnewrcs.AIX: - rm -f findnewrcs.AIX - cc -o findnewrcs.AIX findnewrcs.c - -findnewrcs.UNIX_SV:findnewrcs.c - rm -f $@ - cc -DUSL -o $@ findnewrcs.c -loadfindnewrcs.UNIX_SV: - rm -f findnewrcs.UNIX_SV - cc -o findnewrcs.UNIX_SV findnewrcs.c - -findnewrcs.UNIX_System_V:findnewrcs.c - rm -f $@ - cc -DUSL -o $@ findnewrcs.c -loadfindnewrcs.UNIX_System_V: - rm -f findnewrcs.UNIX_System_V - cc -o findnewrcs.UNIX_System_V findnewrcs.c - -findnewrcs.HP-UX:findnewrcs.c - rm -f $@ - cc +O1 -o $@ findnewrcs.c -loadfindnewrcs.HP-UX: - rm -f findnewrcs.HP-UX - cc +O1 -o findnewrcs.HP-UX findnewrcs.c diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.300.80 b/cde/admin/BuildTools/fnrclone/findnewrcs.300.80 deleted file mode 100755 index 10ad51c6b..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.300.80 and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.300.90 b/cde/admin/BuildTools/fnrclone/findnewrcs.300.90 deleted file mode 100755 index f7cb4ad53..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.300.90 and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.700.100 b/cde/admin/BuildTools/fnrclone/findnewrcs.700.100 deleted file mode 100755 index c149999b8..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.700.100 and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.700.807 b/cde/admin/BuildTools/fnrclone/findnewrcs.700.807 deleted file mode 100755 index b70f2b4ad..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.700.807 and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.700.90 b/cde/admin/BuildTools/fnrclone/findnewrcs.700.90 deleted file mode 100755 index 3b9a60189..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.700.90 and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.800.100 b/cde/admin/BuildTools/fnrclone/findnewrcs.800.100 deleted file mode 100755 index a1c2df0f2..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.800.100 and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.800.80 b/cde/admin/BuildTools/fnrclone/findnewrcs.800.80 deleted file mode 100755 index 635b2898f..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.800.80 and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.800.90 b/cde/admin/BuildTools/fnrclone/findnewrcs.800.90 deleted file mode 100755 index ba462ae00..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.800.90 and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.AIX b/cde/admin/BuildTools/fnrclone/findnewrcs.AIX deleted file mode 100755 index 07fd46a3d..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.AIX and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.HP-UX b/cde/admin/BuildTools/fnrclone/findnewrcs.HP-UX deleted file mode 100755 index 124b35c92..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.HP-UX and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.SunOS b/cde/admin/BuildTools/fnrclone/findnewrcs.SunOS deleted file mode 100755 index bf7fdf0b3..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.SunOS and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.UNIX_SV b/cde/admin/BuildTools/fnrclone/findnewrcs.UNIX_SV deleted file mode 100755 index 932f18158..000000000 --- a/cde/admin/BuildTools/fnrclone/findnewrcs.UNIX_SV +++ /dev/null @@ -1,179 +0,0 @@ -ELF 4q4 (44\\]] X````/usr/lib/ld.so.1C_7EWT5Z1%[K\N;]LJ S6?Q:X3D2^IA4M8)/HUPCO#V+"&$,*90'->!BF`@!CfXH]ODd[_d8"a^D"f xmb4v^8"|@]\"^T^"^t"]\^\\]0^8"^Px"^D"b4!`]l8"]H^8"_8"^8"b8]< ,+8^,|_4H"]p%]D"+b<2b@8^"?]@FN -S^8HY]Ta]h_T"mbDt_,"{fD`\_Xx"fH_L8"^8"]|]`0^ "^D]``_@8"^ ]x<"fL ^h"__iobopenstrrchrreadlink_finimainSourceLenreadmalloc_iob_endstrcatResolveLinkchownfork_start_environcreatUsagegetcwdfflushdup2readdirfreeperror_etextatexitsymlinkchdirstatenviron_edatamktemp_exitutimeclosermdirWorkingDirCmpexitGetNewfopenwritestrcmplstatoptinderrnofilenostrcpy_lib_versionfgetsfprintfstrlenwaitBufferexeclpoptarg_GLOBAL_OFFSET_TABLE_getgrnamSourceDirCmpmkdirunlinksprintfsetvbufclosedirfcloseprintf_DYNAMICchmodstrncmpgetoptWorkingLen_initopendirlibc.so.1/usr/ucblibb4&` fDMb^8G^DV^P2^\.^h^^t,^U^*^:^R^8^'^1^$^^D^+_L_J_9_(_4?_@Y_LQ_XO_d#㿠 @D, @'$4# @SS"@S@@S@S?c'D!ScD@S @S?c'D'H'''!  @$@S#@S"cDH@S?D'D'"DO P=㰞!$##c`%$'㼦)%#+c`-%5/㰮1&#.3c`5&'7㼶"# c`"H @S/O AÀ a׀ mꀢ oڀ x c`#x!# #$cq%'$j +%ce /%` 3&c[57&T# "cM"F# #c?㜞!$#8#bD%$2'D)%#,+%c(-/%!H @R" C ;S2 @ @ .`@ -`*` - -   K@L`/A"D$@R  HU`!@R @RyM@R@R~ @R}'hhU`@Rxh' @Rk @Rk'@RlN@@RW @RW'@RXU`@RVl@RU7<(  @ ' /@REO - U`@R>/!U`@R0J /+"D$@R  H@U`!@Q @Q@R@Q @Q'hhUa@Qh'@Q '@Q @Q#$b8"8@Q"8Ua@Q@Q @Q%$H"H@Q"HUa @Q"8@Q'$L"H@Q)%"0+cĀ- -#@ #@ b%U!$@QU!0@QU!`@QU!|@Q/㜀 -U!c@QU!@Q1"<DR5<DJ"<* H @Qh@Qd @Qc'h<*H@ Uah@QZ<+H@@QM@QI @QH'd%<,HUad@Q?dh@d@QLh@QI+b<`-%<@ @Q?bȝ'D'H'L'@'<'8# !UaH@Pc` -!UaDH@PU!@PD@P @P'UbD@P - !Ub@PP@PD$@PU"@PH@P @P'HHUb H@PU"(@PH@P @P'DDUb0H@PH @ -V'H㌀  !Ub8H@PPH@P -DD$@PS# Nc  LUbL!@Pb!#Ā @ H@ =1#bL@U"d@PsHH0@Py H'0L / +bLHU"t@PZH-0@/LU"@PL@PLH' -'LL`P@P4Rd9<(@  @ 'Bd< -@ - 9Ub@P/'."D$@P("D@ObC* @P"D@O @O'bD@O㌀ !Ub@O@P L$ 'LL% !Ub@O'8@O '@@OU"@O'܀@O'؀ؐ -@O ؐ -@Oؐ Ub@O"D@O"DUb@Oؒ` -"D@O}ؐ -P@O"D@O8 !,@O_,%(,(',!,@OU'88',,&(,& "D@OG @OG,',@bD@OEؐ -@O8ؔ` -*ؐ -@O0 @O0,# ,`ؒ` -@O.ؐ -@O!,#, P$`$` %$@%$@%$@$@, %,&a$c@O<'@D@O, 5@D@O$U"@O!'܀@O'؀N - . ؐ -Ub@N"DD@N"DUb@Nؒ` -"D@Nؐ -P@Nؒ` -U"@N"D@N@ !,@N4"a(4('4!,@N'@@'44#a(4# "D@N @N4$4@bD@Nؐ -@N} @N}4$4ؒ` -@N{ؐ -@Nn4% 4`P%% &%&%&%%4 &d<@@ -$ؐ -P@NW4P`# `#  $@#$@#$@#@#4 $$4%a$B@N`'<LH@NL /@H@NDU"@NA'܀@N='؀N -`. ؐ -Ub@N -"DH@M"DUb@Mؒ` -"D@Mؐ -P@M"D@N< !,@M0&(0!('0!,@M'<<'00"a(0" "D@M @M0"0bD@Mؐ -@M @M0#`0ؒ` -@Mؐ -@M0$ 0`P$$ %$%$%$$0 %$d5<@9(ؐ -P@M0`P`" `"  # @ " # @ " # @ " @ " 0 #`R@M!# !UcD@M9@'44'㌀ 4 4@Uc(!@M$'(44 @&'H4 `<HUcL@M6( '(c !UcP@LHUcd@M('(# c`!Uch@L#@L4c@M( '(#c%!Uc|@Lu4Uc@L)# !Uc@L_+cЀ4Uc@L/㌀!Uc@LD1#"4`4$;< 4$ -I Ic`!Uc@Lf<'000`44`0@Lu0  % 0a('07㌀00`0Uc!@L0!V`@L(4` -84$< !0#cȀ4$ -4 -< @1(3c`!V`,@K40 04L8',,,`4 -4`,@K, `$ ,(',)# ,,,V`<!@K!V`d@K,/0+44 4 " V`t@K(`'( -(  4bL V`|!@K,, 0 ,P0`P /㠀Q0M3c`!V`@KX010P4`P*c`!V`@KB4$#  4@LV`!@K-!# 4@%LV`!@K'̀0!$01< 5(@ 0 @' '0@'0@'㜀 >#Ā 4@cԐ #@-bH0@K 4!"LcV!#@J4@%L'0V! c#@J)#Ā4@@ - 4@4@MbH0@J"4@5L@V!@@J49"Lc ` `(V!P@J#4@"L@V!`@Jb0 4"L c `,`4V!p@Jvc Ā 0 $ -oma$4@@0$ -oma$4)"LV!@JU䀐@JQ -!Va@J/㌀!Va@J ,,`P4P;c`!Va@I4 $` - 4"L Va!@Ic  4!"LVb!@I#cĀ,4c#@)#4@@bH0@I /0M /(3c,49"LV"0c@I;c 4bL V"X@I, -,"0@ 4@LV"tc@I!##b0@4'LV"@I{ )# !Vb@IG4a('4 /㌀ !VbH@I6<'00"0 0 Vc@IG ;cЀ0 Vc@I7c`!Vc@I8',, , 0  0`,@I,(',,- ,P0`P,  & 0`0`"'H0`&HVc(@H ( '(#cHVc,@H ('('㰀)##@H0`c@HxD@H0 @H'D@HVc0@H0 @H0`$7<;Lc  - L Vc4!@HS#Ȁ O0a$J0 %< @)(B+c̀ -0 @'0'3cĀ@"H0@HS 5LV#L@H;70@9"LV#`@H-@H-1;cĀ@c@!@"L@V#x@HL@ -V#@HL@ V#@G0Lc  LVc!@G!#̀0a$0+< /( 0 @l' '0''0''# bL Vc!@GĀ -㬀 @c@8H0@G"L c `8`@V#@G~b0 Lc `D`LV#@Ge!##cĀ 0$ -oma$@0$ -oma$)"LV#@GF䀐@GB@G?0('01# !W`@G8',,y, mD@G,`  @G'D@GW`0@F,@F㐀  "L W`4!@FcĀ  㨀@3H0@F #b0L/'㨀 )"LW H@F+c-0@/LW `@F@F,!(',@@'44!('@4@F4`@F4@F< -<'00!('<0@F0 @F0@F88',,('8,@@Fx,@Ft,@Fq@Fl?c'D'HD'c  !W`x@F+!@Fu' -ebD$@FL'Y"D* KbD`/2 /@F*'+"D@F@F - @F 'W`D@F"D@E @E'bD@E"D@E @E'bD@EH 'H$ @E''H@E @E'@E'- !W`@E!@E?c'DtD@E?\< -  RD@E'pp Hp@E'l;l -W`@E0l -W`@E'l -@EpD@El @Ek' D@EhW`@Efl` -@Ea@Ejp@ED@ED@E?c'DD @E? "@ D!@Ew?c'D'HDH@Eo?H@EN?c'D'H'L'P'T@E`'?W @E9Q ?D -D@E)?W @E%,T! !@E?'T@E @D!@E3@E2!@E+@E*HHLP @E&H@D @D @E ' ?c'DxD@D? < -  D@D?c'D'HD @D'?D@DMH!!@D' -H@D@D;$@D'@D' " -' ?D@D H@Dw@D@D?c'D'HDH@D?D@D`?c'D'H@Du'?W @DN1 D@DB?W @D> P`TXH @D\W @D. @C @DU' -?c'DD!@DO?D@D ?c'D'HH@DB' !W`H@C`?D@D1㿠D)l*T,T.T0( T3 TTpTT;8\XTT !T#0TT&Tusage: %s [options] [-W ] [-S ] [subdir ...] - -options: - -i[Aaoxm] - clone: A - all the following - a - "*.a" files - o - "*.o" files - x - executables ('x' mode bits set) - m - "Makefile*" files - -v verbose (the more, the verboser) - source files - -L take checked out source over RCS regardless of time - -O don't check out new files, Only create symbolic links to exiting files - (this option is for cloning build trees from controlled source trees) - -R don't create any RCS links - -l symbolicly link files instead of copying them - -m make any missing directories - -q quiet - -d diff new versions of existing files - -c use to do diffs (default is diffc) - -o write diffs to instead of /tmp/,out?????? - -W use working directory (default is ".") - -S use RCS/source directory - (default is /RCS directories of working tree) - -f follow source-tree links to non-RCS dirs (old behavior) - -X execute instead of generating shell script - -C process SCCS directories if present - -s do not resolve symbolic links for files. use file name -%s: can't get current working directory -%s/%s/RCS/RCSusing sourcedir of "%s" -%s: can't get current working directory -%s/%s//#!/bin/sh -# -# the following makes things more readeable - -w='%s' # Working directory -s='%s' # Source directory -rm -rf %s; touch %s - -%s/%s%s/%sScanning directory "%s" ->> GetNew("%s", "%s") -/RCS%s/RCS>> RcsDir="%s" -/RCS%s/RCS/RCS%s/RCS>> RCS RcsDir="%s" -%s: creating symlink -rm -f ${w}/%s -ln -s %s ${w}/%s -ln -s ${s}/%s ${w}/%s -r>> soft link RcsDir="%s" -%s: >10 "soft" links -.,v/.../RCS.../>> Pass 1: scanning WorkingDir "%s" ->> keyname="%s", fullname="%s" -.o>> .o -- ignored -.a>> .a -- ignored ->> Makefile* -- ignored -RCS>> RCS -- ignored -SCCS>> SCCS -- ignored ->> executable -- ignored - source: keyname="%s" fullname="%s" - no source file ->> directory - rcs: keyname="%s" fullname="%s" - no rcs file -.snf%s: no source or RCS file ->> source newer than rcs ->> source newer than working -%s: writable -- not updated -%s: newer file -%s ${w}/%s %s >>%s 2>&1 -%s ${w}/%s ${s}/%s >>%s 2>&1 -rm -f ${w}/%s - %s %s ${w}/%s -rm -f ${w}/%s - %s ${s}/%s ${w}/%s - chmod 0%03o ${w}/%s ->> source older than working ->> rcs newer than source ->> rcs newer than working -%s: writable -- not updated -%s: newer RCS file - (cd %s; %s %s ${w}/%s >>%s 2>&1) -(cd %s; co -q ${w}/%s) - (cd ${s}/%s; %s %s ${w}/%s >>%s 2>&1) -(cd ${s}/%s; co -q ${w}/%s) ->> source older than working ->> Pass 2: scanning SourceDir "%s" -RCSSCCS>> SCCS -- ignored -.o.a/%s: building directory -ln -s %s ${w}/%s -ln -s ${s}/%s ${w}/%s -rm -rf ${w}/%s - mkdir ${w}/%s - chmod 0755 ${w}/%s -%s: missing directory -%s: new file -%s %s ${w}/%s -%s ${s}/%s ${w}/%s - chmod 0%03o ${w}/%s ->> scanning RcsDir "%s" -/%s: new RCS file -(cd %s; co -q ${w}/%s) -(cd %s; co -q ${w}/%s) -ResolveLink %s->%s/%s%s -.../fork() faileddirnamefork() faileddirnamefailed to exec co(1)%s: no such group -00<0H0T0`0l0x00000000000000 0,080D0P0\0h0t0000000000000~0{0x(0u40r@0oL0lX0id0f@(#) $Revision$___diff/tmp/,outXXXXXXMakefile-S:-W:i:OLRXflsCmqvd~c:o:ln -scpln -scpln -scpln -scpcoco-q``  N# hx -/ ]@  | x h   N N -O ] _t _`\```X!(4A_ R_ XLDaFjHXsN8x|M@_ _ _ K(_ _ _ _ _ _ _t _ _  _ _ $_ 3_ ?I4GJ\OL WHD__ g_ s_ {_ `@^8"]@^8"N  -Tb0_(H"]``@!fX]Dd_d8"^D" xb4^8"@ ]\"^T^"^t"$]\)^\0\7]0>^8"F^Px"L^D"Qb4!Y``]l8"g]Hm^8"s_8"y^8"b8]<,+8^,|_4H"]p]D"b<b@^"]@N diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.UNIX_System_V b/cde/admin/BuildTools/fnrclone/findnewrcs.UNIX_System_V deleted file mode 100644 index fc7b6b4e8..000000000 --- a/cde/admin/BuildTools/fnrclone/findnewrcs.UNIX_System_V +++ /dev/null @@ -1,179 +0,0 @@ -ELF4q4 (44\\\\ T`T`T/usr/lib/ld.so.1C_7EWT5Z1%[K\N;]LJ S6?Q:X3D2^IA4M8)/HUPCO#V+"&$,*90'->!BF`@!CfHH]ODX[_X8"a^D"fxmb$v^8"|@]x\"^T^"^h"]\^P\]$^8"^Dx"]D"b$!`]`8"]<^8"_8"^8"b(]0  +8^ |_(H"]p%]D"+b,2b08^"?]@FN -S^,HY]Ha]h_T"mb4t^,"{f4`P_Lx"f8_@8"^8"]|]T0^t "^8]`T_48"^]l<"f< ^\"__iobopenstrrchrreadlink_finimainSourceLenreadmalloc_iob_endstrcatResolveLinkchownfork_start_environcreatUsagegetcwdfflushdup2readdirfreeperror_etextatexitsymlinkchdirstatenviron_edatamktemp_exitutimeclosermdirWorkingDirCmpexitGetNewfopenwritestrcmplstatoptinderrnofilenostrcpy_lib_versionfgetsfprintfstrlenwaitBufferexeclpoptarg_GLOBAL_OFFSET_TABLE_getgrnamSourceDirCmpmkdirunlinksprintfsetvbufclosedirfcloseprintf_DYNAMICchmodstrncmpgetoptWorkingLen_initopendirlibc.so.1b$&` f4Mb,Bb0C]$0]0<]<7]HH]TT]`6]l[]x)]I]]S]E]!]A]]@]W]-]3^^Z^ >^,G^8V^D2^P.^\^^h,^tU^*^:^R^8^'^1^$^^D^+^L_J_9__(?_4Y_@Q_LO_X#㿠 @D, @'$$# @SS"@S@@S@S?c'D!ScD@S @S?c'D'H'''   @$@S#@S"cDH@S?4'4'"4O P=㤞!$##c`%$'㰦)%#+c`-%5/㤮1&#.3c`5&'7㰶"# c`"H @S/O AÀ a׀ mꀢ oڀ x c`#x!# #$cq%'$j +%ce /%` 3&c[57&T# "cM"F# #c?㐞!$#8#b4%$2'4)%#,+%c(-/%!H @R" C ;S2 @ @ .`@ -`*` - -   K@L`/A"4$@R  HU`|!@R @RyM@R@R~ @R}'hhU`@Rxh' @Rk @Rk'@RlN@@RW @RW'@RXU`@RVl@RU7<(  @ ' /@REO - U`@R>/!U`@R0J /+"4$@R  H@U`!@Q @Q@R@Q @Q'hhUa@Qh'@Q '@Q @Q#$b("(@Q"(Ua@Q@Q @Q%$8"8@Q"8Ua@Q"(@Q'$<"8@Q)%" +c- -#@ #@ b%U!@QU!$@QU!T@QU!p@Q/㐀 -U!c@QU!@Q1",DR5,DJ",* H @Qh@Qd @Qc'h,*H@ Uah@QZ,+H@@QM@QI @QH'd%,,HUad@Q?dh@d@QLh@QI+b,`-%,@ @Q?bȝ'D'H'L'@'<'8# !UaH@Pc` -!UaDH@PU!@PD@P @P'UaD@P - !Ua@PP@PD$@PU" @PH@P @P'HHUbH@PU"@PH@P @P'DDUb$H@PH @ -V'H　  !Ub,H@PPH@P -DD$@PS# Nc  <Ub@!@Pb!# @ H@ =1#b<@U"X@PsHH @Py H' L / +b<HU"h@PZH- @/<U"|@PL@PLH' -'LL`P@P4Rd9<(@  @ 'Bd< -@ - 9Ub@P/'."4$@P("4@Ob3* @P"4@O @O'b4@O　 !Ub@O@P L$ 'LL% !Ub@O'8@O '0@OU"@O'܀@O'؀ؐ -@O ؐ -@Oؐ Ub@O"4@O"4Ub@Oؒ` -"4@O}ؐ -P@O"4@O8 !,@O_,%(,(',!,@OU'88',,&(,& "4@OG @OG,',@b4@OEؐ -@O8ؔ` -*ؐ -@O0 @O0,# ,`ؒ` -@O.ؐ -@O!,#, P$`$` %$@%$@%$@$@, %,&a$c@O<'@D@O, 50D@O$U"@O!'܀@O'؀N - . ؐ -Ub@N"4D@N"4Ub@Nؒ` -"4@Nؐ -P@Nؒ` -U"@N"4@N@ !,@N4"a(4('4!,@N'@@'44#a(4# "4@N @N4$4@b4@Nؐ -@N} @N}4$4ؒ` -@N{ؐ -@Nn4% 4`P%% &%&%&%%4 &d<@@ -$ؐ -P@NW4P`# `#  $@#$@#$@#@#4 $$4%a$B@N`'<LH@NL /0H@NDU"@NA'܀@N='؀N -`. ؐ -Ub@N -"4H@M"4Ub@Mؒ` -"4@Mؐ -P@M"4@N< !,@M0&(0!('0!,@M'<<'00"a(0" "4@M @M0"0b4@Mؐ -@M @M0#`0ؒ` -@Mؐ -@M0$ 0`P$$ %$%$%$$0 %$d5<@9(ؐ -P@M0`P`" `"  # @ " # @ " # @ " @ " 0 #`R@M!# !UbD@M9@'44'　 4 4@Uc!@M$'(44 @&'H4 `<HUc@@M6( '(c !UcD@LHUcX@M('(# c`!Uc\@L#@L4c@M( '(#c%!Ucp@Lu4Uc@L)# !Uc@L_+cĀ4Uc@L/　!Uc@LD1#"4`4$;< 4$ -I Ic`!Uc@Lf<'000`44`0@Lu0  % 0a('07　00`0Uc!@L0!V` @L(4` -84$< !0#c4$ -4 -< @1(3c`!V` @K40 04L8',,,`4 -4`,@K, `$ ,(',)# ,,,V`0!@K!V`X@K,/0+44 4 " V`h@K(`'( -(  4b< V`p!@K,, 0 ,P0`P /㔀Q0M3c`!V`@KX010P4`P*c`!V`@KB4$#  4@<V`!@K-!# 4@%<V`!@K'0!$01< 5(@ 0 @' '0@'0@'㐀 ># 4@cȐ #@-b8 @K 4!"<cV #@J4@%<' V!c#@J)#4@@ - 4@4@Mb8 @J"4@5<@V!4@J49"<c ``V!D@J#4@"<@V!T@Jb  4"< c ` `(V!d@Jvc 㸀 0 $ -oma$4@@0$ -oma$4)"<V!|@JU䀐@JQ -!Va@J/　!Va@J ,,`P4P;c`!Va@I4 $` - 4"< Va!@Ic  4!"<Vb!@I#c,4c#@)#4@@bH @I / M /(3c,49"<V"$c@I;c 4b< V"L@I, -," @ 4@<V"hc@I!##b @4'<V"@I{ )# !Vb@IG4a('4 /　 !VbH@I6<'00"0 0 Vb@IG ;cĀ0 Vb@I7c`!Vc@I8',, , 0  0`,@I,(',,- ,P0`P,  & 0`0`"'H0`&HVc@H ( '(#cHVc @H ('('㤀)##@H0`c@HxD@H0 @H'D@HVc$@H0 @H0`$7<;Lc  - < Vc(!@HS# O0a$J0 %< @)(B+c -0 @'0'3c@"H @HS 5<V#@@H;7 @9"<V#T@H-@H-1;c@c@!@"<@V#l@H<@ -V#|@H<@ V#@G0Lc  <Vc!@G!#0a$0+< /( 0 @l' '0''0''# b< Vc!@G -㠀 @c@8H @G"< c `,`4V#@G~b  <c `8`@V#@Ge!##c 0$ -oma$@0$ -oma$)"<V#@GF䀐@GB@G?0('01# !W`@G8',,y, mD@G,`  @G'D@GW`$@F,@F㄀  "< W`(!@Fc  㜀@3H @F #b L/'㜀 )"<W <@F+c- @/<W T@F@F,!(',@@'44!('@4@F4`@F4@F< -<'00!('<0@F0 @F0@F88',,('8,@@Fx,@Ft,@Fq@Fl?c'D'HD'c  !W`l@F+!@Fu' -eb4$@FL'Y"4* Kb4`/2 /@F*'+"4@F@F - @F 'W`4@F"4@E @E'b4@E"4@E @E'b4@EH 'H$ @E''H@E @E'@E'- !W`@E!@E?c'DtD@E?\< -  RD@E'pp Hp@E'l;l -W`@E0l -W`@E'l -@EpD@El @Ek' D@EhW`@Efl` -@Ea@Ejp@ED@ED@E?c'DD @E? "0 D!@Ew?c'D'HDH@Eo?H@EN?c'D'H'L'P'T@E`'?W @E9Q ?D -D@E)?W @E%,T! !@E?'T@E @D @E3@E2!@E+@E*HHLP @E&H@D @D @E ' ?c'DxD@D? < -  D@D?c'D'HD @D'?D@DMH!!@D' -H@D@D;$@D'@D' " -' ?D@D H@Dw@D@D?c'D'HDH@D?D@D`?c'D'H@Du'?W @DN1 D@DB?W @D> D`HLH @D\W @D. @C @DU' -?c'DD!@DO?D@D ?c'D'HH@DB' !W`H@C`?D@D1㿠8)`*|H,H.H0 H3 HHdHH;,PLHH !H#$HH&xHusage: %s [options] [-W ] [-S ] [subdir ...] - -options: - -i[Aaoxm] - clone: A - all the following - a - "*.a" files - o - "*.o" files - x - executables ('x' mode bits set) - m - "Makefile*" files - -v verbose (the more, the verboser) - source files - -L take checked out source over RCS regardless of time - -O don't check out new files, Only create symbolic links to exiting files - (this option is for cloning build trees from controlled source trees) - -R don't create any RCS links - -l symbolicly link files instead of copying them - -m make any missing directories - -q quiet - -d diff new versions of existing files - -c use to do diffs (default is diffc) - -o write diffs to instead of /tmp/,out?????? - -W use working directory (default is ".") - -S use RCS/source directory - (default is /RCS directories of working tree) - -f follow source-tree links to non-RCS dirs (old behavior) - -X execute instead of generating shell script - -C process SCCS directories if present - -s do not resolve symbolic links for files. use file name -%s: can't get current working directory -%s/%s/RCS/RCSusing sourcedir of "%s" -%s: can't get current working directory -%s/%s//#!/bin/sh -# -# the following makes things more readeable - -w='%s' # Working directory -s='%s' # Source directory -rm -rf %s; touch %s - -%s/%s%s/%sScanning directory "%s" ->> GetNew("%s", "%s") -/RCS%s/RCS>> RcsDir="%s" -/RCS%s/RCS/RCS%s/RCS>> RCS RcsDir="%s" -%s: creating symlink -rm -f ${w}/%s -ln -s %s ${w}/%s -ln -s ${s}/%s ${w}/%s -r>> soft link RcsDir="%s" -%s: >10 "soft" links -.,v/.../RCS.../>> Pass 1: scanning WorkingDir "%s" ->> keyname="%s", fullname="%s" -.o>> .o -- ignored -.a>> .a -- ignored ->> Makefile* -- ignored -RCS>> RCS -- ignored -SCCS>> SCCS -- ignored ->> executable -- ignored - source: keyname="%s" fullname="%s" - no source file ->> directory - rcs: keyname="%s" fullname="%s" - no rcs file -.snf%s: no source or RCS file ->> source newer than rcs ->> source newer than working -%s: writable -- not updated -%s: newer file -%s ${w}/%s %s >>%s 2>&1 -%s ${w}/%s ${s}/%s >>%s 2>&1 -rm -f ${w}/%s - %s %s ${w}/%s -rm -f ${w}/%s - %s ${s}/%s ${w}/%s - chmod 0%03o ${w}/%s ->> source older than working ->> rcs newer than source ->> rcs newer than working -%s: writable -- not updated -%s: newer RCS file - (cd %s; %s %s ${w}/%s >>%s 2>&1) -(cd %s; co -q ${w}/%s) - (cd ${s}/%s; %s %s ${w}/%s >>%s 2>&1) -(cd ${s}/%s; co -q ${w}/%s) ->> source older than working ->> Pass 2: scanning SourceDir "%s" -RCSSCCS>> SCCS -- ignored -.o.a/%s: building directory -ln -s %s ${w}/%s -ln -s ${s}/%s ${w}/%s -rm -rf ${w}/%s - mkdir ${w}/%s - chmod 0755 ${w}/%s -%s: missing directory -%s: new file -%s %s ${w}/%s -%s ${s}/%s ${w}/%s - chmod 0%03o ${w}/%s ->> scanning RcsDir "%s" -/%s: new RCS file -(cd %s; co -q ${w}/%s) -(cd %s; co -q ${w}/%s) -ResolveLink %s->%s/%s%s -.../fork() faileddirnamefork() faileddirnamefailed to exec co(1)%s: no such group -00<0H0T0`0l0x00000000000000 0,080D0P0\0h0t0000000000000~0{0x(0u40r@0oL0lX0id0f@(#) $Revision$___diff/tmp/,outXXXXXXMakefile-S:-W:i:OLRXflsCmqvd~c:o:ln -scpln -scpln -scpln -scpcoco-q`T  N hx -# \@  | x h  N N -O \ _h _`P`T`L'.:G_ X_ ^LDgFpHXyN,xM@_ _ _ K_ _ _ _ _ _ _h _  _ _ _ *_ 9_ EI(MJ\UL ]HDe_ m_ y_ _ `@^8"]@^8"N  -Tb _H"]``@!fH]DX_X8"^D"xb$^8" @]x\"^T^""^h"*]\/^P6\=]$D^8"L^Dx"R]D"Wb$!_`f]`8"m]<s^8"y_8"^8"b(]0 +8^ |_(H"]p]D"b,b0^"]@N diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.apollo.binary b/cde/admin/BuildTools/fnrclone/findnewrcs.apollo.binary deleted file mode 100755 index 5f22af6c8..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.apollo.binary and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.c b/cde/admin/BuildTools/fnrclone/findnewrcs.c deleted file mode 100644 index 8bfeabedd..000000000 --- a/cde/admin/BuildTools/fnrclone/findnewrcs.c +++ /dev/null @@ -1,1696 +0,0 @@ -/* - * CDE - Common Desktop Environment - * - * Copyright (c) 1993-2012, The Open Group. All rights reserved. - * - * These libraries and programs are free software; you can - * redistribute them and/or modify them under the terms of the GNU - * Lesser General Public License as published by the Free Software - * Foundation; either version 2 of the License, or (at your option) - * any later version. - * - * These libraries and programs are distributed in the hope that - * they will be useful, but WITHOUT ANY WARRANTY; without even the - * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR - * PURPOSE. See the GNU Lesser General Public License for more - * details. - * - * You should have received a copy of the GNU Lesser General Public - * License along with these librararies and programs; if not, write - * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth - * Floor, Boston, MA 02110-1301 USA - */ -/*************************************************************************** -* -* File: findnewrcs.c -* RCS: $XConsortium: findnewrcs.c /main/3 1995/10/30 13:42:46 rswiston $ -* Description: The 'findnewrcs' command is used to descend a tree, checking -* out the newest version of any RCS file which has been updated. -* It can also be used to create a clone of a source tree using -* symbolic links. -* Author: Dave Serisky, Corvallis Workstation Operation -* Created: Tue Jun 7 09:39:47 1988 -* Modified: Brian Cripe, (bcripe@hpcvlx) bcripe@hpcvxbc -* Modified: Marc Ayotte, (marca@hpcvlx) -* Language: C -* Package: N/A -* Status: Experimental (Do Not Distribute) -* -* (c) Copyright 1988, Hewlett-Packard Company, all rights reserved. -* -******************************************************************************** -*/ - -static char version[] = "@(#) $XConsortium: findnewrcs.c /main/3 1995/10/30 13:42:46 rswiston $"; - -#include -#include -#include -#include - -#ifdef apollo -#ifndef S_ISLNK -#define S_ISLNK(m) (((m) & 0170000) == 0120000) -#endif -#ifndef S_ISDIR -#define S_ISDIR(m) (((m) & 0170000) == 0040000) -#endif -#ifndef S_ISREG -#define S_ISREG(m) (((m) & 0170000) == 0100000) -#endif -#define UID_NO_CHANGE -1 -#include -#else -# if defined(USL) && !defined(S_ISLNK) -# define S_ISLNK(m) ((m&0xF000) == S_IFLNK) -# endif -#include -#endif - -#ifndef __hpux -#define UID_NO_CHANGE -1 -#endif - -#include -#include -#include -#ifdef apollo -#include -#else -#include -#endif - -extern char *getcwd(); -extern char *malloc(); -extern DIR *opendir(); -#ifdef apollo -extern struct direct *readdir(); -#else -extern struct dirent *readdir(); -#endif -extern long telldir(); -extern char *mktemp(); - -char Buffer[BUFSIZ]; -char *WorkingDirCmp; -int WorkingLen; -char *SourceDirCmp; -int SourceLen; - -void GetNew(); -char *ResolveLink(); - -static int Debug = 0; -static int Quiet = 0; -static int Verbose = 0; -static int MakeDirs = 0; -static int DoDiffs = 0; -static int SourcePriority = 0; -static int NoRcsLinks = 0; -static int NoRealFiles = 0; -static int LinkFiles = 0; -static int CloneDotA = 0; -static int CloneDotO = 0; -static int CloneMakefile = 0; -static int CloneExecutables = 0; -static int Check = 0; -static int DoExecute = 0; -static int FollowDirLinks = 0; -static int ResolveFileLinks = 1; -static int ProcessSCCSdirs = 0; -static char *DiffCommand = "diff"; - -static char *OutFile = "/tmp/,outXXXXXX"; -static char *Makefile = "Makefile"; - -typedef struct _flist { - char *fullname; - char *keyname; - int keylen; - int used; - struct stat st; - int st_valid; - struct stat lst; - int lst_valid; - struct _flist *next; -} flist; - -void -Usage(ProgName) -char *ProgName; -{ - (void) fprintf(stderr, "\ -usage: %s [options] [-W ] [-S ] [subdir ...] \n\ -\n\ -options:\n\ - -i[Aaoxm]\n\ - clone: A - all the following\n\ - a - \"*.a\" files\n\ - o - \"*.o\" files\n\ - x - executables ('x' mode bits set)\n\ - m - \"Makefile*\" files\n\ - -v verbose (the more, the verboser)\n\ - source files\n\ - -L take checked out source over RCS regardless of time\n\ - -O don't check out new files, Only create symbolic links to exiting files\n\ - (this option is for cloning build trees from controlled source trees)\n\ - -R don't create any RCS links\n\ - -l symbolicly link files instead of copying them\n\ - -m make any missing directories\n\ - -q quiet\n\ - -d diff new versions of existing files\n\ - -c use to do diffs (default is diffc)\n\ - -o write diffs to instead of /tmp/,out??????\n\ - -W use working directory (default is \".\")\n\ - -S use RCS/source directory \n\ - (default is /RCS directories of working tree)\n\ - -f follow source-tree links to non-RCS dirs (old behavior)\n\ - -X execute instead of generating shell script\n\ - -C process SCCS directories if present\n\ - -s do not resolve symbolic links for files. use file name\n\ -", ProgName); - (void) exit(1); -} - -static void do_rm_rf(), do_touch(), do_ln_s(), do_diff(), do_rm_f(); -static void do_cp(), do_chmod(), do_co_q(), do_mkdir(), do_chgrp(); - -main(argc, argv) -int argc; -char **argv; -{ - char *WorkingDir = (char *) 0; - char *SourceDir = (char *) 0; - register int i; - register char *c; - int same = 0; - struct stat st; - - extern int getopt(); - extern char *optarg; - extern int optind; - extern int opterr; - - (void) setvbuf(stdout, (char *) 0, _IOLBF, BUFSIZ); - OutFile = mktemp(OutFile); - - while ((i = getopt(argc, argv, "-S:-W:i:OLRXflsCmqvd~c:o:")) != EOF) { - switch (i) { - case 'W' : - /* Working directory. Default is current directory */ - WorkingDir = optarg; - break; - - case 'S' : - /* Source directory. Default is to use working directories - ** /RCS directories. - */ - SourceDir = optarg; - break; - - case 'i' : - /* Parse off no ignore options */ - for (c = optarg; *c; c++) { - switch (*c) { - case 'A' : - /* don't ignore any... */ - (void) CloneDotA++; - (void) CloneDotO++; - (void) CloneExecutables++; - (void) CloneMakefile++; - break; - - case 'a' : - /* don't ignore *.a files */ - (void) CloneDotA++; - break; - - case 'o' : - /* don't ignore *.o files */ - (void) CloneDotO++; - break; - - case 'x' : - /* don't ignore executables */ - (void) CloneExecutables++; - break; - - case 'm' : - /* don't ignore Makefiles */ - (void) CloneMakefile++; - break; - - default : - (void) Usage(argv[0]); - (void) exit(1); - break; - } - } - break; - - case 'R' : - /* dont create any links for "/RCS" */ - (void) NoRcsLinks++; - break; - - case 'L' : - /* Take existing checked out files even if they are older than - ** the RCS copy. - */ - (void) SourcePriority++; - break; - - case 'O' : - /* Don't check out new files, just create sym links to existing files. - ** This is to protect controlled source/build trees from having - ** files bypass the crt process. - */ - (void) NoRealFiles++; - break; - - case 'f' : - FollowDirLinks = 1; - break; - - case 'C' : - ProcessSCCSdirs = 1; - break; - - case 'X' : - DoExecute = 1; - break; - - case 'l' : - /* Link files (when possible) instead of creating them. */ - (void) LinkFiles++; - break; - - case 'm' : - /* Make any directories necessary. */ - (void) MakeDirs++; - break; - - case 'q' : - /* Be quiet. */ - (void) Quiet++; - break; - - case 'v' : - /* Increase verbosity. */ - (void) Verbose++; - break; - - case 'd' : - /* Diff out new files. */ - (void) DoDiffs++; - break; - - case 'c' : - /* Alternative diff command. */ - DiffCommand = optarg; - break; - - case 'o' : - /* Output file name for diffs */ - OutFile = optarg; - break; - - case 's' : - /* don't resolve symbolic links for files */ - ResolveFileLinks = 0; - break; - - case '~' : - /* Increment debug switch */ - (void) Debug++; - break; - - default: - (void) Usage(argv[0]); - (void) exit(1); - break; - } - } - - /* no WorkingDir specified or not root relative? */ - if (!WorkingDir || !*WorkingDir || ('/' != *WorkingDir)) { - /* get the current directory */ - if (NULL == (c = getcwd(Buffer, sizeof(Buffer)))) { - (void) fprintf(stderr, "%s: can't get current working directory\n", - argv[0]); - (void) exit(1); - } - - /* did they specify a partial path? */ - if (WorkingDir && *WorkingDir) { - /* prepend the path to the working dir */ - char *c2; - - c2 = malloc((unsigned) (strlen(c) + strlen(WorkingDir) + 2)); - (void) sprintf(c2, "%s/%s", c, WorkingDir); - WorkingDir = c2; - } else { - /* working dir is current path */ - WorkingDir = malloc((unsigned) (strlen(c) + 1)); - (void) strcpy(WorkingDir, c); - } - } - - /* SourceDir specified? */ - if (!SourceDir || !*SourceDir) { - /* Let's see if there is an /RCS dir in WorkingDir */ - SourceDir = malloc((unsigned) (strlen(WorkingDir) + 5)); - (void) strcpy(SourceDir, WorkingDir); - (void) strcat(SourceDir, "/RCS"); - if (!lstat(SourceDir, &st)) { - if (S_ISLNK(st.st_mode)) { - SourceDir = ResolveLink(SourceDir, 1); - } - } - /* strip off the "/RCS" portion of it */ - c = strrchr(SourceDir, '/'); - if (*c && !strcmp(c, "/RCS")) - *c = '\0'; - (void) fprintf(stderr, "using sourcedir of \"%s\"\n", SourceDir); - } else { - /* is it root relative? */ - if ('/' != *SourceDir) { - /* get the current directory */ - char *c2; - - if (NULL == (c = getcwd(Buffer, sizeof(Buffer)))) { - (void) fprintf(stderr, - "%s: can't get current working directory\n", - argv[0]); - (void) exit(1); - } - - c2 = malloc((unsigned) (strlen(c) + strlen(SourceDir) + 2)); - (void) sprintf(c2, "%s/%s", c, SourceDir); - SourceDir = c2; - } - } - - /* are the 2 directories the same name? - */ - if (!strcmp(SourceDir, WorkingDir)) { - (void) same++; - } - - WorkingDirCmp = malloc((unsigned) (strlen(WorkingDir) + 2)); - (void) strcpy(WorkingDirCmp, WorkingDir); - (void) strcat(WorkingDirCmp, "/"); - - SourceDirCmp = malloc((unsigned) (strlen(SourceDir) + 2)); - (void) strcpy(SourceDirCmp, SourceDir); - (void) strcat(SourceDirCmp, "/"); - - WorkingLen = strlen(WorkingDirCmp); - SourceLen = strlen(SourceDirCmp); - - if (DoExecute) - { - if (DoDiffs) - { - do_rm_rf(OutFile); - do_touch(OutFile); - } - } - else - { - printf("#!/bin/sh\n"); - printf("#\n# the following makes things more readeable\n\n"); - printf("w='%s'\t# Working directory\n", WorkingDir); - printf("s='%s'\t# Source directory\n", SourceDir); - if (DoDiffs) - printf("rm -rf %s; touch %s\n", OutFile, OutFile); - printf("\n"); - } - - if (optind < argc) { - char *SubSourceDir; - char *SubWorkingDir; - - for (; optind < argc; optind++) { - SubSourceDir = malloc((unsigned) (strlen(SourceDir) + - strlen(argv[optind]) + 2)); - (void) sprintf(SubSourceDir, "%s/%s", SourceDir, argv[optind]); - SubWorkingDir = malloc((unsigned) (strlen(WorkingDir) + - strlen(argv[optind]) + 2)); - (void) sprintf(SubWorkingDir, "%s/%s", WorkingDir, argv[optind]); - (void) GetNew(SubWorkingDir, SubSourceDir, same); - (void) free(SubWorkingDir); - (void) free(SubSourceDir); - } - } else { - (void) GetNew(WorkingDir, SourceDir, same); - } - (void) exit(0); -/*NOTREACHED*/ -} - -void -GetNew(WorkingDir, SourceDir, same) -char *WorkingDir; -char *SourceDir; -int same; -{ - FILE *f; - char *NextSourceDir; - char *NextWorkingDir; - char *RcsDir; - char *SourceFile; - char *WorkingFile; - int FreeSourceFile; - int FreeWorkingFile; - DIR *D; -#ifdef apollo - struct direct *dir; -#else - struct dirent *dir; -#endif - struct stat st; - int Tries; - char *c,*d; - char buf[BUFSIZ]; - flist *WorkingHead = (flist *) 0; - flist *SourceHead = (flist *) 0; - flist *RcsHead = (flist *) 0; - flist *WorkingPtr; - flist *SourcePtr; - flist *RcsPtr; - int shouldnt_have_source; - - if (Verbose) - (void) fprintf(stderr, "Scanning directory \"%s\"\n", SourceDir); - if (Debug > 1) - (void) fprintf(stderr, ">> GetNew(\"%s\", \"%s\")\n", WorkingDir, - SourceDir); - - /* set up the working directory's RCS directory name */ - RcsDir = malloc((unsigned char *) strlen(WorkingDir) + strlen("/RCS") + 1); - (void) sprintf(RcsDir, "%s/RCS", WorkingDir); - if (Debug > 0) - (void) fprintf(stderr, ">> RcsDir=\"%s\"\n", RcsDir); - - /* check to see if the working dir's RCS directory exists */ - /* if you can't stat it and it is a symlink to nowhere, do not - * recreate the link. The cde source server works on RCS symlinks - * to nowhere. - */ - if (stat(RcsDir, &st)) { - /* if not a symlink, create the RCS directory */ - if (readlink(RcsDir, buf, sizeof(buf)) < 0) { - /* no -- create one off of the SourceDir */ - c = malloc((unsigned char *) strlen(SourceDir) + - strlen("/RCS") + 1); - (void) sprintf(c, "%s/RCS", SourceDir); - d = malloc((unsigned char *) strlen(SourceDir) + - strlen("/RCS") + 1); - (void) sprintf(d, "%s/RCS", SourceDir); - /* resolve out symbolic links */ - c = ResolveLink(c, 1); - if (Debug > 0) - (void) fprintf(stderr, ">> RCS RcsDir=\"%s\"\n", c); - - /* do we want RCS links? */ - /* If Rcsdir points to a symlink, recreate the link - * even if no destination directory exists. - */ - if ((!stat(c, &st) || (readlink(d, buf, sizeof(buf)) > 0)) - && !NoRcsLinks) { - /* yes -- since the WorkingDir didn't have an /RCS directory, - ** let's make one. - */ - if (!Quiet) - (void) fprintf(stderr, "%s: creating symlink\n", - RcsDir + WorkingLen); - /* check and see if the RCS dir is in the SourceDir */ - if (DoExecute) - { - do_rm_f(RcsDir); - do_ln_s(c, RcsDir); - } - else - { - /* remove the link before linking */ - (void) printf("rm -f ${w}/%s\n", - RcsDir + WorkingLen); - if (strncmp(c, SourceDir, SourceLen) || - (c[SourceLen] != '/')) { - /* need full RCS path */ - (void) printf("ln -s %s ${w}/%s\n", - c, RcsDir + WorkingLen); - } - else { - /* RCS path is relative to SourceDir */ - (void) printf("ln -s ${s}/%s ${w}/%s\n", - c + SourceLen, RcsDir + WorkingLen); - } - } - } - (void) free(RcsDir); - RcsDir = c; - } - } - - /* resolve "fake" symbolic links to get a real directory */ - for (Tries = 10; Tries > 0; Tries--) { - if (!lstat(RcsDir, &st)) { - if (S_ISLNK(st.st_mode)) { - RcsDir = ResolveLink(RcsDir, 1); - } else if (S_ISREG(st.st_mode)) { - /* open the file... */ - if (f = fopen(RcsDir, "r")) { - /* read it... */ - (void) fgets(Buffer, sizeof(Buffer), f); - Buffer[strlen(Buffer) - 1] = '\0'; - (void) free(RcsDir); - - /* RcsDir is the contents of the file... */ - RcsDir = malloc((unsigned) strlen(Buffer) + 1); - (void) strcpy(RcsDir, Buffer); - if (Debug) - (void) fprintf(stderr, ">> soft link RcsDir=\"%s\"\n", - RcsDir); - - /* we are done, close it... */ - (void) fclose(f); - } - } else { - /* not a symlink or "soft" link */ - break; - } - } else { - /* directory does not exist */ - break; - } - } - if (Tries <= 0) { - if (!Quiet) - (void) fprintf(stderr, "%s: >10 \"soft\" links\n", RcsDir); - } - - /* cd to the RcsDir, and scan it */ - RcsHead = (flist *) 0; - if (chdir(RcsDir)) { - if (errno != ENOENT) - (void) perror(RcsDir); - } else { - if (D = opendir(".")) { - while (dir = readdir(D)) { - /* all RCS files have a length > 2 */ -#ifndef apollo - if (strlen(dir->d_name) < 3) -#else - if (dir->d_namlen < 3) -#endif - continue; - - /* all RCS files have a name ending in ",v" */ -#ifndef apollo - if (strcmp(dir->d_name + strlen(dir->d_name) - 2, ",v")) -#else - if (strcmp(dir->d_name + dir->d_namlen - 2, ",v")) -#endif - continue; - - /* build the full name of the file */ - (void) strcpy(Buffer, RcsDir); - (void) strcat(Buffer, "/"); - (void) strcat(Buffer, dir->d_name); - - /* stat the file */ - if (stat(dir->d_name, &st)) { - (void) perror(Buffer); - continue; - } - - /* Valid entry. It's time to stuff it away */ - if (RcsHead) { - RcsPtr->next = (flist *) malloc(sizeof(flist)); - RcsPtr = RcsPtr->next; - } else { - RcsHead = (flist *) malloc(sizeof(flist)); - RcsPtr = RcsHead; - } - /* null out link */ - RcsPtr->next = (flist *) 0; - - /* this entry is new */ - RcsPtr->used =0; - - /* stuff away full path */ - RcsPtr->fullname = malloc((unsigned) (strlen(Buffer) + 1)); - (void) strcpy(RcsPtr->fullname, Buffer); - - /* drop ",v" of dir->d_name */ - /* stuff away key path */ -#ifndef apollo - dir->d_name[strlen(dir->d_name) - 2] = '\0'; - RcsPtr->keyname = malloc((unsigned) (strlen(dir->d_name) + 1)); - (void) strcpy(RcsPtr->keyname, dir->d_name); - RcsPtr->keylen = strlen(dir->d_name); -#else - dir->d_name[dir->d_namlen - 2] = '\0'; - dir->d_namlen -= 2; - RcsPtr->keyname = malloc((unsigned) (dir->d_namlen + 1)); - (void) strcpy(RcsPtr->keyname, dir->d_name); - RcsPtr->keylen = dir->d_namlen; -#endif - /* stuff away stat structure */ - RcsPtr->st = st; - RcsPtr->st_valid = 1; - RcsPtr->lst_valid = 0; - } - (void) closedir(D); - } - } - - /* cd to the WorkingDir, and scan it */ - WorkingHead = (flist *) 0; - if (chdir(WorkingDir)) { - if (errno != ENOENT) - (void) perror(WorkingDir); - } else { - if (D = opendir(".")) { - while (dir = readdir(D)) { - /* ignore "." and ".." */ -#ifndef apollo - if (('.' == *(dir->d_name)) || (!strcmp(dir->d_name, ".."))) - continue; -#else - if (((1 == dir->d_namlen) && ('.' == *(dir->d_name))) || - ((2 == dir->d_namlen) && !strcmp(dir->d_name, ".."))) - continue; -#endif - - /* build the full name of the file */ - (void) strcpy(Buffer, WorkingDir); - (void) strcat(Buffer, "/"); - (void) strcat(Buffer, dir->d_name); - - /* stat the file */ - if (stat(dir->d_name, &st)) { - /* don't send error if RCS directory is a - * symlink to nowhere. - */ - if (strcmp("RCS",dir->d_name)) { - (void) perror(Buffer); - } - continue; - } - - /* Valid entry. It's time to stuff it away */ - if (WorkingHead) { - WorkingPtr->next = (flist *) malloc(sizeof(flist)); - WorkingPtr = WorkingPtr->next; - } else { - WorkingHead = (flist *) malloc(sizeof(flist)); - WorkingPtr = WorkingHead; - } - /* null out link */ - WorkingPtr->next = (flist *) 0; - - /* this entry is new */ - WorkingPtr->used =0; - - /* stuff away full path */ - WorkingPtr->fullname = malloc((unsigned) (strlen(Buffer) + 1)); - (void) strcpy(WorkingPtr->fullname, Buffer); - /* stuff away key path */ -#ifndef apollo - WorkingPtr->keyname = malloc((unsigned) (strlen(dir->d_name) + 1)); - (void) strcpy(WorkingPtr->keyname, dir->d_name); - WorkingPtr->keylen = strlen(dir->d_name); -#else - WorkingPtr->keyname = malloc((unsigned) (dir->d_namlen + 1)); - (void) strcpy(WorkingPtr->keyname, dir->d_name); - WorkingPtr->keylen = dir->d_namlen; -#endif - /* stuff away stat structure */ - WorkingPtr->st = st; - WorkingPtr->st_valid = 1; - if (S_ISDIR(st.st_mode) && !lstat(dir->d_name, &st)) - { - WorkingPtr->lst = st; - WorkingPtr->lst_valid = 1; - } - else - WorkingPtr->lst_valid = 0; - } - (void) closedir(D); - } - } - - /* cd to the SourceDir, and scan it. If the dirs are the same, we - ** can just forget this part - */ - SourceHead = (flist *) 0; - if (!same) { - if (chdir(SourceDir)) { - if (errno != ENOENT) - (void) perror(SourceDir); - } else { - if (D = opendir(".")) { - while (dir = readdir(D)) { - /* ignore "." and ".." */ -#ifndef apollo - if ((('.' == *(dir->d_name))) || - (!strcmp(dir->d_name, ".."))) - continue; -#else - if (((1 == dir->d_namlen) && ('.' == *(dir->d_name))) || - ((2 == dir->d_namlen) && - !strcmp(dir->d_name, ".."))) - continue; -#endif - - /* build the full name of the file */ - (void) strcpy(Buffer, SourceDir); - (void) strcat(Buffer, "/"); - (void) strcat(Buffer, dir->d_name); - - /* lstat the file */ - if (lstat(dir->d_name, &st)) { - (void) perror(Buffer); - continue; - } - - - /* Valid entry. It's time to stuff it away */ - if (SourceHead) { - SourcePtr->next = (flist *) malloc(sizeof(flist)); - SourcePtr = SourcePtr->next; - } else { - SourceHead = (flist *) malloc(sizeof(flist)); - SourcePtr = SourceHead; - } - /* null out link */ - SourcePtr->next = (flist *) 0; - - /* this entry is new */ - SourcePtr->used =0; - - /* stuff away full path */ - SourcePtr->fullname = - malloc((unsigned) (strlen(Buffer) + 1)); - (void) strcpy(SourcePtr->fullname, Buffer); - /* stuff away key path */ -#ifndef apollo - SourcePtr->keyname = malloc((unsigned) (strlen(dir->d_name) + 1)); - (void) strcpy(SourcePtr->keyname, dir->d_name); - SourcePtr->keylen = strlen(dir->d_name); -#else - SourcePtr->keyname = malloc((unsigned) (dir->d_namlen + 1)); - (void) strcpy(SourcePtr->keyname, dir->d_name); - SourcePtr->keylen = dir->d_namlen; -#endif - /* stuff away lstat structure */ - SourcePtr->lst = st; - SourcePtr->lst_valid = 1; - /* was it a symbolic link? */ - if (S_ISLNK(st.st_mode)) { - /* do a plain stat on it */ - (void) stat(dir->d_name, &st); - } - /* stuff it away */ - SourcePtr->st = st; - SourcePtr->st_valid = 1; - } - (void) closedir(D); - } - } - } - - /* - ** PASS 1: - ** - ** Check all the files in the working dir. - */ - if (Debug) - (void) fprintf(stderr, ">> Pass 1: scanning WorkingDir \"%s\"\n", - WorkingDir); - for (WorkingPtr = WorkingHead; WorkingPtr; WorkingPtr = WorkingPtr->next) { - /* initialize */ - if (Debug > 1) - (void) fprintf(stderr, ">> keyname=\"%s\", fullname=\"%s\"\n", - WorkingPtr->keyname, WorkingPtr->fullname); - shouldnt_have_source = 0; - - /* ignore .o and .a files */ - c = WorkingPtr->keyname + WorkingPtr->keylen - 2; - if (WorkingPtr->keylen >= 2) { - if (!strcmp(c, ".o")) { - (void) shouldnt_have_source++; - if (!CloneDotO) { - if (Debug > 1) - (void) fprintf(stderr, ">> .o -- ignored\n"); - continue; - } - } - if (!strcmp(c, ".a")) { - (void) shouldnt_have_source++; - if (!CloneDotA) { - if (Debug > 1) - (void) fprintf(stderr, ">> .a -- ignored\n"); - continue; - } - } - } - if (!strncmp(WorkingPtr->keyname, Makefile, strlen(Makefile))) { - (void) shouldnt_have_source++; - if (!CloneMakefile) { - if (Debug > 1) - (void) fprintf(stderr, ">> Makefile* -- ignored\n"); - continue; - } - } - - /* ignore RCS as well */ - if (!strcmp(WorkingPtr->keyname, "RCS")) { - if (Debug > 1) - (void) fprintf(stderr, ">> RCS -- ignored\n"); - continue; - } - - /* ignore SCCS as well */ - if (!(ProcessSCCSdirs)) { - if (!strcmp(WorkingPtr->keyname, "SCCS")) { - if (Debug > 1) - (void) fprintf(stderr, ">> SCCS -- ignored\n"); - continue; - } - } - - /* ignore regular files with x mode */ - if (!CloneExecutables && WorkingPtr->st_valid && - (S_ISREG(WorkingPtr->st.st_mode)) && - (0111 == (WorkingPtr->st.st_mode & 0111))) { - if (Debug > 1) - (void) fprintf(stderr, ">> executable -- ignored\n"); - continue; - } - - /* find corresponding sourcefile */ - for (SourcePtr = SourceHead; SourcePtr; SourcePtr = SourcePtr->next) { - if ((WorkingPtr->keylen == SourcePtr->keylen) && - !strcmp(WorkingPtr->keyname, SourcePtr->keyname)) { - /* mark it as used */ - (void) SourcePtr->used++; - break; - } - } - - if (Debug > 1) - if (SourcePtr) - (void) fprintf(stderr, - " source: keyname=\"%s\" fullname=\"%s\"\n", - SourcePtr->keyname, SourcePtr->fullname); - else - (void) fprintf(stderr, " no source file\n"); - - /* is the working file actually a directory? */ - if (WorkingPtr->st_valid && - (S_ISDIR(WorkingPtr->st.st_mode))) { - /* yes, go recursive... */ - if (FollowDirLinks || - !WorkingPtr->lst_valid || - !S_ISLNK(WorkingPtr->lst.st_mode)) - { - if (Debug > 1) - (void) fprintf(stderr, ">> directory\n"); - (void) GetNew(WorkingPtr->fullname, - SourcePtr ? SourcePtr->fullname : WorkingPtr->fullname, - same); - } - } else { - /* find corresponding RCS file */ - for (RcsPtr = RcsHead; RcsPtr; RcsPtr = RcsPtr->next) { - if ((WorkingPtr->keylen == RcsPtr->keylen) && - !strcmp(WorkingPtr->keyname, RcsPtr->keyname)) { - /* mark it as used */ - (void) RcsPtr->used++; - break; - } - } - - if (Debug > 1) - if (RcsPtr) - (void) fprintf(stderr, - " rcs: keyname=\"%s\" fullname=\"%s\"\n", - RcsPtr->keyname, RcsPtr->fullname); - else - (void) fprintf(stderr, " no rcs file\n"); - - /* print a message if there is no corresponding source */ - if (!RcsPtr && !SourcePtr) { - /* don't print a message for .snf files */ - if ((WorkingPtr->keylen > 4) && !strcmp(WorkingPtr->keyname + - WorkingPtr->keylen - 4, ".snf")) - (void) shouldnt_have_source++; - - if (Verbose && !shouldnt_have_source) - (void) fprintf(stderr, "%s: no source or RCS file\n", - WorkingPtr->fullname + WorkingLen); - } - - if (!RcsPtr || !RcsPtr->st_valid || - (SourcePtr && - (SourcePtr->st.st_mtime >= RcsPtr->st.st_mtime)) || - (SourcePriority && SourcePtr)) { - /* no RCS file, or source newer than RCS, or source - ** exists and has priority - */ - if (Debug > 1) - (void) fprintf(stderr, ">> source newer than rcs\n"); - if (SourcePtr && - (WorkingPtr->st.st_mtime < SourcePtr->st.st_mtime)) { - if (Debug > 1) - (void) fprintf(stderr, - ">> source newer than working\n"); - /* does the WorkingFile have any write mode bits - ** set? - */ - if (WorkingPtr->st.st_mode & 0222) { - if (!Quiet) - (void) fprintf(stderr, - "%s: writable -- not updated\n", - WorkingPtr->fullname + WorkingLen); - continue; - } - - if (!Quiet) - (void) fprintf(stderr, "%s: newer file\n", - WorkingPtr->fullname + WorkingLen); - - - /* check to see if file symlinks should resolve */ - if (ResolveFileLinks) - if (SourcePtr->lst_valid && - S_ISLNK(SourcePtr->lst.st_mode)) { - SourceFile = ResolveLink(SourcePtr->fullname, 0); - FreeSourceFile = 1; - } - else { - SourceFile = SourcePtr->fullname; - } - else { - SourceFile = SourcePtr->fullname; - } - - /* do we need to do a diff? */ - if (DoDiffs) { - if (DoExecute) - { - do_diff(NULL, - DiffCommand, - WorkingPtr->fullname, - SourceFile, - OutFile); - } - else - { - if (strncmp(SourceFile, SourceDirCmp, SourceLen)) - /* not in SourceDir... */ - (void) printf("%s ${w}/%s %s >>%s 2>&1\n", - DiffCommand, - WorkingPtr->fullname + WorkingLen, - SourceFile, OutFile); - else - /* in SourceDir... */ - (void) printf("%s ${w}/%s ${s}/%s >>%s 2>&1\n", - DiffCommand, - WorkingPtr->fullname + WorkingLen, - SourceFile + SourceLen, OutFile); - } - } - if (DoExecute) - { - do_rm_f(WorkingPtr->fullname); - if (LinkFiles) - do_ln_s(SourceFile, WorkingPtr->fullname); - else - do_cp(SourceFile, WorkingPtr->fullname); - } - else - { - if (strncmp(SourceFile, SourceDirCmp, SourceLen)) { - /* not in SourceDir... */ - (void) printf("rm -f ${w}/%s\n", - WorkingPtr->fullname + WorkingLen); - (void) printf("\t%s %s ${w}/%s\n", - LinkFiles ? "ln -s" : "cp", - SourceFile, - WorkingPtr->fullname + WorkingLen); - } else { - /* in SourceDir... */ - (void) printf("rm -f ${w}/%s\n", - WorkingPtr->fullname + WorkingLen); - (void) printf("\t%s ${s}/%s ${w}/%s\n", - LinkFiles ? "ln -s" : "cp", - SourceFile + SourceLen, - WorkingPtr->fullname + WorkingLen); - } - } - if (!LinkFiles) - { - /* don't chmod the file if we did a link... */ - - if (DoExecute) - { - do_chmod(WorkingPtr->fullname, - (SourcePtr->st.st_mode & 07777 & ~0222) | 0444); - } - else - (void) printf("\tchmod 0%03o ${w}/%s\n", - (SourcePtr->st.st_mode & 07777 & ~0222) | 0444, - WorkingPtr->fullname + WorkingLen); - } - if (FreeSourceFile) - (void) free(SourceFile); - } else { - if (Debug > 1) - (void) fprintf(stderr, - ">> source older than working\n"); - } - } else { - /* RCS file is the newest */ - if (Debug > 1) - (void) fprintf(stderr, ">> rcs newer than source\n"); - if (RcsPtr && (WorkingPtr->st.st_mtime < RcsPtr->st.st_mtime)) { - if (Debug > 1) - (void) fprintf(stderr, - ">> rcs newer than working\n"); - /* does the WorkingFile have any write mode bits - ** set? - */ - if (WorkingPtr->st.st_mode & 0222) { - if (!Quiet) - (void) fprintf(stderr, - "%s: writable -- not updated\n", - WorkingPtr->fullname + WorkingLen); - continue; - } - - - if (!Quiet) - (void) fprintf(stderr, "%s: newer RCS file\n", - WorkingPtr->fullname + WorkingLen); - if (DoExecute) - { - do_diff(RcsDir, DiffCommand, - RcsPtr->keyname, - WorkingPtr->fullname, - OutFile); - if (! NoRealFiles) - { - do_co_q(RcsDir, WorkingPtr->fullname); - } - } - else - { - if (strncmp(RcsDir, SourceDir, SourceLen) || - (RcsDir[SourceLen] != '/')) { - /* RcsDir is not in SourceDir */ - - if (DoDiffs) { - /* diff the file */ - (void) printf("\t (cd %s; %s %s ${w}/%s >>%s 2>&1)\n", - RcsDir, - DiffCommand, - RcsPtr->keyname, - WorkingPtr->fullname + WorkingLen, - OutFile); - } - if (! NoRealFiles) - { - /* check out the file */ - (void) printf("(cd %s; co -q ${w}/%s) \n", - RcsDir, WorkingPtr->fullname + WorkingLen); - } - - } else { - /* RcsDir is in SourceDir */ - - if (DoDiffs) { - /* diff the file */ - (void) printf("\t (cd ${s}/%s; %s %s ${w}/%s >>%s 2>&1)\n", - RcsDir + SourceLen, - DiffCommand, - RcsPtr->keyname, - WorkingPtr->fullname + WorkingLen, - OutFile); - } - - if (! NoRealFiles) - { - /* check out the file */ - (void) printf("(cd ${s}/%s; co -q ${w}/%s) \n", - RcsDir + SourceLen, WorkingPtr->fullname + WorkingLen); - } - } - } - - } else { - if (Debug > 1) - (void) fprintf(stderr, - ">> source older than working\n"); - } - } - } - } - - /* - ** PASS 2: - ** Check all the files in the source (checked out) dir. - */ - if (Debug) - (void) fprintf(stderr, ">> Pass 2: scanning SourceDir \"%s\"\n", - SourceDir); - for (SourcePtr = SourceHead; SourcePtr; SourcePtr = SourcePtr->next) { - /* did we get this one already? */ - if (SourcePtr->used) - continue; - - /* ignore "RCS" */ - if (!strcmp(SourcePtr->keyname, "RCS")) - continue; - - /* ignore SCCS as well */ - if (!(ProcessSCCSdirs)) { - if (!strcmp(SourcePtr->keyname, "SCCS")) { - if (Debug > 1) - (void) fprintf(stderr, ">> SCCS -- ignored\n"); - continue; - } - } - - /* find corresponding RCS file */ - for (RcsPtr = RcsHead; RcsPtr; RcsPtr = RcsPtr->next) { - if ((SourcePtr->keylen == RcsPtr->keylen) && - !strcmp(SourcePtr->keyname, RcsPtr->keyname)) { - /* mark it as used */ - break; - } - } - - /* which one do we use, RCS or source? */ - if (RcsPtr) { - if (!SourcePriority && - (SourcePtr->st.st_mtime < RcsPtr->st.st_mtime)) { - /* we'll catch this on pass 3 */ - continue; - } else { - /* mark the RCS file as used */ - (void) RcsPtr->used++; - } - } - - /* ignore .o and .a files */ - c = SourcePtr->keyname + SourcePtr->keylen - 2; - if (SourcePtr->keylen >= 2) { - if (!strcmp(c, ".o")) { - (void) shouldnt_have_source++; - if (!CloneDotO) - continue; - } - if (!strcmp(c, ".a")) { - (void) shouldnt_have_source++; - if (!CloneDotA) - continue; - } - } - - /* the files might be Makefile's */ - if (!CloneMakefile && !strncmp(SourcePtr->keyname, Makefile, - strlen(Makefile))) - continue; - - WorkingFile = malloc((unsigned) strlen(WorkingDir) + - SourcePtr->keylen + 2); - (void) strcpy(WorkingFile, WorkingDir); - (void) strcat(WorkingFile, "/"); - (void) strcat(WorkingFile, SourcePtr->keyname); - - if (S_ISDIR(SourcePtr->st.st_mode)) { - /* check for directories present in the source tree, - ** but not in this tree. Don't bother if the SourceDir - ** is the same as WorkingDir. If the directory exists - ** in the working tree, we already set the used flag - ** and never got here in the first place. - */ - if (!same) { - if (MakeDirs) { - if (!Quiet) - (void) fprintf(stderr, "%s: building directory\n", - WorkingFile + WorkingLen); - if (!FollowDirLinks && - SourcePtr->lst_valid && - S_ISLNK(SourcePtr->lst.st_mode)) - { - - /* check to see if file symlinks should resolve */ - if (ResolveFileLinks) - SourceFile = ResolveLink(SourcePtr->fullname, 0); - else - SourceFile = SourcePtr->fullname; - - if (DoExecute) - do_ln_s(SourceFile, WorkingFile); - else - { - if (strncmp(SourceFile, SourceDir, SourceLen)) - (void) printf("ln -s %s ${w}/%s\n", - SourceFile, - WorkingFile + WorkingLen); - else - (void) printf("ln -s ${s}/%s ${w}/%s\n", - SourceFile + SourceLen, - WorkingFile + WorkingLen); - } - free(SourceFile); - } - else - { - if (DoExecute) - { - do_rm_rf(WorkingFile); - do_mkdir(WorkingFile); - do_chmod(WorkingFile, 0755); - /* bad for other architectures */ - /* do_chgrp(WorkingFile, "users"); */ - } - else - { - (void) printf("rm -rf ${w}/%s\n", - WorkingFile + WorkingLen); - (void) printf("\tmkdir ${w}/%s\n", - WorkingFile + WorkingLen); - (void) printf("\tchmod 0755 ${w}/%s\n", - WorkingFile + WorkingLen); - /* bad for other architectures */ - /*(void) printf("\tchgrp users ${w}/%s\n", - WorkingFile + WorkingLen); */ - } - (void) GetNew(WorkingFile, SourcePtr->fullname, same); - } - - } else { - if (!Quiet) - (void) fprintf(stderr, "%s: missing directory\n", - WorkingFile + WorkingLen); - } - } - } else { - /* regular file (probably)... */ - /* check to see if file symlinks should resolve */ - if (ResolveFileLinks) - if (SourcePtr->lst_valid && S_ISLNK(SourcePtr->lst.st_mode)) { - SourceFile = ResolveLink(SourcePtr->fullname, 0); - FreeSourceFile = 1; - } - else { - SourceFile = SourcePtr->fullname; - FreeSourceFile = 0; - } - else { - SourceFile = SourcePtr->fullname; - FreeSourceFile = 0; - } - - if (!Quiet) - (void) fprintf(stderr, "%s: new file\n", - WorkingFile + WorkingLen); - if (DoExecute) - { - if (LinkFiles) - do_ln_s(SourceFile, WorkingFile); - else - do_cp(SourceFile, WorkingFile); - } - else - { - if (strncmp(SourceFile, SourceDir, SourceLen)) { - (void) printf("%s %s ${w}/%s\n", - LinkFiles ? "ln -s" : "cp", - SourceFile, - WorkingFile + WorkingLen); - } else { - (void) printf("%s ${s}/%s ${w}/%s\n", - LinkFiles ? "ln -s" : "cp", - SourceFile + SourceLen, - WorkingFile + WorkingLen); - } - } - if (!LinkFiles) - { - if (DoExecute) - do_chmod(WorkingFile, - (SourcePtr->st.st_mode & 07777 & ~0222) | 0444); - else - (void) printf("\tchmod 0%03o ${w}/%s\n", - (SourcePtr->st.st_mode & 07777 & ~0222) | 0444, - WorkingFile + WorkingLen); - } - if (FreeSourceFile) - (void) free(SourceFile); - } - (void) free(WorkingFile); - } - - /* - ** PASS 3: - ** - ** Check all the files in the RCS dir. - */ - if (Debug) - (void) fprintf(stderr, ">> scanning RcsDir \"%s\"\n", RcsDir); - for (RcsPtr = RcsHead; RcsPtr; RcsPtr = RcsPtr->next) { - /* did we get this one already? */ - if (RcsPtr->used) - continue; - - /* build the WorkingFile */ - WorkingFile = malloc((unsigned) strlen(WorkingDir) + - RcsPtr->keylen + 2); - (void) strcpy(WorkingFile, WorkingDir); - (void) strcat(WorkingFile, "/"); - (void) strcat(WorkingFile, RcsPtr->keyname); - - /* New RCS file */ - if (!Quiet) - (void) fprintf(stderr, "%s: new RCS file\n", - WorkingFile + WorkingLen); - if (DoExecute) - { - if (! NoRealFiles) - { - do_co_q(RcsDir, WorkingFile); - } - } - else - { - if (strncmp(RcsDir, SourceDir, SourceLen) || - (RcsDir[SourceLen] != '/')) { - /* RcsDir is not in SourceDir */ - if (! NoRealFiles) - { - /* check it out... */ - (void) printf("(cd %s; co -q ${w}/%s)\n", - RcsDir, - WorkingFile + WorkingLen); - } - } else { - /* RcsDir is in SourceDir */ - if (! NoRealFiles) - { - /* check it out... */ - (void) printf("(cd %s; co -q ${w}/%s)\n", - RcsDir + SourceLen, - WorkingFile + WorkingLen); - } - } - } - (void) free(WorkingFile); - } - - /* free storage */ - while (WorkingHead) { - WorkingPtr = WorkingHead; - WorkingHead = WorkingPtr->next; - (void) free(WorkingPtr->fullname); - (void) free(WorkingPtr->keyname); - (void) free((char *) WorkingPtr); - } - while (SourceHead) { - SourcePtr = SourceHead; - SourceHead = SourcePtr->next; - (void) free(SourcePtr->fullname); - (void) free(SourcePtr->keyname); - (void) free((char *) SourcePtr); - } - while (RcsHead) { - RcsPtr = RcsHead; - RcsHead = RcsPtr->next; - (void) free(RcsPtr->fullname); - (void) free(RcsPtr->keyname); - (void) free((char *) RcsPtr); - } - - (void) free(RcsDir); - return; -} - -char -*ResolveLink(filename, freeit) -char *filename; -int freeit; -{ - int len; - int try; - char *c; - char *tname; - - tname = filename; - - if (Debug) { - (void) fprintf(stderr, "ResolveLink %s->", tname); - (void) fflush(stderr); - } - for (try = 0; try < 10; try++) { - if ((len = readlink(tname, Buffer, sizeof(Buffer))) < 0) { - break; - } else { - Buffer[len] = '\0'; - if ('/' != *Buffer) { - if (c = strrchr(tname, '/')) { - *c = '\0'; - c = malloc((unsigned) (strlen(tname) + - strlen(Buffer) + 2)); - (void) sprintf(c, "%s/%s", tname, Buffer); - } else { - c = malloc((unsigned) (strlen(Buffer) + 1)); - (void) strcpy(c, Buffer); - } - } else { - c = malloc((unsigned) (strlen(Buffer) + 1)); - (void) strcpy(c, Buffer); - } - if (freeit++) - (void) free(tname); - tname = c; - } - } - if (!freeit) { - c = malloc((unsigned) (strlen(tname) + 1)); - (void) strcpy(c, tname); - tname = c; - } - if (Debug) { - (void) fprintf(stderr, "%s\n", tname); - (void) fflush(stderr); - } - return(tname); -} - -/* New code for -X option */ - -static void do_rm_rf(target) -char *target; -{ - char *malloc(), *temp; - struct stat buf; - if (lstat(target, &buf) != -1) - { - if (S_ISDIR(buf.st_mode)) - { - DIR *thisdir; -#ifdef apollo - struct direct *thisent; -#else - struct dirent *thisent; -#endif - thisdir = opendir(target); - if (thisdir != NULL) - { - while (thisent = readdir(thisdir)) - { - if (strcmp(thisent->d_name, ".") && - strcmp(thisent->d_name, "..")) - { - temp = malloc(strlen(target) + - strlen(thisent->d_name) + 2); - if (temp != NULL) - { - (void)strcpy(temp, target); - (void)strcat(temp, "/"); - (void)strcat(temp, thisent->d_name); - do_rm_rf(temp); - free(temp); - } - } - } - closedir(thisdir); - (void)rmdir(target); - } - } - else - (void)unlink(target); - } -} - -static void do_touch(filename) -char *filename; -{ -#ifdef apollo - struct timeval tvp[2]; - struct timezone tzp; - gettimeofday(tvp, &tzp); - tvp[1] = tvp[0]; - if (utimes(filename, tvp) == -1 && - errno == ENOENT) -#else - if (utime(filename, (struct utimbuf *)NULL) == -1 && - errno == ENOENT) -#endif - (void)creat(filename, 0777); -} - -static void do_ln_s(src, dest) -char *src, *dest; -{ - if (symlink(src, dest) == -1) - perror(dest); -} - -static void do_diff(dirname, diffcmd, file1, file2, outfile) -char *dirname, *diffcmd, *file1, *file2, *outfile; -{ - pid_t pid, res, fork(); - - pid = fork(); - - if (pid == -1) - perror("fork() failed"); - else - { - if (pid == 0) - { - if (dirname != NULL && chdir(dirname) == -1) - perror("dirname"); - else - { - int des; - des = open(outfile, O_WRONLY | O_APPEND | O_CREAT, 0777); - if (des == -1) - { - perror(outfile); - exit(1); - } - (void)dup2(des, fileno(stdout)); - (void)dup2(des, fileno(stderr)); - execlp(diffcmd, diffcmd, file1, file2, NULL); - perror(diffcmd); - } - exit(1); - } - while ((res = wait(NULL)) != pid && res != -1); - } -} - -static void do_rm_f(target) -char *target; -{ - struct stat buf; - if (lstat(target, &buf) != -1 && - !(S_ISDIR(buf.st_mode))) - (void)unlink(target); -} - -static void do_cp(src, dest) -char *src, *dest; -{ - int res1, res2, fd1, fd2; - char buf[BUFSIZ]; - - fd1 = open(src, O_RDONLY); - if (fd1 == -1) - { - perror(src); - return; - } - fd2 = open(dest, O_WRONLY | O_CREAT, 0777); - if (fd2 == -1) - { - perror(dest); - close(fd1); - return; - } - - while ((res1 = read(fd1, buf, BUFSIZ)) > 0) - { - while ((res2 = write(fd2, buf, res1)) > 0 && (res1 -= res2)); - if (res2 == -1) break; - } - - if (res1 == -1) - perror(src); - else if (res2 == -1) - perror(dest); - - close(fd1); - close(fd2); -} - -static void do_chmod(filename, newmode) -char *filename; -int newmode; -{ - if (chmod(filename, newmode) == -1) - perror(filename); -} - -static void do_co_q(dirname, targetname) -char *dirname, *targetname; -{ - pid_t pid, res, fork(); - - pid = fork(); - - if (pid == -1) - perror("fork() failed"); - else - { - if (pid == 0) - { - if (chdir(dirname) == -1) - perror("dirname"); - else - { - execlp("co", "co", "-q", targetname, NULL); - perror("failed to exec co(1)"); - } - exit(1); - } - while ((res = wait(NULL)) != pid && res != -1); - } -} - -static void do_mkdir(dirname) -char *dirname; -{ - if (mkdir(dirname, 0777) == -1) - perror(dirname); -} - -static void do_chgrp(filename, newgroup) -char *filename, *newgroup; -{ - struct group *group, *getgrnam(); - group = getgrnam(newgroup); - if (group == NULL) - fprintf(stderr, "%s: no such group\n", newgroup); - else - chown(filename, UID_NO_CHANGE, group->gr_gid); -} diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.osf.400s b/cde/admin/BuildTools/fnrclone/findnewrcs.osf.400s deleted file mode 100755 index 0f42fe74d..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.osf.400s and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/findnewrcs.osf.pa b/cde/admin/BuildTools/fnrclone/findnewrcs.osf.pa deleted file mode 100755 index 78475e960..000000000 Binary files a/cde/admin/BuildTools/fnrclone/findnewrcs.osf.pa and /dev/null differ diff --git a/cde/admin/BuildTools/fnrclone/fnrclone b/cde/admin/BuildTools/fnrclone/fnrclone deleted file mode 100755 index 980b0496f..000000000 --- a/cde/admin/BuildTools/fnrclone/fnrclone +++ /dev/null @@ -1,140 +0,0 @@ -#! /bin/sh - -# This shell script runs findnewrcs on a clone tree. - -# Usage -DoUsage() -{ - cat << dernier -Usage: fnrclone [-OPTIONS] - where OPTIONS are: - [-c (checkout any new versions of files from RCS)] - [-s (create a script & log file in $HOME/fnrclone and - execute the script)] - [-n (leave actual files, not symbolic links)] - [-f (create a log file of changes)] - [-d (descend symbolically linked directories)] - [-S (do not follow symbolic links for files) - [-O (do not check out files, Only create symbolic links for existing files) - [-C (process SCCS directories[usually they are ignored]) - [-u Usage message] -NOTE: the default is make symbolic links and don't check out newer - revisions of files, just shadow the source. If the RCS directory is - accessible, check out any brand new files as real files. If the - RCS directory is not accessible (remote exchange), do NOT check out - any brand new files. -dernier -} - - -if [ $# -lt 2 ] ; then - DoUsage - exit 1 -fi - -DEF_s="L" -DEF_X="X" -LINKOPT="l" -ACTUAL= -#Parse the options -set -- `getopt csSCOdnuf: $*` -while [ $# -gt 0 ] -do - case $1 in - -n) LINKOPT= ;shift;; - -s) DEF_X=;shift;; - -S) DEF_S=s;shift;; - -c) DEF_s=;shift;; - -C) DEF_C=C;shift;; - -O) DEF_O=O;shift;; - -u) DoUsage;shift;; - -f) LOG=$2;shift 2;; - -d) ACTUAL="${ACTUAL}f";shift;; - --) shift;; - -*) DoUsage;shift;; - *) SRC=$1;DEST=$2;shift 2;; - esac -done - -OPTS="${DEF_X}${DEF_s}${DEF_S}${DEF_C}${DEF_O}${ACTUAL}${LINKOPT}miA" - -# -# get the system from uname -s -# -SYSTEM=`uname -s` -RELEASE=`uname -r` -MACHINE=`uname -m` - -Findnewrcs="findnewrcs.${SYSTEM}" -if [ "$SYSTEM" = "HP-UX" ];then - # 700's - M700=`echo $MACHINE | fgrep '/7' 2>/dev/null` - M800=`echo $MACHINE | fgrep '/8' 2>/dev/null` - R100=`echo $RELEASE | fgrep '10.' 2>/dev/null` - R90=`echo $RELEASE | fgrep '9.' 2>/dev/null` - R80=`echo $RELEASE | fgrep '8.' 2>/dev/null` - R70=`echo $RELEASE | fgrep '7.' 2>/dev/null` - if [ "$M700" ]; then - if [ "$R100" ];then - Findnewrcs="findnewrcs.700.100" - elif [ "$R80" ];then - Findnewrcs="findnewrcs.700.807" - fi - elif [ "$M800" ]; then - if [ "$R100" ];then - Findnewrcs="findnewrcs.800.100" - elif [ "$R90" ];then - Findnewrcs="findnewrcs.800.90" - elif [ "$R80" ];then - Findnewrcs="findnewrcs.800.80" - else - Findnewrcs="findnewrcs.800.70" - fi - else - if [ "$R90" ];then - Findnewrcs="findnewrcs.300.90" - elif [ "$R80" ];then - Findnewrcs="findnewrcs.300.80" - fi - fi -fi - -if [ "$SYSTEM" = "SunOS" ];then - - if [ "$MACHINE" = "i86pc" ];then - Findnewrcs="findnewrcs.UNIX_SV" - elif [ "$MACHINE" = "prep" ];then - Findnewrcs="findnewrcs.SunOS_PPC" - else - Findnewrcs="findnewrcs.SunOS" - fi - -fi - -# -# make an old style script -# -FNR_BINDIR=`dirname $0` -if [ ! "$DEF_X" ];then - DATE=`date +%H%M%S` - FNR_DIR=/$HOME/fnrclone - [ ! -d $FNR_DIR ] && mkdir $FNR_DIR - FNR_SCRIPT=$FNR_DIR/script$DATE - FNR_LOG=$FNR_DIR/log$DATE - $FNR_BINDIR/$Findnewrcs -S${SRC} -W${DEST} -${OPTS} > $FNR_SCRIPT 2> $FNR_LOG - chmod 777 $FNR_SCRIPT - chmod 777 $FNR_LOG - $FNR_SCRIPT - echo "`basename $0`: script is in $FNR_SCRIPT, logfile is $FNR_LOG" - if [ "$LOG" ];then - cat $FNR_LOG > $LOG - echo "logfile is also in $LOG" - fi -else # execute without a script - if [ "$LOG" ];then - $FNR_BINDIR/$Findnewrcs -S${SRC} -W${DEST} -${OPTS} 2> $LOG - else - $FNR_BINDIR/$Findnewrcs -S${SRC} -W${DEST} -${OPTS} - fi -fi - diff --git a/cde/admin/BuildTools/fnrclone/makefindnewrcs b/cde/admin/BuildTools/fnrclone/makefindnewrcs deleted file mode 100755 index e69ff1b02..000000000 --- a/cde/admin/BuildTools/fnrclone/makefindnewrcs +++ /dev/null @@ -1,58 +0,0 @@ -#! /usr/local/bin/perl - -eval "exec /usr/local/bin/perl -S $0 $*" - if $running_under_some_shell; - -$system = `uname -s`; -$release = `uname -r`; -$machine = `uname -m`; - -if ($system =~ m%SunOS%) { - if ($machine =~ m%prep%) { - $system = "SunOS_PPC"; - } -} - -push(@targets,"findnewrcs.${system}"); - -# -# for hp need subsystems -# -if ($system =~ m%HP-UX%) { - # if it's not 700 9.0, don't do HP-UX - if ($machine =~ m%.*/7%) { - if ($release =~ m%9\.%) { - push(@targets,"findnewrcs.700.90"); - push(@targets,"findnewrcs.800.90"); - } - elsif ($release =~ m%8\.%) { - @targets = ("findnewrcs.700.807"); - } - elsif ($release =~ m%10\.%) { - @targets = ("findnewrcs.700.100"); - } - } - elsif ($machine =~ m%.*/8%) { - if ($release =~ m%9\.%) { - @targets = ("findnewrcs.800.90"); - } - elsif ($release =~ m%8\.%) { - @targets = ("findnewrcs.800.80"); - } - elsif ($release =~ m%7\.%) { - @targets = ("findnewrcs.800.70"); - } - } - elsif ($machine =~ m%.*/[34]%) { - if ($release =~ m%9\.%) { - @targets = ("findnewrcs.300.90"); - } - elsif ($release =~ m%8\.%) { - @targets = ("findnewrcs.300.80"); - } - } -} - -foreach $target (@targets) { - system ("make load${target}"); -}