zsh: array shuffle function

Descrição

Versões atualizadas deste script

Versão 2 enviada por Sandro Marcell em 25/03/2010

Changelog: Implementação via algoritmo Knuth-shuffle.

Download zsh_knuth_shuffle

Esconder código-fonte

function shuffle
{
   # Funcao que embaralha os elementos de um vetor.
   # Implementado e testado sob o zsh-4.3.2
   # Sandro Marcell <sandro_marcell@yahoo.com.br>
   # Boa Vista, Roraima - 10/05/2009

   # Executavel somente no zsh!
   [ ! $ZSH_VERSION ] && return 1 

   RANDOM=$$
   
   # Definindo variaveis locais e seus tipos:
   local i array shuffled size index
   integer i size index
   typeset -a array shuffled
   
   array=($*) # Limitado a 32767 elementos, devido a $RANDOM
   
   # Determinando a quantidade de elementos no vetor.
   size=${(w)#array}
   ((size > 32767)) && {
      print "Ops! vetor excessivamente grande."
      return 1
   }
   
   while ((i++ < size))
   do
      # Gera-se um valor com base no tamanho do vetor.
      # Esse valor sera utilizado como indice, para
      # referenciar elementos no proprio vetor.
      index=$((1 + (${(w)#array} * RANDOM / 32767)))
      
      # Utilizando-se o indice gerado, armazena-se 
      # o elemento por ele referenciado em 'shuffled'.
      shuffled+=($array[$index])
      
      # Para evitar que elemento armazenado seja reutilizado
      # basta remove-lo de 'array'.
      array[$index]=()
   done
   
   [ -n "$shuffled[*]" ] && print "$shuffled[*]" || return 1
}