parse_compute_list.c

/*
 * parse_compute_list.c
 *
 * Copyright (c) 2018-2022 Eric Vidal <eric@obarun.org>
 *
 * All rights reserved.
 *
 * This file is part of Obarun. It is subject to the license terms in
 * the LICENSE file found in the top-level directory of this
 * distribution.
 * This file may not be copied, modified, propagated, or distributed
 * except according to the terms contained in the LICENSE file./
 */

#include <string.h>
#include <stdint.h>
#include <unistd.h> // getuid

#include <oblibs/string.h>
#include <oblibs/sastr.h>
#include <oblibs/log.h>

#include <skalibs/stralloc.h>

#include <66/parse.h>
#include <66/resolve.h>
#include <66/service.h>
#include <66/module.h>

/**
 * @opts -> 1 : build list removing commented optional deps
 * */
int parse_compute_list(resolve_wrapper_t_ref wres, stralloc *sa, uint32_t *res, uint8_t opts)
{

    if (!sa->len)
        return resolve_add_string(wres, "") ;
    int r, found = 0 ;
    size_t len = sa->len, pos = 0 ;
    size_t nelement = sastr_nelement(sa) ;
    stralloc tmp = STRALLOC_ZERO ;
    char const *exclude[3] = { SS_MODULE_ACTIVATED + 1, SS_MODULE_FRONTEND + 1, 0 } ;

    char f[len + nelement + 2] ;

    memset(f, 0, len) ;

    for (; pos < sa->len ; pos += strlen(sa->s + pos) + 1) {

        if (sa->s[pos] == '#')
            continue ;

        if (opts) {

            tmp.len = 0 ;

            r = service_frontend_path(&tmp, sa->s + pos, getuid(), 0, exclude) ;
            if (r == -1)
                log_dieu(LOG_EXIT_SYS, "get frontend service file of: ", sa->s + pos) ;

            if (!r)
                continue ;

            found++ ;

        }

        auto_strings(f + strlen(f), sa->s + pos, " ") ;

        (*res)++ ;

        if (found)
            break ;
    }

    f[strlen(f) - 1] = 0 ;

    stralloc_free(&tmp) ;

    return resolve_add_string(wres, f) ;

}