VHDL
VHDL
VHDL
html
Una Matriz Genérica Programable (GAL, Generic Array Logic) es una denominación que
utilizaba originalmente Lattice Semiconductor y que más tarde se licenció a otros
fabricantes. Un GAL en su forma básica es un PLD con una matriz AND reprogramable,
una matriz OR fija y una lógica de salida programable mediante una macrocelda. Esta
estructura permite implementar cualquier función lógica como suma de productos con un
numero de términos definido.
1.2 CPLD
enlazada hacia cualquier bloque lógico. Sin embargo, el uso de grandes multiplexores
incrementa el tamaño de dispositivo y reduce su desempeño.
Un bloque lógico es similar a un PLD, cada uno pose un arreglo de compuertas AND y OR
en forma de suma de productos, una configuración para la distribución de estas sumas de
productos, y macroceldas. El tamaño del bloque lógico es una medida de la capacidad del
CPLD, ya que de esto depende el tamaño de la función booleana que pueda ser
implementada dentro del bloque. Los bloques lógicos usualmente tienen de 4 a 20
macroceldas.
Existen pequeñas diferencias en cuanto a las matrices de productos, esto dependerá del
CPLD y del fabricante. Obviamente el tamaño de las sumas sigue siendo el factor más
importante para la implementación de funciones booleanas. Cada fabricante distribuye los
productos de diferente forma. La familia MAX de CPLDs fue desarrollada por Cypress
Semiconductor junto con Altera Corporation, siendo los primeros en sacar al mercado unan
familia de CPLDs. Altera la llamó MAX5000 y Cypress por su parte la clasificó como
MAX340. En un dispositivo como el 22V10 tenemos que la suma de productos es fija por
cada macrocelda - 8, 10, 12, 14 o 16 -, en la familia MAX se colocan 4 productos por
macrocelda los cuales pueden ser compartidos con otras macroceldas. Cuando un producto
puede ser únicamente utilizado por una macrocelda se le conoce como termino - producto
dirigido, y cuando estos pueden ser utilizados por otras macroceldas se le llama termino -
producto compartido. Mediante estos productos compartidos se mejora la utilización del
dispositivo, sin embargo, esto produce un retardo adicional al tener que retroalimentar un
producto hacia otra macrocelda y con esto disminuye la velocidad de trabajo del circuito.
La forma en que son distribuidos los productos repercute en la flexibilidad que proporciona
el dispositivo para el diseñador. Además, que estos esquemas proporcionan también
flexibilidad para los algoritmos del programa de síntesis que es el que finalmente selecciona
la mejor forma en que deben ser distribuidas las funciones booleanas en el dispositivo.
1.2.4 Macroceldas
Las macroceldas de un CPLD son similares a las de un PLD. Estas también están provistas
con registros, control de polaridad, y buffers para salidas en alta impedancia. Por lo general
un CPLD tiene macroceldas de entrada/salida, macroceldas de entrada y macroceldas
internas u ocultas (buried macrocells), en tanto que un 22V10 tiene solamente
macroceldas de entrada/salida. Una macrocelda interna es similar a una macrocelda de
entrada/salida, sólo que esta no puede ser conectada directamente a un pin de salida. La
salida de una macrocelda interna va directamente a la matriz de interconexión
programable. A continuación se muestra la estructura básica de las macroceldas de
entrada/salida y macroceldas ocultas para dispositivos de la familia FLASH 370 de Cypress
Semiconductors.
Las macroceldas de entrada, como la que se muestra en la siguiente figura, son utilizadas
para proporcionar entradas adicionales para las funciones booleanas. En el diagrama se
muestra la macrocelda de entrada de la familia FLASH 370. En general las macroceldas de
entrada incrementan la eficiencia del dispositivo al ofrecer algunos registros adicionales
con los que se pueden almacenar el valor del pin de entrada, lo cual puede ser útil al
momento de obtener las funciones booleanas.
En la figura 1.7 se puede apreciar una celda de entrada/salida, que bien podría considerarse
parte del bloque lógico, pero no necesariamente tienen que estar a la salida de un bloque
lógico. La función de una celda de entrada/salida es permitir el paso de una señal hacia
dentro o hacia el exterior del dispositivo. Dependiendo del fabricante y de la arquitectura
del CPLD estas celdas son pueden ser consideradas o no consideradas parte del bloque
lógico.
1.3 FPGA
Cada celda lógica es similar a los bloques lógicos de un CPLD. La estructura de las celdas
lógicas y las formas en que estas pueden ser interconectadas, tanto salidas como entradas
de la celda, varían de acuerdo al fabricante. En general una celda lógica tiene menos
funcionalidad que la combinación de sumas de productos y macroceldas de un CPLD, pero
como cada FPGA tienen una gran cantidad de celdas lógicas es posible implementar
grandes funciones utilizando varias celdas lógicas en cascada.
Además de las celdas lógicas también es importante la tecnología utilizada para crear las
conexiones entre los canales, las más importantes son las siguientes.
ANTIFUSE
Al igual que la tecnología PROM son programables una sola vez y utilizan algo similar a un
fusible para realizar las conexiones, una vez que es programado éste ya no se puede
recuperar. Al contrario que un fusible normal, estos anti - fusibles cuando son
programados producen una conexión entre ellos por lo que normalmente se encuentran
abiertos. La desventaja es que no son reutilizables pero por el contrario disminuyen
considerablemente el tamaño y costo de los dispositivos.
SRAM
Celdas SRAM son implementadas como generadores de funciones para simular lógica
combinacional y, además, son usadas para controlar multiplexores e interconectar las
celdas lógicas entre si (similar a un CPLD).
El proceso de diseño implementando VHDL se puede resumir en los siguientes seis pasos.
4. Síntesis
Síntesis consiste en reducir una descripción de alto nivel abstracción a un nivel de
compuerta que pueda ser implementado en el circuito. Dicho de otra manera, síntesis es el
proceso mediante el cual una descripción es convertida en un listado de conexiones
(netlist) entre las compuertas, registros, multiplexores, etc. de un CPLD o FPGA. Por
ejemplo, al igual que en el caso de una compuerta XOR, una instrucción IF puede ser una
compuerta AND, o una OR, o toda una función que involucre diferentes tipos de
componentes.
El proceso de síntesis depende del dispositivo utilizado. Por lo general una misma función
es implementada de diferentes formas de acuerdo al dispositivo que estemos utilizando,
esto no cambia para nada la descripción original por lo que el circuito trabajará igual en
cualquier componente seleccionado. Pero el componente seleccionado si afecta la
frecuencia máxima de trabajo del circuito descrito. El proceso utilizado para sintetizar un
código en un CPLD es conocido como Fitting o ajuste y consiste en tratar de acomodar las
ecuaciones booleanas en los diferentes bloques lógicos. Cuando se utiliza un FPGA el
proceso empleado se le llama Place and Route y consiste en adecuar las ecuaciones a
través de varias celdas lógicas. Aunque la finalidad es la misma, la manera en que se
sintetiza un código en un CPLD es totalmente distinta que cuando se utiliza un FPGA. Por
otro lado la optimización de la conversión del código en VHDL a ecuaciones booleanas
depende de tres cosas: la descripción del circuito, los recursos disponibles en el dispositivo
seleccionado, y las directivas de síntesis seleccionadas por el usuario.
La descripción es el punto más importante porque de esto depende los otros dos. En la
descripción no solamente tenemos que "decir" como funciona el circuito, además, debemos
describir en que forma debe de hacerlo. No es lo mismo describir un sumador de 4 bits
utilizando 4 bloques que van haciendo la suma por partes a describir un circuito que hace
todo a la vez. Finalmente suman pero no lo hacen igual. Los recursos por otro lado tienen
que ver en el que una función pueda o no ser implementada en el componente. Por
ejemplo, un contador de 4 bits con reset asíncrono no puede ser implementado en 16V8
porque el registro de la macrocelda de salida del dispositivo no tiene una entrada asíncrona
de reset. Las directivas de síntesis afectan el proceso de obtención de las ecuaciones.
Algunas de estas directivas son: sintetizar para maximizar velocidad, sintetizar para
optimizar el área, y algunas que son descritas en el mismo código, como por ejemplo
obligar a que un nodo no sea simplificado y pueda ser sintetizado a la salida de una
macrocelda. Cuando se sintetiza para maximizar la frecuencia generalmente quedan
funciones con varios términos e incluso hay términos que se repiten en las ecuaciones de
los nodos de salida pero esto se hace para evitar la retroalimentación. En general estas
restricciones afectan directamente el proceso para obtener las ecuaciones.
Figura 3.1
ENTITY comparador IS
y: IN bit_vector ( 3 DOWNTO 0 ) ;
END comparador ;
BEGIN
END arch_comparador ;
Las descripciones en VHDL son creadas a partir de dos estructuras que son fundamentales
para el lenguaje: la entidad y la arquitectura. Básicamente la entidad es la estructura en la
que se define cuales son las entradas y salidas del circuito que deseamos representar, la
cual podemos asociar con una "caja" en la que se que describen las interfaces de
comunicación con el exterior, siendo la arquitectura donde se define el comportamiento
interno de esa "caja".
Nótese que en la primera declaración de puertos, dentro de la entidad del comparador, se
definen 2 bus de entrada de 4 bits de magnitud (x, y), en cambio las salidas son de 1 bit. En
la entidad lo único que hacemos es describir como es el circuito, o aquello del circuito que
permite a la entidad comunicarse hacia otras entidades, sin mencionar para nada su
comportamiento interno. Es en la arquitectura, después del BEGIN, donde se realiza la
descripción del comportamiento del circuito.
Haciendo una comparación con un lenguaje de programación de alto nivel podemos ver
que el código es similar en cuanto a las sentencias utilizadas, pero no es así en el flujo de
ejecución de las instrucciones. Un código de programación en VHDL no es precisamente
un "programa", ya que un programa es un conjunto de instrucciones que se ejecutan paso a
paso para llevar a cabo una tarea determinada, y en este caso no podemos decir que las
instrucciones se estén ejecutando de esta manera, porque esto no corresponde en la
realidad al comportamiento de un circuito. En VHDL las instrucciones se están ejecutando
en todo momento lo cual sí se asemeja al comportamiento real de un circuito, en este caso
de un comparador. Así cuando cambie algún bit de entrada cambiará inmediatamente la
salida y, por consiguiente, estamos describiendo cual es el verdadero funcionamiento del
circuito.
La forma en que se "programa" en VHDL al principio resultará un tanto extraña, pero si
asociamos éste código con el circuito que estamos describiendo, podemos darnos cuenta
que en él los componentes siempre están activos, y es esto es precisamente lo que
describimos mediante VHDL.
Alguna vez hemos utilizado Pspice o algún programa de entrada esquemática de diseño
para modelar y simular circuitos, estos también son para la descripción de circuitos. En
Pspice la descripción se realiza mediante un listado de conexiones (netlist) entre los
componentes, en tanto que en los otros lo hacemos de manera gráfica, y en ambos se
considera que todos los componentes siempre están funcionando para que la simulación o
modelado del diseño sea de acuerdo a la realidad. Por esto en VHDL el orden de las
instrucciones no es tan importante como en el caso de un lenguaje de programación de
software, porque las instrucciones siempre se están ejecutando y así sí se modela
adecuadamente un circuito.
Otro punto importante es el dispositivo lógico programable que estemos utilizando, ya que
si éste no tiene la capacidad para realizar lo que "dice" nuestra descripción, nunca
podremos sintetizar el código. Por ejemplo, si en el dispositivo que usemos no es posible
que las salidas puedan ser programadas para que estén en alta impedancia, aún y cuando la
descripción sea correcta nunca podremos sintetizarla en el dispositivo.
Al principio generalmente se comete el error de tratar de "programar" como si fuera C++,
Pascal, Visual Basic o cualquier otro lenguaje de programación de software, además de
olvidar que el PLD, CPLD, o FPGA que utilicemos tiene características propias que deben
ser consideradas cuando se hace la descripción.
Posteriormente se explicarán los tipos de instrucciones y sus diferencias, ya que VHDL si
permite la programación "secuencializada" de instrucciones dentro una estructura llamada
PROCESS. Dentro de esta estructura las instrucciones se ejecutan "paso a paso" como en
los lenguajes de programación de software. Pero de cualquier manera esta estructura
siempre esta activa, como si fuera un componente o subcircuito del diseño, por lo que todo
lo que se obtenga dentro del proceso se ejecutará al mismo tiempo que el resto de las
instrucciones que están fuera de esta estructura.
3.2 Identificadores
VHDL permite la utilización de las letras mayúsculas (A.. Z), minúsculas (a....
z), dígitos (0...9), y el carácter de subrayado (_).
El primer caracter de un identificador debe ser una letra.
El ultimo caracter de identificador no puede ser el caracter de subrayado.
Además, el caracter de subrayado no puede aparecer dos o más veces
consecutivas.
Mayúsculas y minúsculas son consideradas idénticas. Así, Signal_A, signal_a, y
SIGNAL_A se refieren al mismo identificador.
Los comentarios en VHDL comienzan con dos guiones consecutivos (--), y se
extienden hasta el final de la línea. Los comentarios pueden aparecer en
cualquier lugar dentro de una descripción en VHDL.
VHDL define un grupo de palabras reservadas, llamadas "palabras clave"
(keywords), las cuales no pueden ser usadas como identificadores.
EJEMPLOS
-- Este es un comentario.
Mi_entidad
Mux4a2
TTL_7490
-- con un dígito
-- de subrayado seguidos
-- válido
Un objeto de datos en VHDL es un elemento que toma un valor de algún tipo de dato
determinado. Según sea este tipo de dato, el objeto poseerá un conjunto de propiedades
que se le podrán aplicar, como las operaciones en las que el objeto puede ser usado. En
VHDL los objetos de datos son generalmente de una de tres clases: constantes, variables o
señales.
3.3.1 Constantes
Una constante es un elemento que puede tomar un único valor de un tipo dado. A las
constantes se les debe asignar un valor en el momento de la declaración. Una vez que se le
ha asignado algún valor, éste no puede ser cambiado dentro de la descripción del diseño.
Las constantes pueden ser declaradas dentro de las entidades, arquitecturas, procesos o
paquetes. Las constantes que se declaren en un paquete pueden ser utilizadas en cualquier
descripción en la que se este utilizando dicho paquete. Por otra parte las constantes
declaradas dentro de una entidad pueden ser utilizadas por la o las arquitecturas en las que
se este haciendo la descripción de dicha entidad, y aquellas constantes que sean declaradas
dentro de una arquitectura o proceso, son validas únicamente dentro de la estructura
correspondiente.
DECLARACIÓN DE CONSTANTES
[]: opcional
EJEMPLO
3.3.2 Variables
Los objetos de datos de la clase variable son similares a las constantes, con la diferencia
que su valor puede ser modificado cuando sea necesario. Las variables en VHDL son
similares a cualquier tipo de variable de un lenguaje de programación de alto nivel. A las
variables también se les puede asignar un valor inicial al momento de ser declaradas. Se
utilizan únicamente en los procesos y subprogramas (funciones y procedimientos). Las
variables generalmente se utilizan como índices, principalmente en instrucciones de bucle,
o para tomar valores que permitan modelar componentes. Las variables no representan
conexiones o estados de memoria.
DECLARACIÓN DE VARIABLES
EJEMPLO
3.3.3 Señales
Un objeto de la clase señal es similar a un objeto de la clase variable, con una importante
diferencia: las señales si pueden almacenar o pasar valores lógicos, mientras que una
variable no lo puede hacer. Las señales, por lo tanto, representan elementos de memoria o
conexiones y si pueden ser sintetizadas.
Los puertos de una entidad son implícitamente declarados como señales en el momento de
la declaración, ya que estos representan conexiones. También pueden ser declaradas en las
arquitecturas antes del BEGIN, lo cual nos permite realizar conexiones entre diferentes
DECLARACIÓN DE SEÑALES
EJEMPLOS
3.3.4 Alias
DECLARACIÓN DE ALIAS
EJEMPLO
Un tipo de dato especifica el grupo de valores que un objeto de datos puede tomar así
como las operaciones que son permitidas con esos valores. En VHDL es sumamente
importante el tipo de dato, los objetos de datos no pueden tomar o no se les puede asignar
un objeto de datos de otro tipo, y no todas las operaciones se pueden utilizar con los
diferentes tipos de datos a menos que se utilicen las librerías adecuadas en las que estén
definidas funciones para la conversión de tipos.
Además, es posible que el usuario defina subtipos y tipos compuestos, modificando los
tipos básicos, así como definir tipos particulares con combinaciones de los diferentes tipos.
A continuación se discutirán las dos categorías de tipos de datos más utilizadas en síntesis:
escalares y compuestos.
Los tipos escalares tienen un orden especifico lo cual permite que sean usados con
diferentes operadores. Existen 4 clases de tipos escalares: enteros, reales o de punto
flotante, enumerados, y físicos.
Entero
VHDL permite especificar la gama del entero (integer) de manera diferente. Sin embargo,
la gama debe extender desde por lo menos -(2**31-1) a +(2**31-1), o - 2147483648 a
+2147483647. Una señal o variable que sea del tipo entero y que tenga que ser sintetizada
en elementos lógicos, debe ser limitada con un rango.
EJEMPLO
Real
El rango de valores que puede tomar este tipo de dato se encuentra entre -1.038E38 a
+-1.038E38. El Real rara vez es usado en síntesis y en la mayoría de las herramientas de
software de VHDL para síntesis no es posible utilizar este tipo de dato.
Tipos Enumerados
Un tipo enumerado es un tipo de dato con un grupo de posibles valores asignados por el
usuario. Los tipos enumerados se utilizan principalmente en el diseño de maquinas de
estado.
El orden en el que los valores son listados en la declaración del tipo enumerado define el
orden léxico para ese tipo.
EJEMPLOS
En este ejemplo se define un tipo enumerado llamado aritmetico, y los posibles valores son
add, sub, mul, y div.
Ahora se definió un tipo enumerado llamado estados, con 4 posibles valores: estado0,
estado1, estado2 y estado3.
Existen varios tipos de datos (algunos predefinidos en los programas de síntesis) para el
lenguaje pero generalmente los siguientes tipos enumerados son los más comúnmente
utilizados para síntesis de circuitos.
boolean
bit
std_logic
Boolean
Los objetos de datos de este tipo pueden tomar los valores de falso o verdadero (TRUE,
FALSE).
Bit
Los objetos de este tipo pueden tomar los valores de '0' y '1'. El que estén entre comillas
simples es para indicar que son bits y no los números enteros 0 y 1.
std_logic
El tipo std_logic es similar al tipo bit pero con la excepción que éste no esta definido
dentro del lenguaje. El paquete std_logic_1164 de la IEEE define al std_logic como un tipo
de dato el cual puede tomar los valores 'U', 'X', '0', '1', 'Z', 'W', 'L', 'H', '-'.
Los valores '0', '1', 'L' y 'H', se utilizan en síntesis de circuitos, los valores 'Z' y '-' tienen
restricciones sobre como y donde pueden ser usados. Los valores 'U', 'W' y 'X' se utilizan
únicamente para simulación y evaluación de diseños mas no para síntesis. Para la mayoría
de los diseños se utiliza este tipo de dato ya que es más completo que el tipo bit por
proporcionar los valores 'Z' y '-'.
Tipos Físicos
Los tipos físicos son usados para especificar unidades de medida, ya sea de tiempo o para
determinar medidas eléctricas. El único tipo predefinido es el time, mediante el cual se
pueden establecer medidas para simular los retardos de tiempo o para generar diferentes
señales que nos permitan simular nuestro diseño.
La unidad básica del tipo time es el femtosegundo, y de éste se forman diferente múltiplos.
UNITS
fs ;
ps = 1000 fs ;
ns = 1000 ps ;
us = 1000 ns ;
ms = 1000 us ;
sec = 1000 ms ;
min = 60 sec ;
hr = 60 min ;
END UNITS ;
Los tipos físicos no tienen ningún significado en síntesis, sólo son utilizados para
simulación de circuitos.
Un tipo compuesto es un tipo de dato formado con elementos de otros tipos. Existen dos
formas de tipos compuestos: ARRAYS y RECORDS.
elemento: tipo_de_dato ;
[;elemento: tipo_de_dato...] ;
END RECORD ;
Un arreglo es un objeto de datos que consiste en una "colección" de elementos del mismo
tipo. Los arreglos pueden ser de una o más dimensiones. Los elementos individuales de un
arreglo pueden ser utilizados especificando un valor dentro del arreglo. Elementos
múltiples de un arreglo pueden ser utilizados especificando más valores.
Un registro es un objeto de datos que consiste en una "colección" de elementos de
diferentes tipos. La estructura RECORD en VHDL es análoga a los records utilizados en
Pascal o a las estructuras en C. Los campos individuales de un RECORD pueden ser
utilizados usando los nombres de los elementos. También se puede utilizar más de un
campo.
EJEMPLOS
-- mensaje1
-- de mensaje1
-- de arreglo_matriz a un elemento de
-- std_logic_vector
operador: operacion ;
op1: integer ;
op2: integer ;
END RECORD ;
Aquí está la declaración de dos objetos usando la declaración del tipo RECORD anterior.
-- RECORD instruccion1
-- instruccion2
instruccion1.op1 := instruccion2.op2 ;
instruccion2 := instruccion1 ;
A continuación se exponen los tipos compuestos que son comúnmente utilizados en síntesis
de circuitos utilizando VHDL.
bit_vector signed
std_logic_vector unsigned
Bit_Vector
El tipo bit_vector es arreglo del tipo bit, en orden ascendente o descendente. Un bit_vector
se declara como se muestra a continuación.
ORDEN ASCENDENTE
ORDEN DESCENDENTE
Los valores asignados al tipo bit_vector deben ser especificados con comillas dobles (" ") y
los valores asignados al tipo bit simple son asignados con comillas simples (' ').
El prefijo 'X' o 'x' denota un valor hexadecimal; los prefijos 'O' y 'o' denotan un valor octal;
el prefijo 'B' o 'b' denota un valor binario. Si ningún prefijo es especificado, se asume el
prefijo binario.
Las asignaciones en hexadecimal y octal deben usarse únicamente si el valor puede
combinarse directamente con el tamaño del vector. Por ejemplo, sí 'a' es un bit_vector ( 0
TO 6 ), entonces la asignación a <= x"B", no podrá hacerse porque el numero hexadecimal
'B' usa cuatro de bits y no equipara el tamaño del vector al que está siendo asignado.
EJEMPLOS
x1 <= "0001" ;
std_logic_vector
signed y unsigned
El estándar 1076.3 de la IEEE es un paquete para VHDL en el cual se definen nuevos tipos
de datos además de funciones aritméticas y lógicas para ser utilizadas por herramientas de
síntesis. Éste define dos paquetes: el numeric_std y el numeric_bit en los que se define dos
nuevos tipos de datos: signed y unsigned. Estos tipos son parecidos a los tipos
std_logic_vector o bit_vector y son parte de una norma emergente (IEEE 1076.3) para
desempeñar operaciones numéricas sobre señales vectorizadas. El paquete numeric_bit
define a estos tipos (unsigned y signed) como un vector cuyos elementos son del tipo bit y
el paquete numeric_std define los mismos pero con elementos del tipo std_logic.
El propósito de estos dos tipos es el de representar números enteros positivos y negativos
en forma binaria. Para ambos tipos, el bit más significativo está a la izquierda. El tipo
signed se utiliza para representar un número entero con signo en forma binaria con
complemento a dos, y el unsigned es solamente un número entero sin signo en forma
binaria. El paquete numeric_std define funciones y operadores aritméticos, relacionales,
lógicos y de asignación para ser utilizados con estos tipos de datos. Signed, unsigned y
std_logic_vector son tipos diferentes por lo que no se pueden mezclar. Sin embargo, varias
funciones de conversión, tales como to_unsigned, son definidas para la conversión entre
los tipos.
3.4.3 Subtipos
Un subtipo es un "subgrupo" de un tipo predefinido. Los subtipos son útiles para crear tipos
de datos con limitaciones sobre tipos mayores.
DECLARACIÓN DE SUBTIPOS
EJEMPLOS
Estos ejemplos definen dos subtipos llamados byte y digito. Las señales o variables que son
declaradas como byte son del tipo std_logic_vector de 8 bits en orden descendente. Las
señales o variables que sean declaradas como tipo digito serán del tipo entero, consistiendo
de los posibles valores de los enteros del 0 al 9, inclusive.
En los siguientes ejemplos se muestra como se pueden crear subtipos de datos a partir de
aquellos tipos que sean definidos por el usuario.
EJEMPLOS
3.5 Operadores
Un operador nos permite construir diferentes tipos de expresiones mediante los cuales
podemos calcular datos utilizando los diferentes objetos de datos con el tipo de dato que
maneja dicho objeto. En VHDL existen distintos operadores de asignación con lo que se
transfieren valores de un objeto de datos a otro, y operadores de asociación que relacionan
un objeto de datos con otro, lo cual no existe en ningún lenguaje de programación de alto
nivel.
El uso de los operadores que aquí son expuestos dependerá del software utilizado, ya que
no es regla que los utilicen todos. Para conocer las operaciones que pueden ser utilizadas
así como los paquetes incluidos en el software, es recomendable revisar las librerías del
programa. De no encontrarse algún operador especial para ser utilizado con algún tipo de
dato especifico, es necesario sobrecargar los operadores o en ocasiones crearlo. Como
sobrecargar operadores y como crear funciones se expone dentro del tema de
subprogramas. Para poder utilizar la mayoría de estos operadores con los tipos signed,
unsigned y std_logic_vector, basta con utilizar el paquete donde se encuentran declarados
estos tipos, porque dentro de los mismos paquetes ya se encuentran sobrecargada varias
funciones aritméticas y lógicas para que sean utilizadas con estos tipos, en temas
posteriores se incluyen las funciones que se encuentran en los paquetes std_logic_1164,
numeric_std y numeric_bit.
TIPOS DE OPERADORES
Lógicos
AND, OR, NAND, NOR, XOR, XNOR, NOT
Comparación =, /=, <, >, <=, >=
Adición +, -, &
Multiplicación *, /, MOD, REM
Misceláneo abs, **
Asignación <=, :=
Asociación =>
Corrimiento
SLL, SRL, SLA, SRA, ROL, ROR
Los operadores lógicos AND, OR, NAND, NOR XOR, XNOR, y NOT están definidos para
ser usados con los tipos bit y boolean. Para utilizar estos operadores, excepto el operador
NOT, los operandos deben ser del mismo tamaño.
Los operadores lógicos no tiene orden de precedencia por lo que para expresiones en las
que se utilice más de un operador lógico es necesario indicar mediante paréntesis cual es el
orden en que se debe realizar el cálculo.
EJEMPLO
-- el código
EJEMPLO
SIGNAL z : bit;
···
Los operadores + y - son frecuentemente utilizados para describir sumas y restas además
de signos positivo y negativo. Están definidos para ser utilizados con el tipo entero y
también para el tipo bit. El operador "&" permite concatenar cadenas de bits obteniendo
una de mayor tamaño. Los tres operadores tienen la misma precedencia, por lo que para
instrucciones en la que se utiliza más de un operador de este tipo es recomendable indicar
mediante paréntesis el orden de las operaciones. Para poder realizar operaciones de suma o
resta entre un entero y un objeto de datos que represente una cadena de bits, lo mejor es
declarar este objeto de datos como signed o unsigned e incluir el paquete numeric_std o el
numeric_bit, ya que en estos se sobrecargaron los operadores "+" y "-" para que pudieran
EJEMPLOS
···
x <= y + z + 5;
m <= r +1;
Son los operandos "*" y el "/" que se utilizan para la multiplicación y para la división
respectivamente. Los dos operandos tienen el mismo orden de precedencia al igual que los
operandos MOD y REM.
Todos los operandos de multiplicación están definidos para ser utilizados con operandos
del mismo tipo, siendo estos del tipo entero o bit_vector. El resultado es entonces del
mismo tipo que los operandos por lo que también el objeto de datos que recibe el resultado
de la operación deberá ser del mismo tipo que los operandos.
A REM B = A-(A/B)*B
La división es entera, por lo que los operandos deben ser del tipo entero. El resultado toma
el signo de A.
A MOD B = A-B*N
En esta categoría se encuentran los operadores "abs" y "**". El operador "abs" devuelve el
valor absoluto de un operando del tipo entero. El operador "**" se utiliza para elevar el
primer operador a una potencia definida por el segundo operando, ambos deben ser del
tipo entero.
EJEMPLO
CONSTANT r: integer := 2;
VARIABLE i: integer;
···
FOR n IN 0 TO 5 LOOP
···
i := i + r**n;
···
END LOOP;
En VHDL existen dos tipos de operadores de asignación los cuales son: "<=" y ":=". El
operador ":=" se utiliza para asignar un valor inicial a constantes, variables y señales en el
momento de la declaración, pero para el resto de la descripción únicamente utilizaremos
":=" para ser usado con variables y "<=" para ser usado con señales.
ASIGNACIÓN A VARIABLES
nombre_variable := expresión;
ASIGNACIÓN A SEÑALES
Las asignaciones a variables solamente pueden ocurrir dentro de los procesos (PROCESS),
las asignaciones a señales pueden ocurrir en cualquier lugar dentro de la descripción.
Para realizar asignaciones a objetos de datos de tipos compuesto, se pueden realizar
utilizando agregados. Los agregados son una lista de varios valores encerrados entre
paréntesis y separados mediante comas de tal forma que el primer elemento de la lista es
asignado al primer elemento del objeto, el segundo elemento de la lista es asignado al
segundo elemento del objeto de datos etc. Así mediante una sola instrucción se asignan
varios valores al objeto de datos.
EJEMPLOS
operador: operacion.
x: integer;
y: bit;
END RECORD;
···
···
resto
-- se hacen cero
En diseños jerárquicos generalmente se hace uso de varios componentes, los cuales son
entidades que realizan ciertas funciones especificas. Para poder especificar las conexiones
de puertos entre dichos componentes y con los puertos de la entidad principal es necesario
utilizar el operador de asociación "=>". El orden con el que se asocian dichas conexiones
depende del orden en el que fueron declarados los puertos del componente, además, deben
ser del mismo tipo y del mismo modo. Diseños jerárquicos y componentes se explicaran
detalladamente en temas posteriores. A continuación se muestra un ejemplo de cómo
utilizar este operador de asociación.
EJEMPLO
LIBRARY ieee;
USE ieee.std_logic_1164.ALL;
LIBRARY mi_libreria;
USE mi_libreria.sumadores.ALL;
ENTITY sumador IS
x: IN std_logic_vector( 3 DOWNTO 0 );
y: IN std_logic_vector( 3 DOWNTO 0 );
END sumador;
BEGIN
x0 => x(0),
y0 => y(0),
z0 => z(0),
co => carry1 );
x0 => x(1),
y0 => y(1),
z0 => z(1),
co => carry2 );
END a_sumador;
-------------------------------------------------------------------------------
-- SUMADORES
-------------------------------------------------------------------------------
LIBRARY ieee;
USE ieee.std_logic_1164.ALL;
PACKAGE sumadores IS
···
COMPONENT add
x0: IN std_logic;
y0: IN std_logic;
END COMPONENT;
···
END PACKAGE;
Observe como los puertos de la entidad "sumador" y las conexiones entre los bloques u0,
u1, u2 y u3, se hicieron de acuerdo al orden en que los puertos están declarados en el
componente. En el bloque u0 primero se hace la conexión del puerto "ci" del componente
con el puerto "ci" de la entidad mediante le operador de asociación "=>", después se hace
la conexión del puerto x0 del componente con el elemento 0 (LSB) del vector x de la
entidad, y así sucesivamente hasta realizar todas las conexiones del componente "add"
utilizado en el bloque u0. Lo mismo se hace con el bloque u1. En los bloques u2 y u3, las
conexiones se realizaron con una notación equivalente pero simplificada. Los nombres no
tienen que ser necesariamente los mismos e inclusive pueden ser diferentes, ya que cada
puerto es un objeto de datos local para la entidad en la que fue declarado. Es importante
mencionar que dentro del paquete "sumadores" se encuentra la entidad y la arquitectura
correspondiente al componente "add", en los que se describe el componente "add".
EJEMPLO
std_logic_arith
std_logic_signed
std_logic_unsigned
asyl.arith
Y los paquetes que fueron desarrollados por la IEEE específicamente para síntesis de
circuitos digitales.
numeric_bit
numeric_std
Además del paquete que es el más utilizado por la mayoría de los paquetes de síntesis.
std_logic_1164
Todos estos paquetes son los más conocidos y utilizados para síntesis de circuitos, por lo
que para poder utilizarlos primero debemos de llamar la librería en que fueron compilados
para posteriormente hacer referencia al paquete que deseamos utilizar (una librería puede
tener más de un paquete) como se muestra a continuación.
EJEMPLO
-- std_logic_1164
-- incluidas en el paquete
3.6 Atributos
REFERENCIA A ATRIBUTOS
nombre_objeto'nombre_atributo
EJEMPLO
A <= '1' ;
END IF ;
En el ejemplo anterior se utiliza el atributo 'event, indicado en color verde, para detectar
una transición en la señal clk, y al mismo tiempo comprobamos si esta transición fue
positiva. Si ambas condiciones se cumplen entonces se asigna un '1' lógico a "A". El
atributo 'event se utiliza solo para señales de clk ya que de otra manera no es posible
sintetizar una transición en un dispositivo lógico programable, por lo que también debemos
indicar que tipo de transición estamos utilizando.
Existen más atributos y a continuación mencionaremos algunos que son útiles en
descripciones para síntesis.
ATRIBUTOS DE VALOR
-- encuentra a la izquierda de un
-- objeto de datos
-- de un objeto de datos
-- pequeño
Un arreglo (array) es un objeto de datos que esta compuesto por varios elementos de un
tipo sencillo, como lo son los bit_vectors, std_logic_vectors etc.
ATRIBUTOS DE SEÑALES
EJEMPLOS
conteo'left = 0
conteo'rigth = 10
conteo'lenght = 11
conteo'high = 10
conteo'low = 0
3.7 Entidades
DECLARACION DE ENTIDADES
ENTITY identificador IS
···
-- declaración de puerto o de
PORT ( puerto_1: modo tipo ;
-- genéricos no lleva punto y coma
puerto_2: modo tipo ; -- al final de la línea
···
);
END identificador ;
EJEMPLO
-- mux_4_1
ENTITY mux_4_1 IS
-- multiplexacion
END mux_4_1 ;
3.7.1 Genéricos
Esta instrucción es opcional y se utiliza para declarar propiedades y constantes del circuito.
Estas constantes se utilizan al igual que las que se declaran por el usuario, por lo que nos
permiten modelar circuitos en los que se pueden cambiar propiedades, tamaños de los
buses de entrada o salida del circuito. Se utilizan generalmente en paquetes.
EJEMPLO
ENTITY comparador IS
END comparador;
3.7.2 Puertos
3.7.3 Modos
El modo indica la forma en que los datos fluyen a través del circuito. Estos pueden ser de
uno de cuatro tipos:
IN
OUT
INOUT
BUFFER
3.8 Arquitecturas
ENTIDAD
Símbolo Esquemático
ARQUITECTURA
Estructura Interna
DECLARACION DE ARQUITECTURA
-- declaraciones de la arquitectura
BEGIN
-- código de descripción
END identificador_arquitectura ;
Antes del BEGIN se escriben todas las declaraciones que se necesiten dentro de la
descripción, tales como: señales, constantes, funciones, alias, componentes, tipos de datos
etc. Después del BEGIN es donde se realiza todo el código de descripción del circuito.
EJEMPLO
-- mux_4_1
ENTITY mux_4_1 IS
END mux_4_1 ;
BEGIN
END a_mux_4_1 ;
DESCRIPCIÓN COMPORTAMENTAL
DESCRIPCIÓN ESTRUCTURAL
Los tres estilos son diferentes, pero esto no significa que se tenga que utilizar únicamente
un estilo. De hecho lo mejor es tratar de utilizar los tres como mejor nos convenga. En el
siguiente tema se explica el estilo de descripción de flujo de datos, así como el tipo de
instrucciones que participan en este estilo.
SINTAXIS
×
Asignación WHIT... SELECT... WHEN
×
SINTAXIS
valor_n WHEN condición ELSE
otro_valor ;
···
EJEMPLO
Ecuaciones Booleanas
EJEMPLOS
x <= y AND z ;
NOR op4;
3.9.3 Ejemplo
TABLA DE FUNCIONAMIENTO
ENTRADAS
SALIDAS
s1 s0 z co
0 0 x AND y 0
0 1 x OR y 0
1 0 x XOR y 0
1 1 x + y + ci acarreo de la
suma
CODIGO DE DESCRIPCIÓN
LIBRARY ieee ;
USE ieee.std_logic_1164.ALL ;
USE ieee.numeric_std.ALL ;
ENTITY alu IS
PORT ( x, y: IN std_logic ;
ci: IN std_logic ;
z: OUT std_logic ;
END alu ;
BEGIN
or_op <= x OR y ;
(x AND ci ) OR
( y AND ci ) ;
END a_alu ;
DIAGRAMA A BLOQUES
Las señales suma, acarreo, and_op, or_op y xor_op son las salidas de varios bloques del
circuito, cada uno con una función distinta. El bus "seleccion" se compone de los dos bits
de entrada s0 y s1, estas se juntan en este bus únicamente para facilitarnos la descripción.
Y mediante los bloques de la instrucción WITH... SELECT... WHEN y la instrucción
WHEN... ELSE se asignan los datos correspondientes a cada salida de a cuerdo a las
combinaciones de los bits s0 y s1.
ECUACIONES
----------------------------------------------------------------------------
PLD Compiler Software: MAX2JED.EXE 02/APR/1999 [v4.02 ] 5.2 IR 17
Completed Successfully
----------------------------------------------------------------------------
PIN - OUT
----------------------------------------------------------------------------
PLD Compiler Software: PLA2JED.EXE 02/APR/1999 [v4.02 ] 5.2 IR 17
Messages:
None.
Summary:
Completed Successfully
----------------------------------------------------------------------------
UTILIZACIÓN
----------------------------------------------------------------------------
PLD Compiler Software: PLA2JED.EXE 02/APR/1999 [v4.02 ] 5.2 IR 17
Completed Successfully
----------------------------------------------------------------------------
Las instrucciones secuenciales son aquellas que son ejecutadas serialmente, una después
de otra. La mayoría de los lenguajes de programación, como C o Pascal, utilizan este tipo
de instrucciones. En VHDL las instrucciones secuenciales son implementadas únicamente
dentro del bloque PROCESS
3.10.2 Procesos
SINTAXIS
-- declaraciones
BEGIN
-- instrucciones secuenciales
END PROCESS ;
La lista sensible es opcional y define cuales señales provocan que las instrucciones dentro
del bloque comiencen a ser ejecutadas. Los cambios en alguna de las señales provocan que
el proceso sea llamado. Un proceso que no tenga lista sensible debe utilizar una instrucción
WAIT para especificar cuando deben ser ejecutadas las instrucciones dentro del bloque.
La mayoría de las herramientas de síntesis tienen problemas si las lista sensible no está
completamente especificada. Estas consideran que mediante el proceso estamos
modelando lógica combinacional o secuencial. La lista sensible es parcialmente declarada
cuando alguna de las señales que intervienen en lado derecho de una ecuación o de alguna
instrucción secuencial no es mencionada dentro de la lista. El que la lista no este completa
generalmente produce que no sea posible modelar totalmente la funcionalidad del diseño y
por lo tanto no es posible obtener las ecuaciones durante el proceso de síntesis.
El funcionamiento del proceso es similar a un microprocesador que funciona únicamente
con interrupciones. La señales dentro de la lista sensible hacen a su vez de entradas de
interrupción y las instrucciones secuenciales se encuentran dentro de una rutina única de
servicio de interrupción. Cuando alguna de las señales de la lista sensible cambia, provoca
que el proceso comience a funcionar y a ejecutar toda esta rutina de ejecución secuencial
con la particularidad de que los que resulte de este procesamiento se asigne únicamente al
final de la estructura. Por lo que podemos manipular los valores de las señales y esto no
implica que cambien con cada asignación sino solamente hasta que se termina de ejecutar
todo el proceso. Y como las asignaciones a los nodos del circuito se hacen al final,
EJEMPLO
Figura 3.5
ENTITY comparador IS
y: IN bit_vector( 3 DOWNTO 0 ) ;
END comparador ;
BEGIN
PROCESS ( x, y )
BEGIN
IF x = y THEN
END IF ;
IF x > y THEN
END IF ;
IF x < y THEN
END IF ;
END PROCESS ;
END arch_comparador ;
EJEMPLO
BEGIN
PROCESS ( s )
BEGIN
ELSIF s = 1 THEN
ELSE
END IF ;
END PROCESS ;
y <= y_tmp WHEN enable = '0' ELSE 'Z' ; -- "y" y "y_tmp" son tipo
std_logic;
END simplifica ;
Un objeto de datos del tipo señal es muy diferente a uno del tipo variable. Ya se había
mencionado que las señales pueden ser sintetizados en elementos lógicos y/o conexiones,
lo cual no es posible con un variable. Una señal representa un nodo de conexión entre
elementos lógicos (compuertas, registros, buffers, etc.). Inclusive un mismo nodo puede
recibir más de un nombre para facilitar la descripción, sin que esto implique más términos
en las ecuaciones de salida. Una señal que se vea involucrada dentro de un proceso no
recibe inmediatamente el valor asignado, sólo hasta el final del mismo. Una variable que
sea utilizada dentro de un proceso sí recibe el valor de forma inmediata, por lo que son
muy útiles para poder obtener el estado de salida deseado para alguna señal de salida. Una
variable funciona exactamente igual que cualquier variable de cualquier lenguaje de
programación de software.
Podemos decir que una señal está formada por dos partes: un valor actual y un valor futuro
(o valor en proceso). El valor futuro es el que se calcula dentro del proceso y una vez que
se termina el proceso, los valores futuros de todas las señales se convierten en valores
actuales. Al valor futuro se le conoce como driver. En VHDL para síntesis el driver nunca
es afectado fuera de un proceso, fuera de éste siempre estamos modificando el valor
actual.
EJEMPLO
ENTITY proceso IS
PORT ( x, y: IN bit;
END proceso;
BEGIN
PROCESS ( x, y )
BEGIN
-- z_var = x
-- datos
-- valor actual de z1 = x
-- en todo momento
END ejemplo_proceso;
Otro detalle importante en VHDL para síntesis, es que el valor actual de una señal no
puede verse modificado más de una vez dentro de la arquitectura, porque las señales
representan conexiones y esto equivaldría a unir dos cables. Y esto generalmente resultará
en un error de compilación durante el proceso de síntesis.
EJEMPLOS
BEGIN
z <= x AND y;
z <= x OR y;
END modificacion_no_valida1;
BEGIN
PROCESS( x, y )
BEGIN
z <= x OR y; -- driver de z = x OR y
-- valor actual de z = x OR y
-- valor actual de z
END modificacion_no_valida2;
BEGIN
PROCESS( x, y )
BEGIN
-- driver de z = x OR y
-- valor actual de z = x OR y
END modificacion_valida1;
IF - THEN - ELSE
SINTAXIS
IF condición THEN
···
···
END IF ;
EJEMPLO
···
ELSE
END IF ;
CASE - WHEN
CASE expresión IS
···
···
···
END CASE ;
EJEMPLO
···
CASE estado_maquina IS
WHEN estado1=>
END CASE ;
FOR - LOOP
···
END LOOP ;
EJEMPLO
END IF ;
END LOOP ;
WHILE - LOOP
···
END LOOP ;
EJEMPLO
contador := 0 ;
resultado_tmp := 0 ;
contador := contador - 1 ;
END LOOP ;
WAIT
La instrucción WAIT es utilizada en procesos que no tienen una lista sensible, ya que esta
instrucción define implícitamente la lista sensible del proceso.
A continuación se muestran las 3 formas de utilizar la instrucción WAIT.
-- señales especificada
-- condición especificada
-- el tiempo especificado
EJEMPLO
PROCESS
BEGIN
-- incluida en el paquete
-- std_logic_1164 y
-- equivale a utilizar:
ELSE
y <= y + 1 ;
END IF ;
END PROCESS ;
Figura 3.6
LIBRARY mi_librería ;
USE mi_libreria.compuertas.ALL ;
ENTITY ejemplo_structural IS
PORT ( x, y: IN bit ;
z: OUT bit ) ;
END ejemplo_structural ;
BEGIN
z ) ; -- salida de la compuerta
END estructural ;
Esta descripción utiliza entidades descritas y compiladas previamente dentro del paquete
"compuertas" de la librería "mi_librería". Una descripción estructural es similar a un netlist
de PSPICE. Se declaran los componentes que se utilizan y después, mediante los nombres
de los nodos, se realizan las conexiones entre compuertas.
Las descripciones estructurales son útiles cuando se trata de diseños jerárquicos. Este
ejemplo pretende mostrar como son este tipo de descripciones, aunque no es una
aplicación práctica utilizar este estilo con circuitos sencillos como el anterior.
3.11.1 Componentes
Declaración de componentes
DECLARACIÓN DE COMPONENTES
COMPONENT identificador_componente
END COMPONENT ;
EJEMPLO
COMPONENT add
END COMPONENT;
[ := valor ]
[ := valor ] } ) ;
END COMPONENT ;
EJEMPLO
COMPONENT add_n
ci: IN std_logic;
END COMPONENT ;
Instanciación de Componentes
| expresión
| identificador_variable
| expresión
| OPEN
});
EJEMPLO
BEGIN
en => enable,
q => data_out
);
END a_reg8 ;
| expresión
| identificador_variable
| expresión
| OPEN
});
PORT MAP (
| expresión
| identificador_variable
| expresión
| OPEN
});
En la asociación por posición no es necesario nombrar los puertos del componente. Sólo se
colocan las señales, variables, o expresiones en el lugar donde deseamos que sean
conectadas. Es importante considerar el orden en el que fueron declarados los puertos del
componente porque este orden es el debemos utilizar cuando se haga la instanciación del
componente.
EJEMPLO
BEGIN
END a_reg8 ;
EJEMPLO
BEGIN
-- con genéricos"
END a_reg8 ;
3.12 Subprogramas
Procedimientos
Un procedimiento es un algoritmo que puede regresar uno o varios valores y que, además,
puede o no tener parámetros. Estos se utilizan generalmente para descomponer grandes
descripciones comportamentales en pequeñas secciones, las cuales a su vez pueden ser
utilizadas por distintos procesos dentro de la descripción.
Los parámetros que se utilizan en el llamado de un procedimiento deben ser constantes,
variables, o señales. Además, también debe especificarse el modo ya sea IN, OUT, o
INOUT. A menos que se especifique, un parámetro se considera como una constante si se
utiliza en el modo IN, y por omisión una variable si se utiliza el modo INOUT o OUT.
Los procedimientos pueden ser utilizados de manera concurrente o secuencial, es decir, ya
sea fuera o dentro de un proceso. Si alguno de los parámetros es un variable, entonces el
procedimiento puede ser utilizado sólo secuencialmente. Recordemos que las variables
solamente pueden ser declaradas dentro procesos, procedimientos y funciones y por esto
un procedimiento que utilice una variable como parámetro puede ser invocado únicamente
dentro del proceso en el que se encuentra declarada dicha variable.
Una variable declarada dentro de un procedimiento existe solamente en el momento de
ejecución del mismo, similar a la declaración de variables dentro de procesos.
DECLARACIÓN DE PROCEDIMIENTOS
-- declaraciones
BEGIN
-- instrucciones secuenciales
END procedimiento ;
EJEMPLO
PACKAGE ejemplo IS
-- declaración de procedimiento
END ejemplo ;
BEGIN
b := a AND b ;
END ;
END ejemplo ;
Funciones
Una función es un algoritmo que retorna un único valor y puede o no tener parámetros de
entrada. Las funciones se utilizan generalmente para: (1) Convertir objetos de datos de un
tipo a otro; (2) Como simples funciones que realizan operaciones para las más frecuentes
situaciones de diseño. Los parámetros de una función siempre son del modo IN y deben ser
señales o constantes. Además, cualquier variable declarada dentro de la función existe
solamente dentro de la función.
DECLARACIÓN DE FUNCIONES
CUERPO DE LA FUNCIÓN
-- declaraciones
BEGIN
-- instrucciones secuenciales
END identificador ;
EJEMPLO
RETURN integer IS
BEGIN
temp := temp + 1 ;
END IF ;
END LOOP ;
RETURN temp ;
END cuenta_unos ;
IN: lectura
OUT: escritura
Un parámetro que es declarado en el modo OUT o INOUT debe ser una variable o una
señal, ya sea para tipos simples como el bit, o arreglos como el bit_vector.
Cuando el subprograma es un procedimiento, puede tener múltiples parámetros que pueden
utilizar los modos: IN, INOUT, o OUT. Los procedimientos son usados cuando se desea
actualizar o modificar algún dato. Un ejemplo puede ser un procedimiento con un
parámetro INOUT tipo bit_vector el cual invierte los bits del vector.
Si por el contrario el subprograma es una función, esta puede tener múltiples parámetros,
todos del modo IN. Una vez que se ejecuta la función, esta retorna un único valor. Este
valor debe ser especificado con un tipo determinado. Un ejemplo es la función ABS que
regresa el valor absoluto del parámetro.
Llamado a Procedimientos
El llamado a un procedimiento se invoca por su nombre, y este utiliza los parámetros que le
son listados. La sintaxis es la siguiente:
identificador = expresión
Cada expresión puede ser el identificador de una señal, variable, o alguna operación. Al
igual que en la instanciación de componentes, la asociación de los parámetros puede ser
por el nombre o por posiciones.
EJEMPLO
ENTITY proc_ejemplo IS
END proc_ejemplo ;
b: IN bit_vector ( 1 DOWNTO 0 ) ;
BEGIN
END ;
BEGIN
b => entB,
c => salida0 ) ;
END a_ proc_ejemplo ;
Llamado a Funciones
Una función es llamada por su nombre y utiliza los parámetros que le son dados. Las
funciones regresan un único valor. La sintaxis es la siguiente:
identificador = expresión
EJEMPLO
BEGIN
RETURN ( not a ) ;
END ;
...
PROCESS
BEGIN
v1 := '1';
v2 := INVERT ( v1 ) XOR 1 ;
v3 := INVERT ( '0' ) ;
END PROCESS ;
Instrucción RETURN
RETURN ; -- Procedimientos
EJEMPLO
PACKAGE ejemplo_return IS
END ejemplo_return ;
BEGIN
IF ( c = '1' ) THEN
RETURN ( a XOR b ) ;
ELSE
END IF ;
END ejemplo_func ;
END ejemplo_return ;
LIBRARY ieee ;
USE ieee.std_logic_1164.ALL ;
ENTITY uso_funcion IS
END uso_funcion ;
BEGIN
END a_uso_funcion ;
También es posible crear operadores para ser utilizados con los tipos de datos definidos por
el usuario.
TYPE mi_bit IS ( ‘0’, ‘1’, ‘x’ ) ; -- tipo de datos definido por el usuario
···
SIGNAL a, b, c: mi_bit ;
···
c <= ( a OR b ) AND c ;
3.13 Librerías
Una librería consiste en una colección de unidades de diseño analizadas previamente con
lo cual se facilita la utilización de estas en nuevos diseño. Para incluir una librería se utiliza
la siguiente sintaxis.
EJEMPLO
LIBRARY mi_libreria;
a). - Dentro de Galaxy selecciona: File > New > Project [ Target - Library ]
librería. Por ejemplo, podemos crear un proyecto con el nombre "multiplexores" para
compilar dentro de la librería "mi_libreria" en el directorio "c:\vhdl_proj\mi_libreria".
Diseñar todas las unidades de diseño deseadas dentro de esta librería y compilarlas en la
misma. Después podemos otro proyecto con el nombre "comparadores" para compilar en
la librería "mi_libreria" en el directorio "c:\vhdl_proj\mi_libreria". Diseñar otras
unidades de diseño y compilarlas. Cuando se incluya la librería "mi_librería" en otros
proyectos podemos utilizar cualquier unidad de diseño que se encuentre ya sea en el
proyecto de librería "multiplexores" o en el de "comparadores". Esto es posible porque
ambos proyectos se compilaron en una librería con el mismo nombre y en el mismo
directorio.
c). - Después aparece un cuadro de dialogo en el cual puedes agregar archivos .vhd al
proyecto de librería. Si ya los tienes, puedes copiarlos al directorio o buscarlos mediante el
botón Browse... agregarlos al proyecto. Si no los tienes sólo haz click en Finalizar y
posteriormente podrás crear los archivos del proyecto de librería.
Como ya se menciono anteriormente, en una librería puedes incluir todas las unidades de
diseño que desees, siendo unidades de diseños las estructuras: ENTITY,
ARCHITECTURE, PACKAGE, o PACKAGE BODY. Por lo general en los archivos de
librería se utilizan paquetes.
Para incluir una librería creada por el usuario en algún proyecto en particular necesitar
hacer lo siguiente:
d). - Después que agregaste la librería, para incluirla basta con que escribas lo siguiente:
LIBRARY mi_libreria ;
Una vez declarada en la descripción podrás utilizar todas las unidades de diseño que se
hayan compilado en la librería.
El nombre de la librería de todo proyecto que estés realizando es "work". Por lo que si
deseas crear un paquete en particular en el proyecto puedes incluirlo en cualquier unidad
de diseño de la siguiente manera:
USE work.identificador_paquete.ALL ;
EJEMPLO
PACKAGE swap IS
RETURN bit_vector ;
END swap ;
RETURN bit_vector IS
BEGIN
RETURN tempo ;
END ;
END swap ;
-- el mismo proyecto
ENTITY swap_ent IS
);
END swap_ent ;
BEGIN
y <= swap4(x) ;
END swap_ent ;
3.13.2 Paquetes
Un paquete en VHDL es una colección de declaraciones que pueden ser utilizadas por
otras descripciones en VHDL. Un paquete en VHDL consiste de dos secciones: la
declaración del paquete y el cuerpo del paquete.
Para incluir un paquete en otra descripción se sigue la siguiente sintaxis:
USE libreria.identificador_paquete.ALL ;
De esta manera el paquete indicado es visible para la unidad de diseño en la cual está
siendo utilizado. Mediante "ALL" indicamos que deseamos incluir todas las declaraciones
de funciones, componentes, tipos de datos, subtipos de datos, procedimientos, etc. que
encuentren en dicho paquete.
PACKAGE identificador IS
-- declaración de subprograma
-- declaración de subtipos
-- declaración de constantes
-- declaración de señales
-- declaración de componentes
-- declaración de atributos
-- especificación de atributos
-- instrucción USE
END identificador ;
-- declaración de subprograma
-- declaración de subtipos
-- declaración de constantes
-- instrucción USE
END identificador ;
En la declaración del paquete se hace mención de todo aquello que puede ser utilizado por
otras descripciones cuando se incluye el paquete.
El cuerpo del paquete proporciona definiciones y declaraciones adicionales, así como la
descripción completa de funciones y procedimientos que fueron declarados previamente
en el paquete.
EJEMPLO
PACKAGE v3_tbl IS
SUBTYPE v3 IS std_logic_vector ( 0 to 2 ) ;
"000",
"001",
"010",
"011",
"100",
"101",
"110",
"111") ;
END v3_tbl ;
BEGIN
RETURN v3_table ( ia ) ;
END int2v3 ;
END v3_tbl ;
EJEMPLO
Para este ejemplo crea un proyecto para compilar la librería "mi_libreria". Crea un nuevo
archivo de texto y copia la siguiente descripción en él.
LIBRARY ieee ;
USE ieee.std_logic_1164.ALL ;
PACKAGE multiplexores IS
COMPONENT mux_2_a_1
END COMPONENT ;
END multiplexores ;
LIBRARY ieee ;
USE ieee.std_logic_1164.ALL ;
ENTITY mux_2_a_1 IS
-- en el momento de la instanciación,
END mux_2_a_1 ;
BEGIN
END a_mux_2_a_1 ;
Sintetiza el proyecto y después crea otro para utilizar el paquete anterior. Para agregar la
librería a este nuevo proyecto hazlo desde el administrador de librerías. Crea un nuevo
archivo de texto y copia la siguiente descripción en él.
LIBRARY ieee;
USE ieee.std_logic_1164.ALL ;
-- de la librería "mi_libreria"
ENTITY multiplexor IS
END multiplexor ;
BEGIN
END estructural ;
Como se mencionó al principio una librería es una colección de unidades de diseño que
pueden ser incluidas es otras descripciones mediante el llamada a la respectiva librería.
-- --------------------------------------------------------------------
--
-- Title : std_logic_1164 multi-value logic system
-- Library : This package shall be compiled into a library
-- : symbolically named IEEE.
-- :
-- Developers: IEEE model standards group (par 1164)
-- Purpose : This packages defines a standard for designers
-- : to use in describing the interconnection data types
-- : used in vhdl modeling.
-- :
-- Limitation: The logic system defined in this package may
-- : be insufficient for modeling switched transistors,
-- : since such a requirement is out of the scope of this
-- : effort. Furthermore, mathematics, primitives,
-- : timing standards, etc. are considered orthogonal
-- : issues as it relates to this package and are therefore
-- : beyond the scope of this effort.
-- :
-- Note : No declarations or definitions shall be included in,
-- : or excluded from this package. The "package declaration"
-- : defines the types, subtypes and declarations of
-- : std_logic_1164. The std_logic_1164 package body shall be
-- : considered the formal definition of the semantics of
-- : this package. Tool developers may choose to implement
-- : the package body in the most efficient manner available
-- : to them.
-- :
-- --------------------------------------------------------------------
-- modification history :
-- --------------------------------------------------------------------
-- version | mod. date:|
-- v4.200 | 01/02/92 |
-- --------------------------------------------------------------------
PACKAGE std_logic_1164 IS
-------------------------------------------------------------------
-- logic state system (unresolved)
-------------------------------------------------------------------
TYPE std_ulogic IS ( 'U', -- Uninitialized
'X', -- Forcing Unknown
'0', -- Forcing 0
'1', -- Forcing 1
'Z', -- High Impedance
'W', -- Weak Unknown
'L', -- Weak 0
'H', -- Weak 1
'-' -- Don't care
);
-------------------------------------------------------------------
-- unconstrained array of std_ulogic for use with the resolution function
-------------------------------------------------------------------
TYPE std_ulogic_vector IS ARRAY ( NATURAL RANGE <> ) OF std_ulogic;
-------------------------------------------------------------------
-- resolution function
-------------------------------------------------------------------
FUNCTION resolved ( s : std_ulogic_vector ) RETURN std_ulogic;
-------------------------------------------------------------------
-- *** industry standard logic type ***
-------------------------------------------------------------------
SUBTYPE std_logic IS resolved std_ulogic;
-------------------------------------------------------------------
-- unconstrained array of std_logic for use in declaring signal arrays
-------------------------------------------------------------------
TYPE std_logic_vector IS ARRAY ( NATURAL RANGE <>) OF std_logic;
-------------------------------------------------------------------
-- common subtypes
-------------------------------------------------------------------
SUBTYPE X01 IS resolved std_ulogic RANGE 'X' TO '1'; -- ('X','0','1')
SUBTYPE X01Z IS resolved std_ulogic RANGE 'X' TO 'Z'; -- ('X','0','1','Z')
SUBTYPE UX01 IS resolved std_ulogic RANGE 'U' TO '1'; -- ('U','X','0','1')
SUBTYPE UX01Z IS resolved std_ulogic RANGE 'U' TO 'Z'; -- ('U','X','0','1','Z')
-------------------------------------------------------------------
-- overloaded logical operators
-------------------------------------------------------------------
-------------------------------------------------------------------
-- vectorized overloaded logical operators
-------------------------------------------------------------------
FUNCTION "and" ( l, r : std_logic_vector ) RETURN std_logic_vector;
FUNCTION "and" ( l, r : std_ulogic_vector ) RETURN std_ulogic_vector;
-- -----------------------------------------------------------------------
-- Note : The declaration and implementation of the "xnor" function is
-- specifically commented until at which time the VHDL language has been
-- officially adopted as containing such a function. At such a point,
-- the following comments may be removed along with this notice without
-- further "official" ballotting of this std_logic_1164 package. It is
-- the intent of this effort to provide such a function once it becomes
-- available in the VHDL standard.
-- -----------------------------------------------------------------------
-- function "xnor" ( l, r : std_logic_vector ) return std_logic_vector;
-- function "xnor" ( l, r : std_ulogic_vector ) return std_ulogic_vector;
-------------------------------------------------------------------
-- conversion functions
-------------------------------------------------------------------
FUNCTION To_bit ( s : std_ulogic; xmap : BIT := '0') RETURN BIT;
FUNCTION To_bitvector ( s : std_logic_vector ; xmap : BIT := '0') RETURN BIT_VECTOR;
FUNCTION To_bitvector ( s : std_ulogic_vector; xmap : BIT := '0') RETURN BIT_VECTOR;
-------------------------------------------------------------------
-- strength strippers and type convertors
-------------------------------------------------------------------
-------------------------------------------------------------------
-- edge detection
-------------------------------------------------------------------
FUNCTION rising_edge (SIGNAL s : std_ulogic) RETURN BOOLEAN;
FUNCTION falling_edge (SIGNAL s : std_ulogic) RETURN BOOLEAN;
-------------------------------------------------------------------
-- object contains an unknown
-------------------------------------------------------------------
FUNCTION Is_X ( s : std_ulogic_vector ) RETURN BOOLEAN;
FUNCTION Is_X ( s : std_logic_vector ) RETURN BOOLEAN;
FUNCTION Is_X ( s : std_ulogic ) RETURN BOOLEAN;
END std_logic_1164;
-- --------------------------------------------------------------------
--
-- Title : std_logic_1164 multi-value logic system
-- Library : This package shall be compiled into a library
-- : symbolically named IEEE.
-- :
-- Developers: IEEE model standards group (par 1164)
-- Purpose : This packages defines a standard for designers
-- : to use in describing the interconnection data types
-- : used in vhdl modeling.
-- :
-- Limitation: The logic system defined in this package may
-- : be insufficient for modeling switched transistors,
-- : since such a requirement is out of the scope of this
-- : effort. Furthermore, mathematics, primitives,
-- : timing standards, etc. are considered orthogonal
-- : issues as it relates to this package and are therefore
-- : beyond the scope of this effort.
-- :
-- Note : No declarations or definitions shall be included in,
-- : or excluded from this package. The "package declaration"
-- : defines the types, subtypes and declarations of
-- : std_logic_1164. The std_logic_1164 package body shall be
-- : considered the formal definition of the semantics of
-- : this package. Tool developers may choose to implement
-- : the package body in the most efficient manner available
-- : to them.
-- :
-- --------------------------------------------------------------------
-- modification history :
-- --------------------------------------------------------------------
-- version | mod. date:|
-- v4.200 | 01/02/91 |
-- --------------------------------------------------------------------
-------------------------------------------------------------------
-- resolution function
-------------------------------------------------------------------
CONSTANT resolution_table : stdlogic_table := (
-- ---------------------------------------------------------
-- | U X 0 1 Z W L H - | |
-- ---------------------------------------------------------
( 'U', 'U', 'U', 'U', 'U', 'U', 'U', 'U', 'U' ), -- | U |
( 'U', 'X', 'X', 'X', 'X', 'X', 'X', 'X', 'X' ), -- | X |
( 'U', 'X', '0', 'X', '0', '0', '0', '0', 'X' ), -- | 0 |
( 'U', 'X', 'X', '1', '1', '1', '1', '1', 'X' ), -- | 1 |
( 'U', 'X', '0', '1', 'Z', 'W', 'L', 'H', 'X' ), -- | Z |
( 'U', 'X', '0', '1', 'W', 'W', 'W', 'W', 'X' ), -- | W |
( 'U', 'X', '0', '1', 'L', 'W', 'L', 'W', 'X' ), -- | L |
( 'U', 'X', '0', '1', 'H', 'W', 'W', 'H', 'X' ), -- | H |
( 'U', 'X', 'X', 'X', 'X', 'X', 'X', 'X', 'X' ) -- | - |
);
-- signal.
IF (s'LENGTH = 1) THEN RETURN s(s'LOW);
ELSE
FOR i IN s'RANGE LOOP
result := resolution_table(result, s(i));
END LOOP;
END IF;
RETURN result;
END resolved;
-------------------------------------------------------------------
-- tables for logical operations
-------------------------------------------------------------------
-------------------------------------------------------------------
-- overloaded logical operators ( with optimizing hints )
-------------------------------------------------------------------
-------------------------------------------------------------------
-- and
-------------------------------------------------------------------
FUNCTION "and" ( l,r : std_logic_vector ) RETURN std_logic_vector IS
ALIAS lv : std_logic_vector ( 1 TO l'LENGTH ) IS l;
ALIAS rv : std_logic_vector ( 1 TO r'LENGTH ) IS r;
VARIABLE result : std_logic_vector ( 1 TO l'LENGTH );
BEGIN
IF ( l'LENGTH /= r'LENGTH ) THEN
ASSERT FALSE
REPORT "arguments of overloaded 'and' operator are not of the same length"
SEVERITY FAILURE;
ELSE
FOR i IN result'RANGE LOOP
result(i) := and_table (lv(i), rv(i));
END LOOP;
END IF;
RETURN result;
END "and";
---------------------------------------------------------------------
FUNCTION "and" ( l,r : std_ulogic_vector ) RETURN std_ulogic_vector IS
ALIAS lv : std_ulogic_vector ( 1 TO l'LENGTH ) IS l;
ALIAS rv : std_ulogic_vector ( 1 TO r'LENGTH ) IS r;
VARIABLE result : std_ulogic_vector ( 1 TO l'LENGTH );
BEGIN
IF ( l'LENGTH /= r'LENGTH ) THEN
ASSERT FALSE
REPORT "arguments of overloaded 'and' operator are not of the same length"
SEVERITY FAILURE;
ELSE
FOR i IN result'RANGE LOOP
result(i) := and_table (lv(i), rv(i));
END LOOP;
END IF;
RETURN result;
END "and";
-------------------------------------------------------------------
-- nand
-------------------------------------------------------------------
FUNCTION "nand" ( l,r : std_logic_vector ) RETURN std_logic_vector IS
ALIAS lv : std_logic_vector ( 1 TO l'LENGTH ) IS l;
ALIAS rv : std_logic_vector ( 1 TO r'LENGTH ) IS r;
VARIABLE result : std_logic_vector ( 1 TO l'LENGTH );
BEGIN
IF ( l'LENGTH /= r'LENGTH ) THEN
ASSERT FALSE
REPORT "arguments of overloaded 'nand' operator are not of the same length"
SEVERITY FAILURE;
ELSE
FOR i IN result'RANGE LOOP
result(i) := not_table(and_table (lv(i), rv(i)));
END LOOP;
END IF;
RETURN result;
END "nand";
---------------------------------------------------------------------
FUNCTION "nand" ( l,r : std_ulogic_vector ) RETURN std_ulogic_vector IS
ALIAS lv : std_ulogic_vector ( 1 TO l'LENGTH ) IS l;
ALIAS rv : std_ulogic_vector ( 1 TO r'LENGTH ) IS r;
VARIABLE result : std_ulogic_vector ( 1 TO l'LENGTH );
BEGIN
IF ( l'LENGTH /= r'LENGTH ) THEN
ASSERT FALSE
REPORT "arguments of overloaded 'nand' operator are not of the same length"
SEVERITY FAILURE;
ELSE
FOR i IN result'RANGE LOOP
result(i) := not_table(and_table (lv(i), rv(i)));
END LOOP;
END IF;
RETURN result;
END "nand";
-------------------------------------------------------------------
-- or
-------------------------------------------------------------------
FUNCTION "or" ( l,r : std_logic_vector ) RETURN std_logic_vector IS
ALIAS lv : std_logic_vector ( 1 TO l'LENGTH ) IS l;
ALIAS rv : std_logic_vector ( 1 TO r'LENGTH ) IS r;
VARIABLE result : std_logic_vector ( 1 TO l'LENGTH );
BEGIN
IF ( l'LENGTH /= r'LENGTH ) THEN
ASSERT FALSE
REPORT "arguments of overloaded 'or' operator are not of the same length"
SEVERITY FAILURE;
ELSE
FOR i IN result'RANGE LOOP
result(i) := or_table (lv(i), rv(i));
END LOOP;
END IF;
RETURN result;
END "or";
---------------------------------------------------------------------
FUNCTION "or" ( l,r : std_ulogic_vector ) RETURN std_ulogic_vector IS
ALIAS lv : std_ulogic_vector ( 1 TO l'LENGTH ) IS l;
ALIAS rv : std_ulogic_vector ( 1 TO r'LENGTH ) IS r;
VARIABLE result : std_ulogic_vector ( 1 TO l'LENGTH );
BEGIN
IF ( l'LENGTH /= r'LENGTH ) THEN
ASSERT FALSE
REPORT "arguments of overloaded 'or' operator are not of the same length"
SEVERITY FAILURE;
ELSE
FOR i IN result'RANGE LOOP
result(i) := or_table (lv(i), rv(i));
END LOOP;
END IF;
RETURN result;
END "or";
-------------------------------------------------------------------
-- nor
-------------------------------------------------------------------
FUNCTION "nor" ( l,r : std_logic_vector ) RETURN std_logic_vector IS
ALIAS lv : std_logic_vector ( 1 TO l'LENGTH ) IS l;
ALIAS rv : std_logic_vector ( 1 TO r'LENGTH ) IS r;
VARIABLE result : std_logic_vector ( 1 TO l'LENGTH );
BEGIN
IF ( l'LENGTH /= r'LENGTH ) THEN
ASSERT FALSE
REPORT "arguments of overloaded 'nor' operator are not of the same length"
SEVERITY FAILURE;
ELSE
FOR i IN result'RANGE LOOP
result(i) := not_table(or_table (lv(i), rv(i)));
END LOOP;
END IF;
RETURN result;
END "nor";
---------------------------------------------------------------------
FUNCTION "nor" ( l,r : std_ulogic_vector ) RETURN std_ulogic_vector IS
ALIAS lv : std_ulogic_vector ( 1 TO l'LENGTH ) IS l;
ALIAS rv : std_ulogic_vector ( 1 TO r'LENGTH ) IS r;
VARIABLE result : std_ulogic_vector ( 1 TO l'LENGTH );
BEGIN
IF ( l'LENGTH /= r'LENGTH ) THEN
ASSERT FALSE
REPORT "arguments of overloaded 'nor' operator are not of the same length"
SEVERITY FAILURE;
ELSE
FOR i IN result'RANGE LOOP
result(i) := not_table(or_table (lv(i), rv(i)));
END LOOP;
END IF;
RETURN result;
END "nor";
---------------------------------------------------------------------
-- xor
-------------------------------------------------------------------
FUNCTION "xor" ( l,r : std_logic_vector ) RETURN std_logic_vector IS
ALIAS lv : std_logic_vector ( 1 TO l'LENGTH ) IS l;
ALIAS rv : std_logic_vector ( 1 TO r'LENGTH ) IS r;
VARIABLE result : std_logic_vector ( 1 TO l'LENGTH );
BEGIN
IF ( l'LENGTH /= r'LENGTH ) THEN
ASSERT FALSE
REPORT "arguments of overloaded 'xor' operator are not of the same length"
SEVERITY FAILURE;
ELSE
FOR i IN result'RANGE LOOP
result(i) := xor_table (lv(i), rv(i));
END LOOP;
END IF;
RETURN result;
END "xor";
---------------------------------------------------------------------
FUNCTION "xor" ( l,r : std_ulogic_vector ) RETURN std_ulogic_vector IS
ALIAS lv : std_ulogic_vector ( 1 TO l'LENGTH ) IS l;
ALIAS rv : std_ulogic_vector ( 1 TO r'LENGTH ) IS r;
VARIABLE result : std_ulogic_vector ( 1 TO l'LENGTH );
BEGIN
IF ( l'LENGTH /= r'LENGTH ) THEN
ASSERT FALSE
REPORT "arguments of overloaded 'xor' operator are not of the same length"
SEVERITY FAILURE;
ELSE
FOR i IN result'RANGE LOOP
result(i) := xor_table (lv(i), rv(i));
END LOOP;
END IF;
RETURN result;
END "xor";
-- -------------------------------------------------------------------
-- -- xnor
-- -------------------------------------------------------------------
-- -----------------------------------------------------------------------
-- Note : The declaration and implementation of the "xnor" function is
-- specifically commented until at which time the VHDL language has been
-- officially adopted as containing such a function. At such a point,
-- the following comments may be removed along with this notice without
-- further "official" ballotting of this std_logic_1164 package. It is
-- the intent of this effort to provide such a function once it becomes
-- available in the VHDL standard.
-- -----------------------------------------------------------------------
-- function "xnor" ( l,r : std_logic_vector ) return std_logic_vector is
-- alias lv : std_logic_vector ( 1 to l'length ) is l;
-- alias rv : std_logic_vector ( 1 to r'length ) is r;
-- variable result : std_logic_vector ( 1 to l'length );
-- begin
-- if ( l'length /= r'length ) then
-- assert false
-- report "arguments of overloaded 'xnor' operator are not of the same length"
-- severity failure;
-- else
-- for i in result'range loop
-- result(i) := not_table(xor_table (lv(i), rv(i)));
-- end loop;
-- end if;
-- return result;
-- end "xnor";
-- ---------------------------------------------------------------------
-- function "xnor" ( l,r : std_ulogic_vector ) return std_ulogic_vector is
-- alias lv : std_ulogic_vector ( 1 to l'length ) is l;
-- alias rv : std_ulogic_vector ( 1 to r'length ) is r;
-- variable result : std_ulogic_vector ( 1 to l'length );
-- begin
-- if ( l'length /= r'length ) then
-- assert false
-- report "arguments of overloaded 'xnor' operator are not of the same length"
-- severity failure;
-- else
-- for i in result'range loop
-- result(i) := not_table(xor_table (lv(i), rv(i)));
-- end loop;
-- end if;
-- return result;
-- end "xnor";
-------------------------------------------------------------------
-- not
-------------------------------------------------------------------
FUNCTION "not" ( l : std_logic_vector ) RETURN std_logic_vector IS
ALIAS lv : std_logic_vector ( 1 TO l'LENGTH ) IS l;
VARIABLE result : std_logic_vector ( 1 TO l'LENGTH ) := (OTHERS => 'X');
BEGIN
FOR i IN result'RANGE LOOP
result(i) := not_table( lv(i) );
END LOOP;
RETURN result;
END;
---------------------------------------------------------------------
FUNCTION "not" ( l : std_ulogic_vector ) RETURN std_ulogic_vector IS
ALIAS lv : std_ulogic_vector ( 1 TO l'LENGTH ) IS l;
VARIABLE result : std_ulogic_vector ( 1 TO l'LENGTH ) := (OTHERS => 'X');
BEGIN
FOR i IN result'RANGE LOOP
result(i) := not_table( lv(i) );
END LOOP;
RETURN result;
END;
-------------------------------------------------------------------
-- conversion tables
-------------------------------------------------------------------
TYPE logic_x01_table IS ARRAY (std_ulogic'LOW TO std_ulogic'HIGH) OF X01;
TYPE logic_x01z_table IS ARRAY (std_ulogic'LOW TO std_ulogic'HIGH) OF X01Z;
TYPE logic_ux01_table IS ARRAY (std_ulogic'LOW TO std_ulogic'HIGH) OF UX01;
----------------------------------------------------------
-- table name : cvt_to_x01
--
-- parameters :
-- in : std_ulogic -- some logic value
-- returns : x01 -- state value of logic value
-- purpose : to convert state-strength to state only
--
-- example : if (cvt_to_x01 (input_signal) = '1' ) then ...
--
----------------------------------------------------------
CONSTANT cvt_to_x01 : logic_x01_table := (
'X', -- 'U'
'X', -- 'X'
'0', -- '0'
'1', -- '1'
'X', -- 'Z'
'X', -- 'W'
'0', -- 'L'
'1', -- 'H'
'X' -- '-'
);
----------------------------------------------------------
-- table name : cvt_to_x01z
--
-- parameters :
-- in : std_ulogic -- some logic value
-- returns : x01z -- state value of logic value
-- purpose : to convert state-strength to state only
--
-- example : if (cvt_to_x01z (input_signal) = '1' ) then ...
--
----------------------------------------------------------
CONSTANT cvt_to_x01z : logic_x01z_table := (
'X', -- 'U'
'X', -- 'X'
'0', -- '0'
'1', -- '1'
'Z', -- 'Z'
'X', -- 'W'
'0', -- 'L'
'1', -- 'H'
'X' -- '-'
);
----------------------------------------------------------
-- table name : cvt_to_ux01
--
-- parameters :
-- in : std_ulogic -- some logic value
-- returns : ux01 -- state value of logic value
-- purpose : to convert state-strength to state only
--
-- example : if (cvt_to_ux01 (input_signal) = '1' ) then ...
--
----------------------------------------------------------
CONSTANT cvt_to_ux01 : logic_ux01_table := (
'U', -- 'U'
'X', -- 'X'
'0', -- '0'
'1', -- '1'
'X', -- 'Z'
'X', -- 'W'
'0', -- 'L'
'1', -- 'H'
'X' -- '-'
);
-------------------------------------------------------------------
-- conversion functions
-------------------------------------------------------------------
FUNCTION To_bit ( s : std_ulogic; xmap : BIT := '0') RETURN BIT IS
BEGIN
CASE s IS
WHEN '0' | 'L' => RETURN ('0');
WHEN '1' | 'H' => RETURN ('1');
WHEN OTHERS => RETURN xmap;
END CASE;
END;
--------------------------------------------------------------------
FUNCTION To_bitvector ( s : std_logic_vector ; xmap : BIT := '0') RETURN BIT_VECTOR IS
ALIAS sv : std_logic_vector ( s'LENGTH-1 DOWNTO 0 ) IS s;
VARIABLE result : BIT_VECTOR ( s'LENGTH-1 DOWNTO 0 );
BEGIN
FOR i IN result'RANGE LOOP
CASE sv(i) IS
WHEN '0' | 'L' => result(i) := '0';
WHEN '1' | 'H' => result(i) := '1';
WHEN OTHERS => result(i) := xmap;
END CASE;
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_bitvector ( s : std_ulogic_vector; xmap : BIT := '0') RETURN BIT_VECTOR IS
ALIAS sv : std_ulogic_vector ( s'LENGTH-1 DOWNTO 0 ) IS s;
VARIABLE result : BIT_VECTOR ( s'LENGTH-1 DOWNTO 0 );
BEGIN
FOR i IN result'RANGE LOOP
CASE sv(i) IS
WHEN '0' | 'L' => result(i) := '0';
WHEN '1' | 'H' => result(i) := '1';
WHEN OTHERS => result(i) := xmap;
END CASE;
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_StdULogic ( b : BIT ) RETURN std_ulogic IS
BEGIN
CASE b IS
WHEN '0' => RETURN '0';
WHEN '1' => RETURN '1';
END CASE;
END;
--------------------------------------------------------------------
FUNCTION To_StdLogicVector ( b : BIT_VECTOR ) RETURN std_logic_vector IS
ALIAS bv : BIT_VECTOR ( b'LENGTH-1 DOWNTO 0 ) IS b;
VARIABLE result : std_logic_vector ( b'LENGTH-1 DOWNTO 0 );
BEGIN
FOR i IN result'RANGE LOOP
CASE bv(i) IS
WHEN '0' => result(i) := '0';
WHEN '1' => result(i) := '1';
END CASE;
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_StdLogicVector ( s : std_ulogic_vector ) RETURN std_logic_vector IS
ALIAS sv : std_ulogic_vector ( s'LENGTH-1 DOWNTO 0 ) IS s;
VARIABLE result : std_logic_vector ( s'LENGTH-1 DOWNTO 0 );
BEGIN
FOR i IN result'RANGE LOOP
result(i) := sv(i);
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_StdULogicVector ( b : BIT_VECTOR ) RETURN std_ulogic_vector IS
ALIAS bv : BIT_VECTOR ( b'LENGTH-1 DOWNTO 0 ) IS b;
VARIABLE result : std_ulogic_vector ( b'LENGTH-1 DOWNTO 0 );
BEGIN
FOR i IN result'RANGE LOOP
CASE bv(i) IS
WHEN '0' => result(i) := '0';
WHEN '1' => result(i) := '1';
END CASE;
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_StdULogicVector ( s : std_logic_vector ) RETURN std_ulogic_vector IS
ALIAS sv : std_logic_vector ( s'LENGTH-1 DOWNTO 0 ) IS s;
VARIABLE result : std_ulogic_vector ( s'LENGTH-1 DOWNTO 0 );
BEGIN
FOR i IN result'RANGE LOOP
result(i) := sv(i);
END LOOP;
RETURN result;
END;
-------------------------------------------------------------------
-- strength strippers and type convertors
-------------------------------------------------------------------
-- to_x01
-------------------------------------------------------------------
FUNCTION To_X01 ( s : std_logic_vector ) RETURN std_logic_vector IS
ALIAS sv : std_logic_vector ( 1 TO s'LENGTH ) IS s;
VARIABLE result : std_logic_vector ( 1 TO s'LENGTH );
BEGIN
FOR i IN result'RANGE LOOP
result(i) := cvt_to_x01 (sv(i));
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_X01 ( s : std_ulogic_vector ) RETURN std_ulogic_vector IS
ALIAS sv : std_ulogic_vector ( 1 TO s'LENGTH ) IS s;
VARIABLE result : std_ulogic_vector ( 1 TO s'LENGTH );
BEGIN
FOR i IN result'RANGE LOOP
result(i) := cvt_to_x01 (sv(i));
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_X01 ( s : std_ulogic ) RETURN X01 IS
BEGIN
RETURN (cvt_to_x01(s));
END;
--------------------------------------------------------------------
FUNCTION To_X01 ( b : BIT_VECTOR ) RETURN std_logic_vector IS
ALIAS bv : BIT_VECTOR ( 1 TO b'LENGTH ) IS b;
VARIABLE result : std_logic_vector ( 1 TO b'LENGTH );
BEGIN
FOR i IN result'RANGE LOOP
CASE bv(i) IS
WHEN '0' => result(i) := '0';
WHEN '1' => result(i) := '1';
END CASE;
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_X01 ( b : BIT_VECTOR ) RETURN std_ulogic_vector IS
ALIAS bv : BIT_VECTOR ( 1 TO b'LENGTH ) IS b;
VARIABLE result : std_ulogic_vector ( 1 TO b'LENGTH );
BEGIN
FOR i IN result'RANGE LOOP
CASE bv(i) IS
WHEN '0' => result(i) := '0';
WHEN '1' => result(i) := '1';
END CASE;
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_X01 ( b : BIT ) RETURN X01 IS
BEGIN
CASE b IS
WHEN '0' => RETURN('0');
WHEN '1' => RETURN('1');
END CASE;
END;
--------------------------------------------------------------------
-- to_x01z
-------------------------------------------------------------------
FUNCTION To_X01Z ( s : std_logic_vector ) RETURN std_logic_vector IS
ALIAS sv : std_logic_vector ( 1 TO s'LENGTH ) IS s;
VARIABLE result : std_logic_vector ( 1 TO s'LENGTH );
BEGIN
FOR i IN result'RANGE LOOP
result(i) := cvt_to_x01z (sv(i));
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_X01Z ( s : std_ulogic_vector ) RETURN std_ulogic_vector IS
ALIAS sv : std_ulogic_vector ( 1 TO s'LENGTH ) IS s;
VARIABLE result : std_ulogic_vector ( 1 TO s'LENGTH );
BEGIN
FOR i IN result'RANGE LOOP
result(i) := cvt_to_x01z (sv(i));
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_X01Z ( s : std_ulogic ) RETURN X01Z IS
BEGIN
RETURN (cvt_to_x01z(s));
END;
--------------------------------------------------------------------
FUNCTION To_X01Z ( b : BIT_VECTOR ) RETURN std_logic_vector IS
ALIAS bv : BIT_VECTOR ( 1 TO b'LENGTH ) IS b;
VARIABLE result : std_logic_vector ( 1 TO b'LENGTH );
BEGIN
FOR i IN result'RANGE LOOP
CASE bv(i) IS
WHEN '0' => result(i) := '0';
WHEN '1' => result(i) := '1';
END CASE;
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_X01Z ( b : BIT_VECTOR ) RETURN std_ulogic_vector IS
ALIAS bv : BIT_VECTOR ( 1 TO b'LENGTH ) IS b;
VARIABLE result : std_ulogic_vector ( 1 TO b'LENGTH );
BEGIN
FOR i IN result'RANGE LOOP
CASE bv(i) IS
WHEN '0' => result(i) := '0';
WHEN '1' => result(i) := '1';
END CASE;
END LOOP;
RETURN result;
END;
--------------------------------------------------------------------
FUNCTION To_X01Z ( b : BIT ) RETURN X01Z IS
BEGIN
CASE b IS
WHEN '0' => RETURN('0');
-------------------------------------------------------------------
-- edge detection
-------------------------------------------------------------------
FUNCTION rising_edge (SIGNAL s : std_ulogic) RETURN BOOLEAN IS
BEGIN
RETURN (s'EVENT AND (To_X01(s) = '1') AND
(To_X01(s'LAST_VALUE) = '0'));
END;
-------------------------------------------------------------------
-- object contains an unknown
-------------------------------------------------------------------
FUNCTION Is_X ( s : std_ulogic_vector ) RETURN BOOLEAN IS
BEGIN
FOR i IN s'RANGE LOOP
CASE s(i) IS
WHEN 'U' | 'X' | 'Z' | 'W' | '-' => RETURN TRUE;
WHEN OTHERS => NULL;
END CASE;
END LOOP;
RETURN FALSE;
END;
--------------------------------------------------------------------
FUNCTION Is_X ( s : std_logic_vector ) RETURN BOOLEAN IS
BEGIN
FOR i IN s'RANGE LOOP
CASE s(i) IS
WHEN 'U' | 'X' | 'Z' | 'W' | '-' => RETURN TRUE;
WHEN OTHERS => NULL;
END CASE;
END LOOP;
RETURN FALSE;
END;
--------------------------------------------------------------------
FUNCTION Is_X ( s : std_ulogic ) RETURN BOOLEAN IS
BEGIN
CASE s IS
WHEN 'U' | 'X' | 'Z' | 'W' | '-' => RETURN TRUE;
WHEN OTHERS => NULL;
END CASE;
RETURN FALSE;
END;
END std_logic_1164;