[go: up one dir, main page]

File: calculate.c

package info (click to toggle)
cook 2.19-2
  • links: PTS
  • area: main
  • in suites: woody
  • size: 7,316 kB
  • ctags: 3,969
  • sloc: ansic: 50,331; sh: 13,190; makefile: 4,542; yacc: 3,174; perl: 224; awk: 154
file content (92 lines) | stat: -rw-r--r-- 2,254 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
/*
 *	cook - file construction tool
 *	Copyright (C) 1999 Peter Miller;
 *	All rights reserved.
 *
 *	This program is free software; you can redistribute it and/or modify
 *	it under the terms of the GNU General Public License as published by
 *	the Free Software Foundation; either version 2 of the License, or
 *	(at your option) any later version.
 *
 *	This program is distributed in the hope that it will be useful,
 *	but WITHOUT ANY WARRANTY; without even the implied warranty of
 *	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *	GNU General Public License for more details.
 *
 *	You should have received a copy of the GNU General Public License
 *	along with this program; if not, write to the Free Software
 *	Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
 *
 * MANIFEST: functions to manipulate calculates
 */

#include <ac/errno.h>

#include <archive.h>
#include <error_intl.h>
#include <fingerprint.h>
#include <fp/combined.h>
#include <str.h>
#include <trace.h>


/*
 * NAME
 *	fp_calculate
 *
 * SYNOPSIS
 *	string_ty *fp_calculate(string_ty *path);
 *
 * DESCRIPTION
 *	The fp_calculate function is used to read the given file
 *	to calculate its fingerprint.  The cryptographically string
 *	fingerprint is returned in a string.  If the file does not exist,
 *	the NULL pointer is returned.
 */

string_ty *
fp_fingerprint(path)
	string_ty	*path;
{
	char		buffer[1000];
	fingerprint_ty	*fp;
	int		err;
	sub_context_ty	*scp;
	string_ty	*result;

	trace(("fp_fingerprint(path = \"%s\")\n{\n", path->str_text));
	fp = fingerprint_new(&fp_combined);
	err = fingerprint_file_sum(fp, path->str_text, buffer);
	if (err && errno == ENOENT)
		err = archive_fingerprint(fp, path, buffer);
	if (err)
	{
		switch (errno)
		{
		case ENOTDIR:
		case EISDIR:
		case ENOENT:
			break;

		default:
			scp = sub_context_new();
			sub_errno_set(scp);
			sub_var_set(scp, "File_Name", "%S", path);
			fatal_intl
			(
				scp,
				i18n("fingerprint \"$filename\": $errno")
			);
			/* NOTREACHED */
			sub_context_delete(scp);
			break;
		}
		result = 0;
	}
	else
		result = str_from_c(buffer);
	fingerprint_delete(fp);
	trace(("return \"%s\";\n", result ? result->str_text : ""));
	trace(("}\n"));
	return result;
}