Edit

kc3-lang/pkgconf/fragment.c

Branch :

  • Show log

    Commit

  • Author : William Pitcock
    Date : 2014-07-09 01:23:51
    Hash : 12ff14f8
    Message : fragments: handle sysroot dir munging directly in a smarter way Previously we just let the tuple system handle it, but pkg-config modules which do not define variables were able to get by the checks. While here, check to ensure we do not duplicate the sysroot dir twice if it is already defined in the pkg-config module file. Downstream bug: https://bugs.busybox.net/show_bug.cgi?id=5750

  • fragment.c
  • /*
     * fragment.c
     * Management of fragment lists.
     *
     * Copyright (c) 2012, 2013, 2014 pkgconf authors (see AUTHORS).
     *
     * Permission to use, copy, modify, and/or distribute this software for any
     * purpose with or without fee is hereby granted, provided that the above
     * copyright notice and this permission notice appear in all copies.
     *
     * This software is provided 'as is' and without any warranty, express or
     * implied.  In no event shall the authors be liable for any damages arising
     * from the use of this software.
     */
    
    #include "pkg.h"
    #include "bsdstubs.h"
    
    static inline char *
    pkg_fragment_copy_munged(const char *source, unsigned int flags)
    {
    	char mungebuf[PKG_BUFSIZE];
    	char *sysroot_dir;
    
    	if (!(flags & PKGF_MUNGE_SYSROOT_PREFIX))
    		return strdup(source);
    
    	sysroot_dir = pkg_tuple_find_global("pc_sysrootdir");
    
    	if (*source != '/' ||
    		(sysroot_dir != NULL && !strncmp(sysroot_dir, source, strlen(sysroot_dir))))
    		return strdup(source);
    
    	strlcpy(mungebuf, sysroot_dir, sizeof mungebuf);
    	strlcat(mungebuf, source, sizeof mungebuf);
    
    	return strdup(mungebuf);
    }
    
    void
    pkg_fragment_add(pkg_list_t *list, const char *string, unsigned int flags)
    {
    	pkg_fragment_t *frag;
    
    	if (*string == '-' && strncmp(string, "-lib:", 5) && strncmp(string, "-framework", 10))
    	{
    		frag = calloc(sizeof(pkg_fragment_t), 1);
    
    		frag->type = *(string + 1);
    		frag->data = pkg_fragment_copy_munged(string + 2, flags);
    	}
    	else
    	{
    		if (list->tail != NULL && list->tail->data != NULL)
    		{
    			pkg_fragment_t *parent = list->tail->data;
    
    			if (!strncmp(parent->data, "-framework", 10))
    			{
    				size_t len = strlen(parent->data) + strlen(string) + 2;
    				char *newdata;
    
    				newdata = malloc(len);
    				strlcpy(newdata, parent->data, len);
    				strlcat(newdata, " ", len);
    				strlcat(newdata, string, len);
    
    				free(parent->data);
    				parent->data = newdata;
    
    				return;
    			}
    		}
    
    		frag = calloc(sizeof(pkg_fragment_t), 1);
    
    		frag->type = 0;
    		frag->data = strdup(string);
    	}
    
    	pkg_node_insert_tail(&frag->iter, frag, list);
    }
    
    static inline pkg_fragment_t *
    pkg_fragment_lookup(pkg_list_t *list, pkg_fragment_t *base)
    {
    	pkg_node_t *node;
    
    	PKG_FOREACH_LIST_ENTRY(list->head, node)
    	{
    		pkg_fragment_t *frag = node->data;
    
    		if (base->type != frag->type)
    			continue;
    
    		if (!strcmp(base->data, frag->data))
    			return frag;
    	}
    
    	return NULL;
    }
    
    static inline bool
    pkg_fragment_can_merge_back(pkg_fragment_t *base, unsigned int flags)
    {
    	if ((flags & PKGF_MERGE_PRIVATE_FRAGMENTS) && base->type == 'l')
    		return false;
    
    	if (base->type == 'F')
    		return false;
    
    	return true;
    }
    
    static inline bool
    pkg_fragment_can_merge(pkg_fragment_t *base, unsigned int flags)
    {
    	(void) flags;
    
    	if (!strncmp(base->data, "-framework", 10))
    		return false;
    
    	return true;
    }
    
    static inline pkg_fragment_t *
    pkg_fragment_exists(pkg_list_t *list, pkg_fragment_t *base, unsigned int flags)
    {
    	if (!pkg_fragment_can_merge_back(base, flags))
    		return NULL;
    
    	if (!pkg_fragment_can_merge(base, flags))
    		return NULL;
    
    	return pkg_fragment_lookup(list, base);
    }
    
    void
    pkg_fragment_copy(pkg_list_t *list, pkg_fragment_t *base, unsigned int flags)
    {
    	pkg_fragment_t *frag;
    
    	if ((frag = pkg_fragment_exists(list, base, flags)) != NULL)
    		pkg_fragment_delete(list, frag);
    	else if (!pkg_fragment_can_merge_back(base, flags) && (pkg_fragment_lookup(list, base) != NULL))
    		return;
    
    	frag = calloc(sizeof(pkg_fragment_t), 1);
    
    	frag->type = base->type;
    	frag->data = strdup(base->data);
    
    	pkg_node_insert_tail(&frag->iter, frag, list);
    }
    
    void
    pkg_fragment_delete(pkg_list_t *list, pkg_fragment_t *node)
    {
    	pkg_node_delete(&node->iter, list);
    
    	free(node->data);
    	free(node);
    }
    
    void
    pkg_fragment_free(pkg_list_t *list)
    {
    	pkg_node_t *node, *next;
    
    	PKG_FOREACH_LIST_ENTRY_SAFE(list->head, next, node)
    	{
    		pkg_fragment_t *frag = node->data;
    
    		free(frag->data);
    		free(frag);
    	}
    }
    
    void
    pkg_fragment_parse(pkg_list_t *list, pkg_list_t *vars, const char *value, unsigned int flags)
    {
    	int i, argc;
    	char **argv;
    	char *repstr = pkg_tuple_parse(vars, value);
    
    	pkg_argv_split(repstr, &argc, &argv);
    
    	for (i = 0; i < argc; i++)
    		pkg_fragment_add(list, argv[i], flags);
    
    	pkg_argv_free(argv);
    	free(repstr);
    }