# Chameleon switch

class Chassis {
	hotswapProc dmsHotswap
	bitmap "chameleon/v1208/bitmaps/bs_unsupported_front.gif"
	children {Card}
	Card.positions {}
	Card.instances {}
}

include "450.dms"

class Chassis {
	isSelect 0
	isStack 1
	grpIndx 3
        statusVar s5ChasBrdLeds

	menuedit {
		{command -label "Chassis..." -command {dm_Select .chassis 1; dm_DoMenu edit Chassis}}
		{command -label "IP..." -command {dm_Dialog edit IP}}
		{command -label "Bridge..." -command {dm_Dialog edit Bridge}}
	}
}

# max 8 450 switch with 1 MDA for 1 450
class Card {
	discoverProc "dmsDiscoverCardType 16"
        statusVar s5ChasBrdLeds
        statusProc dms450SLedsStatusProc
        endStatusProc dms450SActLedsStatusProc
        instanceProc dmsCardInstanceProc
	indexNames {Unit/MDA}
	indexNamesProc dmIndexCardProc
}
class Port {
        instanceProc dmsPortInstanceProc
}
