1/*
2 * All rights reserved.
3 *
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
6 * are met:
7 * 1. Redistributions of source code must retain the above copyright
8 *    notice, this list of conditions and the following disclaimer.
9 * 2. Redistributions in binary form must reproduce the above copyright
10 *    notice, this list of conditions and the following disclaimer in the
11 *    documentation and/or other materials provided with the distribution.
12 * 3. Neither the name of Apple nor the names of any contributors
13 *    may be used to endorse or promote products derived from this software
14 *    without specific prior written permission.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27*/
28/*
29 * Portions Copyright 2006, Apple Computer, Inc.
30 * Christopher Ryan <ryanc@apple.com>
31*/
32
33#include <stdio.h>
34#include <stdlib.h>
35#include <string.h>
36#include <sys/types.h>
37#include <limits.h>
38
39#include "config.h"
40#ifndef HAVE_ASPRINTF
41#include "asprintf.h"
42#endif
43#include "xar.h"
44#include "filetree.h"
45#include "arcmod.h"
46
47struct _script_context{
48	int initted;
49};
50
51#define SCRIPT_CONTEXT(x) ((struct _script_context*)(*x))
52
53int32_t xar_script_in(xar_t x, xar_file_t f, xar_prop_t p, void **in, size_t *inlen, void **context) {
54	char *buf = *in;
55	xar_prop_t tmpp;
56
57	if(!SCRIPT_CONTEXT(context)){
58		*context = calloc(1,sizeof(struct _script_context));
59	}
60
61	if( SCRIPT_CONTEXT(context)->initted )
62		return 0;
63
64	if( !xar_check_prop(x, "contents") )
65		return 0;
66
67	/* Sanity check *inlen, which really shouldn't be more than a
68	 * few kbytes...
69	 */
70	if( *inlen > INT_MAX )
71		return 0;
72
73	/*We only run on the begining of the file, so once we init, we don't run again*/
74	SCRIPT_CONTEXT(context)->initted = 1;
75
76	if( (*inlen > 2) && (buf[0] == '#') && (buf[1] == '!') ) {
77		char *exe;
78		int i;
79
80		exe = malloc(*inlen);
81		if( !exe )
82			return -1;
83		memset(exe, 0, *inlen);
84
85		for(i = 2; (i < *inlen) && (buf[i] != '\0') && (buf[i] != '\n') && (buf[i] != ' '); ++i) {
86			exe[i-2] = buf[i];
87		}
88
89		tmpp = xar_prop_pset(f, p, "contents", NULL);
90		if( tmpp ) {
91			xar_prop_pset(f, tmpp, "type", "script");
92			xar_prop_pset(f, tmpp, "interpreter", exe);
93		}
94		free(exe);
95	}
96	return 0;
97}
98
99int32_t xar_script_done(xar_t x, xar_file_t f, xar_prop_t p, void **context) {
100
101	if(!SCRIPT_CONTEXT(context)){
102		return 0;
103	}
104
105	if( *context ){
106		free(*context);
107		*context = NULL;
108	}
109
110	return 0;
111}
112