-
Notifications
You must be signed in to change notification settings - Fork 0
/
jedec-jep106-bank13.tcl
28 lines (22 loc) · 930 Bytes
/
jedec-jep106-bank13.tcl
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
defn jedec-jep106-bank13.tcl 2023-06-13
#============= jedec-jep106-bank13.tcl =================
#
# 2023-06-13 pds initial cut
incl jedec-jep106-util.tcl ;# helper for constructing the bankid
# JEP106BG, rev. JEP106BF.01, May 2023, Page 38
# this bank has 126 lines, and starts with line 1
# each name is 70 chars max, including string terminator
# https://www.jedec.org/standards-documents/docs/jep-106ab
# EXAMPLE:
# mfrid = (jep106bank % 16) << 7) | jep106line
# mfrname = [lindex $::JEDEC_JEP106_BANKn $jep106line]
# bankid = [lindex $::JEDEC_JEP106_BANKn 0], as binary, [format %08b [lindex $::JEDEC_JEP106_BANKn 0]]
namespace eval JEDEC {
variable JEDEC_JEP106_BANK13
set JEDEC_JEP106_BANK13 [list [jedec-jep106-bankid 13] \
"Beijing Haawking Technology Co Ltd" \
"Open HW Group" \
"JHICC" \
... \
]
}