Bash script to browse directory with a custom output ?

raf_iso · 01-11-2006, 03:29 AM

Hello,

I need to browse a storage disk with almost 700GB of datas. There is a lot of directories.

I would like to make a script that browse all the structure and store it in a text file each night. Then I could make a little search program and it'll be much more faster than searching with the FIND command. Even store it in a mysql database.

I looked the docs about LS and TREE, but I can't get exactly what I want

.

I need something like

Code:

[YYYY.MM.DD-HH:MM][SIZE][FULLPATH]

for exemple :

Code:

[2006.01.11-09:05][4096][./custom/]
[2005.12.30-18:15][23579][./custom/bruit_graph.png]

With this format it's easy to sort by last modification.

- TREE is great, but sometimes dates aren't well displayed.
- LS is nice too, but I can't find a parameter to display the fullpath for each files on one line like TREE with the recursive option.

Please can you help me ?

Thanks you for your help !

RB

Hko · 01-11-2006, 06:56 AM

I think this comes quite close:
(only time is more verbose than what you're asking for)

Code:

find /your/path | xargs stat -c '[%y][%s][%n]'

See "man stat" for more possibilities.

raf_iso · 01-11-2006, 07:25 AM

yes Thanks you !

kyriakos · 01-11-2006, 07:24 PM

you can always use the locate command in linux. but first make sure you updatedb

raf_iso · 01-11-2006, 10:09 PM

Your code is working, but refuse to run with long filnames, directores with spaces and stuff like that.

Code:

[root@fileserver _array]# find . | xargs stat -c '[%y][%s][%n]'
xargs: unmatched single quote; by default quotes are special to xargs unless you use the -0 option
[root@fileserver _array]#

I tried to play with the xags -0 but I can't run it. May be do you know a tip or something for this problem ?

Thanks again!

dustu76 · 01-12-2006, 08:41 AM

My feeble attempts at perl:

Code:

#!/usr/bin/perl

# Output line format : YYYY.MM.DD-HH:MM][SIZE][FULLPATH]

use strict;
use File::Find;

die "Usage : $ARGV[0] <dir1> <dir2> ...\n"
        unless (@ARGV);

foreach my $path (@ARGV) {
        next unless -d $path;
        find(\&lmod, $path);
}

sub lmod() {
        my ($mtime, $size) = (stat($File::Find::name))[8,7];
        my ($ss, $min, $hh, $dt, $mo, $yy) = (localtime($mtime))[0,1,2,3,4,5];
        printf("[%02d.%02d.%02d-%02d:%02d][%d][%s]\n",
                ($yy += 1900), $mo++, $dt, $hh, $min, $size, $File::Find::name);
}

HTH

Hko · 01-12-2006, 08:55 AM

Quote:

Originally Posted by raf_iso

Your code is working, but refuse to run with long filnames, directores with spaces and stuff like that
[..snip..]
I tried to play with the xags -0 but I can't run it. May be do you know a tip or something for this problem ?

You're right. The command line I posted doesn't handle correctly file/dirs with spaces, newlines, or other "strange" characters in the name.

"xargs -o stat ..." should solve the problem though, but be sure to use the "-print0" option with "find" in that case:

Code:

find /your/path -print0 | xargs -0 stat -c '[%y][%s][%n]'

raf_iso · 01-12-2006, 11:09 AM

Wow Thanks You All !!!!!