2 * Server-side thread management
4 * Copyright (C) 1998 Alexandre Julliard
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22 #include "wine/port.h"
32 #include <sys/types.h>
50 struct thread_wait
*next
; /* next wait structure for this thread */
51 struct thread
*thread
; /* owner thread */
52 int count
; /* count of objects */
54 void *cookie
; /* magic cookie to return to client */
55 struct timeval timeout
;
56 struct timeout_user
*user
;
57 struct wait_queue_entry queues
[1];
60 /* asynchronous procedure calls */
64 struct thread_apc
*next
; /* queue linked list */
65 struct thread_apc
*prev
;
66 struct object
*owner
; /* object that queued this apc */
67 void *func
; /* function to call in client */
68 enum apc_type type
; /* type of apc function */
69 int nb_args
; /* number of arguments */
70 void *arg1
; /* function arguments */
76 /* thread operations */
78 static void dump_thread( struct object
*obj
, int verbose
);
79 static int thread_signaled( struct object
*obj
, struct thread
*thread
);
80 static void thread_poll_event( struct fd
*fd
, int event
);
81 static void destroy_thread( struct object
*obj
);
82 static struct thread_apc
*thread_dequeue_apc( struct thread
*thread
, int system_only
);
84 static const struct object_ops thread_ops
=
86 sizeof(struct thread
), /* size */
87 dump_thread
, /* dump */
88 add_queue
, /* add_queue */
89 remove_queue
, /* remove_queue */
90 thread_signaled
, /* signaled */
91 no_satisfied
, /* satisfied */
92 no_get_fd
, /* get_fd */
93 destroy_thread
/* destroy */
96 static const struct fd_ops thread_fd_ops
=
98 NULL
, /* get_poll_events */
99 thread_poll_event
, /* poll_event */
100 no_flush
, /* flush */
101 no_get_file_info
, /* get_file_info */
102 no_queue_async
/* queue_async */
105 static struct thread
*first_thread
;
106 static struct thread
*booting_thread
;
108 /* initialize the structure for a newly allocated thread */
109 inline static void init_thread_structure( struct thread
*thread
)
113 thread
->unix_pid
= -1; /* not known yet */
114 thread
->unix_tid
= -1; /* not known yet */
115 thread
->context
= NULL
;
117 thread
->mutex
= NULL
;
118 thread
->debug_ctx
= NULL
;
119 thread
->debug_event
= NULL
;
120 thread
->queue
= NULL
;
122 thread
->system_apc
.head
= NULL
;
123 thread
->system_apc
.tail
= NULL
;
124 thread
->user_apc
.head
= NULL
;
125 thread
->user_apc
.tail
= NULL
;
127 thread
->req_data
= NULL
;
128 thread
->req_toread
= 0;
129 thread
->reply_data
= NULL
;
130 thread
->reply_towrite
= 0;
131 thread
->request_fd
= NULL
;
132 thread
->reply_fd
= NULL
;
133 thread
->wait_fd
= NULL
;
134 thread
->state
= RUNNING
;
135 thread
->attached
= 0;
136 thread
->exit_code
= 0;
139 thread
->priority
= THREAD_PRIORITY_NORMAL
;
140 thread
->affinity
= 1;
142 thread
->creation_time
= time(NULL
);
143 thread
->exit_time
= 0;
145 for (i
= 0; i
< MAX_INFLIGHT_FDS
; i
++)
146 thread
->inflight
[i
].server
= thread
->inflight
[i
].client
= -1;
149 /* create a new thread */
150 struct thread
*create_thread( int fd
, struct process
*process
)
152 struct thread
*thread
;
154 if (!(thread
= alloc_object( &thread_ops
))) return NULL
;
156 init_thread_structure( thread
);
158 thread
->process
= (struct process
*)grab_object( process
);
159 if (!current
) current
= thread
;
161 if (!booting_thread
) /* first thread ever */
163 booting_thread
= thread
;
164 lock_master_socket(1);
167 if ((thread
->next
= first_thread
) != NULL
) thread
->next
->prev
= thread
;
168 first_thread
= thread
;
170 if (!(thread
->id
= alloc_ptid( thread
)))
172 release_object( thread
);
175 if (!(thread
->request_fd
= create_anonymous_fd( &thread_fd_ops
, fd
, &thread
->obj
)))
177 release_object( thread
);
181 thread
->token
= (struct token
*) grab_object( process
->token
);
183 set_fd_events( thread
->request_fd
, POLLIN
); /* start listening to events */
184 add_process_thread( thread
->process
, thread
);
188 /* handle a client event */
189 static void thread_poll_event( struct fd
*fd
, int event
)
191 struct thread
*thread
= get_fd_user( fd
);
192 assert( thread
->obj
.ops
== &thread_ops
);
194 if (event
& (POLLERR
| POLLHUP
)) kill_thread( thread
, 0 );
195 else if (event
& POLLIN
) read_request( thread
);
196 else if (event
& POLLOUT
) write_reply( thread
);
199 /* cleanup everything that is no longer needed by a dead thread */
200 /* used by destroy_thread and kill_thread */
201 static void cleanup_thread( struct thread
*thread
)
204 struct thread_apc
*apc
;
206 while ((apc
= thread_dequeue_apc( thread
, 0 ))) free( apc
);
207 if (thread
->req_data
) free( thread
->req_data
);
208 if (thread
->reply_data
) free( thread
->reply_data
);
209 if (thread
->request_fd
) release_object( thread
->request_fd
);
210 if (thread
->reply_fd
) release_object( thread
->reply_fd
);
211 if (thread
->wait_fd
) release_object( thread
->wait_fd
);
212 free_msg_queue( thread
);
213 cleanup_clipboard_thread(thread
);
214 destroy_thread_windows( thread
);
215 for (i
= 0; i
< MAX_INFLIGHT_FDS
; i
++)
217 if (thread
->inflight
[i
].client
!= -1)
219 close( thread
->inflight
[i
].server
);
220 thread
->inflight
[i
].client
= thread
->inflight
[i
].server
= -1;
223 thread
->req_data
= NULL
;
224 thread
->reply_data
= NULL
;
225 thread
->request_fd
= NULL
;
226 thread
->reply_fd
= NULL
;
227 thread
->wait_fd
= NULL
;
229 if (thread
== booting_thread
) /* killing booting thread */
231 booting_thread
= NULL
;
232 lock_master_socket(0);
236 /* destroy a thread when its refcount is 0 */
237 static void destroy_thread( struct object
*obj
)
239 struct thread_apc
*apc
;
240 struct thread
*thread
= (struct thread
*)obj
;
241 assert( obj
->ops
== &thread_ops
);
243 assert( !thread
->debug_ctx
); /* cannot still be debugging something */
244 if (thread
->next
) thread
->next
->prev
= thread
->prev
;
245 if (thread
->prev
) thread
->prev
->next
= thread
->next
;
246 else first_thread
= thread
->next
;
247 while ((apc
= thread_dequeue_apc( thread
, 0 ))) free( apc
);
248 cleanup_thread( thread
);
249 release_object( thread
->process
);
250 if (thread
->id
) free_ptid( thread
->id
);
251 if (thread
->token
) release_object( thread
->token
);
254 /* dump a thread on stdout for debugging purposes */
255 static void dump_thread( struct object
*obj
, int verbose
)
257 struct thread
*thread
= (struct thread
*)obj
;
258 assert( obj
->ops
== &thread_ops
);
260 fprintf( stderr
, "Thread id=%04x unix pid=%d unix tid=%d teb=%p state=%d\n",
261 thread
->id
, thread
->unix_pid
, thread
->unix_tid
, thread
->teb
, thread
->state
);
264 static int thread_signaled( struct object
*obj
, struct thread
*thread
)
266 struct thread
*mythread
= (struct thread
*)obj
;
267 return (mythread
->state
== TERMINATED
);
270 /* get a thread pointer from a thread id (and increment the refcount) */
271 struct thread
*get_thread_from_id( thread_id_t id
)
273 struct object
*obj
= get_ptid_entry( id
);
275 if (obj
&& obj
->ops
== &thread_ops
) return (struct thread
*)grab_object( obj
);
276 set_error( STATUS_INVALID_PARAMETER
);
280 /* get a thread from a handle (and increment the refcount) */
281 struct thread
*get_thread_from_handle( obj_handle_t handle
, unsigned int access
)
283 return (struct thread
*)get_handle_obj( current
->process
, handle
,
284 access
, &thread_ops
);
287 /* find a thread from a Unix pid */
288 struct thread
*get_thread_from_pid( int pid
)
292 for (t
= first_thread
; t
; t
= t
->next
) if (t
->unix_tid
== pid
) return t
;
293 for (t
= first_thread
; t
; t
= t
->next
) if (t
->unix_pid
== pid
) return t
;
297 /* set all information about a thread */
298 static void set_thread_info( struct thread
*thread
,
299 const struct set_thread_info_request
*req
)
301 if (req
->mask
& SET_THREAD_INFO_PRIORITY
)
302 thread
->priority
= req
->priority
;
303 if (req
->mask
& SET_THREAD_INFO_AFFINITY
)
305 if (req
->affinity
!= 1) set_error( STATUS_INVALID_PARAMETER
);
306 else thread
->affinity
= req
->affinity
;
310 /* stop a thread (at the Unix level) */
311 void stop_thread( struct thread
*thread
)
313 /* can't stop a thread while initialisation is in progress */
314 if (is_process_init_done(thread
->process
)) send_thread_signal( thread
, SIGUSR1
);
317 /* suspend a thread */
318 static int suspend_thread( struct thread
*thread
)
320 int old_count
= thread
->suspend
;
321 if (thread
->suspend
< MAXIMUM_SUSPEND_COUNT
)
323 if (!(thread
->process
->suspend
+ thread
->suspend
++)) stop_thread( thread
);
325 else set_error( STATUS_SUSPEND_COUNT_EXCEEDED
);
329 /* resume a thread */
330 static int resume_thread( struct thread
*thread
)
332 int old_count
= thread
->suspend
;
333 if (thread
->suspend
> 0)
335 if (!(--thread
->suspend
+ thread
->process
->suspend
)) wake_thread( thread
);
340 /* add a thread to an object wait queue; return 1 if OK, 0 on error */
341 int add_queue( struct object
*obj
, struct wait_queue_entry
*entry
)
345 entry
->prev
= obj
->tail
;
347 if (obj
->tail
) obj
->tail
->next
= entry
;
348 else obj
->head
= entry
;
353 /* remove a thread from an object wait queue */
354 void remove_queue( struct object
*obj
, struct wait_queue_entry
*entry
)
356 if (entry
->next
) entry
->next
->prev
= entry
->prev
;
357 else obj
->tail
= entry
->prev
;
358 if (entry
->prev
) entry
->prev
->next
= entry
->next
;
359 else obj
->head
= entry
->next
;
360 release_object( obj
);
364 static void end_wait( struct thread
*thread
)
366 struct thread_wait
*wait
= thread
->wait
;
367 struct wait_queue_entry
*entry
;
371 for (i
= 0, entry
= wait
->queues
; i
< wait
->count
; i
++, entry
++)
372 entry
->obj
->ops
->remove_queue( entry
->obj
, entry
);
373 if (wait
->user
) remove_timeout_user( wait
->user
);
374 thread
->wait
= wait
->next
;
378 /* build the thread wait structure */
379 static int wait_on( int count
, struct object
*objects
[], int flags
, const abs_time_t
*timeout
)
381 struct thread_wait
*wait
;
382 struct wait_queue_entry
*entry
;
385 if (!(wait
= mem_alloc( sizeof(*wait
) + (count
-1) * sizeof(*entry
) ))) return 0;
386 wait
->next
= current
->wait
;
387 wait
->thread
= current
;
391 current
->wait
= wait
;
392 if (flags
& SELECT_TIMEOUT
)
394 wait
->timeout
.tv_sec
= timeout
->sec
;
395 wait
->timeout
.tv_usec
= timeout
->usec
;
398 for (i
= 0, entry
= wait
->queues
; i
< count
; i
++, entry
++)
400 struct object
*obj
= objects
[i
];
401 entry
->thread
= current
;
402 if (!obj
->ops
->add_queue( obj
, entry
))
412 /* check if the thread waiting condition is satisfied */
413 static int check_wait( struct thread
*thread
)
416 struct thread_wait
*wait
= thread
->wait
;
417 struct wait_queue_entry
*entry
= wait
->queues
;
419 /* Suspended threads may not acquire locks */
420 if( thread
->process
->suspend
+ thread
->suspend
> 0 ) return -1;
423 if (wait
->flags
& SELECT_ALL
)
426 /* Note: we must check them all anyway, as some objects may
427 * want to do something when signaled, even if others are not */
428 for (i
= 0, entry
= wait
->queues
; i
< wait
->count
; i
++, entry
++)
429 not_ok
|= !entry
->obj
->ops
->signaled( entry
->obj
, thread
);
430 if (not_ok
) goto other_checks
;
431 /* Wait satisfied: tell it to all objects */
433 for (i
= 0, entry
= wait
->queues
; i
< wait
->count
; i
++, entry
++)
434 if (entry
->obj
->ops
->satisfied( entry
->obj
, thread
))
435 signaled
= STATUS_ABANDONED_WAIT_0
;
440 for (i
= 0, entry
= wait
->queues
; i
< wait
->count
; i
++, entry
++)
442 if (!entry
->obj
->ops
->signaled( entry
->obj
, thread
)) continue;
443 /* Wait satisfied: tell it to the object */
445 if (entry
->obj
->ops
->satisfied( entry
->obj
, thread
))
446 signaled
= i
+ STATUS_ABANDONED_WAIT_0
;
452 if ((wait
->flags
& SELECT_INTERRUPTIBLE
) && thread
->system_apc
.head
) return STATUS_USER_APC
;
453 if ((wait
->flags
& SELECT_ALERTABLE
) && thread
->user_apc
.head
) return STATUS_USER_APC
;
454 if (wait
->flags
& SELECT_TIMEOUT
)
457 gettimeofday( &now
, NULL
);
458 if (!time_before( &now
, &wait
->timeout
)) return STATUS_TIMEOUT
;
463 /* send the wakeup signal to a thread */
464 static int send_thread_wakeup( struct thread
*thread
, void *cookie
, int signaled
)
466 struct wake_up_reply reply
;
469 reply
.cookie
= cookie
;
470 reply
.signaled
= signaled
;
471 if ((ret
= write( get_unix_fd( thread
->wait_fd
), &reply
, sizeof(reply
) )) == sizeof(reply
))
474 fatal_protocol_error( thread
, "partial wakeup write %d\n", ret
);
475 else if (errno
== EPIPE
)
476 kill_thread( thread
, 0 ); /* normal death */
478 fatal_protocol_perror( thread
, "write" );
482 /* attempt to wake up a thread */
483 /* return >0 if OK, 0 if the wait condition is still not satisfied */
484 int wake_thread( struct thread
*thread
)
489 for (count
= 0; thread
->wait
; count
++)
491 if ((signaled
= check_wait( thread
)) == -1) break;
493 cookie
= thread
->wait
->cookie
;
494 if (debug_level
) fprintf( stderr
, "%04x: *wakeup* signaled=%d cookie=%p\n",
495 thread
->id
, signaled
, cookie
);
497 if (send_thread_wakeup( thread
, cookie
, signaled
) == -1) /* error */
503 /* thread wait timeout */
504 static void thread_timeout( void *ptr
)
506 struct thread_wait
*wait
= ptr
;
507 struct thread
*thread
= wait
->thread
;
508 void *cookie
= wait
->cookie
;
511 if (thread
->wait
!= wait
) return; /* not the top-level wait, ignore it */
512 if (thread
->suspend
+ thread
->process
->suspend
> 0) return; /* suspended, ignore it */
514 if (debug_level
) fprintf( stderr
, "%04x: *wakeup* signaled=%d cookie=%p\n",
515 thread
->id
, STATUS_TIMEOUT
, cookie
);
517 if (send_thread_wakeup( thread
, cookie
, STATUS_TIMEOUT
) == -1) return;
518 /* check if other objects have become signaled in the meantime */
519 wake_thread( thread
);
522 /* select on a list of handles */
523 static void select_on( int count
, void *cookie
, const obj_handle_t
*handles
,
524 int flags
, const abs_time_t
*timeout
)
527 struct object
*objects
[MAXIMUM_WAIT_OBJECTS
];
529 if ((count
< 0) || (count
> MAXIMUM_WAIT_OBJECTS
))
531 set_error( STATUS_INVALID_PARAMETER
);
534 for (i
= 0; i
< count
; i
++)
536 if (!(objects
[i
] = get_handle_obj( current
->process
, handles
[i
], SYNCHRONIZE
, NULL
)))
540 if (i
< count
) goto done
;
541 if (!wait_on( count
, objects
, flags
, timeout
)) goto done
;
543 if ((ret
= check_wait( current
)) != -1)
545 /* condition is already satisfied */
551 /* now we need to wait */
552 if (flags
& SELECT_TIMEOUT
)
554 if (!(current
->wait
->user
= add_timeout_user( ¤t
->wait
->timeout
,
555 thread_timeout
, current
->wait
)))
561 current
->wait
->cookie
= cookie
;
562 set_error( STATUS_PENDING
);
565 while (--i
>= 0) release_object( objects
[i
] );
568 /* attempt to wake threads sleeping on the object wait queue */
569 void wake_up( struct object
*obj
, int max
)
571 struct wait_queue_entry
*entry
= obj
->head
;
575 struct thread
*thread
= entry
->thread
;
577 if (wake_thread( thread
))
579 if (max
&& !--max
) break;
584 /* queue an async procedure call */
585 int thread_queue_apc( struct thread
*thread
, struct object
*owner
, void *func
,
586 enum apc_type type
, int system
, void *arg1
, void *arg2
, void *arg3
)
588 struct thread_apc
*apc
;
589 struct apc_queue
*queue
= system
? &thread
->system_apc
: &thread
->user_apc
;
591 /* cancel a possible previous APC with the same owner */
592 if (owner
) thread_cancel_apc( thread
, owner
, system
);
593 if (thread
->state
== TERMINATED
) return 0;
595 if (!(apc
= mem_alloc( sizeof(*apc
) ))) return 0;
596 apc
->prev
= queue
->tail
;
605 if (!apc
->prev
) /* first one */
608 wake_thread( thread
);
610 else apc
->prev
->next
= apc
;
615 /* cancel the async procedure call owned by a specific object */
616 void thread_cancel_apc( struct thread
*thread
, struct object
*owner
, int system
)
618 struct thread_apc
*apc
;
619 struct apc_queue
*queue
= system
? &thread
->system_apc
: &thread
->user_apc
;
620 for (apc
= queue
->head
; apc
; apc
= apc
->next
)
622 if (apc
->owner
!= owner
) continue;
623 if (apc
->next
) apc
->next
->prev
= apc
->prev
;
624 else queue
->tail
= apc
->prev
;
625 if (apc
->prev
) apc
->prev
->next
= apc
->next
;
626 else queue
->head
= apc
->next
;
632 /* remove the head apc from the queue; the returned pointer must be freed by the caller */
633 static struct thread_apc
*thread_dequeue_apc( struct thread
*thread
, int system_only
)
635 struct thread_apc
*apc
;
636 struct apc_queue
*queue
= &thread
->system_apc
;
638 if (!queue
->head
&& !system_only
) queue
= &thread
->user_apc
;
639 if ((apc
= queue
->head
))
641 if (apc
->next
) apc
->next
->prev
= NULL
;
642 else queue
->tail
= NULL
;
643 queue
->head
= apc
->next
;
648 /* add an fd to the inflight list */
649 /* return list index, or -1 on error */
650 int thread_add_inflight_fd( struct thread
*thread
, int client
, int server
)
654 if (server
== -1) return -1;
661 /* first check if we already have an entry for this fd */
662 for (i
= 0; i
< MAX_INFLIGHT_FDS
; i
++)
663 if (thread
->inflight
[i
].client
== client
)
665 close( thread
->inflight
[i
].server
);
666 thread
->inflight
[i
].server
= server
;
670 /* now find a free spot to store it */
671 for (i
= 0; i
< MAX_INFLIGHT_FDS
; i
++)
672 if (thread
->inflight
[i
].client
== -1)
674 thread
->inflight
[i
].client
= client
;
675 thread
->inflight
[i
].server
= server
;
681 /* get an inflight fd and purge it from the list */
682 /* the fd must be closed when no longer used */
683 int thread_get_inflight_fd( struct thread
*thread
, int client
)
687 if (client
== -1) return -1;
691 for (i
= 0; i
< MAX_INFLIGHT_FDS
; i
++)
693 if (thread
->inflight
[i
].client
== client
)
695 ret
= thread
->inflight
[i
].server
;
696 thread
->inflight
[i
].server
= thread
->inflight
[i
].client
= -1;
700 } while (!receive_fd( thread
->process
)); /* in case it is still in the socket buffer */
704 /* retrieve an LDT selector entry */
705 static void get_selector_entry( struct thread
*thread
, int entry
,
706 unsigned int *base
, unsigned int *limit
,
707 unsigned char *flags
)
709 if (!thread
->process
->ldt_copy
)
711 set_error( STATUS_ACCESS_DENIED
);
716 set_error( STATUS_INVALID_PARAMETER
); /* FIXME */
719 if (suspend_for_ptrace( thread
))
721 unsigned char flags_buf
[4];
722 int *addr
= (int *)thread
->process
->ldt_copy
+ entry
;
723 if (read_thread_int( thread
, addr
, base
) == -1) goto done
;
724 if (read_thread_int( thread
, addr
+ 8192, limit
) == -1) goto done
;
725 addr
= (int *)thread
->process
->ldt_copy
+ 2*8192 + (entry
>> 2);
726 if (read_thread_int( thread
, addr
, (int *)flags_buf
) == -1) goto done
;
727 *flags
= flags_buf
[entry
& 3];
729 resume_after_ptrace( thread
);
733 /* kill a thread on the spot */
734 void kill_thread( struct thread
*thread
, int violent_death
)
736 if (thread
->state
== TERMINATED
) return; /* already killed */
737 thread
->state
= TERMINATED
;
738 thread
->exit_time
= time(NULL
);
739 if (current
== thread
) current
= NULL
;
741 fprintf( stderr
,"%04x: *killed* exit_code=%d\n",
742 thread
->id
, thread
->exit_code
);
745 while (thread
->wait
) end_wait( thread
);
746 send_thread_wakeup( thread
, NULL
, STATUS_PENDING
);
747 /* if it is waiting on the socket, we don't need to send a SIGTERM */
750 kill_console_processes( thread
, 0 );
751 debug_exit_thread( thread
);
752 abandon_mutexes( thread
);
753 remove_process_thread( thread
->process
, thread
);
754 wake_up( &thread
->obj
, 0 );
755 detach_thread( thread
, violent_death
? SIGTERM
: 0 );
756 cleanup_thread( thread
);
757 release_object( thread
);
760 /* take a snapshot of currently running threads */
761 struct thread_snapshot
*thread_snap( int *count
)
763 struct thread_snapshot
*snapshot
, *ptr
;
764 struct thread
*thread
;
767 for (thread
= first_thread
; thread
; thread
= thread
->next
)
768 if (thread
->state
!= TERMINATED
) total
++;
769 if (!total
|| !(snapshot
= mem_alloc( sizeof(*snapshot
) * total
))) return NULL
;
771 for (thread
= first_thread
; thread
; thread
= thread
->next
)
773 if (thread
->state
== TERMINATED
) continue;
774 ptr
->thread
= thread
;
775 ptr
->count
= thread
->obj
.refcount
;
776 ptr
->priority
= thread
->priority
;
777 grab_object( thread
);
784 /* signal that we are finished booting on the client side */
785 DECL_HANDLER(boot_done
)
787 debug_level
= max( debug_level
, req
->debug_level
);
788 if (current
== booting_thread
)
790 booting_thread
= (struct thread
*)~0UL; /* make sure it doesn't match other threads */
791 lock_master_socket(0); /* allow other clients now */
795 /* create a new thread */
796 DECL_HANDLER(new_thread
)
798 struct thread
*thread
;
799 int request_fd
= thread_get_inflight_fd( current
, req
->request_fd
);
801 if (request_fd
== -1 || fcntl( request_fd
, F_SETFL
, O_NONBLOCK
) == -1)
803 if (request_fd
!= -1) close( request_fd
);
804 set_error( STATUS_INVALID_HANDLE
);
808 if ((thread
= create_thread( request_fd
, current
->process
)))
810 if (req
->suspend
) thread
->suspend
++;
811 reply
->tid
= get_thread_id( thread
);
812 if ((reply
->handle
= alloc_handle( current
->process
, thread
,
813 THREAD_ALL_ACCESS
, req
->inherit
)))
815 /* thread object will be released when the thread gets killed */
818 kill_thread( thread
, 1 );
822 /* initialize a new thread */
823 DECL_HANDLER(init_thread
)
825 int reply_fd
= thread_get_inflight_fd( current
, req
->reply_fd
);
826 int wait_fd
= thread_get_inflight_fd( current
, req
->wait_fd
);
828 if (current
->unix_pid
!= -1)
830 fatal_protocol_error( current
, "init_thread: already running\n" );
833 if (reply_fd
== -1 || fcntl( reply_fd
, F_SETFL
, O_NONBLOCK
) == -1)
835 fatal_protocol_error( current
, "bad reply fd\n" );
840 fatal_protocol_error( current
, "bad wait fd\n" );
843 current
->reply_fd
= create_anonymous_fd( &thread_fd_ops
, reply_fd
, ¤t
->obj
);
844 current
->wait_fd
= create_anonymous_fd( &thread_fd_ops
, wait_fd
, ¤t
->obj
);
845 if (!current
->reply_fd
|| !current
->wait_fd
) return;
847 current
->unix_pid
= req
->unix_pid
;
848 current
->unix_tid
= req
->unix_tid
;
849 current
->teb
= req
->teb
;
851 if (current
->suspend
+ current
->process
->suspend
> 0) stop_thread( current
);
852 if (current
->process
->running_threads
> 1)
853 generate_debug_event( current
, CREATE_THREAD_DEBUG_EVENT
, req
->entry
);
855 reply
->pid
= get_process_id( current
->process
);
856 reply
->tid
= get_thread_id( current
);
857 reply
->boot
= (current
== booting_thread
);
858 reply
->version
= SERVER_PROTOCOL_VERSION
;
862 if (reply_fd
!= -1) close( reply_fd
);
863 if (wait_fd
!= -1) close( wait_fd
);
866 /* terminate a thread */
867 DECL_HANDLER(terminate_thread
)
869 struct thread
*thread
;
873 if ((thread
= get_thread_from_handle( req
->handle
, THREAD_TERMINATE
)))
875 thread
->exit_code
= req
->exit_code
;
876 if (thread
!= current
) kill_thread( thread
, 1 );
880 reply
->last
= (thread
->process
->running_threads
== 1);
882 release_object( thread
);
886 /* open a handle to a thread */
887 DECL_HANDLER(open_thread
)
889 struct thread
*thread
= get_thread_from_id( req
->tid
);
894 reply
->handle
= alloc_handle( current
->process
, thread
, req
->access
, req
->inherit
);
895 release_object( thread
);
899 /* fetch information about a thread */
900 DECL_HANDLER(get_thread_info
)
902 struct thread
*thread
;
903 obj_handle_t handle
= req
->handle
;
905 if (!handle
) thread
= get_thread_from_id( req
->tid_in
);
906 else thread
= get_thread_from_handle( req
->handle
, THREAD_QUERY_INFORMATION
);
910 reply
->pid
= get_process_id( thread
->process
);
911 reply
->tid
= get_thread_id( thread
);
912 reply
->teb
= thread
->teb
;
913 reply
->exit_code
= (thread
->state
== TERMINATED
) ? thread
->exit_code
: STILL_ACTIVE
;
914 reply
->priority
= thread
->priority
;
915 reply
->affinity
= thread
->affinity
;
916 reply
->creation_time
= thread
->creation_time
;
917 reply
->exit_time
= thread
->exit_time
;
919 release_object( thread
);
923 /* set information about a thread */
924 DECL_HANDLER(set_thread_info
)
926 struct thread
*thread
;
928 if ((thread
= get_thread_from_handle( req
->handle
, THREAD_SET_INFORMATION
)))
930 set_thread_info( thread
, req
);
931 release_object( thread
);
935 /* suspend a thread */
936 DECL_HANDLER(suspend_thread
)
938 struct thread
*thread
;
940 if ((thread
= get_thread_from_handle( req
->handle
, THREAD_SUSPEND_RESUME
)))
942 if (thread
->state
== TERMINATED
) set_error( STATUS_ACCESS_DENIED
);
943 else reply
->count
= suspend_thread( thread
);
944 release_object( thread
);
948 /* resume a thread */
949 DECL_HANDLER(resume_thread
)
951 struct thread
*thread
;
953 if ((thread
= get_thread_from_handle( req
->handle
, THREAD_SUSPEND_RESUME
)))
955 if (thread
->state
== TERMINATED
) set_error( STATUS_ACCESS_DENIED
);
956 else reply
->count
= resume_thread( thread
);
957 release_object( thread
);
961 /* select on a handle list */
964 int count
= get_req_data_size() / sizeof(int);
965 select_on( count
, req
->cookie
, get_req_data(), req
->flags
, &req
->timeout
);
968 /* queue an APC for a thread */
969 DECL_HANDLER(queue_apc
)
971 struct thread
*thread
;
972 if ((thread
= get_thread_from_handle( req
->handle
, THREAD_SET_CONTEXT
)))
974 thread_queue_apc( thread
, NULL
, req
->func
, APC_USER
, !req
->user
,
975 req
->arg1
, req
->arg2
, req
->arg3
);
976 release_object( thread
);
980 /* get next APC to call */
981 DECL_HANDLER(get_apc
)
983 struct thread_apc
*apc
;
987 if (!(apc
= thread_dequeue_apc( current
, !req
->alertable
)))
991 reply
->type
= APC_NONE
;
994 /* Optimization: ignore APCs that have a NULL func; they are only used
995 * to wake up a thread, but since we got here the thread woke up already.
996 * Exception: for APC_ASYNC_IO, func == NULL is legal.
998 if (apc
->func
|| apc
->type
== APC_ASYNC_IO
) break;
1001 reply
->func
= apc
->func
;
1002 reply
->type
= apc
->type
;
1003 reply
->arg1
= apc
->arg1
;
1004 reply
->arg2
= apc
->arg2
;
1005 reply
->arg3
= apc
->arg3
;
1009 /* fetch a selector entry for a thread */
1010 DECL_HANDLER(get_selector_entry
)
1012 struct thread
*thread
;
1013 if ((thread
= get_thread_from_handle( req
->handle
, THREAD_QUERY_INFORMATION
)))
1015 get_selector_entry( thread
, req
->entry
, &reply
->base
, &reply
->limit
, &reply
->flags
);
1016 release_object( thread
);