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
93
94
95
96
97
98
99
100
101
102
103
104
105
|
/*
* Licensed Materials - Property of IBM
*
* trousers - An open source TCG Software Stack
*
* (C) Copyright International Business Machines Corp. 2004-2006
*
*/
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <inttypes.h>
#include "trousers/tss.h"
#include "trousers/trousers.h"
#include "trousers_types.h"
#include "spi_utils.h"
#include "capabilities.h"
#include "tsplog.h"
#include "obj.h"
TSS_RESULT
Tspi_TPM_DirWrite(TSS_HTPM hTPM, /* in */
UINT32 ulDirIndex, /* in */
UINT32 ulDirDataLength, /* in */
BYTE * rgbDirData) /* in */
{
TSS_HCONTEXT tspContext;
TCPA_RESULT result;
TPM_AUTH auth;
TCPA_DIGEST hashDigest;
TSS_HPOLICY hPolicy;
TCPA_DIRVALUE dirValue = { { 0 } };
Trspi_HashCtx hashCtx;
if (rgbDirData == NULL && ulDirDataLength != 0)
return TSPERR(TSS_E_BAD_PARAMETER);
if (ulDirDataLength > (UINT32)sizeof(TCPA_DIRVALUE))
return TSPERR(TSS_E_BAD_PARAMETER);
if ((result = obj_tpm_get_tsp_context(hTPM, &tspContext)))
return result;
if ((result = obj_tpm_get_policy(hTPM, TSS_POLICY_USAGE, &hPolicy)))
return result;
memcpy((BYTE *)&dirValue, rgbDirData, ulDirDataLength);
/* hash to be used for the OIAP calc */
result = Trspi_HashInit(&hashCtx, TSS_HASH_SHA1);
result |= Trspi_Hash_UINT32(&hashCtx, TPM_ORD_DirWriteAuth);
result |= Trspi_Hash_UINT32(&hashCtx, ulDirIndex);
result |= Trspi_HashUpdate(&hashCtx, (UINT32)sizeof(TCPA_DIRVALUE), (BYTE *)&dirValue);
if ((result |= Trspi_HashFinal(&hashCtx, hashDigest.digest)))
return result;
/* hashDigest now has the hash result */
if ((result = secret_PerformAuth_OIAP(hTPM, TPM_ORD_DirWriteAuth, hPolicy, FALSE,
&hashDigest, &auth)))
return result;
if ((result = TCS_API(tspContext)->DirWriteAuth(tspContext, ulDirIndex, &dirValue, &auth)))
return result;
result = Trspi_HashInit(&hashCtx, TSS_HASH_SHA1);
result |= Trspi_Hash_UINT32(&hashCtx, result);
result |= Trspi_Hash_UINT32(&hashCtx, TPM_ORD_DirWriteAuth);
if ((result |= Trspi_HashFinal(&hashCtx, hashDigest.digest)))
return result;
return obj_policy_validate_auth_oiap(hPolicy, &hashDigest, &auth);
}
TSS_RESULT
Tspi_TPM_DirRead(TSS_HTPM hTPM, /* in */
UINT32 ulDirIndex, /* in */
UINT32 * pulDirDataLength, /* out */
BYTE ** prgbDirData) /* out */
{
TCPA_DIRVALUE dirValue;
TSS_RESULT result;
TSS_HCONTEXT tspContext;
if (pulDirDataLength == NULL || prgbDirData == NULL)
return TSPERR(TSS_E_BAD_PARAMETER);
if ((result = obj_tpm_get_tsp_context(hTPM, &tspContext)))
return result;
if ((result = TCS_API(tspContext)->DirRead(tspContext, ulDirIndex, &dirValue)))
return result;
*pulDirDataLength = 20;
*prgbDirData = calloc_tspi(tspContext, *pulDirDataLength);
if (*prgbDirData == NULL) {
LogError("malloc of %d bytes failed.", *pulDirDataLength);
return TSPERR(TSS_E_OUTOFMEMORY);
}
memcpy(*prgbDirData, dirValue.digest, *pulDirDataLength);
return TSS_SUCCESS;
}
|
