1 | ///
|
---|
2 | /// This file is part of ILNumerics Community Edition.
|
---|
3 | ///
|
---|
4 | /// ILNumerics Community Edition - high performance computing for applications.
|
---|
5 | /// Copyright (C) 2006 - 2012 Haymo Kutschbach, http://ilnumerics.net
|
---|
6 | ///
|
---|
7 | /// ILNumerics Community Edition is free software: you can redistribute it and/or modify
|
---|
8 | /// it under the terms of the GNU General Public License version 3 as published by
|
---|
9 | /// the Free Software Foundation.
|
---|
10 | ///
|
---|
11 | /// ILNumerics Community Edition is distributed in the hope that it will be useful,
|
---|
12 | /// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
13 | /// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
---|
14 | /// GNU General Public License for more details.
|
---|
15 | ///
|
---|
16 | /// You should have received a copy of the GNU General Public License
|
---|
17 | /// along with ILNumerics Community Edition. See the file License.txt in the root
|
---|
18 | /// of your distribution package. If not, see <http://www.gnu.org/licenses/>.
|
---|
19 | ///
|
---|
20 | /// In addition this software uses the following components and/or licenses:
|
---|
21 | ///
|
---|
22 | /// =================================================================================
|
---|
23 | /// The Open Toolkit Library License
|
---|
24 | ///
|
---|
25 | /// Copyright (c) 2006 - 2009 the Open Toolkit library.
|
---|
26 | ///
|
---|
27 | /// Permission is hereby granted, free of charge, to any person obtaining a copy
|
---|
28 | /// of this software and associated documentation files (the "Software"), to deal
|
---|
29 | /// in the Software without restriction, including without limitation the rights to
|
---|
30 | /// use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
|
---|
31 | /// the Software, and to permit persons to whom the Software is furnished to do
|
---|
32 | /// so, subject to the following conditions:
|
---|
33 | ///
|
---|
34 | /// The above copyright notice and this permission notice shall be included in all
|
---|
35 | /// copies or substantial portions of the Software.
|
---|
36 | ///
|
---|
37 | /// =================================================================================
|
---|
38 | ///
|
---|
39 |
|
---|
40 | using System;
|
---|
41 | using System.Collections.Generic;
|
---|
42 | using System.Linq;
|
---|
43 | using System.Text;
|
---|
44 |
|
---|
45 | namespace ILNumerics.Misc {
|
---|
46 | // ToDo: DOKU Missing for complete class
|
---|
47 | public class ILArrayCache : IDisposable {
|
---|
48 |
|
---|
49 | int m_hashKey;
|
---|
50 | ILCell m_cache;
|
---|
51 | bool m_hasValue = false;
|
---|
52 |
|
---|
53 | internal ILArrayCache() {
|
---|
54 | m_hasValue = false;
|
---|
55 | m_cache = new ILCell(1,1);
|
---|
56 | }
|
---|
57 |
|
---|
58 | public bool IsCached(params ILBaseArray[] keys) {
|
---|
59 | return hash(keys) == m_hashKey;
|
---|
60 | }
|
---|
61 |
|
---|
62 | private int hash(ILBaseArray[] keys) {
|
---|
63 | if (keys == null) return 0;
|
---|
64 | using (ILScope.Enter(keys)) {
|
---|
65 | int ret = keys.Length;
|
---|
66 | foreach (ILBaseArray a in keys) {
|
---|
67 | ret = unchecked(ret * 17) + a.GetHashCode();
|
---|
68 | }
|
---|
69 | return ret;
|
---|
70 | }
|
---|
71 | }
|
---|
72 |
|
---|
73 | public void Cache<T>(ILInArray<T> array, params ILBaseArray[] keys) {
|
---|
74 | using (ILScope.Enter(array)) {
|
---|
75 | m_hashKey = hash(keys);
|
---|
76 | m_cache[0] = array;
|
---|
77 | }
|
---|
78 | }
|
---|
79 | public bool TryGetArray<T>(ILOutArray<T> cache, params ILBaseArray[] keys) {
|
---|
80 | if (object.Equals(cache,null))
|
---|
81 | return false;
|
---|
82 | int curKey = hash(keys);
|
---|
83 | if (curKey == m_hashKey) {
|
---|
84 | cache.a = m_cache.GetArray<T>(0);
|
---|
85 | return true;
|
---|
86 | }
|
---|
87 | return false;
|
---|
88 | }
|
---|
89 |
|
---|
90 | #region IDisposable Members
|
---|
91 |
|
---|
92 | public void Dispose() {
|
---|
93 | if (! object.Equals( m_cache, null) )
|
---|
94 | m_cache.Dispose();
|
---|
95 | m_hasValue = false;
|
---|
96 | m_hashKey = -1;
|
---|
97 | }
|
---|
98 |
|
---|
99 | #endregion
|
---|
100 | }
|
---|
101 | }
|
---|