Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
model-checker : break forgotten in switch
[simgrid.git] / src / simix / smx_context_base.c
1 /* context_base - Code factorization across context switching implementations */
2
3 /* Copyright (c) 2010. The SimGrid Team.
4  * All rights reserved.                                                     */
5
6 /* This program is free software; you can redistribute it and/or modify it
7  * under the terms of the license (GNU LGPL) which comes with this package. */
8
9
10 #include "xbt/function_types.h"
11 #include "simix/simix.h"
12 #include "simix/context.h"
13 #include "simix/private.h"
14
15 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(bindings);
16
17 void smx_ctx_base_factory_init(smx_context_factory_t *factory)
18 {
19   /* instantiate the context factory */
20   *factory = xbt_new0(s_smx_context_factory_t, 1);
21
22   (*factory)->create_context = NULL;
23   (*factory)->finalize = smx_ctx_base_factory_finalize;
24   (*factory)->free = smx_ctx_base_free;
25   (*factory)->stop = smx_ctx_base_stop;
26   (*factory)->suspend = NULL;
27   (*factory)->runall = NULL;
28   (*factory)->self = smx_ctx_base_self;
29   (*factory)->get_data = smx_ctx_base_get_data;
30
31   (*factory)->name = "base context factory";
32 }
33
34 int smx_ctx_base_factory_finalize(smx_context_factory_t * factory)
35 {
36   free(*factory);
37   *factory = NULL;
38   return 0;
39 }
40
41 smx_context_t
42 smx_ctx_base_factory_create_context_sized(size_t size,
43                                           xbt_main_func_t code, int argc,
44                                           char **argv,
45                                           void_pfn_smxprocess_t cleanup_func,
46                                           void *data)
47 {
48   smx_context_t context = xbt_malloc0(size);
49
50   /* If the user provided a function for the process then use it.
51      Otherwise, it is the context for maestro and we should set it as the
52      current context */
53   if (code) {
54     context->cleanup_func = cleanup_func;
55     context->argc = argc;
56     context->argv = argv;
57     context->code = code;
58   } else {
59     SIMIX_context_set_current(context);
60   }
61   context->data = data;
62
63   return context;
64 }
65
66 void smx_ctx_base_free(smx_context_t context)
67 {
68   int i;
69
70   if (context) {
71
72     /* free argv */
73     if (context->argv) {
74       for (i = 0; i < context->argc; i++)
75         free(context->argv[i]);
76
77       free(context->argv);
78     }
79
80     /* free structure */
81     free(context);
82   }
83 }
84
85 void smx_ctx_base_stop(smx_context_t context)
86 {
87   if (context->cleanup_func)
88     context->cleanup_func(context->data);
89   context->iwannadie = 0;
90   SIMIX_req_process_cleanup(context->data);
91   context->iwannadie = 1;
92 }
93
94 smx_context_t smx_ctx_base_self(void)
95 {
96   return SIMIX_context_get_current();
97 }
98
99 void *smx_ctx_base_get_data(smx_context_t context)
100 {
101   return context->data;
102 }