Início / unix / Perguntas / 450378
Accepted
Pratik Mayekar
Asked: 2018-06-18 22:04:14 +0800 CST

Existem alternativas ao comando `find` no linux para SunOS?

  • 772

O findcomando no Linux tem muitas opções em comparação com o findcomando no SunOS ou Solaris.

Eu quero usar o findcomando assim:

find data/ -type f -name "temp*" -printf "%TY-%Tm-%Td %f\n" | sort -r

Funciona perfeitamente bem em uma máquina Linux, mas o mesmo comando não tem a opção -printfem uma máquina SunOS. Eu quero personalizar minha saída no "%TY-%Tm-%Td %f\n"formato.

Por favor, sugira quaisquer alternativas para o SunOS.

shell-script find

2 respostas

  1. Best Answer

    Note que não tem nada a ver com Linux; esse -printfpredicado é específico para a implementação GNU do find. Linux não é um sistema operacional, é apenas o kernel encontrado em vários sistemas operacionais. Enquanto a maioria desses sistemas operacionais costumava usar uma área de usuário GNU no passado, agora a grande maioria dos sistemas operacionais que usam Linux são incorporados e possuem comandos básicos, se houver algum.

    O comando GNU find, que é anterior ao Linux, pode ser instalado na maioria dos sistemas operacionais do tipo Unix. Certamente foi usado no Solaris (chamado SunOS na época) antes do lançamento do Linux.

    Atualmente, está disponível até como pacote Oracle para Solaris. No Solaris 11, isso está em file/gnu-findutils, e o comando é nomeado gfind(para GNU find, para distingui-lo do comando do próprio sistema find).

    Agora, se você não pode instalar pacotes, sua melhor aposta é provavelmente usar perl:

    find data/ -type f -name "temp*" -exec perl -MPOSIX -le '
  for (@ARGV) {
    unless(@s = lstat($_)) {
      warn "$_: $!\n";
      next;
    }
    print strftime("%Y-%m-%d", localtime($s[9])) . " $_";
  }' {} + | sort -r

    Aqui, ainda estamos usando find(implementação do Solaris) para encontrar os arquivos, mas estamos usando seu -execpredicado para passar a lista de arquivos para perl. E perlfaz um lstat()em cada um para recuperar os metadados do arquivo (incluindo o tempo de modificação como o 10º elemento ( $s[9])), interpreta-o no fuso horário local ( localtime()) e formata-o ( strftime()) que é então printao lado do nome do arquivo ( $_é a variável do loop se none é especificado em perl, e $!é o equivalente a stderror(errno), o texto de erro da última falha de chamada do sistema).

    • 21

  2. Outra maneira de abordá-lo é com o find2perlscript, que converte (aqui, um subconjunto) de um findcomando em um script perl correspondente. O script perl usa um File::Findmódulo para fazer o trabalho pesado. Como o script find2perl no meu sistema não suportava o -printfpredicado, adicionei-o manualmente:

    #! /usr/bin/perl -w

use strict;
use File::Find ();

use vars qw/*name *dir *prune/;
*name   = *File::Find::name;
*dir    = *File::Find::dir;
*prune  = *File::Find::prune;

sub wanted {
    my ($dev,$ino,$mode,$nlink,$uid,$gid, $mtime, $year, $month, $day);

    if ((($dev,$ino,$mode,$nlink,$uid,$gid,undef,undef,undef,$mtime) = lstat($_)) &&
    -f _ &&
    /^temp.*\z/s) {
        (undef, undef, undef, $day, $month, $year) = localtime($mtime);
        $year += 1900;
        $month++;
        printf "%d-%d-%d %s\n", $year, $month, $day, $_;
    }
}

File::Find::find({wanted => \&wanted}, 'data/');
exit;

    Em dois arquivos de amostra que criei, a saída é a mesma:

    $ tree data
data
├── subdir
│   └── foo
│       └── temp2
└── temp1

2 directories, 2 files

$ touch -d 2018-06-20 data/subdir/foo/temp2
$ touch -d 2018-05-19 data/temp1

$ find data/ -type f -name "temp*" -printf "%TY-%Tm-%Td %f\n" | sort -r
2018-06-20 temp2
2018-05-19 temp1

$ ./perlfind | sort -r
2018-06-20 temp2
2018-05-19 temp1
    • 0

relate perguntas