1/*
2 * Copyright (c) 2004, 2008, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation.  Oracle designates this
8 * particular file as subject to the "Classpath" exception as provided
9 * by Oracle in the LICENSE file that accompanied this code.
10 *
11 * This code is distributed in the hope that it will be useful, but WITHOUT
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
14 * version 2 for more details (a copy is included in the LICENSE file that
15 * accompanied this code).
16 *
17 * You should have received a copy of the GNU General Public License version
18 * 2 along with this work; if not, write to the Free Software Foundation,
19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
20 *
21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
22 * or visit www.oracle.com if you need additional information or have any
23 * questions.
24 */
25
26#include <string.h>
27#include <stdlib.h>
28
29#include "jni.h"
30#include "manifest_info.h"
31#include "JarFacade.h"
32
33typedef struct {
34    jarAttribute* head;
35    jarAttribute* tail;
36} iterationContext;
37
38static void
39doAttribute(const char* name, const char* value, void* user_data) {
40    iterationContext* context = (iterationContext*) user_data;
41
42    jarAttribute* attribute = (jarAttribute*)malloc(sizeof(jarAttribute));
43    if (attribute != NULL) {
44        attribute->name = strdup(name);
45        if (attribute->name == NULL) {
46            free(attribute);
47        } else {
48            char *begin = (char *)value;
49            char *end;
50            size_t value_len;
51
52            /* skip any leading white space */
53            while (*begin == ' ') {
54                begin++;
55            }
56
57            /* skip any trailing white space */
58            end = &begin[strlen(begin)];
59            while (end > begin && end[-1] == ' ') {
60                end--;
61            }
62
63            if (begin == end) {
64                /* no value so skip this attribute */
65                free(attribute->name);
66                free(attribute);
67                return;
68            }
69
70            value_len = (size_t)(end - begin);
71            attribute->value = malloc(value_len + 1);
72            if (attribute->value == NULL) {
73                free(attribute->name);
74                free(attribute);
75            } else {
76                /* save the value without leading or trailing whitespace */
77                strncpy(attribute->value, begin, value_len);
78                attribute->value[value_len] = '\0';
79                attribute->next = NULL;
80                if (context->head == NULL) {
81                    context->head = attribute;
82                } else {
83                    context->tail->next = attribute;
84                }
85                context->tail = attribute;
86            }
87        }
88
89    }
90}
91
92/*
93 * Return a list of attributes from the main section of the given JAR
94 * file. Returns NULL if there is an error or there aren't any attributes.
95 */
96jarAttribute*
97readAttributes(const char* jarfile)
98{
99    int rc;
100    iterationContext context = { NULL, NULL };
101
102    rc = JLI_ManifestIterate(jarfile, doAttribute, (void*)&context);
103
104    if (rc == 0) {
105        return context.head;
106    } else {
107        freeAttributes(context.head);
108        return NULL;
109    }
110}
111
112
113/*
114 * Free a list of attributes
115 */
116void
117freeAttributes(jarAttribute* head) {
118    while (head != NULL) {
119        jarAttribute* next = (jarAttribute*)head->next;
120        free(head->name);
121        free(head->value);
122        free(head);
123        head = next;
124    }
125}
126
127/*
128 * Get the value of an attribute in an attribute list. Returns NULL
129 * if attribute not found.
130 */
131char*
132getAttribute(const jarAttribute* attributes, const char* name) {
133    while (attributes != NULL) {
134        if (strcasecmp(attributes->name, name) == 0) {
135            return attributes->value;
136        }
137        attributes = (jarAttribute*)attributes->next;
138    }
139    return NULL;
140}
141