search for: check_error

...etails. -// -// You should have received a copy of the GNU General Public License along -// with this program; if not, write to the Free Software Foundation, Inc., -// 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. - -const Guestfs = imports.gi.Guestfs; - -var fail = false; - -function check_error(f) { - var threw = false; - - try { - g[f](); - } catch (error) { - threw = true; - if (!error.message.match(/error$/)) { - print(f + " threw unexpected error: " + error.message); - fail = true; - } - } - if (!threw) { - print(f + " failed to throw an er...

...} + +# Generate the C body for each signature (class of function). + +sub gen_c_code +{ + my $sig = shift; + my $c_name = shift; + + if ($sig =~ /^(\w+) : string$/) { + "\ + CAMLlocal1 (rv); + " . gen_unpack_args ($1) . " + char *r; + + NONBLOCKING (r = $c_name ($1)); + CHECK_ERROR (!r, \"$c_name\"); + + rv = caml_copy_string (r); + free (r); + CAMLreturn (rv); +" + } elsif ($sig =~ /^(\w+) : static string$/) { + "\ + CAMLlocal1 (rv); + " . gen_unpack_args ($1) . " + const char *r; + + NONBLOCKING (r = $c_name ($1)); + CHECK_ERROR (!r,...

libvirt-ocaml is used only by virt-v2v, so move it to this repository, instead of having it around in the common submodule. The removal from common will happen later. Pino Toscano (2): common: Bundle the libvirt-ocaml library for use by virt-v2v build: switch embedded copy of libvirt-ocaml .gitignore | 2 + 3rdparty/libvirt-ocaml/Makefile.am |

...) { m_pBuf->Rewind (); Play (); } return true; } bool bActive = true; int processed; alGetSourcei (m_id, AL_BUFFERS_PROCESSED, &processed); while (processed--) { ALuint buffer; alSourceUnqueueBuffers (m_id, 1, &buffer); CHECK_ERROR ("Update () : "); bActive = m_pBuf->Stream (buffer); if (bActive) { alSourceQueueBuffers (m_id, 1, &buffer); CHECK_ERROR ("Update () : "); } } return bActive; } bool Source::Play () { ALint error; char szErr[1024];...

Currently we have an OCaml library for generating the qemu command line (used only by ‘virt-v2v -o qemu’). However we also generate a qemu command line in ‘lib/launch-direct.c’, and we might in future need to generate a ‘-readconfig’-compatible configuration file if we want to go beyond 10,000 drives for scalability testing. Therefore this patch series reimplements the qemu command line code as

Hi, this is a mostly done attempt to switch to ocaml-libvirt, embedding the latest version of it from git. This way, it is possible to improve the way v2v connects to libvirt for both input, and output modules, and interacts with libvirt (e.g. no more virsh calls needed in virt-v2v). As side effect, virt-v2v now requires libvirt, as keeping it optional would create too much burden. I could not

Hi, this series switches virt-2v to ocaml-libvirt, embedding the latest version of it from git. This way, it is possible to improve the way v2v connects to libvirt for both input, and output modules, and interacts with libvirt (e.g. no more virsh calls needed in virt-v2v). As side effect, virt-v2v now requires libvirt, as keeping it optional would create too much burden. I could not test all

Hi, this is a mostly done attempt to switch to ocaml-libvirt, embedding the latest version of it from git. This way, it is possible to improve the way v2v connects to libvirt for both input, and output modules, and interacts with libvirt (e.g. no more virsh calls needed in virt-v2v). As side effect, virt-v2v now requires libvirt, as keeping it optional would create too much burden. I could not

Hi, this is a mostly done attempt to switch to ocaml-libvirt, embedding the latest version of it from git. This way, it is possible to improve the way v2v connects to libvirt for both input, and output modules, and interacts with libvirt (e.g. no more virsh calls needed in virt-v2v). As side effect, virt-v2v now requires libvirt, as keeping it optional would create too much burden. I could not

Hi, this series switches virt-2v to ocaml-libvirt, embedding the latest version of it from git. This way, it is possible to improve the way v2v connects to libvirt for both input, and output modules, and interacts with libvirt (e.g. no more virsh calls needed in virt-v2v). As side effect, virt-v2v now requires libvirt, as keeping it optional would create too much burden. I could not test all

...opts/qemuopts-tests.c b/common/qemuopts/qemuopts-tests.c index bb7d24d59..f8e68aef4 100644 --- a/common/qemuopts/qemuopts-tests.c +++ b/common/qemuopts/qemuopts-tests.c @@ -70,7 +70,7 @@ main (int argc, char *argv[]) qemuopts_set_binary (qopts, "qemu-system-x86_64")); CHECK_ERROR (-1, "qemuopts_add_flag", - qemuopts_add_flag (qopts, "-nodefconfig")); + qemuopts_add_flag (qopts, "-no-user-config")); CHECK_ERROR (-1, "qemuopts_add_arg", qemuopts_add_arg (qopts, "-m", "1024&qu...

The immediate reason for this patch is to reduce the amount of debugging in virt-v2v with using the virt-v2v -v option (because this implies running nbdkit in verbose mode too). Most of the messages are datapath ones about pread/pwrite requests, and in fact as we've added more filters on top of nbdkit these messages have got more and more verbose. However they are not particularly

This reverts commit 3f6ca541c7b24d4c86688a509582cb41a7e0078c. The original commit was reverted prematurely. --- generator/generator_actions.ml | 10 +++++----- generator/generator_checks.ml | 5 +++++ generator/generator_types.ml | 3 +++ 3 files changed, 13 insertions(+), 5 deletions(-) diff --git a/generator/generator_actions.ml b/generator/generator_actions.ml index

...ted). --- tests/test-debug-flags.sh | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/tests/test-debug-flags.sh b/tests/test-debug-flags.sh index 10e916c..88f5a22 100755 --- a/tests/test-debug-flags.sh +++ b/tests/test-debug-flags.sh @@ -49,10 +49,9 @@ expected_failure () check_error () { + cat debug-flags.out if ! grep -sq "$1" debug-flags.out; then - echo "unexpected error message containing: $1" - echo "actual output:" - cat debug-flags.out + echo "expected error message containing: $1" exi...

...ible types in assignment torture/torture.c: In function `torture_cli_session_setup2': torture/torture.c:181: warning: pointer/integer type mismatch in conditional expression torture/torture.c:186: warning: pointer/integer type mismatch in conditional expression torture/torture.c: In function `check_error': torture/torture.c:230: error: incompatible types in assignment torture/torture.c: In function `run_nbench': torture/torture.c:803: error: `nb_alarm' undeclared (first use in this function) torture/torture.c:803: error: (Each undeclared identifier is reported only once torture/tortur...

...AL(inbuf,smb_vwv6); ssize_t nread = -1; char *data; START_PROFILE(SMBreadX); /* If it's an IPC, pass off the pipe handler. */ if (IS_IPC(conn)) { END_PROFILE(SMBreadX); return reply_pipe_read_and_X(inbuf,outbuf,length,bufsize); } CHECK_FSP(fsp,conn); CHECK_READ(fsp); CHECK_ERROR(fsp); set_message(outbuf,12,0,True); data = smb_buf(outbuf); if(CVAL(inbuf,smb_wct) == 12) { #ifdef LARGE_SMB_OFF_T /* * This is a large offset (64 bit) read. */ startpos |= (((SMB_OFF_T)IVAL(inbuf,smb_vwv10)) << 32); #else /* !LARGE_SMB_OFF_T */ /* * Ensu...