[原创]根据ECS里面的CLASS/BUS来自动创建PINPAIR以及对应的MATCHGROUP

kevin890505 · 发表于 2014-12-31 10:33

EDA365欢迎您登录！

您需要登录才可以下载或查看，没有帐号？注册

x

前一阵子有点时间，就整了个，因为觉得大多时候，直接从NET来创建MATCHGROUP的形式并不合适，大多都需要pinpair，但是即使是用sigXplorer，还是觉得不够方便，尤其是很多组等长要约束的时候，所以就弄了个自动创建，不过个人能力有限，所以功能也比较2，大概思路如下：
1，要创建的对象必须是CLASS/BUS，可以包含dp对，不能包含其他兑现，因为最近忙，还没空想更复杂的；
2，对于地址控制的，比如U1是CPU，挂了U2-U5共4个器件，那么需要选择一个主器件U1,建立的pinpair就是U1-U2,U1-U3,U1-U4,U1-U5,；
3，对于数据，U1到U2的DQ,DM,DQS是一组，其他对应，不能包含其他
4，之所以是上面这个鬼样子，是因为我的思路有点2，对组内的对象排除杂七杂八电阻，端接什么的，剩下的组内每一个net/Xnet都包含的器件，才作为一个目标，就是筛选出U1-U5当前组NET中所有net都连接到的几个器件，那就是U1-U5，如果你多添加了一个U6，那将来筛选出来的就只有U1了，就会报错。
顺便说下，建立好的pinpair没有等长范围，因为不知道需要多长范围，而且手动添加也很简单，就没弄了，未来几个月会有一摩尔板子画，也没空整了，如果发现BUG和有什么建议，可以回复，等将来有空了再整理下，谢谢。
效果和附件如下：

kevin890505 · 发表于 2019-9-3 19:45

本帖最后由 kevin890505 于 2019-9-3 20:25 编辑

1，修改分列显示，30，60时候空白列的BUG问题；2，修改选择主控CPU时候显示模式，改为REF+DEVICE名称方式；
3，创建好的mg，新增约束，点对点的5mil，菊花链的20mil。

digitzing · 发表于 2022-10-19 17:33

本帖最后由 digitzing 于 2022-10-19 17:44 编辑

kevin890505 发表于 2021-6-19 22:00
要有BUS或者CLASS才可以忘了做防呆如果没有就会出现这情况

我帮你修改了，改成英文，并支持allegro 17以上，没有BUS也不会一条细线无法退出

/*
├─
│ ├─ 程序名称：Quick_pinpair.il
│ ├─ 程序功能：快速创建选择BUS/CLASS对应的pin pair
│ ├─ 创建时间：2014年10月31日
│ ├─ 作者：kevin wong
│ ├─ Q Q：263350809
├─
1，2014.10.31开始构建主函数思路；
2，2014.11.07完成初步功能，测试通过；
3，2014.12.31修改添加部分按钮，提示；
4，2019.07.31修改增加分列显示功能，以避免超出屏幕范围
5，2019.07.31修改多30整除情况下的界面布局，以避免空白列
6，2019.09.01修改再3个以上器件时候，只显示位号不容易区分，以REF+VALUE的形式展示，
并增加新建的MG添加约束，点对点为5mil，菊花链为20mil
7,2022.10.19 修改width为0时，from显示问题 by digitzing
*/
axlCmdRegister( "quickpinpair" 'Quick_PinPair)
; load("Quick_pinpair.il")
defun(Quick_PinPair ()
let( (one allclass)
allclass = axlDBGetDesign()->netclass
alleleclass_name = list()
foreach(one allclass
if(one->electrical
then
alleleclass_name = cons(list(one->name one) alleleclass_name)
)
)
if(allbus = axlDBGetDesign()->bus
foreach(one allbus
alleleclass_name = cons(list(one->name one) alleleclass_name)
)
)
classnum = length(alleleclass_name) ;class 数量
if(classnum <= 30
then
hig = classnum*2+6
else
hig = 30*2 + 6 ;>30个时高度固定，增加宽度
)
;----------修改部分
if(mod(classnum 30) == 0
then
width = ((classnum/30) + 0)*30 ;项目过多时加宽列数,整除列宽=列数*30
else
width = ((classnum/30) + 1)*30 ;项目过多时加宽列数，有多余的，不整除列宽=（列数+1）*30
)
if(width == 0
then
width = 31
axlUIWPrint(displayform "No Class was found!")
else
nil
)
;----------修改部分
Quick_pinpairform()
))
defun(Quick_pinpairform ()
let( (curclass)
Formfile = axlTempFile()
;Formfile = "./pinpairform.form"
formport = outfile(Formfile "w")
fprintf(formport "FILE_TYPE=FORM_DEFN VERSION=2\n")
if(axlVersion('version)>17
then
fprintf(formport "FORM \n")
else
fprintf(formport "FORM toolwindow\n")
)
fprintf(formport "FIXED\n")
fprintf(formport "PORT %d 1\n" width)
fprintf(formport "HEADER \"Create PinPair - kevin\"\n")
fprintf(formport "TILE\n")
fprintf(formport "\n")
fprintf(formport "TEXT \"1.Please creat BUS/CLASS first\"\n")
fprintf(formport "TLOC 2 1\n")
fprintf(formport "ENDTEXT\n")
fprintf(formport "\n")
fprintf(formport "TEXT \"2.Please select blew BUS/CLASS\"\n")
fprintf(formport "TLOC 2 2\n")
fprintf(formport "ENDTEXT\n")
x =2
y = 4
foreach(curclass alleleclass_name
fieldname = car(curclass)
fprintf( formport "FIELD %s\n" fieldname)
fprintf( formport "FLOC %d %d\n" x y)
fprintf( formport "CHECKLIST \" %s\"\n" fieldname)
fprintf( formport "ENDFIELD\n\n")
y = y+2
if( y >= 64 ;大于30行就切换下一列
then
y = 4
x = x+30
)
)
fprintf(formport "FIELD sel\n")
fprintf(formport "FLOC 2 %d\n" hig)
fprintf(formport "MENUBUTTON \"Select All\" 10 3\n")
fprintf(formport "ENDFIELD \n\n")
fprintf(formport "FIELD desel\n")
fprintf(formport "FLOC 14 %d\n" hig)
fprintf(formport "MENUBUTTON \"Deselect\" 10 3\n")
fprintf(formport "ENDFIELD \n\n")
fprintf(formport "FIELD create\n")
fprintf(formport "FLOC 2 %d\n" hig+2)
fprintf(formport "MENUBUTTON \"Creat\" 10 3\n")
fprintf(formport "ENDFIELD \n\n")
fprintf(formport "FIELD cacel\n")
fprintf(formport "FLOC 14 %d\n" hig+2)
fprintf(formport "MENUBUTTON \"Exit\" 10 3\n")
fprintf(formport "ENDFIELD \n\n")
fprintf(formport "ENDTILE\n")
fprintf(formport "ENDFORM\n")
close(formport)
displayform = axlFormCreate((gensym) Formfile '(ne inner) 'createpinpairact t)
axlFormDisplay(displayform)
foreach(curclass alleleclass_name
axlFormSetField(displayform car(curclass) t)
)
if(width == 31
then
axlUIWPrint(displayform "No Class or Bus was found!")
else
axlUIWPrint(displayform "Kevin Wong")
)
deleteFile(Formfile)
)
)
defun(createpinpairact (displayform)
let( (membersel curclass onecl one alldp2net)
allclass = axlDBGetDesign()->netclass
alleleclass_name = list()
foreach(one allclass
if(one->electrical
then
alleleclass_name = cons(list(one->name one) alleleclass_name)
)
)
if(allbus = axlDBGetDesign()->bus
foreach(one allbus
alleleclass_name = cons(list(one->name one) alleleclass_name)
)
)
membersel = displayform->curField
case(membersel
("sel"
foreach(curclass alleleclass_name
axlFormSetField(displayform car(curclass) t)
axlUIWPrint(displayform "Select All")
)
)
("desel"
foreach(curclass alleleclass_name
axlFormSetField(displayform car(curclass) nil)
axlUIWPrint(displayform "Deselect All")
)
)
("create"
axlUIWPrint(displayform "Create the pinpair of selected BUS/Class")
foreach(onecl alleleclass_name
alldp2net = cadr(onecl)->groupMembers
foreach(one alldp2net
if(one->type == "DIFF_PAIR"
alldp2net = append(remove(one alldp2net) one->groupMembers)
)
)
if(axlFormGetField(displayform car(onecl))
then
curMGname = strcat("MG_" car(onecl))
allpinslist = list()
foreach(one alldp2net
allpinslist = append1(allpinslist axlPinsOfNet(one 'pin))
)
get_min_pinlist(allpinslist)
if(length(result) == 1
then
axlUIConfirm(strcat("there is some thing wrong with the BUS/Class " car(onecl)))
else
if(length(result) == 2
then
get_main_pinlist()
Creat_Match_Group()
else
if(length(result) >= 3
then
axlClearSelSet()
axlSetFindFilter(?enabled list("noall" "COMPONENTS") ?onButtons list("all"))
axlSingleSelectName("REFDES" result)
resultdbid = axlGetSelSet()
resultref = nil
foreach(ref resultdbid
resultref = append1(resultref strcat(strcat(ref->name "_") ref->deviceType))
)
choice = axlUIMultipleChoice("Please select a main CPU"
resultref strcat("Please select branch" car(onecl)))
maindev = nth(choice result)
get_main_pinlist()
Creat_Match_Group()
)
)
)
)
)
axlUIWPrint(displayform "Create the pinpair successfully!")
)
("cacel"
axlUIWPrint(displayform "Exit")
axlFormClose(displayform)
deleteFile(Formfile)
)
)
) )
defun( get_min_pinlist (allpinslist)
let( (one mlist pin2netlist i j curlist okflag)
mlist = list()
foreach(one nth(0 allpinslist)
mlist= cons(one->component->name mlist) ;list(U1 U2)
)
result = mlist
foreach(pin2netlist allpinslist
curlist = pin2netlist
i = 0
while( (i < length(mlist))
j = nth(i mlist)
okflag = 0
foreach(one curlist
if(j == one->component->name
okflag++
)
)
if(okflag == 0
result = remove(j result)
)
i++
)
)
))
defun( get_main_pinlist ()
let( (curcalcu pinid containflag)
pinneedres = list()
foreach(curcalcu allpinslist
curcalcu = car(allpinslist)
allpinslist = remove(curcalcu allpinslist)
foreach(pinid curcalcu
containflag = 0
foreach(one result
if(pinid->component->name == one
containflag++
)
)
if(containflag == 0
curcalcu = remove(pinid curcalcu) )
)
if(length(result)>=3
then
foreach(one curcalcu
if(one->component->name == maindev
curcalcu = cons(one remove(one curcalcu))
)
)
pinneedres = append1(pinneedres curcalcu)
else
pinneedres = append1(pinneedres curcalcu)
)
)
))
defun( Creat_Match_Group ()
let( (lastpinlist onepinlist lastpins onespin onelist curpinpair ref one onepin)
lastpinlist = list()
foreach(onepinlist pinneedres
lastpins = list()
foreach(one onepinlist
onespin = strcat(strcat(one->component->name ".") one->number)
lastpins = append1(lastpins onespin)
)
lastpinlist = cons(lastpins lastpinlist)
)
if(length(result) == 2
then
axlMatchGroupDelete(curMGname)
axlMatchGroupCreate(curMGname)
foreach(onelist lastpinlist
curpinpair = axlPinPair(car(onelist) cadr(onelist))
axlMatchGroupAdd(curMGname curpinpair)
axlMatchGroupProp(curMGname curpinpair strcat(curMGname ":G:::0 mil:5mil"))
)
else
if(length(result)>=3
then
groupneedsuf = remove(maindev result)
foreach(ref groupneedsuf
axlMatchGroupDelete(strcat(strcat(curMGname "_") ref))
axlMatchGroupCreate(strcat(strcat(curMGname "_") ref))
)
foreach(one lastpinlist
pinpre = car(one)
pinsuflist = cdr(one)
foreach(onepin pinsuflist
curpinpair = axlPinPair(pinpre onepin)
; car(parseString(onepin "."))
lastname = strcat(strcat(curMGname "_") car(parseString(onepin ".")))
axlMatchGroupAdd(lastname curpinpair)
axlMatchGroupProp(lastname curpinpair strcat(lastname ":G:::0 mil:20mil"))
)
)
)
)
))

复制代码

kevin890505 · 发表于 2015-10-14 16:25

penny190 发表于 2015-10-14 15:09
非常棒的Skill喔
不好意思想請問一下,要如何將對話框的中文字改變成英文的
謝謝

分别位于54，58，63，80，85，90，95行的类似 fprintf(formport "HEADER \"\264\264\275\250PinPair - kevin\"\n")的

\"XXX\"双引号中间的\"\264\264\275\250PinPair - kevin\" \+三个数字的就是一个汉字，你替换了即可
比如"\264\264\275\250PinPair - kevin\" 改成 "ABCDEFG PinPair - HHH\"
很简单，试试就知道了

ginooolu · 发表于 2015-1-26 08:24

先頂一個，再好好研究研究。謝謝了

candid · 发表于 2015-1-30 00:10

谢谢lz很好的skill

bingshuihuo · 发表于 2015-3-17 15:39

楼主现在怎么搞起SKILL了
不错！！！

bingshuihuo · 发表于 2015-3-18 11:21

bingshuihuo 发表于 2015-3-17 15:39
楼主现在怎么搞起SKILL了
不错！！！

说的对很多时候解决问题是困扰的

zwzlove · 发表于 2015-4-8 14:07

已尝试不错的skill

anjing200707 · 发表于 2015-4-14 10:36

绝对给力啊，支持个！！

霹雳风雷 · 发表于 2015-6-19 11:13

感谢楼主，太好的skill了，简直是神器！！！

subrina · 发表于 2015-7-6 16:31

谢谢楼主分享，楼主说得对，求人不如求已，赞赏楼主的精神！

qq331217160 · 发表于 2015-7-15 11:13

Hi,你skill是自学的吗？是不是要写代码的呀，我上学的时候学的是软件，还算有点基础，我也想自学，但实在不知道怎么下手，你有没有什么好的资料能推荐下呀

kevin890505 · 发表于 2015-7-15 16:38

木有资料，看ALLEGRO自带帮助，最全面的

kevin890505 · 发表于 2015-7-15 16:39

qq331217160 发表于 2015-7-15 11:13
Hi,你skill是自学的吗？是不是要写代码的呀，我上学的时候学的是软件，还算有点基础，我也想自学，但实在不 ...

木有资料，看ALLEGRO自带帮助，最全面的

selina_05 · 发表于 2015-7-19 13:44

谢谢啦~

selina_05 · 发表于 2015-7-19 13:54

学习中~

freefpga · 发表于 2015-8-8 14:53

楼主，请问上面第二幅图的画面是怎么出来的？

帐号		自动登录	找回密码
密码			注册

[原创]根据ECS里面的CLASS/BUS来自动创建PINPAIR以及对应的MATCHGROUP

EDA365欢迎您登录！

评分

点评

点评

点评

点评

点评

点评

推荐内容 /1