summaryrefslogtreecommitdiffstatshomepage
path: root/src/lib/netlist/devices/nld_2102A.cpp
blob: d60b661ad21bba3906fa444832231d3ab00b60e1 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
// license:BSD-3-Clause
// copyright-holders:Ryan Holtz
/*
 * nld_2102A.cpp
 *
 */

#include "nld_2102A.h"
#include "netlist/nl_base.h"

#define ADDR2BYTE(a)    ((a) >> 3)
#define ADDR2BIT(a)     ((a) & 0x7)

namespace netlist
{
	namespace devices
	{
	NETLIB_OBJECT(2102A)
	{
		NETLIB_CONSTRUCTOR(2102A)
		, m_A(*this, {"A0", "A1", "A2", "A3", "A4", "A5", "A6", "A7", "A8", "A9" }, NETLIB_DELEGATE(inputs))
		, m_CEQ(*this, "CEQ", NETLIB_DELEGATE(inputs))
		, m_RWQ(*this, "RWQ", NETLIB_DELEGATE(inputs))
		, m_DI(*this, "DI", NETLIB_DELEGATE(inputs))
		, m_DO(*this, "DO")
		, m_ram(*this, "m_ram", 0)
		, m_RAM(*this, "m_RAM", &m_ram[0])
		, m_power_pins(*this)
		{
		}

		NETLIB_RESETI()
		{
			m_RAM.set(&m_ram[0]);
			for (std::size_t i=0; i<128; i++)
				m_ram[i] = 0;
		}

		NETLIB_HANDLERI(inputs)
		{
			netlist_time max_delay = NLTIME_FROM_NS(350);

			if (!m_CEQ())
			{
				unsigned a = 0;
				for (std::size_t i=0; i<10; i++)
				{
					a |= (m_A[i]() << i);
				}
				const unsigned byte = ADDR2BYTE(a);
				const unsigned bit = ADDR2BIT(a);

				if (!m_RWQ())
				{
					m_ram[byte] &= ~(static_cast<uint8_t>(1)      << bit);
					m_ram[byte] |=  (static_cast<uint8_t>(m_DI()) << bit);
				}

				m_DO.push((m_ram[byte] >> bit) & 1, max_delay);
			}
		}

		friend class NETLIB_NAME(2102A_dip);
	private:
		object_array_t<logic_input_t, 10> m_A;
		logic_input_t m_CEQ;
		logic_input_t m_RWQ;
		logic_input_t m_DI;

		logic_output_t m_DO;

		state_container<std::array<uint8_t, 128>> m_ram; // 1024x1 bits
		param_ptr_t m_RAM;
		nld_power_pins m_power_pins;
	};

	NETLIB_OBJECT(2102A_dip)
	{
		NETLIB_CONSTRUCTOR(2102A_dip)
		, A(*this, "A")
		{
			register_subalias("8",     A.m_A[0]);
			register_subalias("4",     A.m_A[1]);
			register_subalias("5",     A.m_A[2]);
			register_subalias("6",     A.m_A[3]);
			register_subalias("7",     A.m_A[4]);
			register_subalias("2",     A.m_A[5]);
			register_subalias("1",     A.m_A[6]);
			register_subalias("16",    A.m_A[7]);
			register_subalias("15",    A.m_A[8]);
			register_subalias("14",    A.m_A[9]);

			register_subalias("13",    A.m_CEQ);
			register_subalias("3",     A.m_RWQ);

			register_subalias("11",    A.m_DI);
			register_subalias("12",    A.m_DO);

			register_subalias("10",    "A.VCC");
			register_subalias("9",     "A.GND");

		}
		//NETLIB_RESETI() {}
	private:
		NETLIB_SUB(2102A) A;
	};

	NETLIB_DEVICE_IMPL(2102A,    "RAM_2102A",   "+CEQ,+A0,+A1,+A2,+A3,+A4,+A5,+A6,+A7,+A8,+A9,+RWQ,+DI,@VCC,@GND")
	NETLIB_DEVICE_IMPL(2102A_dip,"RAM_2102A_DIP","")

	} //namespace devices
} // namespace netlist