Overview
Comment:Cleaned up algorithms
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 91414ade99ca11ca43ee512aee1af97d2ff848ae84da83af451a59515aa62032
User & Date: gawthrop@users.sourceforge.net on 1998-07-16 20:40:24.000
Other Links: branch diff | manifest | tags
Context
1998-07-16
20:41:05
Now uses new mtt_help check-in: cc231eb983 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
20:40:24
Cleaned up algorithms check-in: 91414ade99 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
20:39:52
More cosmetic changes check-in: 3fb6b692f9 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
︙︙
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
# Copyright (c) P.J.Gawthrop 1996

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$






## Revision 1.2  1997/09/04 09:15:19  peterg
## Includes summary line as well as description lines
##
## Revision 1.1  1996/11/10 10:48:45  peterg
## Initial revision
##
###############################################################

path=$1
name=$2
fullname=$2_lbl.txt
all=$3




q=\


# awk splits the path into components and writes a find for each
# If all argument null, then succesful find terminates.
foundpath=`awk 'END{ \
  n=split(path,a,":"); 
  if (all == "") { 
    printf("if ");
  }  for (i=1;i<=n;i++) { 
  printf("find %s -type d -name \"%s\"  -print \n", a[i], name);
  if (all == "") { 
    printf("then\n"); 
    printf("exit\n"); 
    printf("fi\n");
  }
   }
     }' path="$path" name="$name" operation="$operation" all="$all" \
</dev/null  | sh`


# If non-null result, check that the name_lbl.txt file exists in dir name
# and print dirname and file name and last access time

if [ -n "$foundpath" ]; then



  find $foundpath -maxdepth 1 -name $fullname  -printf '%h\t%f\t%Ac\n' | sort -u

fi













>
>
>
>
>
>








|
|
<
<

>
>
>



|
<
|
|
<
|
<
<
<
<
<
<
<
<
<
|
>





>
>
>
|
>







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
# Copyright (c) P.J.Gawthrop 1996

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.3  1998/07/16 09:15:34  peterg
## Now prints:
## 	dir
## 	name_lbl.txt
##         access time
##
## Revision 1.2  1997/09/04 09:15:19  peterg
## Includes summary line as well as description lines
##
## Revision 1.1  1996/11/10 10:48:45  peterg
## Initial revision
##
###############################################################

path="$1"




if [ -n "$2" ]; then
    name="-name $2"
fi
q=\


paths=`echo $path | tr ":" " "`

foundpath=`\
for thepath in $paths; do

    find $thepath -type d  $name -print 









done | \
sort -u`

# If non-null result, check that the name_lbl.txt file exists in dir name
# and print dirname and file name and last access time

if [ -n "$foundpath" ]; then
 for thepath in $foundpath ;  do
  dirname=`echo $thepath | awk -F/ '{print $NF}'`
  fullname="$dirname"_lbl.txt
  find $thepath -maxdepth 1 -name $fullname  -printf '%h\t%f\t%Ac\n';
 done
fi







MTT: Model Transformation Tools
[ GitHub | SourceHut | Sourceforge | Fossil RSS ]