Commit 531eebf8 authored by Claes pwr46/data0/x4-6-0's avatar Claes pwr46/data0/x4-6-0

All from pwr46 local

parents c75c86d6 2c76b8e9
This diff is collapsed.
This diff is collapsed.
src/doc/man/src/dg_fig79.png

25.1 KB | W: | H:

src/doc/man/src/dg_fig79.png

78.4 KB | W: | H:

src/doc/man/src/dg_fig79.png
src/doc/man/src/dg_fig79.png
src/doc/man/src/dg_fig79.png
src/doc/man/src/dg_fig79.png
  • 2-up
  • Swipe
  • Onion skin
...@@ -543,6 +543,7 @@ INPUT = $(pwre_sroot)/doc/prm/src/doxygen.dx \ ...@@ -543,6 +543,7 @@ INPUT = $(pwre_sroot)/doc/prm/src/doxygen.dx \
$(pwre_sroot)/lib/rt/src/rt_qcom.h \ $(pwre_sroot)/lib/rt/src/rt_qcom.h \
$(pwre_croot)/nmps/lib/nmps/src/nmps_appl.h \ $(pwre_croot)/nmps/lib/nmps/src/nmps_appl.h \
$(pwre_sroot)/lib/rt/src/rt_appl.h \ $(pwre_sroot)/lib/rt/src/rt_appl.h \
$(pwre_sroot)/lib/rt/src/rt_appl.cpp \
$(pwre_sroot)/lib/co/src/co_time.c \ $(pwre_sroot)/lib/co/src/co_time.c \
$(pwre_sroot)/lib/co/src/co_cdh.c \ $(pwre_sroot)/lib/co/src/co_cdh.c \
$(pwre_sroot)/lib/rt/src/rt_gdh.c \ $(pwre_sroot)/lib/rt/src/rt_gdh.c \
......
...@@ -41,7 +41,7 @@ $(clean_html) : clean_%.html : %.html ...@@ -41,7 +41,7 @@ $(clean_html) : clean_%.html : %.html
$(doc_dir)/prm/index.html : ../../doxygen.dx $(doc_dir)/prm/index.html : ../../doxygen.dx
@ echo "doxygen documentation $(source) $(target)" @ echo "doxygen documentation $(source) $(target)"
@ doxygen @ doxygen
@ if [ -e latex ]; then \ @ if [ "`eval which pdflatex`" != "" ]; then \
./repl.sh latex/*.tex; \ ./repl.sh latex/*.tex; \
cd latex; \ cd latex; \
make pdf; \ make pdf; \
...@@ -49,10 +49,10 @@ $(doc_dir)/prm/index.html : ../../doxygen.dx ...@@ -49,10 +49,10 @@ $(doc_dir)/prm/index.html : ../../doxygen.dx
cp classra__appl.pdf $(pwr_doc)/en_us/; \ cp classra__appl.pdf $(pwr_doc)/en_us/; \
cp classrt__appl.pdf $(pwr_doc)/en_us/; \ cp classrt__appl.pdf $(pwr_doc)/en_us/; \
cd ..; \ cd ..; \
rm -r -f latex; \
rm -f repl.sed; \ rm -f repl.sed; \
rm -f repl.tmp; \ rm -f repl.tmp; \
fi fi; \
rm -r -f latex;
......
...@@ -62,7 +62,7 @@ void MyAppl::init( qcom_sQid *qid) ...@@ -62,7 +62,7 @@ void MyAppl::init( qcom_sQid *qid)
} }
// Create a queue to receive stop and restart events // Create a queue to receive stop and restart events
if (!qcom_Init(&sts, 0, "rs_appl")) { if (!qcom_Init(&sts, 0, "rs_appl")) {
errh_Fatal("qcom_Init, %m", sts); errh_Fatal("qcom_Init, %m", sts);
errh_SetStatus( PWR__APPLTERM); errh_SetStatus( PWR__APPLTERM);
exit(sts); exit(sts);
...@@ -70,14 +70,14 @@ void MyAppl::init( qcom_sQid *qid) ...@@ -70,14 +70,14 @@ void MyAppl::init( qcom_sQid *qid)
qAttr.type = qcom_eQtype_private; qAttr.type = qcom_eQtype_private;
qAttr.quota = 100; qAttr.quota = 100;
if (!qcom_CreateQ(&sts, qid, &qAttr, "events")) { if (!qcom_CreateQ(&sts, qid, &qAttr, "events")) {
errh_Fatal("qcom_CreateQ, %m", sts); errh_Fatal("qcom_CreateQ, %m", sts);
errh_SetStatus( PWR__APPLTERM); errh_SetStatus( PWR__APPLTERM);
exit(sts); exit(sts);
} }
qini = qcom_cQini; qini = qcom_cQini;
if (!qcom_Bind(&sts, qid, &qini)) { if (!qcom_Bind(&sts, qid, &qini)) {
errh_Fatal("qcom_Bind(Qini), %m", sts); errh_Fatal("qcom_Bind(Qini), %m", sts);
errh_SetStatus( PWR__APPLTERM); errh_SetStatus( PWR__APPLTERM);
exit(-1); exit(-1);
...@@ -90,7 +90,7 @@ void MyAppl::open() ...@@ -90,7 +90,7 @@ void MyAppl::open()
pwr_tStatus sts; pwr_tStatus sts;
// Get configuration object // Get configuration object
sts = gdh_NameToObjid( "Noder-Node-MyAppl", &oid); sts = gdh_NameToObjid( "Noder-Node-MyAppl", &oid);
if ( EVEN(sts)) throw co_error(sts); if ( EVEN(sts)) throw co_error(sts);
aproc_RegisterObject( oid); aproc_RegisterObject( oid);
...@@ -121,12 +121,12 @@ int main() ...@@ -121,12 +121,12 @@ int main()
int swap = 0; int swap = 0;
bool first_scan = true; bool first_scan = true;
appl.init( &qid); appl.init( &qid);
try { try {
appl.open(); appl.open();
} }
catch ( co_error& e) { catch ( co_error& e) {
errh_Error( (char *)e.what().c_str()); errh_Error( (char *)e.what().c_str());
errh_Fatal( "rs_appl aborting"); errh_Fatal( "rs_appl aborting");
errh_SetStatus( PWR__APPLTERM); errh_SetStatus( PWR__APPLTERM);
...@@ -144,21 +144,21 @@ int main() ...@@ -144,21 +144,21 @@ int main()
get.maxSize = sizeof(mp); get.maxSize = sizeof(mp);
get.data = mp; get.data = mp;
qcom_Get( &sts, &qid, &get, tmo); qcom_Get( &sts, &qid, &get, tmo);
if (sts == QCOM__TMO || sts == QCOM__QEMPTY) { if (sts == QCOM__TMO || sts == QCOM__QEMPTY) {
if ( !swap) if ( !swap)
appl.scan(); appl.scan();
} }
else { else {
ini_mEvent new_event; ini_mEvent new_event;
qcom_sEvent *ep = (qcom_sEvent*) get.data; qcom_sEvent *ep = (qcom_sEvent*) get.data;
new_event.m = ep->mask; new_event.m = ep->mask;
if (new_event.b.oldPlcStop && !swap) { if (new_event.b.oldPlcStop && !swap) {
errh_SetStatus( PWR__APPLRESTART); errh_SetStatus( PWR__APPLRESTART);
swap = 1; swap = 1;
appl.close(); appl.close();
} else if (new_event.b.swapDone && swap) { } else if (new_event.b.swapDone && swap) {
swap = 0; swap = 0;
appl.open(); appl.open();
errh_SetStatus( PWR__ARUN); errh_SetStatus( PWR__ARUN);
......
...@@ -20,6 +20,10 @@ ...@@ -20,6 +20,10 @@
#ifndef rt_nmps_lock_h #ifndef rt_nmps_lock_h
#define rt_nmps_lock_h #define rt_nmps_lock_h
#if defined __cplusplus
extern "C" {
#endif
#include "pwr.h" #include "pwr.h"
#include "rt_sect.h" #include "rt_sect.h"
...@@ -33,4 +37,7 @@ void nmps_create_lock( pwr_tStatus *sts); ...@@ -33,4 +37,7 @@ void nmps_create_lock( pwr_tStatus *sts);
void nmps_delete_lock( pwr_tStatus *sts); void nmps_delete_lock( pwr_tStatus *sts);
void nmps_unlink_lock( pwr_tStatus *sts); void nmps_unlink_lock( pwr_tStatus *sts);
#if defined __cplusplus
}
#endif
#endif #endif
Package: pwr46 Package: pwr46
Version: 4.6.0-4 Version: 4.6.0-5
Section: base Section: base
Priority: optional Priority: optional
Architecture: i386 Architecture: i386
...@@ -15,3 +15,5 @@ Description: Proview development and runtime environment package ...@@ -15,3 +15,5 @@ Description: Proview development and runtime environment package
- Sev: error handling improved. - Sev: error handling improved.
4.6.0-4 4.6.0-4
- Metric fonts in Ge and Xtt. - Metric fonts in Ge and Xtt.
4.6.0-5
- Wb, Xtt: Problem with insensitive radiobuttons fixed.
Package: pwrdemo46 Package: pwrdemo46
Version: 4.6.0-4 Version: 4.6.0-5
Section: base Section: base
Priority: optional Priority: optional
Architecture: i386 Architecture: i386
......
Package: pwrrt Package: pwrrt
Version: 4.6.0-4 Version: 4.6.0-5
Section: base Section: base
Priority: optional Priority: optional
Architecture: i386 Architecture: i386
...@@ -15,3 +15,5 @@ Description: ...@@ -15,3 +15,5 @@ Description:
- Sev: error handling improved. - Sev: error handling improved.
4.6.0-4 4.6.0-4
- Metric fonts in Ge and Xtt. - Metric fonts in Ge and Xtt.
4.6.0-5
- Wb, Xtt: Problem with insensitive radiobuttons fixed.
Package: pwrsev Package: pwrsev
Version: 4.6.0-4 Version: 4.6.0-5
Section: base Section: base
Priority: optional Priority: optional
Architecture: i386 Architecture: i386
......
...@@ -117,3 +117,4 @@ ...@@ -117,3 +117,4 @@
081009 cs wb New pages in Configure DirectoryVolume wizard to register a volume and open the database for a volume. 081009 cs wb New pages in Configure DirectoryVolume wizard to register a volume and open the database for a volume.
081009 cs wb New script functions CheckSystemGroup, GetNextFreeUserVid, CheckNewVid, CheckNewVolumeName and GetCurrentVolume. 081009 cs wb New script functions CheckSystemGroup, GetNextFreeUserVid, CheckNewVid, CheckNewVolumeName and GetCurrentVolume.
081110 cs plc Bugfix in execute order for Set/Res/Sto objects without input or output connection. 081110 cs plc Bugfix in execute order for Set/Res/Sto objects without input or output connection.
081218 cs plc Bugfix in flow file. Trace data wasn't stored at change of mode from edit to view.
\ No newline at end of file
...@@ -71,12 +71,7 @@ void WFoe::activate_save() ...@@ -71,12 +71,7 @@ void WFoe::activate_save()
vldh_t_wind wind; vldh_t_wind wind;
vldh_t_node parent_node; vldh_t_node parent_node;
int sts; int sts;
int size;
pwr_tOName name;
vldh_t_plc plc; vldh_t_plc plc;
pwr_tFileName fname;
char classname[80];
pwr_tObjid classdef;
if ( msg_label_id != 0 ) message( ""); if ( msg_label_id != 0 ) message( "");
...@@ -98,28 +93,8 @@ void WFoe::activate_save() ...@@ -98,28 +93,8 @@ void WFoe::activate_save()
} }
} }
clock_cursor(); clock_cursor();
if ( !classeditor) { sts = create_flow();
sts = gre->set_trace_attributes( 0); sts = gre->undelete_reset();
sts = gre->save( 0);
sts = gre->undelete_reset();
}
else {
sts = ldh_ObjidToName( wind->hw.ldhses, plc->lp.oid,
ldh_eName_Hierarchy, name, sizeof( name), &size);
if ( EVEN(sts)) return;
sts = ldh_GetParent( wind->hw.ldhses, plc->lp.oid, &classdef);
if ( EVEN(sts)) return;
sts = ldh_ObjidToName( wind->hw.ldhses, classdef,
ldh_eName_Object, classname, sizeof( classname), &size);
if ( EVEN(sts)) return;
cdh_ToLower( classname, classname);
sprintf( fname, "$pwrp_load/pwr_%s.flw", classname);
sts = gre->set_trace_attributes( name);
sts = gre->save( fname);
sts = gre->undelete_reset();
}
disable_ldh_cb(); disable_ldh_cb();
sts = vldh_wind_save( gre->wind); sts = vldh_wind_save( gre->wind);
enable_ldh_cb(); enable_ldh_cb();
...@@ -1399,12 +1374,11 @@ void WFoe::exit_save( WFoe *foe) ...@@ -1399,12 +1374,11 @@ void WFoe::exit_save( WFoe *foe)
} }
} }
foe->clock_cursor(); foe->clock_cursor();
sts = foe->create_flow();
foe->disable_ldh_cb(); foe->disable_ldh_cb();
sts = vldh_wind_save( foe->gre->wind); sts = vldh_wind_save( foe->gre->wind);
foe->error_msg( sts); foe->error_msg( sts);
foe->gre->save( 0);
foe->normal_cursor(); foe->normal_cursor();
if ( sts == VLDH__PLCNOTSAVED ) { if ( sts == VLDH__PLCNOTSAVED ) {
foe->msgbox( "Save the plcprogram in the hierarchy editor first"); foe->msgbox( "Save the plcprogram in the hierarchy editor first");
...@@ -3804,7 +3778,7 @@ void WFoe::edit_exit_save( WFoe *foe) ...@@ -3804,7 +3778,7 @@ void WFoe::edit_exit_save( WFoe *foe)
return; return;
} }
foe->gre->save( 0); foe->create_flow();
/* Change the funktion */ /* Change the funktion */
switch( foe->wanted_function) { switch( foe->wanted_function) {
...@@ -3888,8 +3862,7 @@ int WFoe::redraw_and_save() ...@@ -3888,8 +3862,7 @@ int WFoe::redraw_and_save()
enable_ldh_cb(); enable_ldh_cb();
if ( EVEN(sts)) return sts; if ( EVEN(sts)) return sts;
sts = gre->set_trace_attributes( 0); sts = create_flow();
sts = gre->save( 0);
if ( EVEN(sts)) return sts; if ( EVEN(sts)) return sts;
return FOE__SUCCESS; return FOE__SUCCESS;
......
...@@ -15823,7 +15823,8 @@ static pwr_tStatus gcg_replace_ref( gcg_ctx gcgctx, pwr_sAttrRef *attrref, ...@@ -15823,7 +15823,8 @@ static pwr_tStatus gcg_replace_ref( gcg_ctx gcgctx, pwr_sAttrRef *attrref,
attrref->Objid = connect_arp->Objid; attrref->Objid = connect_arp->Objid;
attrref->Offset += connect_arp->Offset; attrref->Offset += connect_arp->Offset;
if ( attrref->Flags.b.Object && (attrref->Offset || attrref->Size < connect_arp->Size)) { if ( attrref->Flags.b.Object &&
(attrref->Offset || ( attrref->Size && attrref->Size < connect_arp->Size))) {
attrref->Flags.b.Object = 0; attrref->Flags.b.Object = 0;
attrref->Flags.b.ObjectAttr = 1; attrref->Flags.b.ObjectAttr = 1;
} }
......
...@@ -1160,6 +1160,9 @@ static char *font_string( flow_eDrawType gc_type, double size) ...@@ -1160,6 +1160,9 @@ static char *font_string( flow_eDrawType gc_type, double size)
default: default:
sprintf( str, "%s %f", FONTSTR, FONT_SCALE * size); sprintf( str, "%s %f", FONTSTR, FONT_SCALE * size);
} }
for ( char *s = str; *s; s++)
if ( *s == ',')
*s = '.';
return str; return str;
} }
......
...@@ -4306,6 +4306,9 @@ int GeValueInput::change_value( grow_tObject object, char *text) ...@@ -4306,6 +4306,9 @@ int GeValueInput::change_value( grow_tObject object, char *text)
db = dyn->parse_attr_name( value_element->attribute, parsed_name, &inverted, db = dyn->parse_attr_name( value_element->attribute, parsed_name, &inverted,
&attr_type, &attr_size); &attr_type, &attr_size);
if ( parsed_name[0] == '&')
dyn->graph->get_reference_name( parsed_name, parsed_name);
if ( !annot_size ) { if ( !annot_size ) {
pwr_sAttrRef ar; pwr_sAttrRef ar;
pwr_tTypeId a_type_id; pwr_tTypeId a_type_id;
......
...@@ -511,7 +511,7 @@ void Graph::open( char *filename) ...@@ -511,7 +511,7 @@ void Graph::open( char *filename)
grow->grow_setup(); grow->grow_setup();
// Set temporary language translation on class graphs // Set temporary language translation on class graphs
if ( strcmp( object_name, "") != 0) // if ( strcmp( object_name, "") != 0)
grow_EnableEvent( grow->ctx, glow_eEvent_Translate, grow_EnableEvent( grow->ctx, glow_eEvent_Translate,
glow_eEventType_CallBack, graph_grow_cb); glow_eEventType_CallBack, graph_grow_cb);
......
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