///////////////////////////////////////////////////////////////////////////
//
// Copyright (c) 2011, Industrial Light & Magic, a division of Lucas
// Digital Ltd. LLC
//
// All rights reserved.
//
// Redistribution and use in source and binary forms, with or without
// modification, are permitted provided that the following conditions are
// met:
// * Redistributions of source code must retain the above copyright
// notice, this list of conditions and the following disclaimer.
// * Redistributions in binary form must reproduce the above
// copyright notice, this list of conditions and the following disclaimer
// in the documentation and/or other materials provided with the
// distribution.
// * Neither the name of Industrial Light & Magic nor the names of
// its contributors may be used to endorse or promote products derived
// from this software without specific prior written permission.
//
// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
// "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
// LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
// A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
// OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
// SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
// LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
// DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
// THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
// OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
//
///////////////////////////////////////////////////////////////////////////
#include <iostream>
#include <string>
#include <vector>
#include <stdio.h>
#include <stdlib.h>
#include <assert.h>
#include <algorithm>
#include "tmpDir.h"
#include "testMultiTiledPartThreading.h"
#include <ImfPartType.h>
#include <ImfMultiPartInputFile.h>
#include <ImfMultiPartOutputFile.h>
#include <ImfOutputFile.h>
#include <ImfTiledOutputFile.h>
#include <ImfGenericOutputFile.h>
#include <ImfArray.h>
#include <ImfChannelList.h>
#include <ImfOutputPart.h>
#include <ImfInputPart.h>
#include <ImfTiledOutputPart.h>
#include <ImfTiledInputPart.h>
#include <IlmThreadPool.h>
#include <IlmThreadMutex.h>
namespace
{
namespace IMF = OPENEXR_IMF_NAMESPACE;
using namespace IMF;
using namespace std;
using namespace IMATH_NAMESPACE;
using namespace ILMTHREAD_NAMESPACE;
const int height = 263;
const int width = 197;
vector<Header> headers;
int pixelTypes[2];
int levelMode;
int tileSize;
template <class T>
void fillPixels (Array2D<T> &ph, int width, int height)
{
ph.resizeErase(height, width);
for (int y = 0; y < height; ++y)
for (int x = 0; x < width; ++x)
{
//
// We do this because half cannot store number bigger than 2048 exactly.
//
ph[y][x] = (y * width + x) % 2049;
}
}
template <class T>
bool checkPixels (Array2D<T> &ph, int lx, int rx, int ly, int ry, int width)
{
for (int y = ly; y <= ry; ++y)
for (int x = lx; x <= rx; ++x)
if (ph[y][x] != (y * width + x) % 2049)
{
cout << "value at " << x << ", " << y << ": " << ph[y][x]
<< ", should be " << (y * width + x) % 2049 << endl << flush;
return false;
}
return true;
}
template <class T>
bool checkPixels (Array2D<T> &ph, int width, int height)
{
return checkPixels<T> (ph, 0, width - 1, 0, height - 1, width);
}
void setOutputFrameBuffer(FrameBuffer& frameBuffer, int pixelType,
Array2D<unsigned int>& uData, Array2D<float>& fData,
Array2D<half>& hData, int width)
{
switch (pixelType)
{
case 0:
frameBuffer.insert ("UINT",
Slice (IMF::UINT,
(char *) (&uData[0][0]),
sizeof (uData[0][0]) * 1,
sizeof (uData[0][0]) * width));
break;
case 1:
frameBuffer.insert ("FLOAT",
Slice (IMF::FLOAT,
(char *) (&fData[0][0]),
sizeof (fData[0][0]) * 1,
sizeof (fData[0][0]) * width));
break;
case 2:
frameBuffer.insert ("HALF",
Slice (IMF::HALF,
(char *) (&hData[0][0]),
sizeof (hData[0][0]) * 1,
sizeof (hData[0][0]) * width));
break;
}
}
void setInputFrameBuffer(FrameBuffer& frameBuffer, int pixelType,
Array2D<unsigned int>& uData, Array2D<float>& fData,
Array2D<half>& hData, int width, int height)
{
switch (pixelType)
{
case 0:
uData.resizeErase(height, width);
frameBuffer.insert ("UINT",
Slice (IMF::UINT,
(char *) (&uData[0][0]),
sizeof (uData[0][0]) * 1,
sizeof (uData[0][0]) * width,
1, 1,
0));
break;
case 1:
fData.resizeErase(height, width);
frameBuffer.insert ("FLOAT",
Slice (IMF::FLOAT,
(char *) (&fData[0][0]),
sizeof (fData[0][0]) * 1,
sizeof (fData[0][0]) * width,
1, 1,
0));
break;
case 2:
hData.resizeErase(height, width);
frameBuffer.insert ("HALF",
Slice (IMF::HALF,
(char *) (&hData[0][0]),
sizeof (hData[0][0]) * 1,
sizeof (hData[0][0]) * width,
1, 1,
0));
break;
}
}
class WritingTask: public Task
{
public:
WritingTask (TaskGroup *group, TiledOutputPart& part,
int lx, int ly, int startY, int numXTiles):
Task(group),
part(part),
lx(lx),
ly(ly),
startY(startY),
numXTiles(numXTiles)
{}
void execute()
{
part.writeTiles(0, numXTiles - 1, startY, startY, lx, ly);
}
private:
TiledOutputPart& part;
int lx, ly;
int startY;
int numXTiles;
};
class ReadingTask: public Task
{
public:
ReadingTask (TaskGroup *group, TiledInputPart& part,
int lx, int ly, int startY, int numXTiles):
Task(group),
part(part),
lx(lx),
ly(ly),
startY(startY),
numXTiles(numXTiles)
{}
void execute()
{
part.readTiles(0, numXTiles - 1, startY, startY, lx, ly);
}
private:
TiledInputPart& part;
int lx, ly;
int startY;
int numXTiles;
};
void
generateFiles (const std::string & fn)
{
//
// Generating headers.
//
cout << "Generating headers " << flush;
headers.clear();
for (int i = 0; i < 2; i++)
{
Header header(width, height);
int pixelType = pixelTypes[i];
stringstream ss;
ss << i;
header.setName(ss.str());
switch (pixelType)
{
case 0:
header.channels().insert("UINT", Channel(IMF::UINT));
break;
case 1:
header.channels().insert("FLOAT", Channel(IMF::FLOAT));
break;
case 2:
header.channels().insert("HALF", Channel(IMF::HALF));
break;
}
header.setType(TILEDIMAGE);
int tileX = tileSize;
int tileY = tileSize;
LevelMode lm;
switch (levelMode)
{
case 0:
lm = ONE_LEVEL;
break;
case 1:
lm = MIPMAP_LEVELS;
break;
case 2:
lm = RIPMAP_LEVELS;
break;
}
header.setTileDescription(TileDescription(tileX, tileY, lm));
headers.push_back(header);
}
//
// Preparing.
//
remove (fn.c_str());
MultiPartOutputFile file(fn.c_str(), &headers[0],headers.size());
vector<TiledOutputPart> parts;
Array2D<half> halfData[2];
Array2D<float> floatData[2];
Array2D<unsigned int> uintData[2];
for (int i = 0; i < 2; i++)
{
TiledOutputPart part(file, i);
parts.push_back(part);
}
//
// Writing files.
//
cout << "Writing files " << flush;
//
// Two parts are the same, and we pick parts[0].
//
TiledOutputPart& part = parts[0];
int numXLevels = part.numXLevels();
int numYLevels = part.numYLevels();
for (int xLevel = 0; xLevel < numXLevels; xLevel++)
for (int yLevel = 0; yLevel < numYLevels; yLevel++)
{
if (!part.isValidLevel(xLevel, yLevel))
continue;
int w = part.levelWidth(xLevel);
int h = part.levelHeight(yLevel);
FrameBuffer frameBuffers[2];
for (int i = 0; i < 2; i++)
{
FrameBuffer& frameBuffer = frameBuffers[i];
switch (pixelTypes[i])
{
case 0:
fillPixels<unsigned int>(uintData[i], w, h);
break;
case 1:
fillPixels<float>(floatData[i], w, h);
break;
case 2:
fillPixels<half>(halfData[i], w, h);
break;
}
setOutputFrameBuffer(frameBuffer, pixelTypes[i],
uintData[i],
floatData[i],
halfData[i],
w);
parts[i].setFrameBuffer(frameBuffer);
}
TaskGroup taskGroup;
ThreadPool* threadPool = new ThreadPool(2);
int numXTiles = part.numXTiles(xLevel);
int numYTiles = part.numYTiles(yLevel);
for (int i = 0; i < numYTiles; i++)
{
threadPool->addTask(
(new WritingTask (&taskGroup, parts[0],
xLevel, yLevel, i, numXTiles)));
threadPool->addTask(
(new WritingTask (&taskGroup, parts[1],
xLevel, yLevel, i, numXTiles)));
}
delete threadPool;
}
}
void
readFiles (const std::string & fn)
{
cout << "Checking headers " << flush;
MultiPartInputFile file(fn.c_str());
assert (file.parts() == 2);
for (size_t i = 0; i < 2; i++)
{
const Header& header = file.header(i);
assert (header.displayWindow() == headers[i].displayWindow());
assert (header.dataWindow() == headers[i].dataWindow());
assert (header.pixelAspectRatio() == headers[i].pixelAspectRatio());
assert (header.screenWindowCenter() == headers[i].screenWindowCenter());
assert (header.screenWindowWidth() == headers[i].screenWindowWidth());
assert (header.lineOrder() == headers[i].lineOrder());
assert (header.compression() == headers[i].compression());
assert (header.channels() == headers[i].channels());
assert (header.name() == headers[i].name());
assert (header.type() == headers[i].type());
}
//
// Preparing.
//
Array2D<unsigned int> uData[2];
Array2D<float> fData[2];
Array2D<half> hData[2];
vector<TiledInputPart> parts;
for (int i = 0; i < 2; i++)
{
TiledInputPart part(file, i);
parts.push_back(part);
}
//
// Reading files.
//
cout << "Reading and comparing files " << flush;
TiledInputPart& part = parts[0];
int numXLevels = part.numXLevels();
int numYLevels = part.numYLevels();
for (int xLevel = 0; xLevel < numXLevels; xLevel++)
for (int yLevel = 0; yLevel < numYLevels; yLevel++)
{
if (!part.isValidLevel(xLevel, yLevel))
continue;
int w = part.levelWidth(xLevel);
int h = part.levelHeight(yLevel);
FrameBuffer frameBuffers[2];
for (int i = 0; i < 2; i++)
{
FrameBuffer& frameBuffer = frameBuffers[i];
setInputFrameBuffer(frameBuffer, pixelTypes[i],
uData[i],
fData[i],
hData[i],
w, h);
parts[i].setFrameBuffer(frameBuffer);
}
TaskGroup taskGroup;
ThreadPool* threadPool = new ThreadPool(2);
int numXTiles = part.numXTiles(xLevel);
int numYTiles = part.numYTiles(yLevel);
for (int i = 0; i < numYTiles; i++)
{
threadPool->addTask(
(new ReadingTask (&taskGroup, parts[0],
xLevel, yLevel, i, numXTiles)));
threadPool->addTask(
(new ReadingTask (&taskGroup, parts[1],
xLevel, yLevel, i, numXTiles)));
}
delete threadPool;
for (int i = 0; i < 2; i++)
{
switch (pixelTypes[i])
{
case 0:
assert(checkPixels<unsigned int>(uData[i], w, h));
break;
case 1:
assert(checkPixels<float>(fData[i], w, h));
break;
case 2:
assert(checkPixels<half>(hData[i], w, h));
break;
}
}
}
}
void
testWriteRead (const std::string & tempDir)
{
std::string fn = tempDir + "imf_test_multi_tiled_part_threading.exr";
string typeNames[2];
string levelModeName;
for (int i = 0; i < 2; i++)
{
switch (pixelTypes[i])
{
case 0:
typeNames[i] = "unsigned int";
break;
case 1:
typeNames[i] = "float";
break;
case 2:
typeNames[i] = "half";
break;
}
switch (levelMode)
{
case 0:
levelModeName = "ONE_LEVEL";
break;
case 1:
levelModeName = "MIPMAP";
break;
case 2:
levelModeName = "RIPMAP";
break;
}
}
cout << "part 1: type " << typeNames[0]
<< " tiled part, "
<< "part 2: type " << typeNames[1]
<< " tiled part, "
<< "level mode " << levelModeName
<< " tile size " << tileSize << "x" << tileSize
<< endl << flush;
generateFiles (fn);
readFiles (fn);
remove (fn.c_str());
cout << endl << flush;
}
} // namespace
void testMultiTiledPartThreading (const std::string & tempDir)
{
try
{
cout << "Testing the two threads reading/writing on two-tiled-part file" << endl;
int numThreads = ThreadPool::globalThreadPool().numThreads();
ThreadPool::globalThreadPool().setNumThreads(2);
for (int pt1 = 0; pt1 < 3; pt1++)
for (int pt2 = 0; pt2 < 3; pt2++)
for (int lm = 0; lm < 3; lm++)
for (int size = 1; size < min(width, height); size += 50)
{
pixelTypes[0] = pt1;
pixelTypes[1] = pt2;
levelMode = lm;
tileSize = size;
testWriteRead (tempDir);
}
ThreadPool::globalThreadPool().setNumThreads(numThreads);
cout << "ok\n" << endl;
}
catch (const std::exception &e)
{
cerr << "ERROR -- caught exception: " << e.what() << endl;
assert (false);
}
}