void
req_orderjob(struct batch_request *req)
{
int jt1, jt2; /* job type */
job *pjob;
job *pjob1;
job *pjob2;
long rank;
int rc;
char tmpqn[PBS_MAXQUEUENAME+1];
if ((pjob1=chk_job_request(req->rq_ind.rq_move.rq_jid, req, &jt1)) == NULL)
return;
if ((pjob2=chk_job_request(req->rq_ind.rq_move.rq_destin, req, &jt2)) == NULL)
return;
if ((jt1 == IS_ARRAY_Single) || (jt2 == IS_ARRAY_Single) ||
(jt1 == IS_ARRAY_Range) || (jt2 == IS_ARRAY_Range)) {
/* can only move regular or Array Job, not Subjobs */
req_reject(PBSE_IVALREQ, 0, req);
return;
}
if (((pjob = pjob1)->ji_qs.ji_state == JOB_STATE_RUNNING) ||
((pjob = pjob2)->ji_qs.ji_state == JOB_STATE_RUNNING) ||
((pjob = pjob1)->ji_qs.ji_state == JOB_STATE_BEGUN) ||
((pjob = pjob2)->ji_qs.ji_state == JOB_STATE_BEGUN)) {
#ifndef NDEBUG
(void)sprintf(log_buffer, "(%s) %s, state=%d",
__func__, msg_badstate, pjob->ji_qs.ji_state);
log_event(PBSEVENT_DEBUG, PBS_EVENTCLASS_JOB, LOG_DEBUG,
pjob->ji_qs.ji_jobid, log_buffer);
#endif /* NDEBUG */
req_reject(PBSE_BADSTATE, 0, req);
return;
} else if (pjob1->ji_qhdr != pjob2->ji_qhdr) {
/* Jobs are in different queues */
if ((rc = svr_chkque(pjob1, pjob2->ji_qhdr,
get_hostPart(pjob1->ji_wattr[(int)JOB_ATR_job_owner].at_val.at_str),
MOVE_TYPE_Order)) ||
(rc = svr_chkque(pjob2, pjob1->ji_qhdr,
get_hostPart(pjob2->ji_wattr[(int)JOB_ATR_job_owner].at_val.at_str),
MOVE_TYPE_Order))) {
req_reject(rc, 0, req);
return;
}
}
/* now swap the order of the two jobs in the queue lists */
rank = pjob1->ji_wattr[(int)JOB_ATR_qrank].at_val.at_long;
pjob1->ji_wattr[(int)JOB_ATR_qrank].at_val.at_long =
pjob2->ji_wattr[(int)JOB_ATR_qrank].at_val.at_long;
pjob1->ji_wattr[(int)JOB_ATR_qrank].at_flags |= ATR_VFLAG_MODCACHE;
pjob2->ji_wattr[(int)JOB_ATR_qrank].at_val.at_long = rank;
pjob2->ji_wattr[(int)JOB_ATR_qrank].at_flags |= ATR_VFLAG_MODCACHE;
if (pjob1->ji_qhdr != pjob2->ji_qhdr) {
(void)strcpy(tmpqn, pjob1->ji_qs.ji_queue);
(void)strcpy(pjob1->ji_qs.ji_queue, pjob2->ji_qs.ji_queue);
(void)strcpy(pjob2->ji_qs.ji_queue, tmpqn);
svr_dequejob(pjob1);
svr_dequejob(pjob2);
(void)svr_enquejob(pjob1);
(void)svr_enquejob(pjob2);
} else {
swap_link(&pjob1->ji_jobque, &pjob2->ji_jobque);
swap_link(&pjob1->ji_alljobs, &pjob2->ji_alljobs);
}
/* need to update disk copy of both jobs to save new order */
(void)job_save(pjob1, SAVEJOB_FULL);
(void)job_save(pjob2, SAVEJOB_FULL);
reply_ack(req);
}
void req_orderjob(
struct batch_request *req) /* I */
{
#ifndef NDEBUG
char *id = "req_orderjob";
#endif
job *pjob;
job *pjob1;
job *pjob2;
int rank;
int rc;
char tmpqn[PBS_MAXQUEUENAME+1];
if ((pjob1 = chk_job_request(req->rq_ind.rq_move.rq_jid, req)) == NULL)
{
return;
}
if ((pjob2 = chk_job_request(req->rq_ind.rq_move.rq_destin, req)) == NULL)
{
return;
}
if (((pjob = pjob1)->ji_qs.ji_state == JOB_STATE_RUNNING) ||
((pjob = pjob2)->ji_qs.ji_state == JOB_STATE_RUNNING))
{
#ifndef NDEBUG
sprintf(log_buffer, "%s %d",
pbse_to_txt(PBSE_BADSTATE),
pjob->ji_qs.ji_state);
strcat(log_buffer, id);
log_event(
PBSEVENT_DEBUG,
PBS_EVENTCLASS_JOB,
pjob->ji_qs.ji_jobid,
log_buffer);
#endif /* NDEBUG */
req_reject(PBSE_BADSTATE, 0, req, NULL, NULL);
return;
}
else if (pjob1->ji_qhdr != pjob2->ji_qhdr)
{
/* jobs are in different queues */
if ((rc = svr_chkque(
pjob1,
pjob2->ji_qhdr,
get_variable(pjob1, pbs_o_host),
MOVE_TYPE_Order,
NULL)) ||
(rc = svr_chkque(
pjob2,
pjob1->ji_qhdr,
get_variable(pjob2, pbs_o_host),
MOVE_TYPE_Order,
NULL)))
{
req_reject(rc, 0, req, NULL, NULL);
return;
}
}
/* now swap the order of the two jobs in the queue lists */
rank = pjob1->ji_wattr[(int)JOB_ATR_qrank].at_val.at_long;
pjob1->ji_wattr[(int)JOB_ATR_qrank].at_val.at_long =
pjob2->ji_wattr[(int)JOB_ATR_qrank].at_val.at_long;
pjob2->ji_wattr[(int)JOB_ATR_qrank].at_val.at_long = rank;
if (pjob1->ji_qhdr != pjob2->ji_qhdr)
{
(void)strcpy(tmpqn, pjob1->ji_qs.ji_queue);
(void)strcpy(pjob1->ji_qs.ji_queue, pjob2->ji_qs.ji_queue);
(void)strcpy(pjob2->ji_qs.ji_queue, tmpqn);
svr_dequejob(pjob1);
svr_dequejob(pjob2);
(void)svr_enquejob(pjob1);
(void)svr_enquejob(pjob2);
}
else
{
swap_link(&pjob1->ji_jobque, &pjob2->ji_jobque);
swap_link(&pjob1->ji_alljobs, &pjob2->ji_alljobs);
}
/* need to update disk copy of both jobs to save new order */
job_save(pjob1, SAVEJOB_FULL);
job_save(pjob2, SAVEJOB_FULL);
reply_ack(req);
/* SUCCESS */
return;
} /* END req_orderjob() */
