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) 2024 Microsoft Corporation
* Copyright (c) 2026-present Eclipse ThreadX contributors
*
* This program and the accompanying materials are made available under the
* terms of the MIT License which is available at
* https://opensource.org/licenses/MIT.
*
* SPDX-License-Identifier: MIT
**************************************************************************/
/**************************************************************************/
/**************************************************************************/
/** */
/** POSIX wrapper for THREADX */
/** */
/** */
/** */
/**************************************************************************/
/**************************************************************************/
/* Include necessary system files. */
#include "tx_api.h" /* Threadx API */
#include "pthread.h" /* Posix API */
#include "px_int.h" /* Posix helper functions */
/**************************************************************************/
/* */
/* FUNCTION RELEASE */
/* */
/* pthread_once PORTABLE C */
/* 6.1.7 */
/* AUTHOR */
/* */
/* William E. Lamie, Microsoft Corporation */
/* */
/* DESCRIPTION */
/* */
/* The pthread_once function shall call the init_routine with no */
/* arguments. Subsequent calls of pthread_once() with the same */
/* once_control shall not call the init_routine. On return from */
/* pthread_once(), init_routine shall have completed. The */
/* once_control parameter shall determine whether the associated */
/* initialization routine has been called. */
/* */
/* INPUT */
/* once_control */
/* init_routine */
/* */
/* OUTPUT */
/* zero If successful */
/* error number If fails */
/* */
/* */
/* CALLS */
/* tx_thread_preemption_change */
/* tx_event_flags_create */
/* tx_event_flags_set */
/* tx_event_flags_get */
/* */
/* */
/* CALLED BY */
/* */
/* Application Code */
/* */
/**************************************************************************/
INT pthread_once (pthread_once_t * once_control, VOID (*init_routine) (VOID))
{
INT result;
UINT old_treshold, temp;
if (once_control == NULL || init_routine == NULL)
{
result = EINVAL;
}
else
{
if ( once_control->state==PTH_ONCE_DONE)
{
result = 0;
}
/* suspend preemption */
tx_thread_preemption_change( tx_thread_identify(), 0, &old_treshold);
if (once_control->state==PTH_ONCE_INIT)
{
once_control->state=PTH_ONCE_STARTED;
tx_event_flags_create(&(once_control->event),"once flags");
/* enable preemption */
tx_thread_preemption_change( tx_thread_identify(),old_treshold, &temp);
(*init_routine)();
tx_event_flags_set(&(once_control->event), PTH_ONCE_INIT, TX_AND);
once_control->state=PTH_ONCE_DONE;
}
/* enable preemption */
tx_thread_preemption_change( tx_thread_identify(),old_treshold, &temp);
if (once_control->state==PTH_ONCE_STARTED)
{
tx_event_flags_get(&(once_control->event), PTH_ONCE_INIT, TX_AND, &(once_control->flags) ,TX_WAIT_FOREVER);
}
}
/* note: this routine will not handle the case where the init routine is a cancellation point */
return (result);
}
|
