#!/bin/sh

die() {
    echo "$1"
    exit 1
}

realfilename() {
    original_filename=$1
    while true
    do
        link_filename=$(readlink "$original_filename")
        if [ $? != 0 ]; then
            echo "$original_filename"
            return
        fi
        case $link_filename in
            ../* )
                original_filename=$(dirname "$original_filename")/$link_filename;;
            * )
                original_filename=$link_filename;;
        esac
    done
}

file=$(dirname "$(dirname "$(realfilename "$0")")")/share/refranero/refranes.txt
[ -f "$file" ] || die "El archivo '$file' no existe"

nlines=$(wc -l "$file" | cut -d' ' -f1)
awk 'BEGIN {srand(); n = int(rand()*'"$nlines"') } (NR == n) {print}' "$file"
