/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#include <procfs.h>
#include <project.h>
#include <stdlib.h>
#include <strings.h>
#include "rcapd.h"
#include "utils.h"

                                /* absolute cap name */
#define PJ_ABS_ATTR_NAME        "rcap.max-rss"
                                /* round up to next y = 2^n */
#define ROUNDUP(x, y)           (((x) + ((y) - 1)) & ~((y) - 1))

static int
lcollection_update_project_cb(const struct project *proj, void *walk_data)
{
        void(*update_notification_cb)(char *, char *, int, uint64_t, int) =
            (void(*)(char *, char *, int, uint64_t, int))walk_data;
        char *capattr_abs;
        char *end;
        int changes;
        int64_t max_rss;
        lcollection_t *lcol;
        rcid_t colid;

        capattr_abs = strstr(proj->pj_attr, PJ_ABS_ATTR_NAME "=");
        if (capattr_abs != NULL) {
                if (capattr_abs > proj->pj_attr)
                        if (*(capattr_abs - 1) != ';') {
                                /*
                                 * PJ_ABS_ATTR_NAME only matched part
                                 * of an attribute.
                                 */
                                return (0);
                        }
                capattr_abs += strlen(PJ_ABS_ATTR_NAME "=");
                max_rss = ROUNDUP(strtoll(capattr_abs, &end, 10), 1024) / 1024;
                if (end == capattr_abs || *end != ';' && *end != 0)
                        warn(gettext("project %s: malformed %s value '%s'\n"),
                            proj->pj_name, PJ_ABS_ATTR_NAME, capattr_abs);
        } else
                max_rss = 0;

        colid.rcid_type = RCIDT_PROJECT;
        colid.rcid_val = proj->pj_projid;

        lcol = lcollection_insert_update(&colid, max_rss, proj->pj_name,
            &changes);
        if (update_notification_cb != NULL)
                update_notification_cb("project", proj->pj_name, changes,
                    max_rss, (lcol != NULL) ? lcol->lcol_mark : 0);

        return (0);
}

static int
lcollection_update_project_byid_cb(const projid_t id, void *walk_data)
{
        char buf[PROJECT_BUFSZ];
        struct project proj;

        if (getprojbyid(id, &proj, buf, sizeof (buf)) != NULL && proj.pj_attr !=
            NULL)
                return (lcollection_update_project_cb(&proj, walk_data));

        return (0);
}

static int
lcollection_update_onceactive_cb(lcollection_t *lcol, void *walk_data)
{
        void(*update_notification_cb)(char *, char *, int, uint64_t, int) =
            (void(*)(char *, char *, int, uint64_t, int))walk_data;

        if (lcol->lcol_id.rcid_type != RCIDT_PROJECT)
                return (0);

        return (lcollection_update_project_byid_cb(lcol->lcol_id.rcid_val,
            (void *)update_notification_cb));
}

static int
project_walk_all(int(*cb)(const struct project *, void *), void *walk_data)
{
        char buf[PROJECT_BUFSZ];
        struct project proj;
        int res = 0;

        setprojent();
        while (getprojent(&proj, buf, sizeof (buf)) != NULL && res == 0)
                res = cb(&proj, walk_data);
        endprojent();

        return (res);
}

void
lcollection_update_project(lcollection_update_type_t ut,
    void(*update_notification_cb)(char *, char *, int, uint64_t, int))
{
        switch (ut) {
        case LCU_ACTIVE_ONLY:
                /*
                 * Enumerate active projects.  This is much faster than
                 * enumerating all projects (as is done below, in the default
                 * case), and is done to efficiently and incrementally update
                 * lcollection with capped projects.  The default case performs
                 * the initialization.
                 */
                (void) project_walk(lcollection_update_project_byid_cb,
                    (void *)update_notification_cb);
                /*
                 * Enumerate once-active projects, including the active
                 * projects just enumerated, meaning active projects will be
                 * updated and marked twice.
                 */
                list_walk_collection(lcollection_update_onceactive_cb,
                    (void *)update_notification_cb);
                break;
        default:
                /*
                 * Enumerate all projects.
                 */
                (void) project_walk_all(lcollection_update_project_cb,
                    (void *)update_notification_cb);
        }
}