extern void create_create_popup(GtkAction *action, gpointer user_data) { GtkWidget *popup = gtk_dialog_new_with_buttons( "Create", GTK_WINDOW(user_data), GTK_DIALOG_MODAL | GTK_DIALOG_DESTROY_WITH_PARENT, NULL); int i, response = 0; GtkWidget *label = NULL; GtkWidget *entry = NULL; GtkTreeModel *model = NULL; GtkTreeIter iter; const gchar *name = gtk_action_get_name(action); sview_search_info_t sview_search_info; job_desc_msg_t *job_msg = NULL; submit_response_msg_t *slurm_alloc_msg = NULL; update_part_msg_t *part_msg = NULL; resv_desc_msg_t *resv_msg = NULL; char *res_name, *temp; sview_search_info.gchar_data = NULL; sview_search_info.int_data = NO_VAL; sview_search_info.int_data2 = NO_VAL; label = gtk_dialog_add_button(GTK_DIALOG(popup), GTK_STOCK_OK, GTK_RESPONSE_OK); gtk_window_set_default(GTK_WINDOW(popup), label); gtk_dialog_add_button(GTK_DIALOG(popup), GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL); gtk_window_set_default_size(GTK_WINDOW(popup), 400, 600); if (!strcmp(name, "batch_job")) { sview_search_info.search_type = CREATE_BATCH_JOB; entry = create_entry(); label = gtk_label_new( "Batch job submission specifications\n\n" "Specify size (task and/or node count) plus the\n" "script. All other fields are optional.\n\n" "More fields will be made available later."); job_msg = xmalloc(sizeof(job_desc_msg_t)); slurm_init_job_desc_msg(job_msg); job_msg->group_id = getgid(); job_msg->user_id = getuid(); job_msg->work_dir = xmalloc(1024); if (!getcwd(job_msg->work_dir, 1024)) goto end_it; entry = create_job_entry(job_msg, model, &iter); } else if (!strcmp(name, "partition")) { sview_search_info.search_type = CREATE_PARTITION; entry = create_entry(); label = gtk_label_new( "Partition creation specifications\n\n" "Specify Name. All other fields are optional."); part_msg = xmalloc(sizeof(update_part_msg_t)); slurm_init_part_desc_msg(part_msg); entry = create_part_entry(part_msg, model, &iter); } else if (!strcmp(name, "reservation")) { sview_search_info.search_type = CREATE_RESERVATION; label = gtk_label_new( "Reservation creation specifications\n\n" "Specify Time_Start and either Duration or Time_End.\n" #ifdef HAVE_BG "Specify either Node_Count or Midplane_List.\n" #else "Specify either Node_Count or Node_List.\n" #endif "Specify either Accounts or Users.\n\n" "Supported Flags include: Maintenance, Overlap,\n" "Ignore_Jobs, Daily and Weekly, License_Only\n" "and Static_Alloc.\n" "All other fields are optional."); resv_msg = xmalloc(sizeof(resv_desc_msg_t)); slurm_init_resv_desc_msg(resv_msg); entry = create_resv_entry(resv_msg, model, &iter); } else { sview_search_info.search_type = 0; goto end_it; } gtk_box_pack_start(GTK_BOX(GTK_DIALOG(popup)->vbox), label, FALSE, FALSE, 0); gtk_box_pack_start(GTK_BOX(GTK_DIALOG(popup)->vbox), entry, TRUE, TRUE, 0); gtk_widget_show_all(popup); response = gtk_dialog_run (GTK_DIALOG(popup)); if (response == GTK_RESPONSE_OK) { if (!sview_search_info.search_type) goto end_it; switch(sview_search_info.search_type) { case CREATE_BATCH_JOB: response = slurm_submit_batch_job(job_msg, &slurm_alloc_msg); if (response == SLURM_SUCCESS) { temp = g_strdup_printf( "Job %u submitted", slurm_alloc_msg->job_id); } else { temp = g_strdup_printf( "Problem submitting job: %s", slurm_strerror(slurm_get_errno())); } display_edit_note(temp); g_free(temp); break; case CREATE_PARTITION: response = slurm_create_partition(part_msg); if (response == SLURM_SUCCESS) { temp = g_strdup_printf("Partition %s created", part_msg->name); } else { temp = g_strdup_printf( "Problem creating partition: %s", slurm_strerror(slurm_get_errno())); } display_edit_note(temp); g_free(temp); break; case CREATE_RESERVATION: res_name = slurm_create_reservation(resv_msg); if (res_name) { temp = g_strdup_printf( "Reservation %s created", res_name); free(res_name); } else { temp = g_strdup_printf( "Problem creating reservation: %s", slurm_strerror(slurm_get_errno())); } display_edit_note(temp); g_free(temp); break; default: break; } } end_it: gtk_widget_destroy(popup); if (slurm_alloc_msg) slurm_free_submit_response_response_msg(slurm_alloc_msg); if (job_msg) { for (i = 0; i < job_msg->argc; i++) xfree(job_msg->argv[i]); xfree(job_msg->argv); xfree(job_msg->name); xfree(job_msg->script); xfree(job_msg->work_dir); xfree(job_msg); } xfree(part_msg); if (resv_msg) slurm_free_resv_desc_msg(resv_msg); return; }
/* * scontrol_create_res - create the slurm reservation configuration per the * supplied arguments * IN argc - count of arguments * IN argv - list of arguments * RET 0 if no slurm error, errno otherwise. parsing error prints * error message and returns 0. */ extern int scontrol_create_res(int argc, char *argv[]) { resv_desc_msg_t resv_msg; char *new_res_name = NULL; int free_user_str = 0, free_acct_str = 0; int err, ret = 0; slurm_init_resv_desc_msg (&resv_msg); err = scontrol_parse_res_options(argc, argv, "No reservation created.", &resv_msg, &free_user_str, &free_acct_str); if (err) goto SCONTROL_CREATE_RES_CLEANUP; if (resv_msg.start_time == (time_t)NO_VAL) { exit_code = 1; error("A start time must be given. No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } if (resv_msg.end_time == (time_t)NO_VAL && resv_msg.duration == (uint32_t)NO_VAL) { exit_code = 1; error("An end time or duration must be given. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } if (resv_msg.end_time != (time_t)NO_VAL && resv_msg.duration != (uint32_t)NO_VAL && resv_msg.start_time + resv_msg.duration*60 != resv_msg.end_time) { exit_code = 1; error("StartTime + Duration does not equal EndTime. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } if (resv_msg.start_time > resv_msg.end_time && resv_msg.end_time != (time_t)NO_VAL) { exit_code = 1; error("Start time cannot be after end time. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } if (resv_msg.node_cnt == NO_VAL && (resv_msg.node_list == NULL || resv_msg.node_list[0] == '\0') && (resv_msg.licenses == NULL || resv_msg.licenses[0] == '\0')) { exit_code = 1; error("Nodes, NodeCnt or Licenses must be specified. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } if ((resv_msg.users == NULL || resv_msg.users[0] == '\0') && (resv_msg.accounts == NULL || resv_msg.accounts[0] == '\0')) { exit_code = 1; error("Either Users or Accounts must be specified. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } new_res_name = slurm_create_reservation(&resv_msg); if (!new_res_name) { exit_code = 1; slurm_perror("Error creating the reservation"); ret = slurm_get_errno(); } else { printf("Reservation created: %s\n", new_res_name); free(new_res_name); } SCONTROL_CREATE_RES_CLEANUP: if (free_user_str) xfree(resv_msg.users); if (free_acct_str) xfree(resv_msg.accounts); return ret; }
/* * scontrol_create_res - create the slurm reservation configuration per the * supplied arguments * IN argc - count of arguments * IN argv - list of arguments * RET 0 if no slurm error, errno otherwise. parsing error prints * error message and returns 0. */ extern int scontrol_create_res(int argc, char *argv[]) { resv_desc_msg_t resv_msg; char *new_res_name = NULL; int free_user_str = 0, free_acct_str = 0, free_tres_license = 0, free_tres_bb = 0, free_tres_corecnt = 0, free_tres_nodecnt = 0; int err, ret = 0; slurm_init_resv_desc_msg (&resv_msg); err = scontrol_parse_res_options(argc, argv, "No reservation created.", &resv_msg, &free_user_str, &free_acct_str, &free_tres_license, &free_tres_bb, &free_tres_corecnt, &free_tres_nodecnt); if (err) goto SCONTROL_CREATE_RES_CLEANUP; if (resv_msg.start_time == (time_t)NO_VAL) { exit_code = 1; error("A start time must be given. No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } if (resv_msg.end_time == (time_t)NO_VAL && resv_msg.duration == (uint32_t)NO_VAL) { exit_code = 1; error("An end time or duration must be given. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } if (resv_msg.end_time != (time_t)NO_VAL && resv_msg.duration != (uint32_t)NO_VAL && resv_msg.start_time + resv_msg.duration*60 != resv_msg.end_time) { exit_code = 1; error("StartTime + Duration does not equal EndTime. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } if (resv_msg.start_time > resv_msg.end_time && resv_msg.end_time != (time_t)NO_VAL) { exit_code = 1; error("Start time cannot be after end time. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } /* * If "ALL" is specified for the nodes and a partition is specified, * only allocate all of the nodes the partition. */ if ((resv_msg.partition != NULL) && (resv_msg.node_list != NULL) && (strcasecmp(resv_msg.node_list, "ALL") == 0)) { if (resv_msg.flags == NO_VAL) resv_msg.flags = RESERVE_FLAG_PART_NODES; else resv_msg.flags |= RESERVE_FLAG_PART_NODES; } /* * If "ALL" is specified for the nodes and RESERVE_FLAG_PART_NODES * flag is set make sure a partition name is specified. */ if ((resv_msg.partition == NULL) && (resv_msg.node_list != NULL) && (strcasecmp(resv_msg.node_list, "ALL") == 0) && (resv_msg.flags != NO_VAL) && (resv_msg.flags & RESERVE_FLAG_PART_NODES)) { exit_code = 1; error("Part_Nodes flag requires specifying a Partition. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } /* * If the following parameters are null, but a partition is named, then * make the reservation for the whole partition. */ if ((resv_msg.core_cnt == 0) && (resv_msg.burst_buffer == NULL || resv_msg.burst_buffer[0] == '\0') && (resv_msg.node_cnt == NULL || resv_msg.node_cnt[0] == 0) && (resv_msg.node_list == NULL || resv_msg.node_list[0] == '\0') && (resv_msg.licenses == NULL || resv_msg.licenses[0] == '\0') && (resv_msg.resv_watts == NO_VAL)) { if (resv_msg.partition == NULL) { exit_code = 1; error("CoreCnt, Nodes, NodeCnt, BurstBuffer, Licenses" "or Watts must be specified. No reservation " "created."); goto SCONTROL_CREATE_RES_CLEANUP; } if (resv_msg.flags == (uint16_t) NO_VAL) resv_msg.flags = RESERVE_FLAG_PART_NODES; else resv_msg.flags |= RESERVE_FLAG_PART_NODES; resv_msg.node_list = "ALL"; } if ((resv_msg.users == NULL || resv_msg.users[0] == '\0') && (resv_msg.accounts == NULL || resv_msg.accounts[0] == '\0')) { exit_code = 1; error("Either Users or Accounts must be specified. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } if (resv_msg.resv_watts != NO_VAL && (!(resv_msg.flags & RESERVE_FLAG_ANY_NODES) || (resv_msg.core_cnt != 0) || (resv_msg.node_cnt != NULL && resv_msg.node_cnt[0] != 0) || (resv_msg.node_list != NULL && resv_msg.node_list[0] != '\0') || (resv_msg.licenses != NULL && resv_msg.licenses[0] != '\0'))) { exit_code = 1; error("A power reservation must be empty and set the " "LICENSE_ONLY flag. No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } new_res_name = slurm_create_reservation(&resv_msg); if (!new_res_name) { exit_code = 1; slurm_perror("Error creating the reservation"); ret = slurm_get_errno(); } else { printf("Reservation created: %s\n", new_res_name); free(new_res_name); } SCONTROL_CREATE_RES_CLEANUP: if (free_user_str) xfree(resv_msg.users); if (free_acct_str) xfree(resv_msg.accounts); if (free_tres_license) xfree(resv_msg.licenses); if (free_tres_bb) xfree(resv_msg.burst_buffer); if (free_tres_corecnt) xfree(resv_msg.core_cnt); if (free_tres_nodecnt) xfree(resv_msg.node_cnt); return ret; }
/* * scontrol_create_res - create the slurm reservation configuration per the * supplied arguments * IN argc - count of arguments * IN argv - list of arguments * RET 0 if no slurm error, errno otherwise. parsing error prints * error message and returns 0. */ extern int scontrol_create_res(int argc, char *argv[]) { resv_desc_msg_t resv_msg; char *new_res_name = NULL; int free_user_str = 0, free_acct_str = 0; int free_node_cnt = 0; uint32_t node_count = 0; int err, ret = 0; slurm_init_resv_desc_msg (&resv_msg); err = scontrol_parse_res_options(argc, argv, "No reservation created.", &resv_msg, &free_user_str, &free_acct_str); if (err) goto SCONTROL_CREATE_RES_CLEANUP; if (resv_msg.start_time == (time_t)NO_VAL) { exit_code = 1; error("A start time must be given. No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } if (resv_msg.end_time == (time_t)NO_VAL && resv_msg.duration == (uint32_t)NO_VAL) { exit_code = 1; error("An end time or duration must be given. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } if (resv_msg.end_time != (time_t)NO_VAL && resv_msg.duration != (uint32_t)NO_VAL && resv_msg.start_time + resv_msg.duration*60 != resv_msg.end_time) { exit_code = 1; error("StartTime + Duration does not equal EndTime. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } if (resv_msg.start_time > resv_msg.end_time && resv_msg.end_time != (time_t)NO_VAL) { exit_code = 1; error("Start time cannot be after end time. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } /* * If "all" is specified for the nodes and a partition is specified, * only allocate all of the nodes the partition. */ if ((resv_msg.partition != NULL) && (resv_msg.node_list != NULL) && (strcasecmp(resv_msg.node_list, "ALL") == 0)) { node_count = _partition_node_count(resv_msg.partition); if (node_count == NO_VAL) { exit_code = 1; error("Can not determine node count for partition. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } else { free_node_cnt = 1; resv_msg.node_cnt = xmalloc(sizeof(uint32_t) * 2); *resv_msg.node_cnt = node_count; resv_msg.node_list = NULL; } } /* * If "all" is specified for the nodes and RESERVE_FLAG_PART_NODES * flag is set make sure a partition name is specified. */ if ((resv_msg.partition == NULL) && (resv_msg.node_list != NULL) && (strcasecmp(resv_msg.node_list, "ALL") == 0) && (resv_msg.flags != (uint16_t) NO_VAL) && (resv_msg.flags & RESERVE_FLAG_PART_NODES)) { exit_code = 1; error("Part_Nodes flag requires specifying a Partition. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } /* * If the following parameters are null, but a partition is named, then * make the reservation for the whole partition. */ if ((resv_msg.core_cnt == 0) && (resv_msg.node_cnt == NULL || resv_msg.node_cnt[0] == 0) && (resv_msg.node_list == NULL || resv_msg.node_list[0] == '\0') && (resv_msg.licenses == NULL || resv_msg.licenses[0] == '\0')) { if (resv_msg.partition == NULL) { exit_code = 1; error("CoreCnt, Nodes, NodeCnt or Licenses must be " "specified. No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } else if ((node_count = _partition_node_count(resv_msg.partition)) == NO_VAL) { exit_code = 1; error("Can not determine node count for partition. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } else { free_node_cnt = 1; resv_msg.node_cnt = xmalloc(sizeof(uint32_t) * 2); *resv_msg.node_cnt = node_count; } } if ((resv_msg.users == NULL || resv_msg.users[0] == '\0') && (resv_msg.accounts == NULL || resv_msg.accounts[0] == '\0')) { exit_code = 1; error("Either Users or Accounts must be specified. " "No reservation created."); goto SCONTROL_CREATE_RES_CLEANUP; } new_res_name = slurm_create_reservation(&resv_msg); if (!new_res_name) { exit_code = 1; slurm_perror("Error creating the reservation"); ret = slurm_get_errno(); } else { printf("Reservation created: %s\n", new_res_name); free(new_res_name); } SCONTROL_CREATE_RES_CLEANUP: if (free_user_str) xfree(resv_msg.users); if (free_acct_str) xfree(resv_msg.accounts); if (free_node_cnt) xfree(resv_msg.node_cnt); return ret; }