1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
|
/*
* Copyright (c) 2004-2010 The Trustees of Indiana University and Indiana
* University Research and Technology
* Corporation. All rights reserved.
* Copyright (c) 2004-2011 The University of Tennessee and The University
* of Tennessee Research Foundation. All rights
* reserved.
* Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
* University of Stuttgart. All rights reserved.
* Copyright (c) 2004-2005 The Regents of the University of California.
* All rights reserved.
* Copyright (c) 2006-2013 Los Alamos National Security, LLC.
* All rights reserved.
* Copyright (c) 2009-2012 Cisco Systems, Inc. All rights reserved.
* Copyright (c) 2011 Oak Ridge National Labs. All rights reserved.
* Copyright (c) 2013-2017 Intel, Inc. All rights reserved.
* Copyright (c) 2018 Research Organization for Information Science
* and Technology (RIST). All rights reserved.
* Copyright (c) 2021-2022 Nanook Consulting. All rights reserved.
* $COPYRIGHT$
*
* Additional copyrights may follow
*
* $HEADER$
*
*/
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include "src/mca/preg/preg.h"
#include "src/server/pmix_server_ops.h"
#include "src/util/pmix_argv.h"
#include "src/util/pmix_output.h"
#include "src/util/pmix_environ.h"
#include "server_callbacks.h"
#include "utils.h"
#define TEST_NODES "odin001,odin002,odin003,odin010,odin011,odin075"
#define TEST_PROCS "1,2,3,4;5-8;9,11-12;17-20;21-24;100"
#define TEST_NODES2 "c712f6n01,c712f6n02,c712f6n03"
bool spawn_wait = false;
int main(int argc, char **argv)
{
char *regex;
char **nodes, **procs;
pmix_status_t rc;
PMIX_HIDE_UNUSED_PARAMS(argc, argv);
/* smoke test */
if (PMIX_SUCCESS != 0) {
TEST_ERROR(("ERROR IN COMPUTING CONSTANTS: PMIX_SUCCESS = %d", PMIX_SUCCESS));
exit(1);
}
TEST_VERBOSE(("Testing version %s", PMIx_Get_version()));
PMIx_server_init(&mymodule, NULL, 0);
TEST_VERBOSE(("Start PMIx regex smoke test"));
fprintf(stderr, "NODES: %s\n", TEST_NODES);
PMIx_generate_regex(TEST_NODES, ®ex);
fprintf(stderr, "REGEX: %s\n\n", regex);
/* test reverse parsing */
rc = pmix_preg.parse_nodes(regex, &nodes);
free(regex);
if (PMIX_SUCCESS == rc) {
regex = PMIx_Argv_join(nodes, ',');
PMIx_Argv_free(nodes);
fprintf(stderr, "NODES: %s\n", TEST_NODES);
fprintf(stderr, "RSULT: %s\n\n\n", regex);
free(regex);
} else {
fprintf(stderr, "Node reverse failed: %d\n\n\n", rc);
}
fprintf(stderr, "PROCS: %s\n", TEST_PROCS);
PMIx_generate_ppn(TEST_PROCS, ®ex);
fprintf(stderr, "PPN: %s\n\n", regex);
/* test reverse parsing */
rc = pmix_preg.parse_procs(regex, &procs);
free(regex);
if (PMIX_SUCCESS == rc) {
regex = PMIx_Argv_join(procs, ';');
PMIx_Argv_free(procs);
fprintf(stderr, "PROCS: %s\n", TEST_PROCS);
fprintf(stderr, "RSULT: %s\n", regex);
free(regex);
} else {
fprintf(stderr, "PPN reverse failed: %d\n", rc);
}
fprintf(stderr, "NODES: %s\n", TEST_NODES2);
PMIx_generate_regex(TEST_NODES2, ®ex);
fprintf(stderr, "REGEX: %s\n\n", regex);
/* test reverse parsing */
rc = pmix_preg.parse_nodes(regex, &nodes);
free(regex);
if (PMIX_SUCCESS == rc) {
regex = PMIx_Argv_join(nodes, ',');
PMIx_Argv_free(nodes);
fprintf(stderr, "NODES: %s\n", TEST_NODES2);
fprintf(stderr, "RSULT: %s\n\n\n", regex);
free(regex);
} else {
fprintf(stderr, "Node reverse failed: %d\n\n\n", rc);
}
return 0;
}
|
