← Back to branch summary

~ubuntu-branches/ubuntu/trusty/erlang/trusty

« back to all changes in this revision

Viewing changes to erts/emulator/test/nif_SUITE_data/tester.c

  • Committer: Bazaar Package Importer
  • Author(s): Clint Byrum
  • Date: 2011-05-05 15:48:43 UTC
  • mfrom: (3.5.13 sid)
  • Revision ID: james.westby@ubuntu.com-20110505154843-0om6ekzg6m7ugj27
Tags: 1:14.b.2-dfsg-3ubuntu1
* Merge from debian unstable.  Remaining changes:
  - Drop libwxgtk2.8-dev build dependency. Wx isn't in main, and not
    supposed to.
  - Drop erlang-wx binary.
  - Drop erlang-wx dependency from -megaco, -common-test, and -reltool, they
    do not really need wx. Also drop it from -debugger; the GUI needs wx,
    but it apparently has CLI bits as well, and is also needed by -megaco,
    so let's keep the package for now.
  - debian/patches/series: Do what I meant, and enable build-options.patch
    instead.
* Additional changes:
  - Drop erlang-wx from -et
* Dropped Changes:
  - patches/pcre-crash.patch: CVE-2008-2371: outer level option with
    alternatives caused crash. (Applied Upstream)
  - fix for ssl certificate verification in newSSL: 
    ssl_cacertfile_fix.patch (Applied Upstream)
  - debian/patches/series: Enable native.patch again, to get stripped beam
    files and reduce the package size again. (build-options is what
    actually accomplished this)
  - Remove build-options.patch on advice from upstream and because it caused
    odd build failures.

Show diffs side-by-side

added added

removed removed

Lines of Context:
erts/emulator/test/nif_SUITE_data/tester.c
 
1
#include "erl_nif.h"
 
2
 
 
3
#include <stdio.h>
 
4
#include <stdarg.h>
 
5
 
 
6
void testcase_printf(TestCaseState_t *tcs, char *frmt, ...)
 
7
{
 
8
    va_list va;
 
9
    va_start(va, frmt);
 
10
    vfprintf(stderr, frmt, va);
 
11
    va_end(va);
 
12
    fprintf(stderr, "\r");
 
13
}
 
14
 
 
15
void testcase_succeeded(TestCaseState_t *tcs, char *frmt, ...)
 
16
{
 
17
}
 
18
 
 
19
void testcase_skipped(TestCaseState_t *tcs, char *frmt, ...)
 
20
{
 
21
}
 
22
 
 
23
void testcase_failed(TestCaseState_t *tcs, char *frmt, ...)
 
24
{
 
25
    va_list va;
 
26
    va_start(va, frmt);
 
27
    vfprintf(stderr, frmt, va);
 
28
    va_end(va);
 
29
    abort();
 
30
}
 
31
 
 
32
int testcase_assertion_failed(TestCaseState_t *tcs, char *file, int line,
 
33
                              char *assertion)
 
34
{
 
35
    testcase_failed(tcs, "ASSERTION '%s' FAILED at %s:%d\r\n",
 
36
                    assertion, file, line);
 
37
    abort();
 
38
    return 0; /*?*/
 
39
}
 
40
 
 
41
void *testcase_alloc(size_t size)
 
42
{
 
43
    return malloc(size);
 
44
}
 
45
void *testcase_realloc(void *ptr, size_t size)
 
46
{
 
47
    return realloc(ptr, size);
 
48
}
 
49
void testcase_free(void *ptr)
 
50
{
 
51
    free(ptr);
 
52
}
 
53
 
 
54
void testcase_run(TestCaseState_t *tcs);
 
55
 
 
56
static int reload(ErlNifEnv* env, void** priv_data, ERL_NIF_TERM load_info)
 
57
{
 
58
    return 0;
 
59
}
 
60
 
 
61
static ERL_NIF_TERM run(ErlNifEnv* env, int argc, const ERL_NIF_TERM argv[])
 
62
{
 
63
    testcase_run(NULL);
 
64
    return enif_make_atom(env, "ok");
 
65
}
 
66
 
 
67
static ErlNifFunc nif_funcs[] =
 
68
{
 
69
    {"run", 0, run}
 
70
};
 
71
 
 
72
ERL_NIF_INIT(tester,nif_funcs,NULL,reload,NULL,NULL)
 
73