#!/bin/awk -f

# 13-X-97 (c) Esteban Manchado 'ZoSo'
# Como siempre, no soy responsable de lo que le pueda pasar a tu ordenador
# utilizando este script, y menos modificaciones de este no hechas por mi,
# aunque en un principio, que yo sepa, es inofensivo

# Script de awk que busca en todos los ficheros de entrada la palabra
# que se pase al script como ULTIMO parametro

BEGIN {
	if (ARGC == 1) {
		print "Script awk 'busca'. Busca una palabra en la entrada"
		print "ERROR: Se necesita al menos un parametro"
		print "SINTAXIS: busca [<fich1> <fich2> ...] <palabra_a_buscar>"
		exit
	}

	patron = ARGV[ARGC-1]
	# Ponemos el patron de busqueda en una variable, para mayor
	# legibilidad del codigo del programa
	ARGC--
	# Reducimos el numero de los argumentos en uno, para que el ultimo
	# argumento no se coja como fichero de entrada, sino que lo podamos
	# coger nosotros como la palabra a buscar
}

$0 ~ patron {
	printf("en '%s':\n%s\n", FILENAME, $0)
}