@@ -207,7 +207,8 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
207
207
u_long32 pe_slots = 0 , q_slots = 0 , q_version;
208
208
lListElem *pe = nullptr ;
209
209
bool is_spool = do_stree_spooling ();
210
-
210
+ u_long64 now = sge_get_gmt64 ();
211
+
211
212
or_type = lGetUlong (ep, OR_type);
212
213
or_pe = lGetString (ep, OR_pe);
213
214
@@ -310,7 +311,7 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
310
311
DRETURN (-2 );
311
312
}
312
313
lSetUlong64 (jatp, JAT_wallclock_limit,
313
- lGetUlong64 (ar, AR_end_time) - sge_get_gmt64 () - sge_gmt32_to_gmt64 (sconf_get_duration_offset ()));
314
+ lGetUlong64 (ar, AR_end_time) - now - sge_gmt32_to_gmt64 (sconf_get_duration_offset ()));
314
315
}
315
316
316
317
/* fill number of tickets into job */
@@ -614,7 +615,7 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
614
615
}
615
616
616
617
// @todo: can this be summaized with the mod event that will set the job in t-state?
617
- sge_add_event (0 , sgeE_JATASK_ADD, job_number, task_number,
618
+ sge_add_event (now , sgeE_JATASK_ADD, job_number, task_number,
618
619
nullptr , nullptr , lGetString (jep, JB_session), jatp, gdi_session);
619
620
620
621
if (sge_give_job (jep, jatp, master_qep, master_host, monitor, gdi_session)) {
@@ -646,15 +647,15 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
646
647
647
648
/* set timeout for job resend */
648
649
if (mconf_get_simulate_execds ()) {
649
- trigger_job_resend (sge_get_gmt64 () , master_host, job_number, task_number, 1 );
650
+ trigger_job_resend (now , master_host, job_number, task_number, 1 );
650
651
} else {
651
- trigger_job_resend (sge_get_gmt64 () , master_host, job_number, task_number, 5 );
652
+ trigger_job_resend (now , master_host, job_number, task_number, 5 );
652
653
}
653
654
654
655
if (pe != nullptr ) {
655
656
pe_debit_slots (pe, pe_slots, job_number);
656
657
/* this info is not spooled */
657
- sge_add_event (0 , sgeE_PE_MOD, 0 , 0 , lGetString (jatp, JAT_granted_pe), nullptr , nullptr , pe, gdi_session);
658
+ sge_add_event (now , sgeE_PE_MOD, 0 , 0 , lGetString (jatp, JAT_granted_pe), nullptr , nullptr , pe, gdi_session);
658
659
}
659
660
660
661
DPRINTF (" successfully handed off job \" " sge_u32 " \" to queue \" %s\"\n " ,
@@ -719,7 +720,7 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
719
720
lSetPosDouble (jatp, ja_pos->JAT_prio_pos , 0 );
720
721
lSetPosDouble (jatp, ja_pos->JAT_ntix_pos , 0 );
721
722
if (task_number != 0 ) { /* if task_number == 0, we only change the */
722
- sge_add_event (0 , sgeE_JATASK_MOD, job_number, task_number, nullptr , nullptr , nullptr , jatp, gdi_session);
723
+ sge_add_event (now , sgeE_JATASK_MOD, job_number, task_number, nullptr , nullptr , nullptr , jatp, gdi_session);
723
724
jatp = next_ja_task; /* pending tickets, otherwise all */
724
725
next_ja_task = lNextRW (next_ja_task);
725
726
} else {
@@ -742,7 +743,7 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
742
743
lSetDouble (jatp, JAT_prio, 0 );
743
744
lSetDouble (jatp, JAT_ntix, 0 );
744
745
if (task_number != 0 ) { /* if task_number == 0, we only change the */
745
- sge_add_event (0 , sgeE_JATASK_MOD, job_number, task_number, nullptr , nullptr , nullptr , jatp, gdi_session);
746
+ sge_add_event (now , sgeE_JATASK_MOD, job_number, task_number, nullptr , nullptr , nullptr , jatp, gdi_session);
746
747
jatp = next_ja_task; /* pending tickets, otherwise all */
747
748
next_ja_task = lNextRW (next_ja_task);
748
749
} else {
@@ -759,7 +760,7 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
759
760
760
761
sge_mutex_unlock (" follow_last_update_mutex" , __func__, __LINE__, &Follow_Control.last_update_mutex );
761
762
// @todo CS-913 we should have the tickets in sub-objects and have a ticket event having only the sub-object as data
762
- sge_add_event (0 , sgeE_JOB_MOD, job_number, 0 , nullptr , nullptr , nullptr , jep, gdi_session);
763
+ sge_add_event (now , sgeE_JOB_MOD, job_number, 0 , nullptr , nullptr , nullptr , jep, gdi_session);
763
764
}
764
765
break ;
765
766
@@ -810,7 +811,7 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
810
811
811
812
if (jatp == nullptr ) {
812
813
ERROR (MSG_JOB_FINDJOBTASK_UU, task_number, job_number);
813
- sge_add_event (0 , sgeE_JATASK_DEL, job_number, task_number,
814
+ sge_add_event (now , sgeE_JATASK_DEL, job_number, task_number,
814
815
nullptr , nullptr , lGetString (jep, JB_session), nullptr , gdi_session);
815
816
DRETURN (-2 );
816
817
}
@@ -864,9 +865,9 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
864
865
865
866
sge_mutex_unlock (" follow_last_update_mutex" , __func__, __LINE__, &Follow_Control.last_update_mutex );
866
867
if (send_task_event) {
867
- sge_add_event (0 , sgeE_JATASK_MOD, job_number, task_number, nullptr , nullptr , nullptr , jatp, gdi_session);
868
+ sge_add_event (now , sgeE_JATASK_MOD, job_number, task_number, nullptr , nullptr , nullptr , jatp, gdi_session);
868
869
}
869
- sge_add_event (0 , sgeE_JOB_MOD, job_number, 0 , nullptr , nullptr , nullptr , jep, gdi_session);
870
+ sge_add_event (now , sgeE_JOB_MOD, job_number, 0 , nullptr , nullptr , nullptr , jep, gdi_session);
870
871
871
872
#if 0
872
873
DPRINTF(("PRIORITY: " sge_u32 "." sge_u32" %f/%f tix/ntix %f npri %f/%f urg/nurg %f prio\n",
@@ -921,7 +922,7 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
921
922
jatp = job_search_task (jep, nullptr , task_number);
922
923
if (jatp == nullptr ) {
923
924
ERROR (MSG_JOB_FINDJOBTASK_UU, task_number, job_number);
924
- sge_add_event (0 , sgeE_JATASK_DEL, job_number, task_number, nullptr , nullptr , lGetString (jep, JB_session), nullptr , gdi_session);
925
+ sge_add_event (now , sgeE_JATASK_DEL, job_number, task_number, nullptr , nullptr , lGetString (jep, JB_session), nullptr , gdi_session);
925
926
DRETURN (-2 );
926
927
}
927
928
@@ -1068,8 +1069,8 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
1068
1069
sge_free (&rdp);
1069
1070
}
1070
1071
}
1071
- sge_add_event (0 , sgeE_JATASK_MOD, job_number, task_number, nullptr , nullptr , nullptr , jatp, gdi_session);
1072
- sge_add_event (0 , sgeE_JOB_MOD, job_number, 0 , nullptr , nullptr , nullptr , jep, gdi_session);
1072
+ sge_add_event (now , sgeE_JATASK_MOD, job_number, task_number, nullptr , nullptr , nullptr , jatp, gdi_session);
1073
+ sge_add_event (now , sgeE_JOB_MOD, job_number, 0 , nullptr , nullptr , nullptr , jep, gdi_session);
1073
1074
}
1074
1075
break ;
1075
1076
@@ -1107,7 +1108,7 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
1107
1108
if (or_type == ORT_remove_job) {
1108
1109
ERROR (MSG_JOB_FINDJOB_U, job_number);
1109
1110
/* try to repair schedd data - session is unknown here */
1110
- sge_add_event (0 , sgeE_JOB_DEL, job_number, task_number, nullptr , nullptr , nullptr , nullptr , gdi_session);
1111
+ sge_add_event (now , sgeE_JOB_DEL, job_number, task_number, nullptr , nullptr , nullptr , nullptr , gdi_session);
1111
1112
DRETURN (-1 );
1112
1113
} else {
1113
1114
/* in case of an immediate parallel job the job could be missing */
@@ -1415,7 +1416,7 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
1415
1416
DRETURN (-1 );
1416
1417
}
1417
1418
// @todo CS-911 don't we have to send an event here?
1418
- // sge_add_event(0 , sgeE_NEW_SHARETREE, 0, 0, nullptr, nullptr, nullptr, lFirstRW(master_stree_list), gdi_session);
1419
+ // sge_add_event(now , sgeE_NEW_SHARETREE, 0, 0, nullptr, nullptr, nullptr, lFirstRW(master_stree_list), gdi_session);
1419
1420
}
1420
1421
break ;
1421
1422
@@ -1485,7 +1486,7 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
1485
1486
}
1486
1487
1487
1488
/* update queues time stamp in schedd */
1488
- lSetUlong64 (queueep, QU_last_suspend_threshold_ckeck, sge_get_gmt64 () );
1489
+ lSetUlong64 (queueep, QU_last_suspend_threshold_ckeck, now );
1489
1490
qinstance_add_event (queueep, sgeE_QINSTANCE_MOD, gdi_session);
1490
1491
}
1491
1492
}
@@ -1534,7 +1535,7 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
1534
1535
answer_list_output (&answer_list);
1535
1536
}
1536
1537
/* update queues time stamp in schedd */
1537
- lSetUlong (queueep, QU_last_suspend_threshold_ckeck, sge_get_gmt64 () );
1538
+ lSetUlong64 (queueep, QU_last_suspend_threshold_ckeck, now );
1538
1539
qinstance_add_event (queueep, sgeE_QINSTANCE_MOD, gdi_session);
1539
1540
}
1540
1541
}
@@ -1564,7 +1565,7 @@ sge_follow_order(lListElem *ep, char *ruser, char *rhost, lList **topp, monitori
1564
1565
lAppendElem (*master_job_schedd_info_list, sme);
1565
1566
1566
1567
/* this information is not spooled (but might be usefull in a db) */
1567
- sge_add_event (0 , sgeE_JOB_SCHEDD_INFO_MOD, 0 , 0 , nullptr , nullptr , nullptr , sme, gdi_session);
1568
+ sge_add_event (now , sgeE_JOB_SCHEDD_INFO_MOD, 0 , 0 , nullptr , nullptr , nullptr , sme, gdi_session);
1568
1569
}
1569
1570
}
1570
1571
}
0 commit comments