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
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
#![allow(non_camel_case_types)]
use std::os::raw::{c_char, c_int};
#[repr(C)]
pub struct Cbc_Model {
_private: [u8; 0],
}
pub type CoinBigIndex = c_int;
pub type cbc_callback = Option<
unsafe extern "C" fn(
model: *mut Cbc_Model,
msgno: c_int,
ndouble: c_int,
dvec: *const f64,
nint: c_int,
ivec: *const c_int,
nchar: c_int,
cvec: *mut *mut c_char,
),
>;
#[link(name = "CbcSolver")]
extern "C" {
pub fn Cbc_newModel() -> *mut Cbc_Model;
pub fn Cbc_deleteModel(model: *mut Cbc_Model);
pub fn Cbc_getVersion() -> *const c_char;
pub fn Cbc_loadProblem(
model: *mut Cbc_Model,
numcols: c_int,
numrows: c_int,
start: *const CoinBigIndex,
index: *const c_int,
value: *const f64,
collb: *const f64,
colub: *const f64,
obj: *const f64,
rowlb: *const f64,
rowub: *const f64,
);
pub fn Cbc_readMps(model: *mut Cbc_Model, filename: *const c_char) -> c_int;
pub fn Cbc_writeMps(model: *mut Cbc_Model, filename: *const c_char);
pub fn Cbc_setInitialSolution(model: *mut Cbc_Model, sol: *const f64);
pub fn Cbc_problemName(model: *mut Cbc_Model, maxNumberCharacters: c_int, array: *mut c_char);
pub fn Cbc_setProblemName(model: *mut Cbc_Model, array: *const c_char) -> c_int;
pub fn Cbc_getNumElements(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_getVectorStarts(model: *mut Cbc_Model) -> *const CoinBigIndex;
pub fn Cbc_getIndices(model: *mut Cbc_Model) -> *const c_int;
pub fn Cbc_getElements(model: *mut Cbc_Model) -> *const f64;
pub fn Cbc_maxNameLength(model: *mut Cbc_Model) -> usize;
pub fn Cbc_getRowName(model: *mut Cbc_Model, iRow: c_int, name: *mut c_char, maxLength: usize);
pub fn Cbc_getColName(
model: *mut Cbc_Model,
iColumn: c_int,
name: *mut c_char,
maxLength: usize,
);
pub fn Cbc_setColName(model: *mut Cbc_Model, iColumn: c_int, name: *const c_char);
pub fn Cbc_setRowName(model: *mut Cbc_Model, iRow: c_int, name: *const c_char);
pub fn Cbc_getNumRows(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_getNumCols(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_setObjSense(model: *mut Cbc_Model, sense: f64);
pub fn Cbc_getObjSense(model: *mut Cbc_Model) -> f64;
pub fn Cbc_getRowLower(model: *mut Cbc_Model) -> *const f64;
pub fn Cbc_setRowLower(model: *mut Cbc_Model, index: c_int, value: f64);
pub fn Cbc_getRowUpper(model: *mut Cbc_Model) -> *const f64;
pub fn Cbc_setRowUpper(model: *mut Cbc_Model, index: c_int, value: f64);
pub fn Cbc_getObjCoefficients(model: *mut Cbc_Model) -> *const f64;
pub fn Cbc_setObjCoeff(model: *mut Cbc_Model, index: c_int, value: f64);
pub fn Cbc_getColLower(model: *mut Cbc_Model) -> *const f64;
pub fn Cbc_setColLower(model: *mut Cbc_Model, index: c_int, value: f64);
pub fn Cbc_getColUpper(model: *mut Cbc_Model) -> *const f64;
pub fn Cbc_setColUpper(model: *mut Cbc_Model, index: c_int, value: f64);
pub fn Cbc_isInteger(model: *mut Cbc_Model, i: c_int) -> c_int;
pub fn Cbc_setContinuous(model: *mut Cbc_Model, iColumn: c_int);
pub fn Cbc_setInteger(model: *mut Cbc_Model, iColumn: c_int);
pub fn Cbc_addSOS(
model: *mut Cbc_Model,
numRows: c_int,
rowStarts: *const c_int,
colIndices: *const c_int,
weights: *const f64,
type_: c_int,
);
pub fn Cbc_printModel(model: *mut Cbc_Model, argPrefix: *const c_char);
pub fn Cbc_clone(model: *mut Cbc_Model) -> *mut Cbc_Model;
pub fn Cbc_setParameter(model: *mut Cbc_Model, name: *const c_char, value: *const c_char);
pub fn Cbc_registerCallBack(model: *mut Cbc_Model, userCallBack: cbc_callback);
pub fn Cbc_clearCallBack(model: *mut Cbc_Model);
pub fn Cbc_solve(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_sumPrimalInfeasibilities(model: *mut Cbc_Model) -> f64;
pub fn Cbc_numberPrimalInfeasibilities(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_checkSolution(model: *mut Cbc_Model);
pub fn Cbc_getIterationCount(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_isAbandoned(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_isProvenOptimal(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_isProvenInfeasible(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_isContinuousUnbounded(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_isNodeLimitReached(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_isSecondsLimitReached(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_isSolutionLimitReached(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_isInitialSolveAbandoned(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_isInitialSolveProvenOptimal(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_isInitialSolveProvenPrimalInfeasible(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_getRowActivity(model: *mut Cbc_Model) -> *const f64;
pub fn Cbc_getColSolution(model: *mut Cbc_Model) -> *const f64;
pub fn Cbc_getReducedCost(model: *mut Cbc_Model) -> *const f64;
pub fn Cbc_getObjValue(model: *mut Cbc_Model) -> f64;
pub fn Cbc_getBestPossibleObjValue(model: *mut Cbc_Model) -> f64;
pub fn Cbc_getNodeCount(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_printSolution(model: *mut Cbc_Model);
pub fn Cbc_status(model: *mut Cbc_Model) -> c_int;
pub fn Cbc_secondaryStatus(model: *mut Cbc_Model) -> c_int;
}
#[cfg(test)]
mod tests {
use super::*;
#[test]
fn knapsack() {
let start = [0, 1, 2, 3, 4, 5];
let rowindex = [0, 0, 0, 0, 0];
let value = [2., 8., 4., 2., 5.];
let collb = [0., 0., 0., 0., 0.];
let colub = [1., 1., 1., 1., 1.];
let obj = [5., 3., 2., 7., 4.];
let feasible = [1., 1., 0., 0., 0.];
let rowlb = [-std::f64::INFINITY];
let rowub = [10.];
unsafe {
let model = Cbc_newModel();
Cbc_loadProblem(
model,
5,
1,
start.as_ptr(),
rowindex.as_ptr(),
value.as_ptr(),
collb.as_ptr(),
colub.as_ptr(),
obj.as_ptr(),
rowlb.as_ptr(),
rowub.as_ptr(),
);
assert_eq!(5, Cbc_getNumCols(model));
assert_eq!(1, Cbc_getNumRows(model));
for i in 0..5 {
Cbc_setInteger(model, i);
assert!(Cbc_isInteger(model, i) != 0);
}
Cbc_setObjSense(model, -1.);
assert_eq!(-1., Cbc_getObjSense(model));
Cbc_setInitialSolution(model, feasible.as_ptr());
Cbc_solve(model);
assert!(Cbc_isProvenOptimal(model) != 0);
assert!((Cbc_getObjValue(model) - 16.).abs() < 1e-6);
assert!((Cbc_getBestPossibleObjValue(model) - 16.).abs() < 1e-6);
let sol = std::slice::from_raw_parts(Cbc_getColSolution(model), 5);
assert!((sol[0] - 1.).abs() < 1e-6);
assert!((sol[1] - 0.).abs() < 1e-6);
assert!((sol[2] - 0.).abs() < 1e-6);
assert!((sol[3] - 1.).abs() < 1e-6);
assert!((sol[4] - 1.).abs() < 1e-6);
Cbc_deleteModel(model);
}
}
}
