rtems/src/taskdelete.c

0001 /* SPDX-License-Identifier: BSD-2-Clause */
0002
0003 /**
0004  * @file
0005  *
0006  * @ingroup RTEMSImplClassicTask
0007  *
0008  * @brief This source file contains the implementation of
0009  *   rtems_task_delete().
0010  */
0011
0012 /*
0013  *  COPYRIGHT (c) 1989-2014.
0014  *  On-Line Applications Research Corporation (OAR).
0015  *
0016  * Redistribution and use in source and binary forms, with or without
0017  * modification, are permitted provided that the following conditions
0018  * are met:
0019  * 1. Redistributions of source code must retain the above copyright
0020  *    notice, this list of conditions and the following disclaimer.
0021  * 2. Redistributions in binary form must reproduce the above copyright
0022  *    notice, this list of conditions and the following disclaimer in the
0023  *    documentation and/or other materials provided with the distribution.
0024  *
0025  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
0026  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
0027  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
0028  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
0029  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
0030  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
0031  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
0032  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
0033  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
0034  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
0035  * POSSIBILITY OF SUCH DAMAGE.
0036  */
0037
0038 #ifdef HAVE_CONFIG_H
0039 #include "config.h"
0040 #endif
0041
0042 #include <rtems/rtems/tasksimpl.h>
0043 #include <rtems/rtems/statusimpl.h>
0044 #include <rtems/score/threadimpl.h>
0045
0046 rtems_status_code rtems_task_delete(
0047   rtems_id id
0048 )
0049 {
0050   Thread_Control       *the_thread;
0051   Thread_queue_Context  queue_context;
0052   Per_CPU_Control      *cpu_self;
0053   Thread_Control       *executing;
0054   Status_Control        status;
0055
0056   _Thread_queue_Context_initialize( &queue_context );
0057   the_thread = _Thread_Get( id, &queue_context.Lock_context.Lock_context );
0058
0059   if ( the_thread == NULL ) {
0060 #if defined(RTEMS_MULTIPROCESSING)
0061     if ( _Thread_MP_Is_remote( id ) ) {
0062       return RTEMS_ILLEGAL_ON_REMOTE_OBJECT;
0063     }
0064 #endif
0065
0066     return RTEMS_INVALID_ID;
0067   }
0068
0069   cpu_self = _Per_CPU_Get();
0070
0071   if ( _Per_CPU_Is_ISR_in_progress( cpu_self ) ) {
0072     _ISR_lock_ISR_enable( &queue_context.Lock_context.Lock_context );
0073     return RTEMS_CALLED_FROM_ISR;
0074   }
0075
0076   executing = _Per_CPU_Get_executing( cpu_self );
0077
0078   if ( the_thread == executing ) {
0079     _ISR_lock_ISR_enable( &queue_context.Lock_context.Lock_context );
0080
0081     /*
0082      * The Classic tasks are neither detached nor joinable.  In case of
0083      * self deletion, they are detached, otherwise joinable by default.
0084      */
0085     _Thread_Exit( NULL, THREAD_LIFE_TERMINATING | THREAD_LIFE_DETACHED );
0086   }
0087
0088   status = _Thread_Close( the_thread, executing, &queue_context );
0089   return _Status_Get( status );
0090 }