Batch renomeia de acordo com o número de páginas no arquivo pdf

Question

Eu tenho um monte de artigos em arquivos pdf (e também outros tipos de arquivos na mesma pasta). Eu gostaria de renomeá-los usando o padrão

<current file name>[<number of pages>].pdf

Mas depois de algumas tentativas, recebi vários nomes de arquivos errados com um número duplicado de páginas no final. Por exemplo,

Madsen - Categorical[48][48].pdf

Então, eu gostaria de:

1. Limpe todos os nomes de arquivos removendo (se) qualquer ocorrência de números entre parênteses no final. Por exemplo, o arquivo acima deve ser renomeado para

Madsen - Categorical.pdf

2. Renomeie todos os arquivos apenas inserindo [<number of pages>] no final.

O [<number of pages>] deve ser lido no arquivo pdf, pois não tenho essa informação.

    

Answer 1

Então, aqui estão dois scripts, que você pode colocar em uma pasta com os arquivos pdf precisando ser renomeado.

O primeiro é para adicionar números de página e o segundo é para excluir eles. Ambos os scripts são interativos

• Digite abort Enter para sair do script,
• digite n Digite para entrar no modo interativo arquivo por arquivo
• e se você quiser que um script prossiga com todos os pdfs sem confirmação , digite y Digite y Enter .

O script para adicionar o número de páginas em file.pdf (file.pdf - > file [N] .pdf)

#!/bin/bash

IFS='
'
ret="not_ok";

renameinteractively () {
for file in *.pdf ; do 
  # derive number of pages in a pdf document
    npages='pdfinfo $file | grep Pages | awk -e '{print $2}'';
  # make up a new filename
    file2=${file%%.pdf}[$npages].pdf;
  # an auxiliary variable
    ret="not_ok";

  # interactive part. Ask to rename or not.
    printf "Rename\n $file to \n $file2 ? (y/n/abort) \n";
    until [ $ret == 'ok' ]; do
  # read your answer and y-for rename, n-skip and abort-to exit
      read ans;
      if [ $ans == "y" ]
      then 
          mv $file $file2;
          ret="ok";
          continue;
      elif [ $ans == "n" ]
      then 
          ret="ok";
          break;
      elif [ $ans == "abort" ]
      then 
          exit;
      else
          printf "Enter 'y', 'n' or 'abort', please! \n\n";
      fi
      done;
  done ;
}

renameallofthem () {
until [ $ret == 'ok' ]; do
      if [ $a == "y" ]
      then 
    for file in *.pdf ; do 
      npages='pdfinfo $file | grep Pages | awk -e '{print $2}'';
      mv $file ${file%%.pdf}[$npages].pdf; 
      printf "\nMoved \n"
      echo $file
      printf "to\n"
      echo ${file%%.pdf}[$npages].pdf
    done ;
    ret="ok";
    exit;
      elif [ $a == "n" ]
      then 
    printf "\n\n OK, let's do it interactively!\n\n"
    renameinteractively;
      elif [ $a == "abort" ]
      then 
    exit;
      else
    printf "Enter 'y', 'n' or 'abort', please! \n\n";
      fi;
done;
}

printf "Rename ALL of the .pdf files in current folder? (y/n/abort) \n"
read a
if [ $a == "y" ]
then
      printf "Really??\n\n Do we rename ALL of them? (y/n/abort) \n"
      read a
      renameallofthem;
elif [ $a == "n" ]
then 
  printf "\n\n OK, let's do it interactively!!\n\n"
  renameinteractively;
elif [ $a == "abort" ]
then 
    exit;
else
    printf "Enter 'y', 'n' or 'abort', please! \n\n";
fi

O script para remover o número de páginas do arquivo [N] [N] .... [N] .pdf (arquivo [N] [N] .... [N] .pdf - > file.pdf )

#!/bin/bash

IFS='
'
deleteNumbersInteractively () {
for file in 'ls *].pdf | grep '\[[0-9]*\]'' ; do 
# an auxiliary variable
  ret="not_ok";
# make up a new filename
  file2='echo $file | sed -e 's/\[[0-9]\+\]//g' ';
# interactive part. Ask to rename or not.    
  printf "Rename\n $file to \n $file2 ? (y/n/abort) \n";
  until [ $ret == 'ok' ]; do
      read ans;
      if [ $ans == "y" ]
      then 
      mv $file $file2;
      ret="ok";
      continue;
      elif [ $ans == "n" ]
      then 
      ret="ok";
      continue;
      elif [ $ans == "abort" ]
      then 
      exit;
      else
      printf "Enter 'y', 'n' or 'abort', please! \n\n";
      fi
  done;
done;
}
deleteAllTheNumbers () {
until [ $ret == 'ok' ]; do
      if [ $a == "y" ]
      then 
    for file in *.pdf ; do 
      file2='echo $file | sed -e 's/\[[0-9]\+\]//g' ';
      mv $file $file2; 
      printf "\nMoved \n"
      echo $file
      printf "to\n"
      echo $file2
    done ;
    ret="ok";
    exit;
      elif [ $a == "n" ]
      then 
    printf "\n\n OK, let's do it interactively!\n\n"
    deleteNumbersInteractively;
      elif [ $a == "abort" ]
      then 
    exit;
      else
    printf "Enter 'y', 'n' or 'abort', please! \n\n";
      fi;
done;
}


printf "Delete ALL of the filename[NUMBERS].pdf from files in current folder? (y/n/abort) \n"
read a
if [ $a == "y" ]
then
      printf "Really??\n\n Do we rename ALL of them? (y/n/abort) \n"
      read a
      deleteAllTheNumbers;
elif [ $a == "n" ]
then 
  printf "\n\n OK, let's do it interactively!!\n\n"
  deleteNumbersInteractively;
elif [ $a == "abort" ]
then 
    exit;
else
    printf "Enter 'y', 'n' or 'abort', please! \n\n";
fi

Está tudo bem agora?

    

Answer 2

Aqui está uma maneira simples, que aborda completamente a sua pergunta original. Poderia ser feito como um one-liner, mas esta sintaxe o mantém legível.

#!/bin/bash
for F in "$@"
do
echo mv "$F" "${F%.pdf}[$(pdfinfo "$F" | awk '/^Pages/{print $NF}')].pdf"
done

$ ls *pdf
aosa-bash.pdf  article.pdf  bash.pdf  bashref.pdf  rose94.pdf
$ find . -name \*.pdf -exec ./pdf.sh {} +
mv ./article.pdf ./article[11].pdf
mv ./bashref.pdf ./bashref[172].pdf
mv ./bash.pdf ./bash[75].pdf
mv ./aosa-bash.pdf ./aosa-bash[14].pdf
mv ./rose94.pdf ./rose94[13].pdf
$

Se estiver satisfeito com as renomeações propostas, cole todos os comandos mv em uma janela do shell ou revise o script, substituindo o echo mv por simplesmente mv .