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 ]