Skip to content

P
proview
Commit 1ebe6512 authored by Claes Sjofors's avatar Claes Sjofors
Browse files
Options

History method added to VolumeConfig objects

parent abb0be99
Hide whitespace changes
Inline Side-by-side
Showing with 254 additions and 2 deletions
src/wbl/pwrb/src/pwrb_c_classvolumeconfig.wb_load
View file @ 1ebe6512
......@@ -65,6 +65,14 @@ SObject pwrb:Class
Attr MethodName = "ClassVolumeConfig-EditClassVolume"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPoson $Menu
......@@ -75,6 +83,14 @@ SObject pwrb:Class
Attr MethodName = "ClassVolumeConfig-EditClassVolume"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosos $Menu
......@@ -85,6 +101,14 @@ SObject pwrb:Class
Attr MethodName = "ClassVolumeConfig-EditClassVolume"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosms $Menu
......@@ -95,6 +119,14 @@ SObject pwrb:Class
Attr MethodName = "ClassVolumeConfig-EditClassVolume"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosmn $Menu
......@@ -105,6 +137,14 @@ SObject pwrb:Class
Attr MethodName = "ClassVolumeConfig-EditClassVolume"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
EndObject
......
src/wbl/pwrb/src/pwrb_c_nodeconfig.wb_load
View file @ 1ebe6512
......@@ -171,6 +171,66 @@ SObject pwrb:Class
Attr MethodName = "NodeConfig-PostCreate"
EndBody
EndObject
Object NavigatorPosnn $Menu
Object Pointed $Menu
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "NodeBuild,CreatePackage,CopyPackage"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPoson $Menu
Object Pointed $Menu
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "NodeBuild,CreatePackage,CopyPackage"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosos $Menu
Object Pointed $Menu
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "NodeBuild,CreatePackage,CopyPackage"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosms $Menu
Object Pointed $Menu
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "NodeBuild,CreatePackage,CopyPackage"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosmn $Menu
Object Pointed $Menu
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "NodeBuild,CreatePackage,CopyPackage"
EndBody
EndObject
EndObject
EndObject
EndObject
EndSObject
......
src/wbl/pwrb/src/pwrb_c_rootvolumeconfig.wb_load
View file @ 1ebe6512
......@@ -88,6 +88,14 @@ SObject pwrb:Class
Attr MethodName = "RootVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPoson $Menu
......@@ -98,6 +106,14 @@ SObject pwrb:Class
Attr MethodName = "RootVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosos $Menu
......@@ -108,6 +124,14 @@ SObject pwrb:Class
Attr MethodName = "RootVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosms $Menu
......@@ -118,6 +142,14 @@ SObject pwrb:Class
Attr MethodName = "RootVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosmn $Menu
......@@ -128,6 +160,14 @@ SObject pwrb:Class
Attr MethodName = "RootVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
EndObject
......
src/wbl/pwrb/src/pwrb_c_sharedvolumeconfig.wb_load
View file @ 1ebe6512
......@@ -67,6 +67,14 @@ SObject pwrb:Class
Attr MethodName = "SharedVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPoson $Menu
......@@ -77,6 +85,14 @@ SObject pwrb:Class
Attr MethodName = "SharedVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosos $Menu
......@@ -87,6 +103,14 @@ SObject pwrb:Class
Attr MethodName = "SharedVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosms $Menu
......@@ -97,6 +121,14 @@ SObject pwrb:Class
Attr MethodName = "SharedVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosmn $Menu
......@@ -107,6 +139,14 @@ SObject pwrb:Class
Attr MethodName = "SharedVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
EndObject
......
src/wbl/pwrb/src/pwrb_c_subvolumeconfig.wb_load
View file @ 1ebe6512
......@@ -68,6 +68,14 @@ SObject pwrb:Class
Attr MethodName = "SubVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPoson $Menu
......@@ -78,6 +86,14 @@ SObject pwrb:Class
Attr MethodName = "SubVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosos $Menu
......@@ -88,6 +104,14 @@ SObject pwrb:Class
Attr MethodName = "SubVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosms $Menu
......@@ -98,6 +122,14 @@ SObject pwrb:Class
Attr MethodName = "SubVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
Object NavigatorPosmn $Menu
......@@ -108,6 +140,14 @@ SObject pwrb:Class
Attr MethodName = "SubVolumeConfig-OpenDb"
EndBody
EndObject
Object History $MenuButton
Body SysBody
Attr ButtonName = "History"
Attr MethodName = "$Object-History"
Attr FilterName = "$Object-HistoryFilter"
Attr MethodArguments[0] = "ConfigSave,VolumeBuild"
EndBody
EndObject
EndObject
EndObject
EndObject
......
wb/lib/wb/src/wb_c_object.cpp
View file @ 1ebe6512
......@@ -975,7 +975,6 @@ static pwr_tStatus History( ldh_sMenuCall *ip)
char categories[80];
int showitem = 0;
pwr_tCid cid;
char *action;
char *s;
sts = ldh_ObjidToName(ip->PointedSession, ip->Pointed.Objid,
......@@ -989,7 +988,9 @@ static pwr_tStatus History( ldh_sMenuCall *ip)
"SysBody", &mb, sizeof(pwr_sMenuButton));
switch ( cid) {
case pwr_cClass_XttGraph:
case pwr_cClass_XttGraph: {
char *action;
// Get action attribute
sts = ldh_GetObjectPar( ip->PointedSession, ip->Pointed.Objid, "RtBody",
"Action", &action, &size);
......@@ -1005,6 +1006,37 @@ static pwr_tStatus History( ldh_sMenuCall *ip)
strcpy( categories, mb.MethodArguments[0]);
showitem = 1;
break;
}
case pwr_cClass_NodeConfig: {
char *nodename;
// Get NodeName attribute
sts = ldh_GetObjectPar( ip->PointedSession, ip->Pointed.Objid, "RtBody",
"NodeName", &nodename, &size);
if ( EVEN(sts)) return sts;
strcpy( item, nodename);
free( nodename);
strcpy( categories, mb.MethodArguments[0]);
showitem = 1;
break;
}
case pwr_cClass_RootVolumeConfig:
case pwr_cClass_ClassVolumeConfig:
case pwr_cClass_SubVolumeConfig:
case pwr_cClass_SharedVolumeConfig: {
pwr_tObjName vname;
// Get object name attribute
sts = ldh_ObjidToName(ip->PointedSession, ip->Pointed.Objid,
ldh_eName_Object, vname, sizeof(vname), &size);
if ( EVEN(sts)) return sts;
strcpy( item, vname);
strcpy( categories, mb.MethodArguments[0]);
showitem = 1;
break;
}
default:
// Item is object name
strcpy( item, oname);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment
GitLab Nexedi Edition | About GitLab | About Nexedi | 沪ICP备2021021310号-2 | 沪ICP备2021021310号-7