xref: /illumos-gate/usr/src/uts/common/disp/fss.c (revision 24f5a37652e188ebdcdd6da454511686935025df)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License (the "License").
6  * You may not use this file except in compliance with the License.
7  *
8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9  * or http://www.opensolaris.org/os/licensing.
10  * See the License for the specific language governing permissions
11  * and limitations under the License.
12  *
13  * When distributing Covered Code, include this CDDL HEADER in each
14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15  * If applicable, add the following below this CDDL HEADER, with the
16  * fields enclosed by brackets "[]" replaced with your own identifying
17  * information: Portions Copyright [yyyy] [name of copyright owner]
18  *
19  * CDDL HEADER END
20  */
21 
22 /*
23  * Copyright (c) 1994, 2010, Oracle and/or its affiliates. All rights reserved.
24  * Copyright 2013, Joyent, Inc. All rights reserved.
25  */
26 
27 #include <sys/types.h>
28 #include <sys/param.h>
29 #include <sys/sysmacros.h>
30 #include <sys/cred.h>
31 #include <sys/proc.h>
32 #include <sys/strsubr.h>
33 #include <sys/priocntl.h>
34 #include <sys/class.h>
35 #include <sys/disp.h>
36 #include <sys/procset.h>
37 #include <sys/debug.h>
38 #include <sys/kmem.h>
39 #include <sys/errno.h>
40 #include <sys/systm.h>
41 #include <sys/schedctl.h>
42 #include <sys/vmsystm.h>
43 #include <sys/atomic.h>
44 #include <sys/project.h>
45 #include <sys/modctl.h>
46 #include <sys/fss.h>
47 #include <sys/fsspriocntl.h>
48 #include <sys/cpupart.h>
49 #include <sys/zone.h>
50 #include <vm/rm.h>
51 #include <vm/seg_kmem.h>
52 #include <sys/tnf_probe.h>
53 #include <sys/policy.h>
54 #include <sys/sdt.h>
55 #include <sys/cpucaps.h>
56 
57 /*
58  * The fair share scheduling class ensures that collections of processes
59  * (zones and projects) each get their configured share of CPU.  This is in
60  * contrast to the TS class which considers individual processes.
61  *
62  * The FSS cpu-share is set on zones using the zone.cpu-shares rctl and on
63  * projects using the project.cpu-shares rctl.  By default the value is 1
64  * and it can range from 0 - 64k.  A value of 0 means that processes in the
65  * collection will only get CPU resources when there are no other processes
66  * that need CPU. The cpu-share is used as one of the inputs to calculate a
67  * thread's "user-mode" priority (umdpri) for the scheduler.  The umdpri falls
68  * in the range 0-59.  FSS calculates other, internal, priorities which are not
69  * visible outside of the FSS class.
70  *
71  * The FSS class should approximate TS behavior when there are excess CPU
72  * resources.  When there is a backlog of runnable processes, then the share
73  * is used as input into the runnable process's priority calculation, where
74  * the final umdpri is used by the scheduler to determine when the process runs.
75  *
76  * Projects in a zone compete with each other for CPU time, receiving CPU
77  * allocation within a zone proportional to the project's share; at a higher
78  * level zones compete with each other, receiving allocation in a pset
79  * proportional to the zone's share.
80  *
81  * The FSS priority calculation consists of several parts.
82  *
83  * 1) Once per second the fss_update function runs. The first thing it does is
84  *    call fss_decay_usage. This function does three things.
85  *
86  * a) fss_decay_usage first decays the maxfsspri value for the pset.  This
87  *    value is used in the per-process priority calculation described in step
88  *    (2b).  The maxfsspri is decayed using the following formula:
89  *
90  *                      maxfsspri * fss_nice_decay[NZERO])
91  *        maxfsspri =  ------------------------------------
92  *                            FSS_DECAY_BASE
93  *
94  *
95  *     - NZERO is the default process priority (i.e. 20)
96  *
97  *    The fss_nice_decay array is a fixed set of values used to adjust the
98  *    decay rate of processes based on their nice value.  Entries in this
99  *    array are initialized in fss_init using the following formula:
100  *
101  *                        (FSS_DECAY_MAX - FSS_DECAY_MIN) * i
102  *       FSS_DECAY_MIN + -------------------------------------
103  *                               FSS_NICE_RANGE - 1
104  *
105  *     - FSS_DECAY_MIN is 82 = approximates 65% (82/128)
106  *     - FSS_DECAY_MAX is 108 = approximates 85% (108/128)
107  *     - FSS_NICE_RANGE is 40 (range is 0 - 39)
108  *
109  * b) The second thing fss_decay_usage does is update each project's "usage"
110  *    for the last second and then recalculates the project's "share usage".
111  *
112  *    The usage value is the recent CPU usage for all of the threads in the
113  *    project. It is decayed and updated this way:
114  *
115  *                  (usage * FSS_DECAY_USG)
116  *        usage =  ------------------------- + ticks;
117  *                       FSS_DECAY_BASE
118  *
119  *     - FSS_DECAY_BASE is 128 - used instead of 100 so we can shift vs divide
120  *     - FSS_DECAY_USG is 96 - approximates 75% (96/128)
121  *     - ticks is updated whenever a process in this project is running
122  *       when the scheduler's tick processing fires. This is not a simple
123  *       counter, the values are based on the entries in the fss_nice_tick
124  *       array (see section 3 below). ticks is then reset to 0 so it can track
125  *       the next seconds worth of nice-adjusted time for the project.
126  *
127  * c) The third thing fss_decay_usage does is update each project's "share
128  *    usage" (shusage). This is the normalized usage value for the project and
129  *    is calculated this way:
130  *
131  *                pset_shares^2    zone_int_shares^2
132  *        usage * ------------- * ------------------
133  *                kpj_shares^2	   zone_ext_shares^2
134  *
135  *    - usage - see (1b) for more details
136  *    - pset_shares is the total of all *active* zone shares in the pset (by
137  *      default there is only one pset)
138  *    - kpj_shares is the individual project's share (project.cpu-shares rctl)
139  *    - zone_int_shares is the sum of shares of all active projects within the
140  *      zone (the zone-internal total)
141  *    - zone_ext_shares is the share value for the zone (zone.cpu-shares rctl)
142  *
143  *    The shusage is used in step (2b) to calculate the thread's new internal
144  *    priority. A larger shusage value leads to a lower priority.
145  *
146  * 2) The fss_update function then calls fss_update_list to update the priority
147  *    of all threads. This does two things.
148  *
149  * a) First the thread's internal priority is decayed using the following
150  *    formula:
151  *
152  *                  fsspri * fss_nice_decay[nice_value])
153  *        fsspri =  ------------------------------------
154  *                            FSS_DECAY_BASE
155  *
156  *     - FSS_DECAY_BASE is 128 as described above
157  *
158  * b) Second, if the thread is runnable (TS_RUN or TS_WAIT) calls fss_newpri
159  *    to update the user-mode priority (umdpri) of the runnable thread.
160  *    Threads that are running (TS_ONPROC) or waiting for an event (TS_SLEEP)
161  *    are not updated at this time. The updated user-mode priority can cause
162  *    threads to change their position in the run queue.
163  *
164  *    The process's new internal fsspri is calculated using the following
165  *    formula. All runnable threads in the project will use the same shusage
166  *    and nrunnable values in their calculation.
167  *
168  *        fsspri += shusage * nrunnable * ticks
169  *
170  *     - shusage is the project's share usage, calculated in (1c)
171  *     - nrunnable is the number of runnable threads in the project
172  *     - ticks is the number of ticks this thread ran since the last fss_newpri
173  *       invocation.
174  *
175  *    Finally the process's new user-mode priority is calculated using the
176  *    following formula:
177  *
178  *                              (fsspri * umdprirange)
179  *        umdpri = maxumdpri - ------------------------
180  *                                    maxfsspri
181  *
182  *     - maxumdpri is MINCLSYSPRI - 1 (i.e. 59)
183  *     - umdprirange is maxumdpri - 1 (i.e. 58)
184  *     - maxfsspri is the largest fsspri seen so far, as we're iterating all
185  *       runnable processes
186  *
187  *    Thus, a higher internal priority (fsspri) leads to a lower user-mode
188  *    priority which means the thread runs less. The fsspri is higher when
189  *    the project's normalized share usage is higher, when the project has
190  *    more runnable threads, or when the thread has accumulated more run-time.
191  *
192  *    This code has various checks to ensure the resulting umdpri is in the
193  *    range 1-59.  See fss_newpri for more details.
194  *
195  * To reiterate, the above processing is performed once per second to recompute
196  * the runnable thread user-mode priorities.
197  *
198  * 3) The final major component in the priority calculation is the tick
199  *    processing which occurs on a thread that is running when the clock
200  *    calls fss_tick.
201  *
202  *    A thread can run continuously in user-land (compute-bound) for the
203  *    fss_quantum (see "dispadmin -c FSS -g" for the configurable properties).
204  *    The fss_quantum defaults to 11 (i.e. 11 ticks).
205  *
206  *    Once the quantum has been consumed, the thread will call fss_newpri to
207  *    recompute its umdpri priority, as described above in (2b). Threads that
208  *    were T_ONPROC at the one second interval when runnable thread priorities
209  *    were recalculated will have their umdpri priority recalculated when their
210  *    quanta expires.
211  *
212  *    To ensure that runnable threads within a project see the expected
213  *    round-robin behavior, there is a special case in fss_newpri for a thread
214  *    that has run for its quanta within the one second update interval.  See
215  *    the handling for the quanta_up parameter within fss_newpri.
216  *
217  *    Also of interest, the fss_tick code increments the project's tick value
218  *    using the fss_nice_tick array entry for the thread's nice value. The idea
219  *    behind the fss_nice_tick array is that the cost of a tick is lower at
220  *    positive nice values (so that it doesn't increase the project's usage
221  *    as much as normal) with a 50% drop at the maximum level and a 50%
222  *    increase at the minimum level. See (1b). The fss_nice_tick array is
223  *    initialized in fss_init using the following formula:
224  *
225  *         FSS_TICK_COST * (((3 * FSS_NICE_RANGE) / 2) - i)
226  *        --------------------------------------------------
227  *                          FSS_NICE_RANGE
228  *
229  *     - FSS_TICK_COST is 1000, the tick cost for threads with nice level 0
230  *
231  * FSS Data Structures:
232  *
233  *                 fsszone
234  *                  -----           -----
235  *  -----          |     |         |     |
236  * |     |-------->|     |<------->|     |<---->...
237  * |     |          -----           -----
238  * |     |          ^    ^            ^
239  * |     |---       |     \            \
240  *  -----    |      |      \            \
241  * fsspset   |      |       \            \
242  *           |      |        \            \
243  *           |    -----       -----       -----
244  *            -->|     |<--->|     |<--->|     |
245  *               |     |     |     |     |     |
246  *                -----       -----       -----
247  *               fssproj
248  *
249  * That is, fsspsets contain a list of fsszone's that are currently active in
250  * the pset, and a list of fssproj's, corresponding to projects with runnable
251  * threads on the pset.  fssproj's in turn point to the fsszone which they
252  * are a member of.
253  *
254  * An fssproj_t is removed when there are no threads in it.
255  *
256  * An fsszone_t is removed when there are no projects with threads in it.
257  */
258 
259 static pri_t fss_init(id_t, int, classfuncs_t **);
260 
261 static struct sclass fss = {
262 	"FSS",
263 	fss_init,
264 	0
265 };
266 
267 extern struct mod_ops mod_schedops;
268 
269 /*
270  * Module linkage information for the kernel.
271  */
272 static struct modlsched modlsched = {
273 	&mod_schedops, "fair share scheduling class", &fss
274 };
275 
276 static struct modlinkage modlinkage = {
277 	MODREV_1, (void *)&modlsched, NULL
278 };
279 
280 #define	FSS_MAXUPRI	60
281 
282 /*
283  * The fssproc_t structures are kept in an array of circular doubly linked
284  * lists.  A hash on the thread pointer is used to determine which list each
285  * thread should be placed in.  Each list has a dummy "head" which is never
286  * removed, so the list is never empty.  fss_update traverses these lists to
287  * update the priorities of threads that have been waiting on the run queue.
288  */
289 #define	FSS_LISTS		16 /* number of lists, must be power of 2 */
290 #define	FSS_LIST_HASH(t)	(((uintptr_t)(t) >> 9) & (FSS_LISTS - 1))
291 #define	FSS_LIST_NEXT(i)	(((i) + 1) & (FSS_LISTS - 1))
292 
293 #define	FSS_LIST_INSERT(fssproc)				\
294 {								\
295 	int index = FSS_LIST_HASH(fssproc->fss_tp);		\
296 	kmutex_t *lockp = &fss_listlock[index];			\
297 	fssproc_t *headp = &fss_listhead[index];		\
298 	mutex_enter(lockp);					\
299 	fssproc->fss_next = headp->fss_next;			\
300 	fssproc->fss_prev = headp;				\
301 	headp->fss_next->fss_prev = fssproc;			\
302 	headp->fss_next = fssproc;				\
303 	mutex_exit(lockp);					\
304 }
305 
306 #define	FSS_LIST_DELETE(fssproc)				\
307 {								\
308 	int index = FSS_LIST_HASH(fssproc->fss_tp);		\
309 	kmutex_t *lockp = &fss_listlock[index];			\
310 	mutex_enter(lockp);					\
311 	fssproc->fss_prev->fss_next = fssproc->fss_next;	\
312 	fssproc->fss_next->fss_prev = fssproc->fss_prev;	\
313 	mutex_exit(lockp);					\
314 }
315 
316 #define	FSS_TICK_COST	1000	/* tick cost for threads with nice level = 0 */
317 
318 /*
319  * Decay rate percentages are based on n/128 rather than n/100 so  that
320  * calculations can avoid having to do an integer divide by 100 (divide
321  * by FSS_DECAY_BASE == 128 optimizes to an arithmetic shift).
322  *
323  * FSS_DECAY_MIN	=  83/128 ~= 65%
324  * FSS_DECAY_MAX	= 108/128 ~= 85%
325  * FSS_DECAY_USG	=  96/128 ~= 75%
326  */
327 #define	FSS_DECAY_MIN	83	/* fsspri decay pct for threads w/ nice -20 */
328 #define	FSS_DECAY_MAX	108	/* fsspri decay pct for threads w/ nice +19 */
329 #define	FSS_DECAY_USG	96	/* fssusage decay pct for projects */
330 #define	FSS_DECAY_BASE	128	/* base for decay percentages above */
331 
332 #define	FSS_NICE_MIN	0
333 #define	FSS_NICE_MAX	(2 * NZERO - 1)
334 #define	FSS_NICE_RANGE	(FSS_NICE_MAX - FSS_NICE_MIN + 1)
335 
336 static int	fss_nice_tick[FSS_NICE_RANGE];
337 static int	fss_nice_decay[FSS_NICE_RANGE];
338 
339 static pri_t	fss_maxupri = FSS_MAXUPRI; /* maximum FSS user priority */
340 static pri_t	fss_maxumdpri; /* maximum user mode fss priority */
341 static pri_t	fss_maxglobpri;	/* maximum global priority used by fss class */
342 static pri_t	fss_minglobpri;	/* minimum global priority */
343 
344 static fssproc_t fss_listhead[FSS_LISTS];
345 static kmutex_t	fss_listlock[FSS_LISTS];
346 
347 static fsspset_t *fsspsets;
348 static kmutex_t fsspsets_lock;	/* protects fsspsets */
349 
350 static id_t	fss_cid;
351 
352 static time_t	fss_minrun = 2;	/* t_pri becomes 59 within 2 secs */
353 static time_t	fss_minslp = 2;	/* min time on sleep queue for hardswap */
354 static int	fss_quantum = 11;
355 
356 static void	fss_newpri(fssproc_t *, boolean_t);
357 static void	fss_update(void *);
358 static int	fss_update_list(int);
359 static void	fss_change_priority(kthread_t *, fssproc_t *);
360 
361 static int	fss_admin(caddr_t, cred_t *);
362 static int	fss_getclinfo(void *);
363 static int	fss_parmsin(void *);
364 static int	fss_parmsout(void *, pc_vaparms_t *);
365 static int	fss_vaparmsin(void *, pc_vaparms_t *);
366 static int	fss_vaparmsout(void *, pc_vaparms_t *);
367 static int	fss_getclpri(pcpri_t *);
368 static int	fss_alloc(void **, int);
369 static void	fss_free(void *);
370 
371 static int	fss_enterclass(kthread_t *, id_t, void *, cred_t *, void *);
372 static void	fss_exitclass(void *);
373 static int	fss_canexit(kthread_t *, cred_t *);
374 static int	fss_fork(kthread_t *, kthread_t *, void *);
375 static void	fss_forkret(kthread_t *, kthread_t *);
376 static void	fss_parmsget(kthread_t *, void *);
377 static int	fss_parmsset(kthread_t *, void *, id_t, cred_t *);
378 static void	fss_stop(kthread_t *, int, int);
379 static void	fss_exit(kthread_t *);
380 static void	fss_active(kthread_t *);
381 static void	fss_inactive(kthread_t *);
382 static pri_t	fss_swapin(kthread_t *, int);
383 static pri_t	fss_swapout(kthread_t *, int);
384 static void	fss_trapret(kthread_t *);
385 static void	fss_preempt(kthread_t *);
386 static void	fss_setrun(kthread_t *);
387 static void	fss_sleep(kthread_t *);
388 static void	fss_tick(kthread_t *);
389 static void	fss_wakeup(kthread_t *);
390 static int	fss_donice(kthread_t *, cred_t *, int, int *);
391 static int	fss_doprio(kthread_t *, cred_t *, int, int *);
392 static pri_t	fss_globpri(kthread_t *);
393 static void	fss_yield(kthread_t *);
394 static void	fss_nullsys();
395 
396 static struct classfuncs fss_classfuncs = {
397 	/* class functions */
398 	fss_admin,
399 	fss_getclinfo,
400 	fss_parmsin,
401 	fss_parmsout,
402 	fss_vaparmsin,
403 	fss_vaparmsout,
404 	fss_getclpri,
405 	fss_alloc,
406 	fss_free,
407 
408 	/* thread functions */
409 	fss_enterclass,
410 	fss_exitclass,
411 	fss_canexit,
412 	fss_fork,
413 	fss_forkret,
414 	fss_parmsget,
415 	fss_parmsset,
416 	fss_stop,
417 	fss_exit,
418 	fss_active,
419 	fss_inactive,
420 	fss_swapin,
421 	fss_swapout,
422 	fss_trapret,
423 	fss_preempt,
424 	fss_setrun,
425 	fss_sleep,
426 	fss_tick,
427 	fss_wakeup,
428 	fss_donice,
429 	fss_globpri,
430 	fss_nullsys,	/* set_process_group */
431 	fss_yield,
432 	fss_doprio,
433 };
434 
435 int
436 _init()
437 {
438 	return (mod_install(&modlinkage));
439 }
440 
441 int
442 _fini()
443 {
444 	return (EBUSY);
445 }
446 
447 int
448 _info(struct modinfo *modinfop)
449 {
450 	return (mod_info(&modlinkage, modinfop));
451 }
452 
453 /*ARGSUSED*/
454 static int
455 fss_project_walker(kproject_t *kpj, void *buf)
456 {
457 	return (0);
458 }
459 
460 void *
461 fss_allocbuf(int op, int type)
462 {
463 	fssbuf_t *fssbuf;
464 	void **fsslist;
465 	int cnt;
466 	int i;
467 	size_t size;
468 
469 	ASSERT(op == FSS_NPSET_BUF || op == FSS_NPROJ_BUF || op == FSS_ONE_BUF);
470 	ASSERT(type == FSS_ALLOC_PROJ || type == FSS_ALLOC_ZONE);
471 	ASSERT(MUTEX_HELD(&cpu_lock));
472 
473 	fssbuf = kmem_zalloc(sizeof (fssbuf_t), KM_SLEEP);
474 	switch (op) {
475 	case FSS_NPSET_BUF:
476 		cnt = cpupart_list(NULL, 0, CP_NONEMPTY);
477 		break;
478 	case FSS_NPROJ_BUF:
479 		cnt = project_walk_all(ALL_ZONES, fss_project_walker, NULL);
480 		break;
481 	case FSS_ONE_BUF:
482 		cnt = 1;
483 		break;
484 	}
485 
486 	switch (type) {
487 	case FSS_ALLOC_PROJ:
488 		size = sizeof (fssproj_t);
489 		break;
490 	case FSS_ALLOC_ZONE:
491 		size = sizeof (fsszone_t);
492 		break;
493 	}
494 	fsslist = kmem_zalloc(cnt * sizeof (void *), KM_SLEEP);
495 	fssbuf->fssb_size = cnt;
496 	fssbuf->fssb_list = fsslist;
497 	for (i = 0; i < cnt; i++)
498 		fsslist[i] = kmem_zalloc(size, KM_SLEEP);
499 	return (fssbuf);
500 }
501 
502 void
503 fss_freebuf(fssbuf_t *fssbuf, int type)
504 {
505 	void **fsslist;
506 	int i;
507 	size_t size;
508 
509 	ASSERT(fssbuf != NULL);
510 	ASSERT(type == FSS_ALLOC_PROJ || type == FSS_ALLOC_ZONE);
511 	fsslist = fssbuf->fssb_list;
512 
513 	switch (type) {
514 	case FSS_ALLOC_PROJ:
515 		size = sizeof (fssproj_t);
516 		break;
517 	case FSS_ALLOC_ZONE:
518 		size = sizeof (fsszone_t);
519 		break;
520 	}
521 
522 	for (i = 0; i < fssbuf->fssb_size; i++) {
523 		if (fsslist[i] != NULL)
524 			kmem_free(fsslist[i], size);
525 	}
526 	kmem_free(fsslist, sizeof (void *) * fssbuf->fssb_size);
527 	kmem_free(fssbuf, sizeof (fssbuf_t));
528 }
529 
530 static fsspset_t *
531 fss_find_fsspset(cpupart_t *cpupart)
532 {
533 	int i;
534 	fsspset_t *fsspset = NULL;
535 	int found = 0;
536 
537 	ASSERT(cpupart != NULL);
538 	ASSERT(MUTEX_HELD(&fsspsets_lock));
539 
540 	/*
541 	 * Search for the cpupart pointer in the array of fsspsets.
542 	 */
543 	for (i = 0; i < max_ncpus; i++) {
544 		fsspset = &fsspsets[i];
545 		if (fsspset->fssps_cpupart == cpupart) {
546 			ASSERT(fsspset->fssps_nproj > 0);
547 			found = 1;
548 			break;
549 		}
550 	}
551 	if (found == 0) {
552 		/*
553 		 * If we didn't find anything, then use the first
554 		 * available slot in the fsspsets array.
555 		 */
556 		for (i = 0; i < max_ncpus; i++) {
557 			fsspset = &fsspsets[i];
558 			if (fsspset->fssps_cpupart == NULL) {
559 				ASSERT(fsspset->fssps_nproj == 0);
560 				found = 1;
561 				break;
562 			}
563 		}
564 		fsspset->fssps_cpupart = cpupart;
565 	}
566 	ASSERT(found == 1);
567 	return (fsspset);
568 }
569 
570 static void
571 fss_del_fsspset(fsspset_t *fsspset)
572 {
573 	ASSERT(MUTEX_HELD(&fsspsets_lock));
574 	ASSERT(MUTEX_HELD(&fsspset->fssps_lock));
575 	ASSERT(fsspset->fssps_nproj == 0);
576 	ASSERT(fsspset->fssps_list == NULL);
577 	ASSERT(fsspset->fssps_zones == NULL);
578 	fsspset->fssps_cpupart = NULL;
579 	fsspset->fssps_maxfsspri = 0;
580 	fsspset->fssps_shares = 0;
581 }
582 
583 /*
584  * The following routine returns a pointer to the fsszone structure which
585  * belongs to zone "zone" and cpu partition fsspset, if such structure exists.
586  */
587 static fsszone_t *
588 fss_find_fsszone(fsspset_t *fsspset, zone_t *zone)
589 {
590 	fsszone_t *fsszone;
591 
592 	ASSERT(MUTEX_HELD(&fsspset->fssps_lock));
593 
594 	if (fsspset->fssps_list != NULL) {
595 		/*
596 		 * There are projects/zones active on this cpu partition
597 		 * already.  Try to find our zone among them.
598 		 */
599 		fsszone = fsspset->fssps_zones;
600 		do {
601 			if (fsszone->fssz_zone == zone) {
602 				return (fsszone);
603 			}
604 			fsszone = fsszone->fssz_next;
605 		} while (fsszone != fsspset->fssps_zones);
606 	}
607 	return (NULL);
608 }
609 
610 /*
611  * The following routine links new fsszone structure into doubly linked list of
612  * zones active on the specified cpu partition.
613  */
614 static void
615 fss_insert_fsszone(fsspset_t *fsspset, zone_t *zone, fsszone_t *fsszone)
616 {
617 	ASSERT(MUTEX_HELD(&fsspset->fssps_lock));
618 
619 	fsszone->fssz_zone = zone;
620 	fsszone->fssz_rshares = zone->zone_shares;
621 
622 	if (fsspset->fssps_zones == NULL) {
623 		/*
624 		 * This will be the first fsszone for this fsspset
625 		 */
626 		fsszone->fssz_next = fsszone->fssz_prev = fsszone;
627 		fsspset->fssps_zones = fsszone;
628 	} else {
629 		/*
630 		 * Insert this fsszone to the doubly linked list.
631 		 */
632 		fsszone_t *fssz_head = fsspset->fssps_zones;
633 
634 		fsszone->fssz_next = fssz_head;
635 		fsszone->fssz_prev = fssz_head->fssz_prev;
636 		fssz_head->fssz_prev->fssz_next = fsszone;
637 		fssz_head->fssz_prev = fsszone;
638 		fsspset->fssps_zones = fsszone;
639 	}
640 }
641 
642 /*
643  * The following routine removes a single fsszone structure from the doubly
644  * linked list of zones active on the specified cpu partition.  Note that
645  * global fsspsets_lock must be held in case this fsszone structure is the last
646  * on the above mentioned list.  Also note that the fsszone structure is not
647  * freed here, it is the responsibility of the caller to call kmem_free for it.
648  */
649 static void
650 fss_remove_fsszone(fsspset_t *fsspset, fsszone_t *fsszone)
651 {
652 	ASSERT(MUTEX_HELD(&fsspset->fssps_lock));
653 	ASSERT(fsszone->fssz_nproj == 0);
654 	ASSERT(fsszone->fssz_shares == 0);
655 	ASSERT(fsszone->fssz_runnable == 0);
656 
657 	if (fsszone->fssz_next != fsszone) {
658 		/*
659 		 * This is not the last zone in the list.
660 		 */
661 		fsszone->fssz_prev->fssz_next = fsszone->fssz_next;
662 		fsszone->fssz_next->fssz_prev = fsszone->fssz_prev;
663 		if (fsspset->fssps_zones == fsszone)
664 			fsspset->fssps_zones = fsszone->fssz_next;
665 	} else {
666 		/*
667 		 * This was the last zone active in this cpu partition.
668 		 */
669 		fsspset->fssps_zones = NULL;
670 	}
671 }
672 
673 /*
674  * The following routine returns a pointer to the fssproj structure
675  * which belongs to project kpj and cpu partition fsspset, if such structure
676  * exists.
677  */
678 static fssproj_t *
679 fss_find_fssproj(fsspset_t *fsspset, kproject_t *kpj)
680 {
681 	fssproj_t *fssproj;
682 
683 	ASSERT(MUTEX_HELD(&fsspset->fssps_lock));
684 
685 	if (fsspset->fssps_list != NULL) {
686 		/*
687 		 * There are projects running on this cpu partition already.
688 		 * Try to find our project among them.
689 		 */
690 		fssproj = fsspset->fssps_list;
691 		do {
692 			if (fssproj->fssp_proj == kpj) {
693 				ASSERT(fssproj->fssp_pset == fsspset);
694 				return (fssproj);
695 			}
696 			fssproj = fssproj->fssp_next;
697 		} while (fssproj != fsspset->fssps_list);
698 	}
699 	return (NULL);
700 }
701 
702 /*
703  * The following routine links new fssproj structure into doubly linked list
704  * of projects running on the specified cpu partition.
705  */
706 static void
707 fss_insert_fssproj(fsspset_t *fsspset, kproject_t *kpj, fsszone_t *fsszone,
708     fssproj_t *fssproj)
709 {
710 	ASSERT(MUTEX_HELD(&fsspset->fssps_lock));
711 
712 	fssproj->fssp_pset = fsspset;
713 	fssproj->fssp_proj = kpj;
714 	fssproj->fssp_shares = kpj->kpj_shares;
715 
716 	fsspset->fssps_nproj++;
717 
718 	if (fsspset->fssps_list == NULL) {
719 		/*
720 		 * This will be the first fssproj for this fsspset
721 		 */
722 		fssproj->fssp_next = fssproj->fssp_prev = fssproj;
723 		fsspset->fssps_list = fssproj;
724 	} else {
725 		/*
726 		 * Insert this fssproj to the doubly linked list.
727 		 */
728 		fssproj_t *fssp_head = fsspset->fssps_list;
729 
730 		fssproj->fssp_next = fssp_head;
731 		fssproj->fssp_prev = fssp_head->fssp_prev;
732 		fssp_head->fssp_prev->fssp_next = fssproj;
733 		fssp_head->fssp_prev = fssproj;
734 		fsspset->fssps_list = fssproj;
735 	}
736 	fssproj->fssp_fsszone = fsszone;
737 	fsszone->fssz_nproj++;
738 	ASSERT(fsszone->fssz_nproj != 0);
739 }
740 
741 /*
742  * The following routine removes a single fssproj structure from the doubly
743  * linked list of projects running on the specified cpu partition.  Note that
744  * global fsspsets_lock must be held in case if this fssproj structure is the
745  * last on the above mentioned list.  Also note that the fssproj structure is
746  * not freed here, it is the responsibility of the caller to call kmem_free
747  * for it.
748  */
749 static void
750 fss_remove_fssproj(fsspset_t *fsspset, fssproj_t *fssproj)
751 {
752 	fsszone_t *fsszone;
753 
754 	ASSERT(MUTEX_HELD(&fsspsets_lock));
755 	ASSERT(MUTEX_HELD(&fsspset->fssps_lock));
756 	ASSERT(fssproj->fssp_runnable == 0);
757 
758 	fsspset->fssps_nproj--;
759 
760 	fsszone = fssproj->fssp_fsszone;
761 	fsszone->fssz_nproj--;
762 
763 	if (fssproj->fssp_next != fssproj) {
764 		/*
765 		 * This is not the last part in the list.
766 		 */
767 		fssproj->fssp_prev->fssp_next = fssproj->fssp_next;
768 		fssproj->fssp_next->fssp_prev = fssproj->fssp_prev;
769 		if (fsspset->fssps_list == fssproj)
770 			fsspset->fssps_list = fssproj->fssp_next;
771 		if (fsszone->fssz_nproj == 0)
772 			fss_remove_fsszone(fsspset, fsszone);
773 	} else {
774 		/*
775 		 * This was the last project part running
776 		 * at this cpu partition.
777 		 */
778 		fsspset->fssps_list = NULL;
779 		ASSERT(fsspset->fssps_nproj == 0);
780 		ASSERT(fsszone->fssz_nproj == 0);
781 		fss_remove_fsszone(fsspset, fsszone);
782 		fss_del_fsspset(fsspset);
783 	}
784 }
785 
786 static void
787 fss_inactive(kthread_t *t)
788 {
789 	fssproc_t *fssproc;
790 	fssproj_t *fssproj;
791 	fsspset_t *fsspset;
792 	fsszone_t *fsszone;
793 
794 	ASSERT(THREAD_LOCK_HELD(t));
795 	fssproc = FSSPROC(t);
796 	fssproj = FSSPROC2FSSPROJ(fssproc);
797 	if (fssproj == NULL)	/* if this thread already exited */
798 		return;
799 	fsspset = FSSPROJ2FSSPSET(fssproj);
800 	fsszone = fssproj->fssp_fsszone;
801 	disp_lock_enter_high(&fsspset->fssps_displock);
802 	ASSERT(fssproj->fssp_runnable > 0);
803 	if (--fssproj->fssp_runnable == 0) {
804 		fsszone->fssz_shares -= fssproj->fssp_shares;
805 		if (--fsszone->fssz_runnable == 0)
806 			fsspset->fssps_shares -= fsszone->fssz_rshares;
807 	}
808 	ASSERT(fssproc->fss_runnable == 1);
809 	fssproc->fss_runnable = 0;
810 	disp_lock_exit_high(&fsspset->fssps_displock);
811 }
812 
813 static void
814 fss_active(kthread_t *t)
815 {
816 	fssproc_t *fssproc;
817 	fssproj_t *fssproj;
818 	fsspset_t *fsspset;
819 	fsszone_t *fsszone;
820 
821 	ASSERT(THREAD_LOCK_HELD(t));
822 	fssproc = FSSPROC(t);
823 	fssproj = FSSPROC2FSSPROJ(fssproc);
824 	if (fssproj == NULL)	/* if this thread already exited */
825 		return;
826 	fsspset = FSSPROJ2FSSPSET(fssproj);
827 	fsszone = fssproj->fssp_fsszone;
828 	disp_lock_enter_high(&fsspset->fssps_displock);
829 	if (++fssproj->fssp_runnable == 1) {
830 		fsszone->fssz_shares += fssproj->fssp_shares;
831 		if (++fsszone->fssz_runnable == 1)
832 			fsspset->fssps_shares += fsszone->fssz_rshares;
833 	}
834 	ASSERT(fssproc->fss_runnable == 0);
835 	fssproc->fss_runnable = 1;
836 	disp_lock_exit_high(&fsspset->fssps_displock);
837 }
838 
839 /*
840  * Fair share scheduler initialization. Called by dispinit() at boot time.
841  * We can ignore clparmsz argument since we know that the smallest possible
842  * parameter buffer is big enough for us.
843  */
844 /*ARGSUSED*/
845 static pri_t
846 fss_init(id_t cid, int clparmsz, classfuncs_t **clfuncspp)
847 {
848 	int i;
849 
850 	ASSERT(MUTEX_HELD(&cpu_lock));
851 
852 	fss_cid = cid;
853 	fss_maxumdpri = minclsyspri - 1;
854 	fss_maxglobpri = minclsyspri;
855 	fss_minglobpri = 0;
856 	fsspsets = kmem_zalloc(sizeof (fsspset_t) * max_ncpus, KM_SLEEP);
857 
858 	/*
859 	 * Initialize the fssproc hash table.
860 	 */
861 	for (i = 0; i < FSS_LISTS; i++)
862 		fss_listhead[i].fss_next = fss_listhead[i].fss_prev =
863 		    &fss_listhead[i];
864 
865 	*clfuncspp = &fss_classfuncs;
866 
867 	/*
868 	 * Fill in fss_nice_tick and fss_nice_decay arrays:
869 	 * The cost of a tick is lower at positive nice values (so that it
870 	 * will not increase its project's usage as much as normal) with 50%
871 	 * drop at the maximum level and 50% increase at the minimum level.
872 	 * The fsspri decay is slower at positive nice values.  fsspri values
873 	 * of processes with negative nice levels must decay faster to receive
874 	 * time slices more frequently than normal.
875 	 */
876 	for (i = 0; i < FSS_NICE_RANGE; i++) {
877 		fss_nice_tick[i] = (FSS_TICK_COST * (((3 * FSS_NICE_RANGE) / 2)
878 		    - i)) / FSS_NICE_RANGE;
879 		fss_nice_decay[i] = FSS_DECAY_MIN +
880 		    ((FSS_DECAY_MAX - FSS_DECAY_MIN) * i) /
881 		    (FSS_NICE_RANGE - 1);
882 	}
883 
884 	return (fss_maxglobpri);
885 }
886 
887 /*
888  * Calculate the new fss_umdpri based on the usage, the normalized share usage
889  * and the number of active threads.  Reset the tick counter for this thread.
890  *
891  * When calculating the new priority using the standard formula we can hit
892  * a scenario where we don't have good round-robin behavior.  This would be
893  * most commonly seen when there is a zone with lots of runnable threads.
894  * In the bad scenario we will see the following behavior when using the
895  * standard formula and these conditions:
896  *
897  *	- there are multiple runnable threads in the zone (project)
898  *	- the fssps_maxfsspri is a very large value
899  *	- (we also know all of these threads will use the project's
900  *	    fssp_shusage)
901  *
902  * Under these conditions, a thread with a low fss_fsspri value is chosen
903  * to run and the thread gets a high fss_umdpri.  This thread can run for
904  * its full quanta (fss_timeleft) at which time fss_newpri is called to
905  * calculate the thread's new priority.
906  *
907  * In this case, because the newly calculated fsspri value is much smaller
908  * (orders of magnitude) than the fssps_maxfsspri value, if we used the
909  * standard formula the thread will still get a high fss_umdpri value and
910  * will run again for another quanta, even though there are other runnable
911  * threads in the project.
912  *
913  * For a thread that is runnable for a long time, the thread can continue
914  * to run for many quanta (totaling many seconds) before the thread's fsspri
915  * exceeds the fssps_maxfsspri and the thread's fss_umdpri is reset back
916  * down to 1.  This behavior also keeps the fssps_maxfsspr at a high value,
917  * so that the next runnable thread might repeat this cycle.
918  *
919  * This leads to the case where we don't have round-robin behavior at quanta
920  * granularity, but instead, runnable threads within the project only run
921  * at several second intervals.
922  *
923  * To prevent this scenario from occuring, when a thread has consumed its
924  * quanta and there are multiple runnable threads in the project, we
925  * immediately cause the thread to hit fssps_maxfsspri so that it gets
926  * reset back to 1 and another runnable thread in the project can run.
927  */
928 static void
929 fss_newpri(fssproc_t *fssproc, boolean_t quanta_up)
930 {
931 	kthread_t *tp;
932 	fssproj_t *fssproj;
933 	fsspset_t *fsspset;
934 	fsszone_t *fsszone;
935 	fsspri_t fsspri, maxfsspri;
936 	uint32_t n_runnable;
937 	pri_t invpri;
938 	uint32_t ticks;
939 
940 	tp = fssproc->fss_tp;
941 	ASSERT(tp != NULL);
942 
943 	if (tp->t_cid != fss_cid)
944 		return;
945 
946 	ASSERT(THREAD_LOCK_HELD(tp));
947 
948 	fssproj = FSSPROC2FSSPROJ(fssproc);
949 	fsszone = FSSPROJ2FSSZONE(fssproj);
950 	if (fssproj == NULL)
951 		/*
952 		 * No need to change priority of exited threads.
953 		 */
954 		return;
955 
956 	fsspset = FSSPROJ2FSSPSET(fssproj);
957 	disp_lock_enter_high(&fsspset->fssps_displock);
958 
959 	ticks = fssproc->fss_ticks;
960 	fssproc->fss_ticks = 0;
961 
962 	if (fssproj->fssp_shares == 0 || fsszone->fssz_rshares == 0) {
963 		/*
964 		 * Special case: threads with no shares.
965 		 */
966 		fssproc->fss_umdpri = fss_minglobpri;
967 		disp_lock_exit_high(&fsspset->fssps_displock);
968 		return;
969 	}
970 
971 	maxfsspri = fsspset->fssps_maxfsspri;
972 	n_runnable = fssproj->fssp_runnable;
973 
974 	if (quanta_up && n_runnable > 1) {
975 		fsspri = maxfsspri;
976 	} else {
977 		/*
978 		 * fsspri += fssp_shusage * nrunnable * ticks
979 		 * If all three values are non-0, this typically calculates to
980 		 * a large number (sometimes > 1M, sometimes > 100B) due to
981 		 * fssp_shusage which can be > 1T.
982 		 */
983 		fsspri = fssproc->fss_fsspri;
984 		fsspri += fssproj->fssp_shusage * n_runnable * ticks;
985 	}
986 
987 	fssproc->fss_fsspri = fsspri;
988 
989 	/*
990 	 * fss_maxumdpri is normally 59, since FSS priorities are 0-59.
991 	 * If the previous calculation resulted in 0 (e.g. was 0 and added 0
992 	 * because ticks == 0), then instead of 0, we use the largest priority,
993 	 * which is still small in comparison to the large numbers we typically
994 	 * see.
995 	 */
996 	if (fsspri < fss_maxumdpri)
997 		fsspri = fss_maxumdpri;	/* so that maxfsspri is != 0 */
998 
999 	/*
1000 	 * The general priority formula:
1001 	 *
1002 	 *			(fsspri * umdprirange)
1003 	 *   pri = maxumdpri - ------------------------
1004 	 *				maxfsspri
1005 	 *
1006 	 * If this thread's fsspri is greater than the previous largest
1007 	 * fsspri, then record it as the new high and priority for this
1008 	 * thread will be one (the lowest priority assigned to a thread
1009 	 * that has non-zero shares). Because of this check, maxfsspri can
1010 	 * change as this function is called via the
1011 	 * fss_update -> fss_update_list -> fss_newpri code path to update
1012 	 * all runnable threads. See the code in fss_update for how we
1013 	 * mitigate this issue.
1014 	 *
1015 	 * Note that this formula cannot produce out of bounds priority
1016 	 * values (0-59); if it is changed, additional checks may need to be
1017 	 * added.
1018 	 */
1019 	if (fsspri >= maxfsspri) {
1020 		fsspset->fssps_maxfsspri = fsspri;
1021 		disp_lock_exit_high(&fsspset->fssps_displock);
1022 		fssproc->fss_umdpri = 1;
1023 	} else {
1024 		disp_lock_exit_high(&fsspset->fssps_displock);
1025 		invpri = (fsspri * (fss_maxumdpri - 1)) / maxfsspri;
1026 		fssproc->fss_umdpri = fss_maxumdpri - invpri;
1027 	}
1028 }
1029 
1030 /*
1031  * Decays usages of all running projects, resets their tick counters and
1032  * calcluates the projects normalized share usage. Called once per second from
1033  * fss_update().
1034  */
1035 static void
1036 fss_decay_usage()
1037 {
1038 	uint32_t zone_ext_shares, zone_int_shares;
1039 	uint32_t kpj_shares, pset_shares;
1040 	fsspset_t *fsspset;
1041 	fssproj_t *fssproj;
1042 	fsszone_t *fsszone;
1043 	fsspri_t maxfsspri;
1044 	int psetid;
1045 	struct zone *zp;
1046 
1047 	mutex_enter(&fsspsets_lock);
1048 	/*
1049 	 * Go through all active processor sets and decay usages of projects
1050 	 * running on them.
1051 	 */
1052 	for (psetid = 0; psetid < max_ncpus; psetid++) {
1053 		fsspset = &fsspsets[psetid];
1054 		mutex_enter(&fsspset->fssps_lock);
1055 
1056 		fsspset->fssps_gen++;
1057 
1058 		if (fsspset->fssps_cpupart == NULL ||
1059 		    (fssproj = fsspset->fssps_list) == NULL) {
1060 			mutex_exit(&fsspset->fssps_lock);
1061 			continue;
1062 		}
1063 
1064 		/*
1065 		 * Decay maxfsspri for this cpu partition with the
1066 		 * fastest possible decay rate.
1067 		 */
1068 		disp_lock_enter(&fsspset->fssps_displock);
1069 
1070 		pset_shares = fsspset->fssps_shares;
1071 
1072 		maxfsspri = (fsspset->fssps_maxfsspri *
1073 		    fss_nice_decay[NZERO]) / FSS_DECAY_BASE;
1074 		if (maxfsspri < fss_maxumdpri)
1075 			maxfsspri = fss_maxumdpri;
1076 		fsspset->fssps_maxfsspri = maxfsspri;
1077 
1078 		do {
1079 			fsszone = fssproj->fssp_fsszone;
1080 			zp = fsszone->fssz_zone;
1081 
1082 			/*
1083 			 * Reset zone's FSS stats if they are from a
1084 			 * previous cycle.
1085 			 */
1086 			if (fsspset->fssps_gen != zp->zone_fss_gen) {
1087 				zp->zone_fss_gen = fsspset->fssps_gen;
1088 				zp->zone_run_ticks = 0;
1089 			}
1090 
1091 			/*
1092 			 * Decay project usage, then add in this cycle's
1093 			 * nice tick value.
1094 			 */
1095 			fssproj->fssp_usage =
1096 			    (fssproj->fssp_usage * FSS_DECAY_USG) /
1097 			    FSS_DECAY_BASE +
1098 			    fssproj->fssp_ticks;
1099 
1100 			fssproj->fssp_ticks = 0;
1101 			zp->zone_run_ticks += fssproj->fssp_tick_cnt;
1102 			fssproj->fssp_tick_cnt = 0;
1103 
1104 			/*
1105 			 * Readjust the project's number of shares if it has
1106 			 * changed since we checked it last time.
1107 			 */
1108 			kpj_shares = fssproj->fssp_proj->kpj_shares;
1109 			if (fssproj->fssp_shares != kpj_shares) {
1110 				if (fssproj->fssp_runnable != 0) {
1111 					fsszone->fssz_shares -=
1112 					    fssproj->fssp_shares;
1113 					fsszone->fssz_shares += kpj_shares;
1114 				}
1115 				fssproj->fssp_shares = kpj_shares;
1116 			}
1117 
1118 			/*
1119 			 * Readjust the zone's number of shares if it
1120 			 * has changed since we checked it last time.
1121 			 */
1122 			zone_ext_shares = zp->zone_shares;
1123 			if (fsszone->fssz_rshares != zone_ext_shares) {
1124 				if (fsszone->fssz_runnable != 0) {
1125 					fsspset->fssps_shares -=
1126 					    fsszone->fssz_rshares;
1127 					fsspset->fssps_shares +=
1128 					    zone_ext_shares;
1129 					pset_shares = fsspset->fssps_shares;
1130 				}
1131 				fsszone->fssz_rshares = zone_ext_shares;
1132 			}
1133 			zone_int_shares = fsszone->fssz_shares;
1134 
1135 			/*
1136 			 * If anything is runnable in the project, track the
1137 			 * overall project share percent for monitoring useage.
1138 			 */
1139 			if (fssproj->fssp_runnable > 0) {
1140 				uint32_t zone_shr_pct;
1141 				uint32_t int_shr_pct;
1142 
1143 				/*
1144 				 * Times 1000 to get tenths of a percent
1145 				 *
1146 				 *		  zone_ext_shares
1147 				 * zone_shr_pct = ---------------
1148 				 *		  pset_shares
1149 				 *
1150 				 *		  kpj_shares
1151 				 * int_shr_pct =  ---------------
1152 				 *		  zone_int_shares
1153 				 */
1154 				if (pset_shares == 0 || zone_int_shares == 0) {
1155 					fssproj->fssp_shr_pct = 0;
1156 				} else {
1157 					zone_shr_pct =
1158 					    (zone_ext_shares * 1000) /
1159 					    pset_shares;
1160 					int_shr_pct = (kpj_shares * 1000) /
1161 					    zone_int_shares;
1162 					fssproj->fssp_shr_pct =
1163 					    (zone_shr_pct * int_shr_pct) /
1164 					    1000;
1165 				}
1166 			} else {
1167 				DTRACE_PROBE1(fss__prj__norun, fssproj_t *,
1168 				    fssproj);
1169 			}
1170 
1171 			/*
1172 			 * Calculate fssp_shusage value to be used
1173 			 * for fsspri increments for the next second.
1174 			 */
1175 			if (kpj_shares == 0 || zone_ext_shares == 0) {
1176 				fssproj->fssp_shusage = 0;
1177 			} else if (FSSPROJ2KPROJ(fssproj) == proj0p) {
1178 				uint32_t zone_shr_pct;
1179 
1180 				/*
1181 				 * Project 0 in the global zone has 50%
1182 				 * of its zone. See calculation above for
1183 				 * the zone's share percent.
1184 				 */
1185 				if (pset_shares == 0)
1186 					zone_shr_pct = 1000;
1187 				else
1188 					zone_shr_pct =
1189 					    (zone_ext_shares * 1000) /
1190 					    pset_shares;
1191 
1192 				fssproj->fssp_shr_pct = zone_shr_pct / 2;
1193 
1194 				fssproj->fssp_shusage = (fssproj->fssp_usage *
1195 				    zone_int_shares * zone_int_shares) /
1196 				    (zone_ext_shares * zone_ext_shares);
1197 			} else {
1198 				/*
1199 				 * Thread's priority is based on its project's
1200 				 * normalized usage (shusage) value which gets
1201 				 * calculated this way:
1202 				 *
1203 				 *	   pset_shares^2    zone_int_shares^2
1204 				 * usage * ------------- * ------------------
1205 				 *	   kpj_shares^2	    zone_ext_shares^2
1206 				 *
1207 				 * Where zone_int_shares is the sum of shares
1208 				 * of all active projects within the zone (and
1209 				 * the pset), and zone_ext_shares is the number
1210 				 * of zone shares (ie, zone.cpu-shares).
1211 				 *
1212 				 * If there is only one zone active on the pset
1213 				 * the above reduces to:
1214 				 *
1215 				 * 			zone_int_shares^2
1216 				 * shusage = usage * ---------------------
1217 				 * 			kpj_shares^2
1218 				 *
1219 				 * If there's only one project active in the
1220 				 * zone this formula reduces to:
1221 				 *
1222 				 *			pset_shares^2
1223 				 * shusage = usage * ----------------------
1224 				 *			zone_ext_shares^2
1225 				 *
1226 				 * shusage is one input to calculating fss_pri
1227 				 * in fss_newpri(). Larger values tend toward
1228 				 * lower priorities for processes in the proj.
1229 				 */
1230 				fssproj->fssp_shusage = fssproj->fssp_usage *
1231 				    pset_shares * zone_int_shares;
1232 				fssproj->fssp_shusage /=
1233 				    kpj_shares * zone_ext_shares;
1234 				fssproj->fssp_shusage *=
1235 				    pset_shares * zone_int_shares;
1236 				fssproj->fssp_shusage /=
1237 				    kpj_shares * zone_ext_shares;
1238 			}
1239 			fssproj = fssproj->fssp_next;
1240 		} while (fssproj != fsspset->fssps_list);
1241 
1242 		disp_lock_exit(&fsspset->fssps_displock);
1243 		mutex_exit(&fsspset->fssps_lock);
1244 	}
1245 	mutex_exit(&fsspsets_lock);
1246 }
1247 
1248 static void
1249 fss_change_priority(kthread_t *t, fssproc_t *fssproc)
1250 {
1251 	pri_t new_pri;
1252 
1253 	ASSERT(THREAD_LOCK_HELD(t));
1254 	new_pri = fssproc->fss_umdpri;
1255 	ASSERT(new_pri >= 0 && new_pri <= fss_maxglobpri);
1256 
1257 	t->t_cpri = fssproc->fss_upri;
1258 	fssproc->fss_flags &= ~FSSRESTORE;
1259 	if (t == curthread || t->t_state == TS_ONPROC) {
1260 		/*
1261 		 * curthread is always onproc
1262 		 */
1263 		cpu_t *cp = t->t_disp_queue->disp_cpu;
1264 		THREAD_CHANGE_PRI(t, new_pri);
1265 		if (t == cp->cpu_dispthread)
1266 			cp->cpu_dispatch_pri = DISP_PRIO(t);
1267 		if (DISP_MUST_SURRENDER(t)) {
1268 			fssproc->fss_flags |= FSSBACKQ;
1269 			cpu_surrender(t);
1270 		} else {
1271 			fssproc->fss_timeleft = fss_quantum;
1272 		}
1273 	} else {
1274 		/*
1275 		 * When the priority of a thread is changed, it may be
1276 		 * necessary to adjust its position on a sleep queue or
1277 		 * dispatch queue.  The function thread_change_pri accomplishes
1278 		 * this.
1279 		 */
1280 		if (thread_change_pri(t, new_pri, 0)) {
1281 			/*
1282 			 * The thread was on a run queue.
1283 			 */
1284 			fssproc->fss_timeleft = fss_quantum;
1285 		} else {
1286 			fssproc->fss_flags |= FSSBACKQ;
1287 		}
1288 	}
1289 }
1290 
1291 /*
1292  * Update priorities of all fair-sharing threads that are currently runnable
1293  * at a user mode priority based on the number of shares and current usage.
1294  * Called once per second via timeout which we reset here.
1295  *
1296  * There are several lists of fair-sharing threads broken up by a hash on the
1297  * thread pointer.  Each list has its own lock.  This avoids blocking all
1298  * fss_enterclass, fss_fork, and fss_exitclass operations while fss_update runs.
1299  * fss_update traverses each list in turn.
1300  *
1301  * Each time we're run (once/second) we may start at the next list and iterate
1302  * through all of the lists. By starting with a different list, we mitigate any
1303  * effects we would see updating the fssps_maxfsspri value in fss_newpri.
1304  */
1305 static void
1306 fss_update(void *arg)
1307 {
1308 	int i;
1309 	int new_marker = -1;
1310 	static int fss_update_marker;
1311 
1312 	/*
1313 	 * Decay and update usages for all projects.
1314 	 */
1315 	fss_decay_usage();
1316 
1317 	/*
1318 	 * Start with the fss_update_marker list, then do the rest.
1319 	 */
1320 	i = fss_update_marker;
1321 
1322 	/*
1323 	 * Go around all threads, set new priorities and decay
1324 	 * per-thread CPU usages.
1325 	 */
1326 	do {
1327 		/*
1328 		 * If this is the first list after the current marker to have
1329 		 * threads with priority updates, advance the marker to this
1330 		 * list for the next time fss_update runs.
1331 		 */
1332 		if (fss_update_list(i) &&
1333 		    new_marker == -1 && i != fss_update_marker)
1334 			new_marker = i;
1335 	} while ((i = FSS_LIST_NEXT(i)) != fss_update_marker);
1336 
1337 	/*
1338 	 * Advance marker for the next fss_update call
1339 	 */
1340 	if (new_marker != -1)
1341 		fss_update_marker = new_marker;
1342 
1343 	(void) timeout(fss_update, arg, hz);
1344 }
1345 
1346 /*
1347  * Updates priority for a list of threads.  Returns 1 if the priority of one
1348  * of the threads was actually updated, 0 if none were for various reasons
1349  * (thread is no longer in the FSS class, is not runnable, has the preemption
1350  * control no-preempt bit set, etc.)
1351  */
1352 static int
1353 fss_update_list(int i)
1354 {
1355 	fssproc_t *fssproc;
1356 	fssproj_t *fssproj;
1357 	fsspri_t fsspri;
1358 	pri_t fss_umdpri;
1359 	kthread_t *t;
1360 	int updated = 0;
1361 
1362 	mutex_enter(&fss_listlock[i]);
1363 	for (fssproc = fss_listhead[i].fss_next; fssproc != &fss_listhead[i];
1364 	    fssproc = fssproc->fss_next) {
1365 		t = fssproc->fss_tp;
1366 		/*
1367 		 * Lock the thread and verify the state.
1368 		 */
1369 		thread_lock(t);
1370 		/*
1371 		 * Skip the thread if it is no longer in the FSS class or
1372 		 * is running with kernel mode priority.
1373 		 */
1374 		if (t->t_cid != fss_cid)
1375 			goto next;
1376 		if ((fssproc->fss_flags & FSSKPRI) != 0)
1377 			goto next;
1378 
1379 		fssproj = FSSPROC2FSSPROJ(fssproc);
1380 		if (fssproj == NULL)
1381 			goto next;
1382 
1383 		if (fssproj->fssp_shares != 0) {
1384 			/*
1385 			 * Decay fsspri value.
1386 			 */
1387 			fsspri = fssproc->fss_fsspri;
1388 			fsspri = (fsspri * fss_nice_decay[fssproc->fss_nice]) /
1389 			    FSS_DECAY_BASE;
1390 			fssproc->fss_fsspri = fsspri;
1391 		}
1392 
1393 		if (t->t_schedctl && schedctl_get_nopreempt(t))
1394 			goto next;
1395 		if (t->t_state != TS_RUN && t->t_state != TS_WAIT) {
1396 			/*
1397 			 * Make next syscall/trap call fss_trapret
1398 			 */
1399 			t->t_trapret = 1;
1400 			aston(t);
1401 			if (t->t_state == TS_ONPROC)
1402 				DTRACE_PROBE1(fss__onproc, fssproc_t *,
1403 				    fssproc);
1404 			goto next;
1405 		}
1406 		fss_newpri(fssproc, B_FALSE);
1407 		updated = 1;
1408 
1409 		fss_umdpri = fssproc->fss_umdpri;
1410 
1411 		/*
1412 		 * Only dequeue the thread if it needs to be moved; otherwise
1413 		 * it should just round-robin here.
1414 		 */
1415 		if (t->t_pri != fss_umdpri)
1416 			fss_change_priority(t, fssproc);
1417 next:
1418 		thread_unlock(t);
1419 	}
1420 	mutex_exit(&fss_listlock[i]);
1421 	return (updated);
1422 }
1423 
1424 /*ARGSUSED*/
1425 static int
1426 fss_admin(caddr_t uaddr, cred_t *reqpcredp)
1427 {
1428 	fssadmin_t fssadmin;
1429 
1430 	if (copyin(uaddr, &fssadmin, sizeof (fssadmin_t)))
1431 		return (EFAULT);
1432 
1433 	switch (fssadmin.fss_cmd) {
1434 	case FSS_SETADMIN:
1435 		if (secpolicy_dispadm(reqpcredp) != 0)
1436 			return (EPERM);
1437 		if (fssadmin.fss_quantum <= 0 || fssadmin.fss_quantum >= hz)
1438 			return (EINVAL);
1439 		fss_quantum = fssadmin.fss_quantum;
1440 		break;
1441 	case FSS_GETADMIN:
1442 		fssadmin.fss_quantum = fss_quantum;
1443 		if (copyout(&fssadmin, uaddr, sizeof (fssadmin_t)))
1444 			return (EFAULT);
1445 		break;
1446 	default:
1447 		return (EINVAL);
1448 	}
1449 	return (0);
1450 }
1451 
1452 static int
1453 fss_getclinfo(void *infop)
1454 {
1455 	fssinfo_t *fssinfo = (fssinfo_t *)infop;
1456 	fssinfo->fss_maxupri = fss_maxupri;
1457 	return (0);
1458 }
1459 
1460 static int
1461 fss_parmsin(void *parmsp)
1462 {
1463 	fssparms_t *fssparmsp = (fssparms_t *)parmsp;
1464 
1465 	/*
1466 	 * Check validity of parameters.
1467 	 */
1468 	if ((fssparmsp->fss_uprilim > fss_maxupri ||
1469 	    fssparmsp->fss_uprilim < -fss_maxupri) &&
1470 	    fssparmsp->fss_uprilim != FSS_NOCHANGE)
1471 		return (EINVAL);
1472 
1473 	if ((fssparmsp->fss_upri > fss_maxupri ||
1474 	    fssparmsp->fss_upri < -fss_maxupri) &&
1475 	    fssparmsp->fss_upri != FSS_NOCHANGE)
1476 		return (EINVAL);
1477 
1478 	return (0);
1479 }
1480 
1481 /*ARGSUSED*/
1482 static int
1483 fss_parmsout(void *parmsp, pc_vaparms_t *vaparmsp)
1484 {
1485 	return (0);
1486 }
1487 
1488 static int
1489 fss_vaparmsin(void *parmsp, pc_vaparms_t *vaparmsp)
1490 {
1491 	fssparms_t *fssparmsp = (fssparms_t *)parmsp;
1492 	int priflag = 0;
1493 	int limflag = 0;
1494 	uint_t cnt;
1495 	pc_vaparm_t *vpp = &vaparmsp->pc_parms[0];
1496 
1497 	/*
1498 	 * FSS_NOCHANGE (-32768) is outside of the range of values for
1499 	 * fss_uprilim and fss_upri.  If the structure fssparms_t is changed,
1500 	 * FSS_NOCHANGE should be replaced by a flag word.
1501 	 */
1502 	fssparmsp->fss_uprilim = FSS_NOCHANGE;
1503 	fssparmsp->fss_upri = FSS_NOCHANGE;
1504 
1505 	/*
1506 	 * Get the varargs parameter and check validity of parameters.
1507 	 */
1508 	if (vaparmsp->pc_vaparmscnt > PC_VAPARMCNT)
1509 		return (EINVAL);
1510 
1511 	for (cnt = 0; cnt < vaparmsp->pc_vaparmscnt; cnt++, vpp++) {
1512 		switch (vpp->pc_key) {
1513 		case FSS_KY_UPRILIM:
1514 			if (limflag++)
1515 				return (EINVAL);
1516 			fssparmsp->fss_uprilim = (pri_t)vpp->pc_parm;
1517 			if (fssparmsp->fss_uprilim > fss_maxupri ||
1518 			    fssparmsp->fss_uprilim < -fss_maxupri)
1519 				return (EINVAL);
1520 			break;
1521 		case FSS_KY_UPRI:
1522 			if (priflag++)
1523 				return (EINVAL);
1524 			fssparmsp->fss_upri = (pri_t)vpp->pc_parm;
1525 			if (fssparmsp->fss_upri > fss_maxupri ||
1526 			    fssparmsp->fss_upri < -fss_maxupri)
1527 				return (EINVAL);
1528 			break;
1529 		default:
1530 			return (EINVAL);
1531 		}
1532 	}
1533 
1534 	if (vaparmsp->pc_vaparmscnt == 0) {
1535 		/*
1536 		 * Use default parameters.
1537 		 */
1538 		fssparmsp->fss_upri = fssparmsp->fss_uprilim = 0;
1539 	}
1540 
1541 	return (0);
1542 }
1543 
1544 /*
1545  * Copy all selected fair-sharing class parameters to the user.  The parameters
1546  * are specified by a key.
1547  */
1548 static int
1549 fss_vaparmsout(void *parmsp, pc_vaparms_t *vaparmsp)
1550 {
1551 	fssparms_t *fssparmsp = (fssparms_t *)parmsp;
1552 	int priflag = 0;
1553 	int limflag = 0;
1554 	uint_t cnt;
1555 	pc_vaparm_t *vpp = &vaparmsp->pc_parms[0];
1556 
1557 	ASSERT(MUTEX_NOT_HELD(&curproc->p_lock));
1558 
1559 	if (vaparmsp->pc_vaparmscnt > PC_VAPARMCNT)
1560 		return (EINVAL);
1561 
1562 	for (cnt = 0; cnt < vaparmsp->pc_vaparmscnt; cnt++, vpp++) {
1563 		switch (vpp->pc_key) {
1564 		case FSS_KY_UPRILIM:
1565 			if (limflag++)
1566 				return (EINVAL);
1567 			if (copyout(&fssparmsp->fss_uprilim,
1568 			    (caddr_t)(uintptr_t)vpp->pc_parm, sizeof (pri_t)))
1569 				return (EFAULT);
1570 			break;
1571 		case FSS_KY_UPRI:
1572 			if (priflag++)
1573 				return (EINVAL);
1574 			if (copyout(&fssparmsp->fss_upri,
1575 			    (caddr_t)(uintptr_t)vpp->pc_parm, sizeof (pri_t)))
1576 				return (EFAULT);
1577 			break;
1578 		default:
1579 			return (EINVAL);
1580 		}
1581 	}
1582 
1583 	return (0);
1584 }
1585 
1586 /*
1587  * Return the user mode scheduling priority range.
1588  */
1589 static int
1590 fss_getclpri(pcpri_t *pcprip)
1591 {
1592 	pcprip->pc_clpmax = fss_maxupri;
1593 	pcprip->pc_clpmin = -fss_maxupri;
1594 	return (0);
1595 }
1596 
1597 static int
1598 fss_alloc(void **p, int flag)
1599 {
1600 	void *bufp;
1601 
1602 	if ((bufp = kmem_zalloc(sizeof (fssproc_t), flag)) == NULL) {
1603 		return (ENOMEM);
1604 	} else {
1605 		*p = bufp;
1606 		return (0);
1607 	}
1608 }
1609 
1610 static void
1611 fss_free(void *bufp)
1612 {
1613 	if (bufp)
1614 		kmem_free(bufp, sizeof (fssproc_t));
1615 }
1616 
1617 /*
1618  * Thread functions
1619  */
1620 static int
1621 fss_enterclass(kthread_t *t, id_t cid, void *parmsp, cred_t *reqpcredp,
1622     void *bufp)
1623 {
1624 	fssparms_t	*fssparmsp = (fssparms_t *)parmsp;
1625 	fssproc_t	*fssproc;
1626 	pri_t		reqfssuprilim;
1627 	pri_t		reqfssupri;
1628 	static uint32_t fssexists = 0;
1629 	fsspset_t	*fsspset;
1630 	fssproj_t	*fssproj;
1631 	fsszone_t	*fsszone;
1632 	kproject_t	*kpj;
1633 	zone_t		*zone;
1634 	int		fsszone_allocated = 0;
1635 
1636 	fssproc = (fssproc_t *)bufp;
1637 	ASSERT(fssproc != NULL);
1638 
1639 	ASSERT(MUTEX_HELD(&ttoproc(t)->p_lock));
1640 
1641 	/*
1642 	 * Only root can move threads to FSS class.
1643 	 */
1644 	if (reqpcredp != NULL && secpolicy_setpriority(reqpcredp) != 0)
1645 		return (EPERM);
1646 	/*
1647 	 * Initialize the fssproc structure.
1648 	 */
1649 	fssproc->fss_umdpri = fss_maxumdpri / 2;
1650 
1651 	if (fssparmsp == NULL) {
1652 		/*
1653 		 * Use default values.
1654 		 */
1655 		fssproc->fss_nice = NZERO;
1656 		fssproc->fss_uprilim = fssproc->fss_upri = 0;
1657 	} else {
1658 		/*
1659 		 * Use supplied values.
1660 		 */
1661 		if (fssparmsp->fss_uprilim == FSS_NOCHANGE) {
1662 			reqfssuprilim = 0;
1663 		} else {
1664 			if (fssparmsp->fss_uprilim > 0 &&
1665 			    secpolicy_setpriority(reqpcredp) != 0)
1666 				return (EPERM);
1667 			reqfssuprilim = fssparmsp->fss_uprilim;
1668 		}
1669 		if (fssparmsp->fss_upri == FSS_NOCHANGE) {
1670 			reqfssupri = reqfssuprilim;
1671 		} else {
1672 			if (fssparmsp->fss_upri > 0 &&
1673 			    secpolicy_setpriority(reqpcredp) != 0)
1674 				return (EPERM);
1675 			/*
1676 			 * Set the user priority to the requested value or
1677 			 * the upri limit, whichever is lower.
1678 			 */
1679 			reqfssupri = fssparmsp->fss_upri;
1680 			if (reqfssupri > reqfssuprilim)
1681 				reqfssupri = reqfssuprilim;
1682 		}
1683 		fssproc->fss_uprilim = reqfssuprilim;
1684 		fssproc->fss_upri = reqfssupri;
1685 		fssproc->fss_nice = NZERO - (NZERO * reqfssupri) / fss_maxupri;
1686 		if (fssproc->fss_nice > FSS_NICE_MAX)
1687 			fssproc->fss_nice = FSS_NICE_MAX;
1688 	}
1689 
1690 	fssproc->fss_timeleft = fss_quantum;
1691 	fssproc->fss_tp = t;
1692 	cpucaps_sc_init(&fssproc->fss_caps);
1693 
1694 	/*
1695 	 * Put a lock on our fsspset structure.
1696 	 */
1697 	mutex_enter(&fsspsets_lock);
1698 	fsspset = fss_find_fsspset(t->t_cpupart);
1699 	mutex_enter(&fsspset->fssps_lock);
1700 	mutex_exit(&fsspsets_lock);
1701 
1702 	zone = ttoproc(t)->p_zone;
1703 	if ((fsszone = fss_find_fsszone(fsspset, zone)) == NULL) {
1704 		if ((fsszone = kmem_zalloc(sizeof (fsszone_t), KM_NOSLEEP))
1705 		    == NULL) {
1706 			mutex_exit(&fsspset->fssps_lock);
1707 			return (ENOMEM);
1708 		} else {
1709 			fsszone_allocated = 1;
1710 			fss_insert_fsszone(fsspset, zone, fsszone);
1711 		}
1712 	}
1713 	kpj = ttoproj(t);
1714 	if ((fssproj = fss_find_fssproj(fsspset, kpj)) == NULL) {
1715 		if ((fssproj = kmem_zalloc(sizeof (fssproj_t), KM_NOSLEEP))
1716 		    == NULL) {
1717 			if (fsszone_allocated) {
1718 				fss_remove_fsszone(fsspset, fsszone);
1719 				kmem_free(fsszone, sizeof (fsszone_t));
1720 			}
1721 			mutex_exit(&fsspset->fssps_lock);
1722 			return (ENOMEM);
1723 		} else {
1724 			fss_insert_fssproj(fsspset, kpj, fsszone, fssproj);
1725 		}
1726 	}
1727 	fssproj->fssp_threads++;
1728 	fssproc->fss_proj = fssproj;
1729 
1730 	/*
1731 	 * Reset priority. Process goes to a "user mode" priority here
1732 	 * regardless of whether or not it has slept since entering the kernel.
1733 	 */
1734 	thread_lock(t);
1735 	t->t_clfuncs = &(sclass[cid].cl_funcs->thread);
1736 	t->t_cid = cid;
1737 	t->t_cldata = (void *)fssproc;
1738 	t->t_schedflag |= TS_RUNQMATCH;
1739 	fss_change_priority(t, fssproc);
1740 	if (t->t_state == TS_RUN || t->t_state == TS_ONPROC ||
1741 	    t->t_state == TS_WAIT)
1742 		fss_active(t);
1743 	thread_unlock(t);
1744 
1745 	mutex_exit(&fsspset->fssps_lock);
1746 
1747 	/*
1748 	 * Link new structure into fssproc list.
1749 	 */
1750 	FSS_LIST_INSERT(fssproc);
1751 
1752 	/*
1753 	 * If this is the first fair-sharing thread to occur since boot,
1754 	 * we set up the initial call to fss_update() here. Use an atomic
1755 	 * compare-and-swap since that's easier and faster than a mutex
1756 	 * (but check with an ordinary load first since most of the time
1757 	 * this will already be done).
1758 	 */
1759 	if (fssexists == 0 && atomic_cas_32(&fssexists, 0, 1) == 0)
1760 		(void) timeout(fss_update, NULL, hz);
1761 
1762 	return (0);
1763 }
1764 
1765 /*
1766  * Remove fssproc_t from the list.
1767  */
1768 static void
1769 fss_exitclass(void *procp)
1770 {
1771 	fssproc_t *fssproc = (fssproc_t *)procp;
1772 	fssproj_t *fssproj;
1773 	fsspset_t *fsspset;
1774 	fsszone_t *fsszone;
1775 	kthread_t *t = fssproc->fss_tp;
1776 
1777 	/*
1778 	 * We should be either getting this thread off the deathrow or
1779 	 * this thread has already moved to another scheduling class and
1780 	 * we're being called with its old cldata buffer pointer.  In both
1781 	 * cases, the content of this buffer can not be changed while we're
1782 	 * here.
1783 	 */
1784 	mutex_enter(&fsspsets_lock);
1785 	thread_lock(t);
1786 	if (t->t_cid != fss_cid) {
1787 		/*
1788 		 * We're being called as a result of the priocntl() system
1789 		 * call -- someone is trying to move our thread to another
1790 		 * scheduling class. We can't call fss_inactive() here
1791 		 * because our thread's t_cldata pointer already points
1792 		 * to another scheduling class specific data.
1793 		 */
1794 		ASSERT(MUTEX_HELD(&ttoproc(t)->p_lock));
1795 
1796 		fssproj = FSSPROC2FSSPROJ(fssproc);
1797 		fsspset = FSSPROJ2FSSPSET(fssproj);
1798 		fsszone = fssproj->fssp_fsszone;
1799 
1800 		if (fssproc->fss_runnable) {
1801 			disp_lock_enter_high(&fsspset->fssps_displock);
1802 			if (--fssproj->fssp_runnable == 0) {
1803 				fsszone->fssz_shares -= fssproj->fssp_shares;
1804 				if (--fsszone->fssz_runnable == 0)
1805 					fsspset->fssps_shares -=
1806 					    fsszone->fssz_rshares;
1807 			}
1808 			disp_lock_exit_high(&fsspset->fssps_displock);
1809 		}
1810 		thread_unlock(t);
1811 
1812 		mutex_enter(&fsspset->fssps_lock);
1813 		if (--fssproj->fssp_threads == 0) {
1814 			fss_remove_fssproj(fsspset, fssproj);
1815 			if (fsszone->fssz_nproj == 0)
1816 				kmem_free(fsszone, sizeof (fsszone_t));
1817 			kmem_free(fssproj, sizeof (fssproj_t));
1818 		}
1819 		mutex_exit(&fsspset->fssps_lock);
1820 
1821 	} else {
1822 		ASSERT(t->t_state == TS_FREE);
1823 		/*
1824 		 * We're being called from thread_free() when our thread
1825 		 * is removed from the deathrow. There is nothing we need
1826 		 * do here since everything should've been done earlier
1827 		 * in fss_exit().
1828 		 */
1829 		thread_unlock(t);
1830 	}
1831 	mutex_exit(&fsspsets_lock);
1832 
1833 	FSS_LIST_DELETE(fssproc);
1834 	fss_free(fssproc);
1835 }
1836 
1837 /*ARGSUSED*/
1838 static int
1839 fss_canexit(kthread_t *t, cred_t *credp)
1840 {
1841 	/*
1842 	 * A thread is allowed to exit FSS only if we have sufficient
1843 	 * privileges.
1844 	 */
1845 	if (credp != NULL && secpolicy_setpriority(credp) != 0)
1846 		return (EPERM);
1847 	else
1848 		return (0);
1849 }
1850 
1851 /*
1852  * Initialize fair-share class specific proc structure for a child.
1853  */
1854 static int
1855 fss_fork(kthread_t *pt, kthread_t *ct, void *bufp)
1856 {
1857 	fssproc_t *pfssproc;	/* ptr to parent's fssproc structure	*/
1858 	fssproc_t *cfssproc;	/* ptr to child's fssproc structure	*/
1859 	fssproj_t *fssproj;
1860 	fsspset_t *fsspset;
1861 
1862 	ASSERT(MUTEX_HELD(&ttoproc(pt)->p_lock));
1863 	ASSERT(ct->t_state == TS_STOPPED);
1864 
1865 	cfssproc = (fssproc_t *)bufp;
1866 	ASSERT(cfssproc != NULL);
1867 	bzero(cfssproc, sizeof (fssproc_t));
1868 
1869 	thread_lock(pt);
1870 	pfssproc = FSSPROC(pt);
1871 	fssproj = FSSPROC2FSSPROJ(pfssproc);
1872 	fsspset = FSSPROJ2FSSPSET(fssproj);
1873 	thread_unlock(pt);
1874 
1875 	mutex_enter(&fsspset->fssps_lock);
1876 	/*
1877 	 * Initialize child's fssproc structure.
1878 	 */
1879 	thread_lock(pt);
1880 	ASSERT(FSSPROJ(pt) == fssproj);
1881 	cfssproc->fss_proj = fssproj;
1882 	cfssproc->fss_timeleft = fss_quantum;
1883 	cfssproc->fss_umdpri = pfssproc->fss_umdpri;
1884 	cfssproc->fss_fsspri = 0;
1885 	cfssproc->fss_uprilim = pfssproc->fss_uprilim;
1886 	cfssproc->fss_upri = pfssproc->fss_upri;
1887 	cfssproc->fss_tp = ct;
1888 	cfssproc->fss_nice = pfssproc->fss_nice;
1889 	cpucaps_sc_init(&cfssproc->fss_caps);
1890 
1891 	cfssproc->fss_flags =
1892 	    pfssproc->fss_flags & ~(FSSKPRI | FSSBACKQ | FSSRESTORE);
1893 	ct->t_cldata = (void *)cfssproc;
1894 	ct->t_schedflag |= TS_RUNQMATCH;
1895 	thread_unlock(pt);
1896 
1897 	fssproj->fssp_threads++;
1898 	mutex_exit(&fsspset->fssps_lock);
1899 
1900 	/*
1901 	 * Link new structure into fssproc hash table.
1902 	 */
1903 	FSS_LIST_INSERT(cfssproc);
1904 	return (0);
1905 }
1906 
1907 /*
1908  * Child is placed at back of dispatcher queue and parent gives up processor
1909  * so that the child runs first after the fork. This allows the child
1910  * immediately execing to break the multiple use of copy on write pages with no
1911  * disk home. The parent will get to steal them back rather than uselessly
1912  * copying them.
1913  */
1914 static void
1915 fss_forkret(kthread_t *t, kthread_t *ct)
1916 {
1917 	proc_t *pp = ttoproc(t);
1918 	proc_t *cp = ttoproc(ct);
1919 	fssproc_t *fssproc;
1920 
1921 	ASSERT(t == curthread);
1922 	ASSERT(MUTEX_HELD(&pidlock));
1923 
1924 	/*
1925 	 * Grab the child's p_lock before dropping pidlock to ensure the
1926 	 * process does not disappear before we set it running.
1927 	 */
1928 	mutex_enter(&cp->p_lock);
1929 	continuelwps(cp);
1930 	mutex_exit(&cp->p_lock);
1931 
1932 	mutex_enter(&pp->p_lock);
1933 	mutex_exit(&pidlock);
1934 	continuelwps(pp);
1935 
1936 	thread_lock(t);
1937 
1938 	fssproc = FSSPROC(t);
1939 	fss_newpri(fssproc, B_FALSE);
1940 	fssproc->fss_timeleft = fss_quantum;
1941 	t->t_pri = fssproc->fss_umdpri;
1942 	ASSERT(t->t_pri >= 0 && t->t_pri <= fss_maxglobpri);
1943 	fssproc->fss_flags &= ~FSSKPRI;
1944 	THREAD_TRANSITION(t);
1945 
1946 	/*
1947 	 * We don't want to call fss_setrun(t) here because it may call
1948 	 * fss_active, which we don't need.
1949 	 */
1950 	fssproc->fss_flags &= ~FSSBACKQ;
1951 
1952 	if (t->t_disp_time != ddi_get_lbolt())
1953 		setbackdq(t);
1954 	else
1955 		setfrontdq(t);
1956 
1957 	thread_unlock(t);
1958 	/*
1959 	 * Safe to drop p_lock now since it is safe to change
1960 	 * the scheduling class after this point.
1961 	 */
1962 	mutex_exit(&pp->p_lock);
1963 
1964 	swtch();
1965 }
1966 
1967 /*
1968  * Get the fair-sharing parameters of the thread pointed to by fssprocp into
1969  * the buffer pointed by fssparmsp.
1970  */
1971 static void
1972 fss_parmsget(kthread_t *t, void *parmsp)
1973 {
1974 	fssproc_t *fssproc = FSSPROC(t);
1975 	fssparms_t *fssparmsp = (fssparms_t *)parmsp;
1976 
1977 	fssparmsp->fss_uprilim = fssproc->fss_uprilim;
1978 	fssparmsp->fss_upri = fssproc->fss_upri;
1979 }
1980 
1981 /*ARGSUSED*/
1982 static int
1983 fss_parmsset(kthread_t *t, void *parmsp, id_t reqpcid, cred_t *reqpcredp)
1984 {
1985 	char		nice;
1986 	pri_t		reqfssuprilim;
1987 	pri_t		reqfssupri;
1988 	fssproc_t	*fssproc = FSSPROC(t);
1989 	fssparms_t	*fssparmsp = (fssparms_t *)parmsp;
1990 
1991 	ASSERT(MUTEX_HELD(&(ttoproc(t))->p_lock));
1992 
1993 	if (fssparmsp->fss_uprilim == FSS_NOCHANGE)
1994 		reqfssuprilim = fssproc->fss_uprilim;
1995 	else
1996 		reqfssuprilim = fssparmsp->fss_uprilim;
1997 
1998 	if (fssparmsp->fss_upri == FSS_NOCHANGE)
1999 		reqfssupri = fssproc->fss_upri;
2000 	else
2001 		reqfssupri = fssparmsp->fss_upri;
2002 
2003 	/*
2004 	 * Make sure the user priority doesn't exceed the upri limit.
2005 	 */
2006 	if (reqfssupri > reqfssuprilim)
2007 		reqfssupri = reqfssuprilim;
2008 
2009 	/*
2010 	 * Basic permissions enforced by generic kernel code for all classes
2011 	 * require that a thread attempting to change the scheduling parameters
2012 	 * of a target thread be privileged or have a real or effective UID
2013 	 * matching that of the target thread. We are not called unless these
2014 	 * basic permission checks have already passed. The fair-sharing class
2015 	 * requires in addition that the calling thread be privileged if it
2016 	 * is attempting to raise the upri limit above its current value.
2017 	 * This may have been checked previously but if our caller passed us
2018 	 * a non-NULL credential pointer we assume it hasn't and we check it
2019 	 * here.
2020 	 */
2021 	if ((reqpcredp != NULL) &&
2022 	    (reqfssuprilim > fssproc->fss_uprilim) &&
2023 	    secpolicy_raisepriority(reqpcredp) != 0)
2024 		return (EPERM);
2025 
2026 	/*
2027 	 * Set fss_nice to the nice value corresponding to the user priority we
2028 	 * are setting.  Note that setting the nice field of the parameter
2029 	 * struct won't affect upri or nice.
2030 	 */
2031 	nice = NZERO - (reqfssupri * NZERO) / fss_maxupri;
2032 	if (nice > FSS_NICE_MAX)
2033 		nice = FSS_NICE_MAX;
2034 
2035 	thread_lock(t);
2036 
2037 	fssproc->fss_uprilim = reqfssuprilim;
2038 	fssproc->fss_upri = reqfssupri;
2039 	fssproc->fss_nice = nice;
2040 	fss_newpri(fssproc, B_FALSE);
2041 
2042 	if ((fssproc->fss_flags & FSSKPRI) != 0) {
2043 		thread_unlock(t);
2044 		return (0);
2045 	}
2046 
2047 	fss_change_priority(t, fssproc);
2048 	thread_unlock(t);
2049 	return (0);
2050 
2051 }
2052 
2053 /*
2054  * The thread is being stopped.
2055  */
2056 /*ARGSUSED*/
2057 static void
2058 fss_stop(kthread_t *t, int why, int what)
2059 {
2060 	ASSERT(THREAD_LOCK_HELD(t));
2061 	ASSERT(t == curthread);
2062 
2063 	fss_inactive(t);
2064 }
2065 
2066 /*
2067  * The current thread is exiting, do necessary adjustments to its project
2068  */
2069 static void
2070 fss_exit(kthread_t *t)
2071 {
2072 	fsspset_t *fsspset;
2073 	fssproj_t *fssproj;
2074 	fssproc_t *fssproc;
2075 	fsszone_t *fsszone;
2076 	int free = 0;
2077 
2078 	/*
2079 	 * Thread t here is either a current thread (in which case we hold
2080 	 * its process' p_lock), or a thread being destroyed by forklwp_fail(),
2081 	 * in which case we hold pidlock and thread is no longer on the
2082 	 * thread list.
2083 	 */
2084 	ASSERT(MUTEX_HELD(&(ttoproc(t))->p_lock) || MUTEX_HELD(&pidlock));
2085 
2086 	fssproc = FSSPROC(t);
2087 	fssproj = FSSPROC2FSSPROJ(fssproc);
2088 	fsspset = FSSPROJ2FSSPSET(fssproj);
2089 	fsszone = fssproj->fssp_fsszone;
2090 
2091 	mutex_enter(&fsspsets_lock);
2092 	mutex_enter(&fsspset->fssps_lock);
2093 
2094 	thread_lock(t);
2095 	disp_lock_enter_high(&fsspset->fssps_displock);
2096 	if (t->t_state == TS_ONPROC || t->t_state == TS_RUN) {
2097 		if (--fssproj->fssp_runnable == 0) {
2098 			fsszone->fssz_shares -= fssproj->fssp_shares;
2099 			if (--fsszone->fssz_runnable == 0)
2100 				fsspset->fssps_shares -= fsszone->fssz_rshares;
2101 		}
2102 		ASSERT(fssproc->fss_runnable == 1);
2103 		fssproc->fss_runnable = 0;
2104 	}
2105 	if (--fssproj->fssp_threads == 0) {
2106 		fss_remove_fssproj(fsspset, fssproj);
2107 		free = 1;
2108 	}
2109 	disp_lock_exit_high(&fsspset->fssps_displock);
2110 	fssproc->fss_proj = NULL;	/* mark this thread as already exited */
2111 	thread_unlock(t);
2112 
2113 	if (free) {
2114 		if (fsszone->fssz_nproj == 0)
2115 			kmem_free(fsszone, sizeof (fsszone_t));
2116 		kmem_free(fssproj, sizeof (fssproj_t));
2117 	}
2118 	mutex_exit(&fsspset->fssps_lock);
2119 	mutex_exit(&fsspsets_lock);
2120 
2121 	/*
2122 	 * A thread could be exiting in between clock ticks, so we need to
2123 	 * calculate how much CPU time it used since it was charged last time.
2124 	 *
2125 	 * CPU caps are not enforced on exiting processes - it is usually
2126 	 * desirable to exit as soon as possible to free resources.
2127 	 */
2128 	if (CPUCAPS_ON()) {
2129 		thread_lock(t);
2130 		fssproc = FSSPROC(t);
2131 		(void) cpucaps_charge(t, &fssproc->fss_caps,
2132 		    CPUCAPS_CHARGE_ONLY);
2133 		thread_unlock(t);
2134 	}
2135 }
2136 
2137 static void
2138 fss_nullsys()
2139 {
2140 }
2141 
2142 /*
2143  * fss_swapin() returns -1 if the thread is loaded or is not eligible to be
2144  * swapped in. Otherwise, it returns the thread's effective priority based
2145  * on swapout time and size of process (0 <= epri <= 0 SHRT_MAX).
2146  */
2147 /*ARGSUSED*/
2148 static pri_t
2149 fss_swapin(kthread_t *t, int flags)
2150 {
2151 	fssproc_t *fssproc = FSSPROC(t);
2152 	long epri = -1;
2153 	proc_t *pp = ttoproc(t);
2154 
2155 	ASSERT(THREAD_LOCK_HELD(t));
2156 
2157 	if (t->t_state == TS_RUN && (t->t_schedflag & TS_LOAD) == 0) {
2158 		time_t swapout_time;
2159 
2160 		swapout_time = (ddi_get_lbolt() - t->t_stime) / hz;
2161 		if (INHERITED(t) || (fssproc->fss_flags & FSSKPRI)) {
2162 			epri = (long)DISP_PRIO(t) + swapout_time;
2163 		} else {
2164 			/*
2165 			 * Threads which have been out for a long time,
2166 			 * have high user mode priority and are associated
2167 			 * with a small address space are more deserving.
2168 			 */
2169 			epri = fssproc->fss_umdpri;
2170 			ASSERT(epri >= 0 && epri <= fss_maxumdpri);
2171 			epri += swapout_time - pp->p_swrss / nz(maxpgio)/2;
2172 		}
2173 		/*
2174 		 * Scale epri so that SHRT_MAX / 2 represents zero priority.
2175 		 */
2176 		epri += SHRT_MAX / 2;
2177 		if (epri < 0)
2178 			epri = 0;
2179 		else if (epri > SHRT_MAX)
2180 			epri = SHRT_MAX;
2181 	}
2182 	return ((pri_t)epri);
2183 }
2184 
2185 /*
2186  * fss_swapout() returns -1 if the thread isn't loaded or is not eligible to
2187  * be swapped out. Otherwise, it returns the thread's effective priority
2188  * based on if the swapper is in softswap or hardswap mode.
2189  */
2190 static pri_t
2191 fss_swapout(kthread_t *t, int flags)
2192 {
2193 	fssproc_t *fssproc = FSSPROC(t);
2194 	long epri = -1;
2195 	proc_t *pp = ttoproc(t);
2196 	time_t swapin_time;
2197 
2198 	ASSERT(THREAD_LOCK_HELD(t));
2199 
2200 	if (INHERITED(t) ||
2201 	    (fssproc->fss_flags & FSSKPRI) ||
2202 	    (t->t_proc_flag & TP_LWPEXIT) ||
2203 	    (t->t_state & (TS_ZOMB|TS_FREE|TS_STOPPED|TS_ONPROC|TS_WAIT)) ||
2204 	    !(t->t_schedflag & TS_LOAD) ||
2205 	    !(SWAP_OK(t)))
2206 		return (-1);
2207 
2208 	ASSERT(t->t_state & (TS_SLEEP | TS_RUN));
2209 
2210 	swapin_time = (ddi_get_lbolt() - t->t_stime) / hz;
2211 
2212 	if (flags == SOFTSWAP) {
2213 		if (t->t_state == TS_SLEEP && swapin_time > maxslp) {
2214 			epri = 0;
2215 		} else {
2216 			return ((pri_t)epri);
2217 		}
2218 	} else {
2219 		pri_t pri;
2220 
2221 		if ((t->t_state == TS_SLEEP && swapin_time > fss_minslp) ||
2222 		    (t->t_state == TS_RUN && swapin_time > fss_minrun)) {
2223 			pri = fss_maxumdpri;
2224 			epri = swapin_time -
2225 			    (rm_asrss(pp->p_as) / nz(maxpgio)/2) - (long)pri;
2226 		} else {
2227 			return ((pri_t)epri);
2228 		}
2229 	}
2230 
2231 	/*
2232 	 * Scale epri so that SHRT_MAX / 2 represents zero priority.
2233 	 */
2234 	epri += SHRT_MAX / 2;
2235 	if (epri < 0)
2236 		epri = 0;
2237 	else if (epri > SHRT_MAX)
2238 		epri = SHRT_MAX;
2239 
2240 	return ((pri_t)epri);
2241 }
2242 
2243 /*
2244  * If thread is currently at a kernel mode priority (has slept) and is
2245  * returning to the userland we assign it the appropriate user mode priority
2246  * and time quantum here.  If we're lowering the thread's priority below that
2247  * of other runnable threads then we will set runrun via cpu_surrender() to
2248  * cause preemption.
2249  */
2250 static void
2251 fss_trapret(kthread_t *t)
2252 {
2253 	fssproc_t *fssproc = FSSPROC(t);
2254 	cpu_t *cp = CPU;
2255 
2256 	ASSERT(THREAD_LOCK_HELD(t));
2257 	ASSERT(t == curthread);
2258 	ASSERT(cp->cpu_dispthread == t);
2259 	ASSERT(t->t_state == TS_ONPROC);
2260 
2261 	t->t_kpri_req = 0;
2262 	if (fssproc->fss_flags & FSSKPRI) {
2263 		/*
2264 		 * If thread has blocked in the kernel
2265 		 */
2266 		THREAD_CHANGE_PRI(t, fssproc->fss_umdpri);
2267 		cp->cpu_dispatch_pri = DISP_PRIO(t);
2268 		ASSERT(t->t_pri >= 0 && t->t_pri <= fss_maxglobpri);
2269 		fssproc->fss_flags &= ~FSSKPRI;
2270 
2271 		if (DISP_MUST_SURRENDER(t))
2272 			cpu_surrender(t);
2273 	}
2274 
2275 	/*
2276 	 * Swapout lwp if the swapper is waiting for this thread to reach
2277 	 * a safe point.
2278 	 */
2279 	if (t->t_schedflag & TS_SWAPENQ) {
2280 		thread_unlock(t);
2281 		swapout_lwp(ttolwp(t));
2282 		thread_lock(t);
2283 	}
2284 }
2285 
2286 /*
2287  * Arrange for thread to be placed in appropriate location on dispatcher queue.
2288  * This is called with the current thread in TS_ONPROC and locked.
2289  */
2290 static void
2291 fss_preempt(kthread_t *t)
2292 {
2293 	fssproc_t *fssproc = FSSPROC(t);
2294 	klwp_t *lwp;
2295 	uint_t flags;
2296 
2297 	ASSERT(t == curthread);
2298 	ASSERT(THREAD_LOCK_HELD(curthread));
2299 	ASSERT(t->t_state == TS_ONPROC);
2300 
2301 	/*
2302 	 * If preempted in the kernel, make sure the thread has a kernel
2303 	 * priority if needed.
2304 	 */
2305 	lwp = curthread->t_lwp;
2306 	if (!(fssproc->fss_flags & FSSKPRI) && lwp != NULL && t->t_kpri_req) {
2307 		fssproc->fss_flags |= FSSKPRI;
2308 		THREAD_CHANGE_PRI(t, minclsyspri);
2309 		ASSERT(t->t_pri >= 0 && t->t_pri <= fss_maxglobpri);
2310 		t->t_trapret = 1;	/* so that fss_trapret will run */
2311 		aston(t);
2312 	}
2313 
2314 	/*
2315 	 * This thread may be placed on wait queue by CPU Caps. In this case we
2316 	 * do not need to do anything until it is removed from the wait queue.
2317 	 * Do not enforce CPU caps on threads running at a kernel priority
2318 	 */
2319 	if (CPUCAPS_ON()) {
2320 		(void) cpucaps_charge(t, &fssproc->fss_caps,
2321 		    CPUCAPS_CHARGE_ENFORCE);
2322 
2323 		if (!(fssproc->fss_flags & FSSKPRI) && CPUCAPS_ENFORCE(t))
2324 			return;
2325 	}
2326 
2327 	/*
2328 	 * If preempted in user-land mark the thread as swappable because it
2329 	 * cannot be holding any kernel locks.
2330 	 */
2331 	ASSERT(t->t_schedflag & TS_DONT_SWAP);
2332 	if (lwp != NULL && lwp->lwp_state == LWP_USER)
2333 		t->t_schedflag &= ~TS_DONT_SWAP;
2334 
2335 	/*
2336 	 * Check to see if we're doing "preemption control" here.  If
2337 	 * we are, and if the user has requested that this thread not
2338 	 * be preempted, and if preemptions haven't been put off for
2339 	 * too long, let the preemption happen here but try to make
2340 	 * sure the thread is rescheduled as soon as possible.  We do
2341 	 * this by putting it on the front of the highest priority run
2342 	 * queue in the FSS class.  If the preemption has been put off
2343 	 * for too long, clear the "nopreempt" bit and let the thread
2344 	 * be preempted.
2345 	 */
2346 	if (t->t_schedctl && schedctl_get_nopreempt(t)) {
2347 		if (fssproc->fss_timeleft > -SC_MAX_TICKS) {
2348 			DTRACE_SCHED1(schedctl__nopreempt, kthread_t *, t);
2349 			if (!(fssproc->fss_flags & FSSKPRI)) {
2350 				/*
2351 				 * If not already remembered, remember current
2352 				 * priority for restoration in fss_yield().
2353 				 */
2354 				if (!(fssproc->fss_flags & FSSRESTORE)) {
2355 					fssproc->fss_scpri = t->t_pri;
2356 					fssproc->fss_flags |= FSSRESTORE;
2357 				}
2358 				THREAD_CHANGE_PRI(t, fss_maxumdpri);
2359 				t->t_schedflag |= TS_DONT_SWAP;
2360 			}
2361 			schedctl_set_yield(t, 1);
2362 			setfrontdq(t);
2363 			return;
2364 		} else {
2365 			if (fssproc->fss_flags & FSSRESTORE) {
2366 				THREAD_CHANGE_PRI(t, fssproc->fss_scpri);
2367 				fssproc->fss_flags &= ~FSSRESTORE;
2368 			}
2369 			schedctl_set_nopreempt(t, 0);
2370 			DTRACE_SCHED1(schedctl__preempt, kthread_t *, t);
2371 			/*
2372 			 * Fall through and be preempted below.
2373 			 */
2374 		}
2375 	}
2376 
2377 	flags = fssproc->fss_flags & (FSSBACKQ | FSSKPRI);
2378 
2379 	if (flags == FSSBACKQ) {
2380 		fssproc->fss_timeleft = fss_quantum;
2381 		fssproc->fss_flags &= ~FSSBACKQ;
2382 		setbackdq(t);
2383 	} else if (flags == (FSSBACKQ | FSSKPRI)) {
2384 		fssproc->fss_flags &= ~FSSBACKQ;
2385 		setbackdq(t);
2386 	} else {
2387 		setfrontdq(t);
2388 	}
2389 }
2390 
2391 /*
2392  * Called when a thread is waking up and is to be placed on the run queue.
2393  */
2394 static void
2395 fss_setrun(kthread_t *t)
2396 {
2397 	fssproc_t *fssproc = FSSPROC(t);
2398 
2399 	ASSERT(THREAD_LOCK_HELD(t));	/* t should be in transition */
2400 
2401 	if (t->t_state == TS_SLEEP || t->t_state == TS_STOPPED)
2402 		fss_active(t);
2403 
2404 	fssproc->fss_timeleft = fss_quantum;
2405 
2406 	fssproc->fss_flags &= ~FSSBACKQ;
2407 	/*
2408 	 * If previously were running at the kernel priority then keep that
2409 	 * priority and the fss_timeleft doesn't matter.
2410 	 */
2411 	if ((fssproc->fss_flags & FSSKPRI) == 0)
2412 		THREAD_CHANGE_PRI(t, fssproc->fss_umdpri);
2413 
2414 	if (t->t_disp_time != ddi_get_lbolt())
2415 		setbackdq(t);
2416 	else
2417 		setfrontdq(t);
2418 }
2419 
2420 /*
2421  * Prepare thread for sleep. We reset the thread priority so it will run at the
2422  * kernel priority level when it wakes up.
2423  */
2424 static void
2425 fss_sleep(kthread_t *t)
2426 {
2427 	fssproc_t *fssproc = FSSPROC(t);
2428 
2429 	ASSERT(t == curthread);
2430 	ASSERT(THREAD_LOCK_HELD(t));
2431 
2432 	ASSERT(t->t_state == TS_ONPROC);
2433 
2434 	/*
2435 	 * Account for time spent on CPU before going to sleep.
2436 	 */
2437 	(void) CPUCAPS_CHARGE(t, &fssproc->fss_caps, CPUCAPS_CHARGE_ENFORCE);
2438 
2439 	fss_inactive(t);
2440 
2441 	/*
2442 	 * Assign a system priority to the thread and arrange for it to be
2443 	 * retained when the thread is next placed on the run queue (i.e.,
2444 	 * when it wakes up) instead of being given a new pri.  Also arrange
2445 	 * for trapret processing as the thread leaves the system call so it
2446 	 * will drop back to normal priority range.
2447 	 */
2448 	if (t->t_kpri_req) {
2449 		THREAD_CHANGE_PRI(t, minclsyspri);
2450 		fssproc->fss_flags |= FSSKPRI;
2451 		t->t_trapret = 1;	/* so that fss_trapret will run */
2452 		aston(t);
2453 	} else if (fssproc->fss_flags & FSSKPRI) {
2454 		/*
2455 		 * The thread has done a THREAD_KPRI_REQUEST(), slept, then
2456 		 * done THREAD_KPRI_RELEASE() (so no t_kpri_req is 0 again),
2457 		 * then slept again all without finishing the current system
2458 		 * call so trapret won't have cleared FSSKPRI
2459 		 */
2460 		fssproc->fss_flags &= ~FSSKPRI;
2461 		THREAD_CHANGE_PRI(t, fssproc->fss_umdpri);
2462 		if (DISP_MUST_SURRENDER(curthread))
2463 			cpu_surrender(t);
2464 	}
2465 	t->t_stime = ddi_get_lbolt();	/* time stamp for the swapper */
2466 }
2467 
2468 /*
2469  * A tick interrupt has ocurrend on a running thread. Check to see if our
2470  * time slice has expired.  We must also clear the TS_DONT_SWAP flag in
2471  * t_schedflag if the thread is eligible to be swapped out.
2472  */
2473 static void
2474 fss_tick(kthread_t *t)
2475 {
2476 	fssproc_t *fssproc;
2477 	fssproj_t *fssproj;
2478 	klwp_t *lwp;
2479 	boolean_t call_cpu_surrender = B_FALSE;
2480 	boolean_t cpucaps_enforce = B_FALSE;
2481 
2482 	ASSERT(MUTEX_HELD(&(ttoproc(t))->p_lock));
2483 
2484 	/*
2485 	 * It's safe to access fsspset and fssproj structures because we're
2486 	 * holding our p_lock here.
2487 	 */
2488 	thread_lock(t);
2489 	fssproc = FSSPROC(t);
2490 	fssproj = FSSPROC2FSSPROJ(fssproc);
2491 	if (fssproj != NULL) {
2492 		fsspset_t *fsspset = FSSPROJ2FSSPSET(fssproj);
2493 		disp_lock_enter_high(&fsspset->fssps_displock);
2494 		fssproj->fssp_ticks += fss_nice_tick[fssproc->fss_nice];
2495 		fssproj->fssp_tick_cnt++;
2496 		fssproc->fss_ticks++;
2497 		disp_lock_exit_high(&fsspset->fssps_displock);
2498 	}
2499 
2500 	/*
2501 	 * Keep track of thread's project CPU usage.  Note that projects
2502 	 * get charged even when threads are running in the kernel.
2503 	 * Do not surrender CPU if running in the SYS class.
2504 	 */
2505 	if (CPUCAPS_ON()) {
2506 		cpucaps_enforce = cpucaps_charge(t,
2507 		    &fssproc->fss_caps, CPUCAPS_CHARGE_ENFORCE) &&
2508 		    !(fssproc->fss_flags & FSSKPRI);
2509 	}
2510 
2511 	/*
2512 	 * A thread's execution time for threads running in the SYS class
2513 	 * is not tracked.
2514 	 */
2515 	if ((fssproc->fss_flags & FSSKPRI) == 0) {
2516 		/*
2517 		 * If thread is not in kernel mode, decrement its fss_timeleft
2518 		 */
2519 		if (--fssproc->fss_timeleft <= 0) {
2520 			pri_t new_pri;
2521 
2522 			/*
2523 			 * If we're doing preemption control and trying to
2524 			 * avoid preempting this thread, just note that the
2525 			 * thread should yield soon and let it keep running
2526 			 * (unless it's been a while).
2527 			 */
2528 			if (t->t_schedctl && schedctl_get_nopreempt(t)) {
2529 				if (fssproc->fss_timeleft > -SC_MAX_TICKS) {
2530 					DTRACE_SCHED1(schedctl__nopreempt,
2531 					    kthread_t *, t);
2532 					schedctl_set_yield(t, 1);
2533 					thread_unlock_nopreempt(t);
2534 					return;
2535 				}
2536 			}
2537 			fssproc->fss_flags &= ~FSSRESTORE;
2538 
2539 			fss_newpri(fssproc, B_TRUE);
2540 			new_pri = fssproc->fss_umdpri;
2541 			ASSERT(new_pri >= 0 && new_pri <= fss_maxglobpri);
2542 
2543 			/*
2544 			 * When the priority of a thread is changed, it may
2545 			 * be necessary to adjust its position on a sleep queue
2546 			 * or dispatch queue. The function thread_change_pri
2547 			 * accomplishes this.
2548 			 */
2549 			if (thread_change_pri(t, new_pri, 0)) {
2550 				if ((t->t_schedflag & TS_LOAD) &&
2551 				    (lwp = t->t_lwp) &&
2552 				    lwp->lwp_state == LWP_USER)
2553 					t->t_schedflag &= ~TS_DONT_SWAP;
2554 				fssproc->fss_timeleft = fss_quantum;
2555 			} else {
2556 				call_cpu_surrender = B_TRUE;
2557 			}
2558 		} else if (t->t_state == TS_ONPROC &&
2559 		    t->t_pri < t->t_disp_queue->disp_maxrunpri) {
2560 			/*
2561 			 * If there is a higher-priority thread which is
2562 			 * waiting for a processor, then thread surrenders
2563 			 * the processor.
2564 			 */
2565 			call_cpu_surrender = B_TRUE;
2566 		}
2567 	}
2568 
2569 	if (cpucaps_enforce && 2 * fssproc->fss_timeleft > fss_quantum) {
2570 		/*
2571 		 * The thread used more than half of its quantum, so assume that
2572 		 * it used the whole quantum.
2573 		 *
2574 		 * Update thread's priority just before putting it on the wait
2575 		 * queue so that it gets charged for the CPU time from its
2576 		 * quantum even before that quantum expires.
2577 		 */
2578 		fss_newpri(fssproc, B_FALSE);
2579 		if (t->t_pri != fssproc->fss_umdpri)
2580 			fss_change_priority(t, fssproc);
2581 
2582 		/*
2583 		 * We need to call cpu_surrender for this thread due to cpucaps
2584 		 * enforcement, but fss_change_priority may have already done
2585 		 * so. In this case FSSBACKQ is set and there is no need to call
2586 		 * cpu-surrender again.
2587 		 */
2588 		if (!(fssproc->fss_flags & FSSBACKQ))
2589 			call_cpu_surrender = B_TRUE;
2590 	}
2591 
2592 	if (call_cpu_surrender) {
2593 		fssproc->fss_flags |= FSSBACKQ;
2594 		cpu_surrender(t);
2595 	}
2596 
2597 	thread_unlock_nopreempt(t);	/* clock thread can't be preempted */
2598 }
2599 
2600 /*
2601  * Processes waking up go to the back of their queue.  We don't need to assign
2602  * a time quantum here because thread is still at a kernel mode priority and
2603  * the time slicing is not done for threads running in the kernel after
2604  * sleeping.  The proper time quantum will be assigned by fss_trapret before the
2605  * thread returns to user mode.
2606  */
2607 static void
2608 fss_wakeup(kthread_t *t)
2609 {
2610 	fssproc_t *fssproc;
2611 
2612 	ASSERT(THREAD_LOCK_HELD(t));
2613 	ASSERT(t->t_state == TS_SLEEP);
2614 
2615 	fss_active(t);
2616 
2617 	t->t_stime = ddi_get_lbolt();		/* time stamp for the swapper */
2618 	fssproc = FSSPROC(t);
2619 	fssproc->fss_flags &= ~FSSBACKQ;
2620 
2621 	if (fssproc->fss_flags & FSSKPRI) {
2622 		/*
2623 		 * If we already have a kernel priority assigned, then we
2624 		 * just use it.
2625 		 */
2626 		setbackdq(t);
2627 	} else if (t->t_kpri_req) {
2628 		/*
2629 		 * Give thread a priority boost if we were asked.
2630 		 */
2631 		fssproc->fss_flags |= FSSKPRI;
2632 		THREAD_CHANGE_PRI(t, minclsyspri);
2633 		setbackdq(t);
2634 		t->t_trapret = 1;	/* so that fss_trapret will run */
2635 		aston(t);
2636 	} else {
2637 		/*
2638 		 * Otherwise, we recalculate the priority.
2639 		 */
2640 		if (t->t_disp_time == ddi_get_lbolt()) {
2641 			setfrontdq(t);
2642 		} else {
2643 			fssproc->fss_timeleft = fss_quantum;
2644 			THREAD_CHANGE_PRI(t, fssproc->fss_umdpri);
2645 			setbackdq(t);
2646 		}
2647 	}
2648 }
2649 
2650 /*
2651  * fss_donice() is called when a nice(1) command is issued on the thread to
2652  * alter the priority. The nice(1) command exists in Solaris for compatibility.
2653  * Thread priority adjustments should be done via priocntl(1).
2654  */
2655 static int
2656 fss_donice(kthread_t *t, cred_t *cr, int incr, int *retvalp)
2657 {
2658 	int newnice;
2659 	fssproc_t *fssproc = FSSPROC(t);
2660 	fssparms_t fssparms;
2661 
2662 	/*
2663 	 * If there is no change to priority, just return current setting.
2664 	 */
2665 	if (incr == 0) {
2666 		if (retvalp)
2667 			*retvalp = fssproc->fss_nice - NZERO;
2668 		return (0);
2669 	}
2670 
2671 	if ((incr < 0 || incr > 2 * NZERO) && secpolicy_raisepriority(cr) != 0)
2672 		return (EPERM);
2673 
2674 	/*
2675 	 * Specifying a nice increment greater than the upper limit of
2676 	 * FSS_NICE_MAX (== 2 * NZERO - 1) will result in the thread's nice
2677 	 * value being set to the upper limit.  We check for this before
2678 	 * computing the new value because otherwise we could get overflow
2679 	 * if a privileged user specified some ridiculous increment.
2680 	 */
2681 	if (incr > FSS_NICE_MAX)
2682 		incr = FSS_NICE_MAX;
2683 
2684 	newnice = fssproc->fss_nice + incr;
2685 	if (newnice > FSS_NICE_MAX)
2686 		newnice = FSS_NICE_MAX;
2687 	else if (newnice < FSS_NICE_MIN)
2688 		newnice = FSS_NICE_MIN;
2689 
2690 	fssparms.fss_uprilim = fssparms.fss_upri =
2691 	    -((newnice - NZERO) * fss_maxupri) / NZERO;
2692 
2693 	/*
2694 	 * Reset the uprilim and upri values of the thread.
2695 	 */
2696 	(void) fss_parmsset(t, (void *)&fssparms, (id_t)0, (cred_t *)NULL);
2697 
2698 	/*
2699 	 * Although fss_parmsset already reset fss_nice it may not have been
2700 	 * set to precisely the value calculated above because fss_parmsset
2701 	 * determines the nice value from the user priority and we may have
2702 	 * truncated during the integer conversion from nice value to user
2703 	 * priority and back. We reset fss_nice to the value we calculated
2704 	 * above.
2705 	 */
2706 	fssproc->fss_nice = (char)newnice;
2707 
2708 	if (retvalp)
2709 		*retvalp = newnice - NZERO;
2710 	return (0);
2711 }
2712 
2713 /*
2714  * Increment the priority of the specified thread by incr and
2715  * return the new value in *retvalp.
2716  */
2717 static int
2718 fss_doprio(kthread_t *t, cred_t *cr, int incr, int *retvalp)
2719 {
2720 	int newpri;
2721 	fssproc_t *fssproc = FSSPROC(t);
2722 	fssparms_t fssparms;
2723 
2724 	/*
2725 	 * If there is no change to priority, just return current setting.
2726 	 */
2727 	if (incr == 0) {
2728 		*retvalp = fssproc->fss_upri;
2729 		return (0);
2730 	}
2731 
2732 	newpri = fssproc->fss_upri + incr;
2733 	if (newpri > fss_maxupri || newpri < -fss_maxupri)
2734 		return (EINVAL);
2735 
2736 	*retvalp = newpri;
2737 	fssparms.fss_uprilim = fssparms.fss_upri = newpri;
2738 
2739 	/*
2740 	 * Reset the uprilim and upri values of the thread.
2741 	 */
2742 	return (fss_parmsset(t, &fssparms, (id_t)0, cr));
2743 }
2744 
2745 /*
2746  * Return the global scheduling priority that would be assigned to a thread
2747  * entering the fair-sharing class with the fss_upri.
2748  */
2749 /*ARGSUSED*/
2750 static pri_t
2751 fss_globpri(kthread_t *t)
2752 {
2753 	ASSERT(MUTEX_HELD(&ttoproc(t)->p_lock));
2754 
2755 	return (fss_maxumdpri / 2);
2756 }
2757 
2758 /*
2759  * Called from the yield(2) system call when a thread is yielding (surrendering)
2760  * the processor. The kernel thread is placed at the back of a dispatch queue.
2761  */
2762 static void
2763 fss_yield(kthread_t *t)
2764 {
2765 	fssproc_t *fssproc = FSSPROC(t);
2766 
2767 	ASSERT(t == curthread);
2768 	ASSERT(THREAD_LOCK_HELD(t));
2769 
2770 	/*
2771 	 * Collect CPU usage spent before yielding
2772 	 */
2773 	(void) CPUCAPS_CHARGE(t, &fssproc->fss_caps, CPUCAPS_CHARGE_ENFORCE);
2774 
2775 	/*
2776 	 * Clear the preemption control "yield" bit since the user is
2777 	 * doing a yield.
2778 	 */
2779 	if (t->t_schedctl)
2780 		schedctl_set_yield(t, 0);
2781 	/*
2782 	 * If fss_preempt() artifically increased the thread's priority
2783 	 * to avoid preemption, restore the original priority now.
2784 	 */
2785 	if (fssproc->fss_flags & FSSRESTORE) {
2786 		THREAD_CHANGE_PRI(t, fssproc->fss_scpri);
2787 		fssproc->fss_flags &= ~FSSRESTORE;
2788 	}
2789 	if (fssproc->fss_timeleft < 0) {
2790 		/*
2791 		 * Time slice was artificially extended to avoid preemption,
2792 		 * so pretend we're preempting it now.
2793 		 */
2794 		DTRACE_SCHED1(schedctl__yield, int, -fssproc->fss_timeleft);
2795 		fssproc->fss_timeleft = fss_quantum;
2796 	}
2797 	fssproc->fss_flags &= ~FSSBACKQ;
2798 	setbackdq(t);
2799 }
2800 
2801 void
2802 fss_changeproj(kthread_t *t, void *kp, void *zp, fssbuf_t *projbuf,
2803     fssbuf_t *zonebuf)
2804 {
2805 	kproject_t *kpj_new = kp;
2806 	zone_t *zone = zp;
2807 	fssproj_t *fssproj_old, *fssproj_new;
2808 	fsspset_t *fsspset;
2809 	kproject_t *kpj_old;
2810 	fssproc_t *fssproc;
2811 	fsszone_t *fsszone_old, *fsszone_new;
2812 	int free = 0;
2813 	int id;
2814 
2815 	ASSERT(MUTEX_HELD(&cpu_lock));
2816 	ASSERT(MUTEX_HELD(&pidlock));
2817 	ASSERT(MUTEX_HELD(&ttoproc(t)->p_lock));
2818 
2819 	if (t->t_cid != fss_cid)
2820 		return;
2821 
2822 	fssproc = FSSPROC(t);
2823 	mutex_enter(&fsspsets_lock);
2824 	fssproj_old = FSSPROC2FSSPROJ(fssproc);
2825 	if (fssproj_old == NULL) {
2826 		mutex_exit(&fsspsets_lock);
2827 		return;
2828 	}
2829 
2830 	fsspset = FSSPROJ2FSSPSET(fssproj_old);
2831 	mutex_enter(&fsspset->fssps_lock);
2832 	kpj_old = FSSPROJ2KPROJ(fssproj_old);
2833 	fsszone_old = fssproj_old->fssp_fsszone;
2834 
2835 	ASSERT(t->t_cpupart == fsspset->fssps_cpupart);
2836 
2837 	if (kpj_old == kpj_new) {
2838 		mutex_exit(&fsspset->fssps_lock);
2839 		mutex_exit(&fsspsets_lock);
2840 		return;
2841 	}
2842 
2843 	if ((fsszone_new = fss_find_fsszone(fsspset, zone)) == NULL) {
2844 		/*
2845 		 * If the zone for the new project is not currently active on
2846 		 * the cpu partition we're on, get one of the pre-allocated
2847 		 * buffers and link it in our per-pset zone list.  Such buffers
2848 		 * should already exist.
2849 		 */
2850 		for (id = 0; id < zonebuf->fssb_size; id++) {
2851 			if ((fsszone_new = zonebuf->fssb_list[id]) != NULL) {
2852 				fss_insert_fsszone(fsspset, zone, fsszone_new);
2853 				zonebuf->fssb_list[id] = NULL;
2854 				break;
2855 			}
2856 		}
2857 	}
2858 	ASSERT(fsszone_new != NULL);
2859 	if ((fssproj_new = fss_find_fssproj(fsspset, kpj_new)) == NULL) {
2860 		/*
2861 		 * If our new project is not currently running
2862 		 * on the cpu partition we're on, get one of the
2863 		 * pre-allocated buffers and link it in our new cpu
2864 		 * partition doubly linked list. Such buffers should already
2865 		 * exist.
2866 		 */
2867 		for (id = 0; id < projbuf->fssb_size; id++) {
2868 			if ((fssproj_new = projbuf->fssb_list[id]) != NULL) {
2869 				fss_insert_fssproj(fsspset, kpj_new,
2870 				    fsszone_new, fssproj_new);
2871 				projbuf->fssb_list[id] = NULL;
2872 				break;
2873 			}
2874 		}
2875 	}
2876 	ASSERT(fssproj_new != NULL);
2877 
2878 	thread_lock(t);
2879 	if (t->t_state == TS_RUN || t->t_state == TS_ONPROC ||
2880 	    t->t_state == TS_WAIT)
2881 		fss_inactive(t);
2882 	ASSERT(fssproj_old->fssp_threads > 0);
2883 	if (--fssproj_old->fssp_threads == 0) {
2884 		fss_remove_fssproj(fsspset, fssproj_old);
2885 		free = 1;
2886 	}
2887 	fssproc->fss_proj = fssproj_new;
2888 	fssproc->fss_fsspri = 0;
2889 	fssproj_new->fssp_threads++;
2890 	if (t->t_state == TS_RUN || t->t_state == TS_ONPROC ||
2891 	    t->t_state == TS_WAIT)
2892 		fss_active(t);
2893 	thread_unlock(t);
2894 	if (free) {
2895 		if (fsszone_old->fssz_nproj == 0)
2896 			kmem_free(fsszone_old, sizeof (fsszone_t));
2897 		kmem_free(fssproj_old, sizeof (fssproj_t));
2898 	}
2899 
2900 	mutex_exit(&fsspset->fssps_lock);
2901 	mutex_exit(&fsspsets_lock);
2902 }
2903 
2904 void
2905 fss_changepset(kthread_t *t, void *newcp, fssbuf_t *projbuf,
2906     fssbuf_t *zonebuf)
2907 {
2908 	fsspset_t *fsspset_old, *fsspset_new;
2909 	fssproj_t *fssproj_old, *fssproj_new;
2910 	fsszone_t *fsszone_old, *fsszone_new;
2911 	fssproc_t *fssproc;
2912 	kproject_t *kpj;
2913 	zone_t *zone;
2914 	int id;
2915 
2916 	ASSERT(MUTEX_HELD(&cpu_lock));
2917 	ASSERT(MUTEX_HELD(&pidlock));
2918 	ASSERT(MUTEX_HELD(&ttoproc(t)->p_lock));
2919 
2920 	if (t->t_cid != fss_cid)
2921 		return;
2922 
2923 	fssproc = FSSPROC(t);
2924 	zone = ttoproc(t)->p_zone;
2925 	mutex_enter(&fsspsets_lock);
2926 	fssproj_old = FSSPROC2FSSPROJ(fssproc);
2927 	if (fssproj_old == NULL) {
2928 		mutex_exit(&fsspsets_lock);
2929 		return;
2930 	}
2931 	fsszone_old = fssproj_old->fssp_fsszone;
2932 	fsspset_old = FSSPROJ2FSSPSET(fssproj_old);
2933 	kpj = FSSPROJ2KPROJ(fssproj_old);
2934 
2935 	if (fsspset_old->fssps_cpupart == newcp) {
2936 		mutex_exit(&fsspsets_lock);
2937 		return;
2938 	}
2939 
2940 	ASSERT(ttoproj(t) == kpj);
2941 
2942 	fsspset_new = fss_find_fsspset(newcp);
2943 
2944 	mutex_enter(&fsspset_new->fssps_lock);
2945 	if ((fsszone_new = fss_find_fsszone(fsspset_new, zone)) == NULL) {
2946 		for (id = 0; id < zonebuf->fssb_size; id++) {
2947 			if ((fsszone_new = zonebuf->fssb_list[id]) != NULL) {
2948 				fss_insert_fsszone(fsspset_new, zone,
2949 				    fsszone_new);
2950 				zonebuf->fssb_list[id] = NULL;
2951 				break;
2952 			}
2953 		}
2954 	}
2955 	ASSERT(fsszone_new != NULL);
2956 	if ((fssproj_new = fss_find_fssproj(fsspset_new, kpj)) == NULL) {
2957 		for (id = 0; id < projbuf->fssb_size; id++) {
2958 			if ((fssproj_new = projbuf->fssb_list[id]) != NULL) {
2959 				fss_insert_fssproj(fsspset_new, kpj,
2960 				    fsszone_new, fssproj_new);
2961 				projbuf->fssb_list[id] = NULL;
2962 				break;
2963 			}
2964 		}
2965 	}
2966 	ASSERT(fssproj_new != NULL);
2967 
2968 	fssproj_new->fssp_threads++;
2969 	thread_lock(t);
2970 	if (t->t_state == TS_RUN || t->t_state == TS_ONPROC ||
2971 	    t->t_state == TS_WAIT)
2972 		fss_inactive(t);
2973 	fssproc->fss_proj = fssproj_new;
2974 	fssproc->fss_fsspri = 0;
2975 	if (t->t_state == TS_RUN || t->t_state == TS_ONPROC ||
2976 	    t->t_state == TS_WAIT)
2977 		fss_active(t);
2978 	thread_unlock(t);
2979 	mutex_exit(&fsspset_new->fssps_lock);
2980 
2981 	mutex_enter(&fsspset_old->fssps_lock);
2982 	if (--fssproj_old->fssp_threads == 0) {
2983 		fss_remove_fssproj(fsspset_old, fssproj_old);
2984 		if (fsszone_old->fssz_nproj == 0)
2985 			kmem_free(fsszone_old, sizeof (fsszone_t));
2986 		kmem_free(fssproj_old, sizeof (fssproj_t));
2987 	}
2988 	mutex_exit(&fsspset_old->fssps_lock);
2989 
2990 	mutex_exit(&fsspsets_lock);
2991 }
2992