OSCAR-code/sleepyhead/SleepLib/loader_plugins/prs1_loader.cpp
2014-05-02 14:34:34 +10:00

1915 lines
62 KiB
C++

/* -*- Mode: C++; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
* vim: set ts=8 sts=4 et sw=4 tw=99:
*
* SleepLib PRS1 Loader Implementation
*
* Copyright (c) 2011-2014 Mark Watkins <jedimark@users.sourceforge.net>
*
* This file is subject to the terms and conditions of the GNU General Public
* License. See the file COPYING in the main directory of the Linux
* distribution for more details. */
#include <QApplication>
#include <QString>
#include <QDateTime>
#include <QDir>
#include <QFile>
#include <QMessageBox>
#include <QProgressBar>
#include <QDebug>
#include <cmath>
#include "SleepLib/schema.h"
#include "prs1_loader.h"
#include "SleepLib/session.h"
#include "SleepLib/calcs.h"
const int PRS1_MAGIC_NUMBER = 2;
//const int PRS1_SUMMARY_FILE=1;
//const int PRS1_EVENT_FILE=2;
//const int PRS1_WAVEFORM_FILE=5;
//********************************************************************************************
/// IMPORTANT!!!
//********************************************************************************************
// Please INCREMENT the prs1_data_version in prs1_loader.h when making changes to this loader
// that change loader behaviour or modify channels.
//********************************************************************************************
extern QProgressBar *qprogress;
QHash<int, QString> ModelMap;
#define PRS1_CRC_CHECK
#ifdef PRS1_CRC_CHECK
typedef quint16 crc_t;
static const crc_t crc_table[256] = {
0x0000, 0x1189, 0x2312, 0x329b, 0x4624, 0x57ad, 0x6536, 0x74bf,
0x8c48, 0x9dc1, 0xaf5a, 0xbed3, 0xca6c, 0xdbe5, 0xe97e, 0xf8f7,
0x1081, 0x0108, 0x3393, 0x221a, 0x56a5, 0x472c, 0x75b7, 0x643e,
0x9cc9, 0x8d40, 0xbfdb, 0xae52, 0xdaed, 0xcb64, 0xf9ff, 0xe876,
0x2102, 0x308b, 0x0210, 0x1399, 0x6726, 0x76af, 0x4434, 0x55bd,
0xad4a, 0xbcc3, 0x8e58, 0x9fd1, 0xeb6e, 0xfae7, 0xc87c, 0xd9f5,
0x3183, 0x200a, 0x1291, 0x0318, 0x77a7, 0x662e, 0x54b5, 0x453c,
0xbdcb, 0xac42, 0x9ed9, 0x8f50, 0xfbef, 0xea66, 0xd8fd, 0xc974,
0x4204, 0x538d, 0x6116, 0x709f, 0x0420, 0x15a9, 0x2732, 0x36bb,
0xce4c, 0xdfc5, 0xed5e, 0xfcd7, 0x8868, 0x99e1, 0xab7a, 0xbaf3,
0x5285, 0x430c, 0x7197, 0x601e, 0x14a1, 0x0528, 0x37b3, 0x263a,
0xdecd, 0xcf44, 0xfddf, 0xec56, 0x98e9, 0x8960, 0xbbfb, 0xaa72,
0x6306, 0x728f, 0x4014, 0x519d, 0x2522, 0x34ab, 0x0630, 0x17b9,
0xef4e, 0xfec7, 0xcc5c, 0xddd5, 0xa96a, 0xb8e3, 0x8a78, 0x9bf1,
0x7387, 0x620e, 0x5095, 0x411c, 0x35a3, 0x242a, 0x16b1, 0x0738,
0xffcf, 0xee46, 0xdcdd, 0xcd54, 0xb9eb, 0xa862, 0x9af9, 0x8b70,
0x8408, 0x9581, 0xa71a, 0xb693, 0xc22c, 0xd3a5, 0xe13e, 0xf0b7,
0x0840, 0x19c9, 0x2b52, 0x3adb, 0x4e64, 0x5fed, 0x6d76, 0x7cff,
0x9489, 0x8500, 0xb79b, 0xa612, 0xd2ad, 0xc324, 0xf1bf, 0xe036,
0x18c1, 0x0948, 0x3bd3, 0x2a5a, 0x5ee5, 0x4f6c, 0x7df7, 0x6c7e,
0xa50a, 0xb483, 0x8618, 0x9791, 0xe32e, 0xf2a7, 0xc03c, 0xd1b5,
0x2942, 0x38cb, 0x0a50, 0x1bd9, 0x6f66, 0x7eef, 0x4c74, 0x5dfd,
0xb58b, 0xa402, 0x9699, 0x8710, 0xf3af, 0xe226, 0xd0bd, 0xc134,
0x39c3, 0x284a, 0x1ad1, 0x0b58, 0x7fe7, 0x6e6e, 0x5cf5, 0x4d7c,
0xc60c, 0xd785, 0xe51e, 0xf497, 0x8028, 0x91a1, 0xa33a, 0xb2b3,
0x4a44, 0x5bcd, 0x6956, 0x78df, 0x0c60, 0x1de9, 0x2f72, 0x3efb,
0xd68d, 0xc704, 0xf59f, 0xe416, 0x90a9, 0x8120, 0xb3bb, 0xa232,
0x5ac5, 0x4b4c, 0x79d7, 0x685e, 0x1ce1, 0x0d68, 0x3ff3, 0x2e7a,
0xe70e, 0xf687, 0xc41c, 0xd595, 0xa12a, 0xb0a3, 0x8238, 0x93b1,
0x6b46, 0x7acf, 0x4854, 0x59dd, 0x2d62, 0x3ceb, 0x0e70, 0x1ff9,
0xf78f, 0xe606, 0xd49d, 0xc514, 0xb1ab, 0xa022, 0x92b9, 0x8330,
0x7bc7, 0x6a4e, 0x58d5, 0x495c, 0x3de3, 0x2c6a, 0x1ef1, 0x0f78
};
crc_t CRC16(const unsigned char *data, size_t data_len)
{
crc_t crc = 0;
unsigned int tbl_idx;
while (data_len--) {
tbl_idx = (crc ^ *data) & 0xff;
crc = (crc_table[tbl_idx] ^ (crc >> 8)) & 0xffff;
data++;
}
return crc & 0xffff;
}
#endif
PRS1::PRS1(Profile *p, MachineID id): CPAP(p, id)
{
m_class = prs1_class_name;
}
PRS1::~PRS1()
{
}
/*! \struct WaveHeaderList
\brief Used in PRS1 Waveform Parsing */
struct WaveHeaderList {
quint16 interleave;
quint8 sample_format;
WaveHeaderList(quint16 i, quint8 f) { interleave = i; sample_format = f; }
};
PRS1Loader::PRS1Loader()
{
//genCRCTable();
m_buffer = nullptr;
}
PRS1Loader::~PRS1Loader()
{
}
Machine *PRS1Loader::CreateMachine(QString serial, Profile *profile)
{
if (!profile) {
return nullptr;
}
qDebug() << "Create Machine " << serial;
QList<Machine *> ml = profile->GetMachines(MT_CPAP);
bool found = false;
QList<Machine *>::iterator i;
Machine *m = nullptr;
for (i = ml.begin(); i != ml.end(); i++) {
if (((*i)->GetClass() == STR_MACH_PRS1) && ((*i)->properties[STR_PROP_Serial] == serial)) {
PRS1List[serial] = *i; //static_cast<CPAP *>(*i);
found = true;
m = *i;
break;
}
}
if (!found) {
m = new PRS1(profile, 0);
}
m->properties[STR_PROP_Brand] = "Philips Respironics";
m->properties[STR_PROP_Series] = "System One";
if (found) {
return m;
}
PRS1List[serial] = m;
profile->AddMachine(m);
m->properties[STR_PROP_Serial] = serial;
m->properties[STR_PROP_DataVersion] = QString::number(prs1_data_version);
QString path = "{" + STR_GEN_DataFolder + "}/" + m->GetClass() + "_" + serial + "/";
m->properties[STR_PROP_Path] = path;
m->properties[STR_PROP_BackupPath] = path + "Backup/";
return m;
}
bool isdigit(QChar c)
{
if ((c >= '0') && (c <= '9')) { return true; }
return false;
}
const QString PR_STR_PSeries = "P-Series";
// Tests path to see if it has (what looks like) a valid PRS1 folder structure
bool PRS1Loader::Detect(const QString & path)
{
QString newpath = path;
newpath.replace("\\", "/");
if (!newpath.endsWith("/" + PR_STR_PSeries)) {
newpath = path + "/" + PR_STR_PSeries;
}
QDir dir(newpath);
if ((!dir.exists() || !dir.isReadable())) {
return false;
}
qDebug() << "PRS1Loader::Detect path=" << newpath;
QFile lastfile(newpath+"/last.txt");
if (!lastfile.exists()) {
return false;
}
if (!lastfile.open(QIODevice::ReadOnly)) {
qDebug() << "PRS1Loader: last.txt exists but I couldn't open it!";
return false;
}
QString last = lastfile.readLine(64);
last = last.trimmed();
lastfile.close();
QFile f(newpath+"/"+last);
if (!f.exists()) {
qDebug() << "in PRS1Loader::Detect():" << last << "does not exist, despite last.txt saying it does";
return false;
}
// newpath is a valid path
return true;
}
int PRS1Loader::Open(QString &path, Profile *profile)
{
QString newpath;
path = path.replace("\\", "/");
if (path.endsWith("/" + PR_STR_PSeries)) {
newpath = path;
} else {
newpath = path + "/" + PR_STR_PSeries;
}
qDebug() << "PRS1Loader::Open path=" << newpath;
QDir dir(newpath);
if ((!dir.exists() || !dir.isReadable())) {
return 0;
}
dir.setFilter(QDir::NoDotAndDotDot | QDir::Dirs | QDir::Files | QDir::Hidden | QDir::NoSymLinks);
dir.setSorting(QDir::Name);
QFileInfoList flist = dir.entryInfoList();
QList<QString> SerialNumbers;
QList<QString>::iterator sn;
for (int i = 0; i < flist.size(); i++) {
QFileInfo fi = flist.at(i);
QString filename = fi.fileName();
if ((filename[0] == 'P') && (isdigit(filename[1])) && (isdigit(filename[2]))) {
SerialNumbers.push_back(filename);
} else if (filename.toLower() == "last.txt") { // last.txt points to the current serial number
QString file = fi.canonicalFilePath();
QFile f(file);
if (!fi.isReadable()) {
qDebug() << "PRS1Loader: last.txt exists but I couldn't read it!";
continue;
}
if (!f.open(QIODevice::ReadOnly)) {
qDebug() << "PRS1Loader: last.txt exists but I couldn't open it!";
continue;
}
last = f.readLine(64);
last = last.trimmed();
f.close();
}
}
if (SerialNumbers.empty()) { return 0; }
m_buffer = new unsigned char [max_load_buffer_size]; //allocate once and reuse.
Machine *m;
for (sn = SerialNumbers.begin(); sn != SerialNumbers.end(); sn++) {
QString s = *sn;
m = CreateMachine(s, profile);
try {
if (m) {
OpenMachine(m, newpath + "/" + (*sn), profile);
}
} catch (OneTypePerDay e) {
profile->DelMachine(m);
PRS1List.erase(PRS1List.find(s));
QMessageBox::warning(nullptr, QObject::tr("Import Error"),
QObject::tr("This Machine Record cannot be imported in this profile.\nThe Day records overlap with already existing content."),
QMessageBox::Ok);
delete m;
}
}
delete [] m_buffer;
return PRS1List.size();
}
bool PRS1Loader::ParseProperties(Machine *m, QString filename)
{
QFile f(filename);
if (!f.open(QIODevice::ReadOnly)) {
return false;
}
QString line;
QHash<QString, QString> prop;
QString s = f.readLine();
QChar sep = '=';
QString key, value;
while (!f.atEnd()) {
key = s.section(sep, 0, 0); //BeforeFirst(sep);
if (key == s) { continue; }
value = s.section(sep, 1).trimmed(); //AfterFirst(sep).Strip();
if (value == s) { continue; }
prop[key] = value;
s = f.readLine();
}
bool ok;
QString pt = prop["ProductType"];
int i = pt.toInt(&ok, 16);
if (ok) {
if (ModelMap.find(i) != ModelMap.end()) {
m->properties[STR_PROP_Model] = ModelMap[i];
}
}
if (prop["SerialNumber"] != m->properties[STR_PROP_Serial]) {
qDebug() << "Serial Number in PRS1 properties.txt doesn't match directory structure";
} else { prop.erase(prop.find("SerialNumber")); } // already got it stored.
for (QHash<QString, QString>::iterator i = prop.begin(); i != prop.end(); i++) {
m->properties[i.key()] = i.value();
}
f.close();
return true;
}
int PRS1Loader::OpenMachine(Machine *m, QString path, Profile *profile)
{
qDebug() << "Opening PRS1 " << path;
QDir dir(path);
if (!dir.exists() || (!dir.isReadable())) {
return 0;
}
dir.setFilter(QDir::NoDotAndDotDot | QDir::Dirs | QDir::Files | QDir::Hidden | QDir::NoSymLinks);
dir.setSorting(QDir::Name);
QFileInfoList flist = dir.entryInfoList();
QString filename;
if (qprogress) { qprogress->setValue(0); }
QStringList paths;
for (int i = 0; i < flist.size(); i++) {
QFileInfo fi = flist.at(i);
filename = fi.fileName();
if ((filename[0].toLower() == 'p') && (isdigit(filename[1]))) {
// p0, p1, p2.. etc.. folders contain the session data
paths.push_back(fi.canonicalFilePath());
} else if (filename.toLower() == "properties.txt") {
ParseProperties(m, fi.canonicalFilePath());
} else if (filename.toLower() == "e") {
// Error files..
// Reminder: I have been given some info about these. should check it over.
}
}
QString modelstr = m->properties["ModelNumber"];
if (modelstr.endsWith("P"))
modelstr.chop(1);
bool ok;
int model = modelstr.toInt(&ok);
if (ok) {
// Assumption is made here all PRS1 machines less than 450P are not data capable.. this could be wrong one day.
if ((model < 450)) {
QMessageBox::information(NULL,
QObject::tr("Non Data Capable Machine"),
QString(QObject::tr("Your Philips Respironics CPAP machine (Model %1) is unfortunately not a data capable model.")+"\n\n"+
QObject::tr("I'm sorry to report that SleepyHead can only track hours of use for this machine.")).
arg(m->properties["ModelNumber"]),QMessageBox::Ok);
}
if ((model % 100) >= 60) {
// 60 series machine warning??
}
} else {
// model number didn't parse.. Meh...
}
SessionID sid;
long ext;
QHash<SessionID, QStringList> sessfiles;
int size = paths.size();
int cnt = 0;
new_sessions.clear(); // this hash is used by OpenFile
// for each p0/p1/p2/etc... folder
for (auto p = paths.begin(); p != paths.end(); p++) {
dir.setPath(*p);
if (!dir.exists() || !dir.isReadable()) { continue; }
flist = dir.entryInfoList();
// Scan for individual session files
for (int i = 0; i < flist.size(); i++) {
QFileInfo fi = flist.at(i);
QString ext_s = fi.fileName().section(".", -1);
QString session_s = fi.fileName().section(".", 0, -2);
ext = ext_s.toLong(&ok);
if (!ok) { // not a numerical extension
continue;
}
sid = session_s.toLong(&ok);
if (!ok) { // not a numerical session ID
continue;
}
if (m->SessionExists(sid)) {
// Skip already imported session
continue;
}
if ((ext == 1) || (ext == 0)) {
// Open just the summary files first round and create a session record if succesful
OpenFile(m, fi.canonicalFilePath());
} else {
// and keep the rest of the names for next stage
sessfiles[sid].push_back(fi.canonicalFilePath());
}
}
}
cnt = 0;
size = new_sessions.size();
// Scan through new sessions and parse event and waveform data
// NOTE: this function could be multithreaded.
for (auto it = new_sessions.begin(); it != new_sessions.end(); ++it) {
sid = it.key();
if (sessfiles.contains(sid)) {
for (int j = 0; j < sessfiles[sid].size(); j++) {
QString name = sessfiles[sid][j];
if (name.endsWith(".002")) {
// Parse event data
OpenFile(m, name);
} else if (name.endsWith(".005")) {
// Parse Flow Rate Waveform (and mask pressure if available) data
OpenWaveforms(sid, name);
}
}
}
// sessions are fully loaded here..
// Update the progress bar.. this could be done better by an emit if MachineLoader was a QObject and an
// event loop was running.
if ((++cnt % 10) == 0) {
if (qprogress) { qprogress->setValue(0.0 + (float(cnt) / float(size) * 100.0)); }
QApplication::processEvents();
}
}
// strictly can do this in the above loop, but this is cautionary
cnt = 0;
// Scan through parsed sessions, do a little cleanup and add to machine object
for (auto it = new_sessions.begin(); it != new_sessions.end(); ++it) {
Session *sess = it.value();
if ((sess->length()) == 0) {
//const double ignore_thresh=300.0/3600.0;// Ignore useless sessions under 5 minute
//if (sess->hours()<=ignore_thresh) {
qDebug() << "Ignoring empty session" << sess->session();
SessionID id = sess->session();
delete sess;
new_sessions[id] = nullptr;
continue;
}
if (sess->count(CPAP_IPAP) > 0) {
//sess->summaryCPAP_Mode]!=MODE_ASV)
if (sess->settings[CPAP_Mode].toInt() != (int)MODE_ASV) {
sess->settings[CPAP_Mode] = MODE_BIPAP;
}
if (sess->settings[CPAP_PresReliefType].toInt() != PR_NONE) {
sess->settings[CPAP_PresReliefType] = PR_BIFLEX;
}
EventDataType min = sess->settings[CPAP_PressureMin].toDouble();
EventDataType max = sess->settings[CPAP_PressureMax].toDouble();
sess->settings[CPAP_EPAP] = min;
sess->settings[CPAP_IPAP] = max;
sess->settings[CPAP_PS] = max - min;
sess->settings.erase(sess->settings.find(CPAP_PressureMin));
sess->settings.erase(sess->settings.find(CPAP_PressureMax));
sess->m_valuesummary.erase(sess->m_valuesummary.find(CPAP_Pressure));
sess->m_wavg.erase(sess->m_wavg.find(CPAP_Pressure));
sess->m_min.erase(sess->m_min.find(CPAP_Pressure));
sess->m_max.erase(sess->m_max.find(CPAP_Pressure));
sess->m_gain.erase(sess->m_gain.find(CPAP_Pressure));
} else {
if (!sess->settings.contains(CPAP_Pressure) && !sess->settings.contains(CPAP_PressureMin)) {
sess->settings[CPAP_BrokenSummary] = true;
//sess->set_last(sess->first());
if (sess->Min(CPAP_Pressure) == sess->Max(CPAP_Pressure)) {
sess->settings[CPAP_Mode] = MODE_CPAP; // no ramp
} else {
sess->settings[CPAP_Mode] = MODE_UNKNOWN;
}
//sess->Set("FlexMode",PR_UNKNOWN);
}
}
if (sess->settings[CPAP_Mode].toInt() == (int)MODE_CPAP) {
//sess->settings[CPAP_PressureMax]=sess->settings[CPAP_PressureMin];
}
// set session saved flag so machine::Save() knows it needs saving
sess->SetChanged(true);
// Add session to machine record
m->AddSession(sess, profile);
// Update the progress bar
if ((++cnt % 10) == 0) {
//if (qprogress) qprogress->setValue(33.0+(float(cnt)/float(size)*33.0));
QApplication::processEvents();
}
}
m->properties[STR_PROP_DataVersion] = QString::number(prs1_data_version);
m->properties[STR_PROP_LastImported] = QDateTime::currentDateTime().toString(Qt::ISODate);
// Save any new sessions to disk in our format, updating summaries as it goes..
m->Save();
// Set progress bar to completed.
if (qprogress) { qprogress->setValue(100); }
// Return number of newly added sessions
return cnt;
}
//struct PRS1SummaryR5 {
// quint8 unknown1;
// quint8 unknown2;
// quint8 unknown3;
// quint8 pressure_min;
// quint8 pressure_max;
// quint8 unknown;
// quint32 flags;
//};// __attribute__((packed));
// Family 0 = xPAP
// Family 5 = ASV
bool PRS1Loader::ParseSummary(Machine *mach, qint32 sequence, quint32 timestamp,
unsigned char *data, quint16 size, int family, int familyVersion)
{
if (mach->SessionExists(sequence)) {
qDebug() << "sessionexists exit";
return false;
}
if (size < 44 - 16) {
qDebug() << "size exit";
return false;
}
Session *session = new Session(mach, sequence);
session->really_set_first(qint64(timestamp) * 1000L);
EventDataType max, min;
//////////////////////////////////////////////////////////////////////////////////////////
// ASV Codes (Family 5) Recheck 17/10/2013
// These are all confirmed off Encore reports
//cpapmax=EventDataType(data[0x02])/10.0; // Max Pressure in ASV machines
//minepap=EventDataType(data[0x03])/10.0; // Min EPAP
//maxepap=EventDataType(data[0x04])/10.0; // Max EPAP
//minps=EventDataType(data[0x05])/10.0 // Min Pressure Support
//maxps=EventDataType(data[0x06])/10.0 // Max Pressure Support
//duration=data[0x1B] | data[0x1C] << 8) // Session length in seconds
//epap90=EventDataType(data[0x21])/10.0; // EPAP 90%
//epapavg=EventDataType(data[0x22])/10.0; // EPAP Average
//ps90=EventDataType(data[0x23])/10.0; // Pressure Support 90%
//psavg=EventDataType(data[0x24])/10.0; // Pressure Support Average
//TODO: minpb=data[0x] | data[0x] << 8; // Minutes in PB
//TODO: minleak=data[0x] | data[0x] << 8; // Minutes in Large Leak
//TODO: oa_cnt=data[0x] | data[0x] << 8; // Obstructive events count
//ca_cnt=data[0x2d] | data[0x2e] << 8; // Clear Airway Events count
//h_cnt=data[0x2f] | data[0x30] << 8; // Hypopnea events count
//fl_cnt=data[0x33] | data[0x34] << 8; // Flow Limitation events count
//avg_leak=EventDataType(data[0x35]); // Average Leak
//avgptb=EventDataType(data[0x36]); // Average Patient Triggered Breaths %
//avgbreathrate=EventDataType(data[0x37]); // Average Breaths Per Minute
//avgminvent=EventDataType(data[0x38]); // Average Minute Ventilation
//avg_tidalvol=EventDataType(data[0x39])*10.0; // Average Tidal Volume
//////////////////////////////////////////////////////////////////////////////////////////
min = float(data[0x03]) / 10.0; // Min EPAP
max = float(data[0x04]) / 10.0; // Max EPAP
int offset = 0;
if (family == 5) { //data[0x05]!=0) { // This is a time value for ASV stuff
offset = 4; // non zero adds 4 extra fields..
} else if (family == 0 && familyVersion >= 4) {
offset = 2;
}
// Minutes. Convert to seconds/hours here?
session->settings[CPAP_RampTime] = (int)data[offset + 0x06];
session->settings[CPAP_RampPressure] = (EventDataType)data[offset + 0x07] / 10.0;
if (max > 0) { // Ignoring bipap until we see some more data during import
session->settings[CPAP_Mode] = (family == 5) ? (int)MODE_ASV : (int)MODE_APAP;
session->settings[CPAP_PressureMin] = (EventDataType)min;
session->settings[CPAP_PressureMax] = (EventDataType)max;
} else {
session->settings[CPAP_Mode] = (int)MODE_CPAP;
session->settings[CPAP_Pressure] = (EventDataType)min;
}
// This is incorrect..
if (data[offset + 0x08] & 0x80) { // Flex Setting
if (data[offset + 0x08] & 0x08) {
if (max > 0) {
if (family == 5) {
session->settings[CPAP_PresReliefType] = (int)PR_BIFLEX;
} else {
session->settings[CPAP_PresReliefType] = (int)PR_AFLEX;
}
} else { session->settings[CPAP_PresReliefType] = (int)PR_CFLEXPLUS; }
} else { session->settings[CPAP_PresReliefType] = (int)PR_CFLEX; }
} else { session->settings[CPAP_PresReliefType] = (int)PR_NONE; }
session->settings[CPAP_PresReliefMode] = (int)PM_FullTime; // only has one mode
session->settings[CPAP_PresReliefSet] = (int)(data[offset + 0x08] & 7);
session->settings[PRS1_SysLock] = (data[offset + 0x0a] & 0x80) == 0x80;
session->settings[PRS1_HoseDiam] = ((data[offset + 0x0a] & 0x08) ? "15mm" : "22mm");
session->settings[PRS1_AutoOff] = (data[offset + 0x0c] & 0x10) == 0x10;
session->settings[PRS1_MaskAlert] = (data[offset + 0x0c] & 0x08) == 0x08;
session->settings[PRS1_ShowAHI] = (data[offset + 0x0c] & 0x04) == 0x04;
if (family == 0 && familyVersion >= 4) {
if ((data[offset + 0x0a] & 0x04) == 0x04) { // heated tubing off
session->settings[CPAP_HumidSetting] = (int)data[offset + 0x09] & 0x0f;
} else {
session->settings[CPAP_HumidSetting] = (int)(data[offset + 0x09] & 0x30) >> 4;
}
session->settings[PRS1_SysOneResistSet] = (int)(data[offset + 0x0b] & 0x38) >> 3;
/* These should be added to channels, if they are correct(?) */
/* for now, leave commented out */
/*
session->settings[PRS1_HeatedTubing]=(data[offset+0x0a]&0x04)!=0x04;
session->settings[PRS1_HeatedTubingConnected]=(data[offset+0x0b]&0x01)==0x01;
session->settings[PRS1_HeatedTubingTemp]=(int)(data[offset+0x09]&0x80)>>5
+ (data[offset+0x0a]&0x03);
*/
} else {
session->settings[CPAP_HumidSetting] = (int)data[offset + 0x09] & 0x0f;
session->settings[PRS1_HumidStatus] = (data[offset + 0x09] & 0x80) == 0x80;
session->settings[PRS1_SysOneResistStat] = (data[offset + 0x0a] & 0x40) == 0x40;
session->settings[PRS1_SysOneResistSet] = (int)data[offset + 0x0a] & 7;
}
unsigned duration;
// up to this point appears to be correct for 0x01 & 0x00
if (size < 59) {
duration = data[offset + 0x12] | (data[offset + 0x13] << 8);
duration *= 2;
session->really_set_last(qint64(timestamp + duration) * 1000L);
if (max > 0) {
session->setMin(CPAP_Pressure, min);
session->setMax(CPAP_Pressure, max);
//session->setWavg(CPAP_Pressure,min);
}
} else {
// 0X28 & 0X29 is length on r5
if (family == 0 && familyVersion >= 4) {
offset += 12;
}
// on some 60 series it's one off. or was the original 60 series patch wrong?
// I verified this comment below against several data samples compared with encore reports.
//duration=data[0x1B] | data[0x1C] << 8) // Session length in seconds
duration = data[offset + 0x14] | (data[offset + 0x15] << 8);
if (!duration) {
qDebug() << "!duration exit";
delete session;
return false;
}
session->really_set_last(qint64(timestamp + duration) * 1000L);
float hours = float(duration) / 3600.0;
// Not using these because sometimes this summary is broken.
//EventDataType minp,maxp,avgp,p90p;
//minp=float(data[offset+0x16])/10.0;
//maxp=float(data[offset+0x17])/10.0;
//p90p=float(data[offset+0x18])/10.0;
//avgp=float(data[offset+0x19])/10.0;
short minp = data[offset + 0x16];
short maxp = data[offset + 0x17];
short medp = data[offset + 0x19];
short p90p = data[offset + 0x18];
if (family < 5) {
if (minp > 0) { session->setMin(CPAP_Pressure, EventDataType(minp) * 0.10); }
if (maxp > 0) { session->setMax(CPAP_Pressure, EventDataType(maxp) * 0.10); }
if (medp > 0) { session->setWavg(CPAP_Pressure, EventDataType(medp) * 0.10); } // ??
session->m_gain[CPAP_Pressure] = 0.1;
session->m_valuesummary[CPAP_Pressure][minp] = 5;
session->m_valuesummary[CPAP_Pressure][medp] = 46;
session->m_valuesummary[CPAP_Pressure][p90p] = 44;
session->m_valuesummary[CPAP_Pressure][maxp] = 5;
}
// if (p90p>0) {
// session->set90p(CPAP_Pressure,p90p);
// }
int oc, cc, hc, rc, fc;
session->setCount(CPAP_Obstructive, oc = (int)data[offset + 0x1C] | (data[offset + 0x1D] << 8));
session->setCount(CPAP_ClearAirway, cc = (int)data[offset + 0x20] | (data[offset + 0x21] << 8));
session->setCount(CPAP_Hypopnea, hc = (int)data[offset + 0x2A] | (data[offset + 0x2B] << 8));
session->setCount(CPAP_RERA, rc = (int)data[offset + 0x2E] | (data[offset + 0x2F] << 8));
session->setCount(CPAP_FlowLimit, fc = (int)data[offset + 0x30] | (data[offset + 0x31] << 8));
session->setCph(CPAP_Obstructive, float(oc / hours));
session->setCph(CPAP_ClearAirway, float(cc / hours));
session->setCph(CPAP_Hypopnea, float(hc / hours));
session->setCph(CPAP_RERA, float(rc / hours));
session->setCph(CPAP_FlowLimit, float(fc / hours));
}
// Set recommended Graph values..
session->setPhysMax(CPAP_LeakTotal, 120);
session->setPhysMin(CPAP_LeakTotal, 0);
session->setPhysMax(CPAP_Pressure, 25);
session->setPhysMin(CPAP_Pressure, 4);
session->setPhysMax(CPAP_IPAP, 25);
session->setPhysMin(CPAP_IPAP, 4);
session->setPhysMax(CPAP_EPAP, 25);
session->setPhysMin(CPAP_EPAP, 4);
session->setPhysMax(CPAP_PS, 25);
session->setPhysMin(CPAP_PS, 0);
new_sessions[sequence] = session;
return true;
}
bool PRS1Loader::Parse002v5(qint32 sequence, quint32 timestamp, unsigned char *buffer,
quint16 size)
{
if (!new_sessions.contains(sequence)) {
qDebug() << "contains squence exit";
return false;
}
Session *session = new_sessions[sequence];
ChannelID Codes[] = {
PRS1_00, PRS1_01, CPAP_Pressure, CPAP_EPAP, CPAP_PressurePulse, CPAP_Obstructive,
CPAP_ClearAirway, CPAP_Hypopnea, PRS1_08, CPAP_FlowLimit, PRS1_0A, CPAP_CSR,
PRS1_0C, CPAP_VSnore, PRS1_0E, PRS1_0F,
PRS1_10, // Large leak apparently
CPAP_LeakTotal, PRS1_12
};
int ncodes = sizeof(Codes) / sizeof(ChannelID);
EventList *Code[0x20] = {nullptr};
EventList *OA = session->AddEventList(CPAP_Obstructive, EVL_Event);
EventList *HY = session->AddEventList(CPAP_Hypopnea, EVL_Event);
EventList *CSR = session->AddEventList(CPAP_CSR, EVL_Event);
EventList *LEAK = session->AddEventList(CPAP_LeakTotal, EVL_Event);
EventList *SNORE = session->AddEventList(CPAP_Snore, EVL_Event);
EventList *IPAP = session->AddEventList(CPAP_IPAP, EVL_Event, 0.1);
EventList *EPAP = session->AddEventList(CPAP_EPAP, EVL_Event, 0.1);
EventList *PS = session->AddEventList(CPAP_PS, EVL_Event, 0.1);
EventList *IPAPLo = session->AddEventList(CPAP_IPAPLo, EVL_Event, 0.1);
EventList *IPAPHi = session->AddEventList(CPAP_IPAPHi, EVL_Event, 0.1);
EventList *RR = session->AddEventList(CPAP_RespRate, EVL_Event);
EventList *PTB = session->AddEventList(CPAP_PTB, EVL_Event);
EventList *MV = session->AddEventList(CPAP_MinuteVent, EVL_Event);
EventList *TV = session->AddEventList(CPAP_TidalVolume, EVL_Event, 10);
EventList *CA = nullptr; //session->AddEventList(CPAP_ClearAirway, EVL_Event);
EventList *VS = nullptr, * FL = nullptr; //,* RE=nullptr,* VS2=nullptr;
//EventList * PRESSURE=nullptr;
//EventList * PP=nullptr;
EventDataType data[10];//,tmp;
//qint64 start=timestamp;
qint64 t = qint64(timestamp) * 1000L;
session->updateFirst(t);
qint64 tt;
int pos = 0;
int cnt = 0;
short delta;//,duration;
QDateTime d;
bool badcode = false;
unsigned char lastcode3 = 0, lastcode2 = 0, lastcode = 0, code = 0;
int lastpos = 0, startpos = 0, lastpos2 = 0, lastpos3 = 0;
while (pos < size) {
lastcode3 = lastcode2;
lastcode2 = lastcode;
lastcode = code;
lastpos3 = lastpos2;
lastpos2 = lastpos;
lastpos = startpos;
startpos = pos;
code = buffer[pos++];
if (code >= ncodes) {
qDebug() << "Illegal PRS1 code " << hex << int(code) << " appeared at " << hex << startpos;
qDebug() << "1: (" << int(lastcode) << hex << lastpos << ")";
qDebug() << "2: (" << int(lastcode2) << hex << lastpos2 << ")";
qDebug() << "3: (" << int(lastcode3) << hex << lastpos3 << ")";
return false;
}
if (code == 0) {
} else if (code != 0x12) {
delta = buffer[pos];
//duration=buffer[pos+1];
//delta=buffer[pos+1] << 8 | buffer[pos];
pos += 2;
t += qint64(delta) * 1000L;
}
ChannelID cpapcode = Codes[(int)code];
//EventDataType PS;
tt = t;
cnt++;
int fc = 0;
switch (code) {
case 0x00: // Unknown (ASV Pressure value)
// offset?
data[0] = buffer[pos++];
fc++;
if (!buffer[pos - 1]) { // WTH???
data[1] = buffer[pos++];
fc++;
}
if (!buffer[pos - 1]) {
data[2] = buffer[pos++];
fc++;
}
break;
case 0x01: // Unknown
if (!Code[1]) {
if (!(Code[1] = session->AddEventList(cpapcode, EVL_Event, 0.1))) { return false; }
}
Code[1]->AddEvent(t, 0);
break;
case 0x02: // Pressure ???
data[0] = buffer[pos++];
// if (!Code[2]) {
// if (!(Code[2]=session->AddEventList(cpapcode,EVL_Event,0.1))) return false;
// }
// Code[2]->AddEvent(t,data[0]);
break;
case 0x04: // Pressure Pulse??
data[0] = buffer[pos++];
if (!Code[3]) {
if (!(Code[3] = session->AddEventList(cpapcode, EVL_Event))) { return false; }
}
Code[3]->AddEvent(t, data[0]);
break;
case 0x05:
//code=CPAP_Obstructive;
data[0] = buffer[pos++];
tt -= qint64(data[0]) * 1000L; // Subtract Time Offset
OA->AddEvent(tt, data[0]);
break;
case 0x06:
//code=CPAP_ClearAirway;
data[0] = buffer[pos++];
tt -= qint64(data[0]) * 1000L; // Subtract Time Offset
if (!CA) {
if (!(CA = session->AddEventList(cpapcode, EVL_Event))) { return false; }
}
CA->AddEvent(tt, data[0]);
break;
case 0x07:
//code=CPAP_Hypopnea;
data[0] = buffer[pos++];
tt -= qint64(data[0]) * 1000L; // Subtract Time Offset
HY->AddEvent(tt, data[0]);
break;
case 0x08: // ???
data[0] = buffer[pos++];
tt -= qint64(data[0]) * 1000L; // Subtract Time Offset
qDebug() << "Code 8 found at " << hex << pos - 1 << " " << tt;
if (!Code[10]) {
if (!(Code[10] = session->AddEventList(cpapcode, EVL_Event))) { return false; }
}
//????
//data[1]=buffer[pos++]; // ???
Code[10]->AddEvent(tt, data[0]);
pos++;
break;
case 0x09: // ASV Codes
//code=CPAP_FlowLimit;
data[0] = buffer[pos++];
tt -= qint64(data[0]) * 1000L; // Subtract Time Offset
if (!FL) {
if (!(FL = session->AddEventList(cpapcode, EVL_Event))) { return false; }
}
FL->AddEvent(tt, data[0]);
break;
case 0x0a:
data[0] = buffer[pos++];
tt -= qint64(data[0]) * 1000L; // Subtract Time Offset
if (!Code[7]) {
if (!(Code[7] = session->AddEventList(cpapcode, EVL_Event))) { return false; }
}
Code[7]->AddEvent(tt, data[0]);
break;
case 0x0b: // Cheyne Stokes
data[0] = ((unsigned char *)buffer)[pos + 1] << 8 | ((unsigned char *)buffer)[pos];
//data[0]*=2;
pos += 2;
data[1] = ((unsigned char *)buffer)[pos]; //|buffer[pos+1] << 8
pos += 1;
//tt-=delta;
tt -= qint64(data[1]) * 1000L;
if (!CSR) {
if (!(CSR = session->AddEventList(cpapcode, EVL_Event))) {
qDebug() << "!CSR addeventlist exit";
return false;
}
}
CSR->AddEvent(tt, data[0]);
break;
case 0x0c:
data[0] = buffer[pos++];
tt -= qint64(data[0]) * 1000L; // Subtract Time Offset
qDebug() << "Code 12 found at " << hex << pos - 1 << " " << tt;
if (!Code[8]) {
if (!(Code[8] = session->AddEventList(cpapcode, EVL_Event))) { return false; }
}
Code[8]->AddEvent(tt, data[0]);
pos += 2;
break;
case 0x0d: // All the other ASV graph stuff.
IPAP->AddEvent(t, data[0] = buffer[pos++]); // 00=IAP
data[4] = buffer[pos++];
IPAPLo->AddEvent(t, data[4]); // 01=IAP Low
data[5] = buffer[pos++];
IPAPHi->AddEvent(t, data[5]); // 02=IAP High
LEAK->AddEvent(t, buffer[pos++]); // 03=LEAK
RR->AddEvent(t, buffer[pos++]); // 04=Breaths Per Minute
PTB->AddEvent(t, buffer[pos++]); // 05=Patient Triggered Breaths
MV->AddEvent(t, buffer[pos++]); // 06=Minute Ventilation
//tmp=buffer[pos++] * 10.0;
TV->AddEvent(t, buffer[pos++]); // 07=Tidal Volume
SNORE->AddEvent(t, data[2] = buffer[pos++]); // 08=Snore
if (data[2] > 0) {
if (!VS) {
if (!(VS = session->AddEventList(CPAP_VSnore, EVL_Event))) {
qDebug() << "!VS eventlist exit";
return false;
}
}
VS->AddEvent(t, 0); //data[2]); // VSnore
}
EPAP->AddEvent(t, data[1] = buffer[pos++]); // 09=EPAP
data[2] = data[0] - data[1];
PS->AddEvent(t, data[2]); // Pressure Support
break;
case 0x03: // BIPAP Pressure
qDebug() << "0x03 Observed in ASV data!!????";
data[0] = buffer[pos++];
data[1] = buffer[pos++];
// data[0]/=10.0;
// data[1]/=10.0;
// session->AddEvent(new Event(t,CPAP_EAP, 0, data, 1));
// session->AddEvent(new Event(t,CPAP_IAP, 0, &data[1], 1));
break;
case 0x11: // Not Leak Rate
qDebug() << "0x11 Observed in ASV data!!????";
//if (!Code[24]) {
// Code[24]=new EventList(cpapcode,EVL_Event);
//}
//Code[24]->AddEvent(t,buffer[pos++]);
break;
case 0x0e: // Unknown
qDebug() << "0x0E Observed in ASV data!!????";
data[0] = buffer[pos++]; // << 8) | buffer[pos];
//session->AddEvent(new Event(t,cpapcode, 0, data, 1));
break;
case 0x10: // Unknown
qDebug() << "0x10 Observed in ASV data!!????";
data[0] = buffer[pos++]; // << 8) | buffer[pos];
data[1] = buffer[pos++];
data[2] = buffer[pos++];
//session->AddEvent(new Event(t,cpapcode, 0, data, 3));
break;
case 0x0f:
qDebug() << "0x0f Observed in ASV data!!????";
data[0] = buffer[pos + 1] << 8 | buffer[pos];
pos += 2;
data[1] = buffer[pos]; //|buffer[pos+1] << 8
pos += 1;
tt -= qint64(data[1]) * 1000L;
//session->AddEvent(new Event(tt,cpapcode, 0, data, 2));
break;
case 0x12: // Summary
qDebug() << "0x12 Observed in ASV data!!????";
data[0] = buffer[pos++];
data[1] = buffer[pos++];
data[2] = buffer[pos + 1] << 8 | buffer[pos];
pos += 2;
//session->AddEvent(new Event(t,cpapcode, 0, data,3));
break;
default: // ERROR!!!
qWarning() << "Some new fandangled PRS1 code detected " << hex << int(code) << " at " << pos - 1;
badcode = true;
break;
}
if (badcode) {
break;
}
}
session->updateLast(t);
session->m_cnt.clear();
session->m_cph.clear();
session->settings[CPAP_IPAPLo] = session->Min(CPAP_IPAPLo);
session->settings[CPAP_IPAPHi] = session->Max(CPAP_IPAPHi);
session->settings[CPAP_PSMax] = session->Max(CPAP_IPAPHi) - session->Min(CPAP_EPAP);
session->settings[CPAP_PSMin] = session->Min(CPAP_IPAPLo) - session->Min(CPAP_EPAP);
session->m_valuesummary[CPAP_Pressure].clear();
session->m_valuesummary.erase(session->m_valuesummary.find(CPAP_Pressure));
return true;
}
bool PRS1Loader::Parse002(qint32 sequence, quint32 timestamp, unsigned char *buffer, quint16 size,
int family, int familyVersion)
{
if (!new_sessions.contains(sequence)) {
return false;
}
unsigned char code;
EventList *Code[0x20] = {0};
EventDataType data[10];
int cnt = 0;
short delta;
int tdata;
quint64 pos;
qint64 t = qint64(timestamp) * 1000L, tt;
Session *session = new_sessions[sequence];
session->updateFirst(t);
EventList *OA = session->AddEventList(CPAP_Obstructive, EVL_Event);
EventList *HY = session->AddEventList(CPAP_Hypopnea, EVL_Event);
EventList *CSR = session->AddEventList(CPAP_CSR, EVL_Event);
EventList *LEAK = session->AddEventList(CPAP_LeakTotal, EVL_Event);
EventList *SNORE = session->AddEventList(CPAP_Snore, EVL_Event);
EventList *CA = nullptr; //session->AddEventList(CPAP_ClearAirway, EVL_Event);
EventList *VS = nullptr;
EventList *VS2 = nullptr;
EventList *FL = nullptr;
EventList *RE = nullptr;
EventList *PRESSURE = nullptr;
EventList *EPAP = nullptr;
EventList *IPAP = nullptr;
EventList *PS = nullptr;
EventList *PP = nullptr;
//session->AddEventList(CPAP_VSnore, EVL_Event);
//EventList * VS=session->AddEventList(CPAP_Obstructive, EVL_Event);
unsigned char lastcode3 = 0, lastcode2 = 0, lastcode = 0;
int lastpos = 0, startpos = 0, lastpos2 = 0, lastpos3 = 0;
for (pos = 0; pos < size;) {
lastcode3 = lastcode2;
lastcode2 = lastcode;
lastcode = code;
lastpos3 = lastpos2;
lastpos2 = lastpos;
lastpos = startpos;
startpos = pos;
code = buffer[pos++];
if (code > 0x12) {
qDebug() << "Illegal PRS1 code " << hex << int(code) << " appeared at " << hex << startpos;
qDebug() << "1: (" << hex << int(lastcode) << hex << lastpos << ")";
qDebug() << "2: (" << hex << int(lastcode2) << hex << lastpos2 << ")";
qDebug() << "3: (" << hex << int(lastcode3) << hex << lastpos3 << ")";
return false;
}
if (code != 0x12) {
delta = buffer[pos + 1] << 8 | buffer[pos];
pos += 2;
t += qint64(delta) * 1000L;
tt = t;
}
cnt++;
switch (code) {
case 0x00: // Unknown 00
if (!Code[0]) {
if (!(Code[0] = session->AddEventList(PRS1_00, EVL_Event))) { return false; }
}
Code[0]->AddEvent(t, buffer[pos++]);
if (family == 0 && familyVersion >= 4) {
pos++;
}
break;
case 0x01: // Unknown
if (!Code[1]) {
if (!(Code[1] = session->AddEventList(PRS1_01, EVL_Event))) { return false; }
}
Code[1]->AddEvent(t, 0);
if (family == 0 && familyVersion >= 4) {
if (!PRESSURE) {
PRESSURE = session->AddEventList(CPAP_Pressure, EVL_Event, 0.1);
if (!PRESSURE) { return false; }
}
PRESSURE->AddEvent(t, buffer[pos++]);
}
break;
case 0x02: // Pressure
if (family == 0 && familyVersion >= 4) { // BiPAP Pressure
if (!EPAP) {
if (!(EPAP = session->AddEventList(CPAP_EPAP, EVL_Event, 0.1))) { return false; }
if (!(IPAP = session->AddEventList(CPAP_IPAP, EVL_Event, 0.1))) { return false; }
if (!(PS = session->AddEventList(CPAP_PS, EVL_Event, 0.1))) { return false; }
}
EPAP->AddEvent(t, data[0] = buffer[pos++]);
IPAP->AddEvent(t, data[1] = buffer[pos++]);
PS->AddEvent(t, data[1] - data[0]);
} else {
if (!PRESSURE) {
PRESSURE = session->AddEventList(CPAP_Pressure, EVL_Event, 0.1);
if (!PRESSURE) { return false; }
}
PRESSURE->AddEvent(t, buffer[pos++]);
}
break;
case 0x03: // BIPAP Pressure
if (!EPAP) {
if (!(EPAP = session->AddEventList(CPAP_EPAP, EVL_Event, 0.1))) { return false; }
if (!(IPAP = session->AddEventList(CPAP_IPAP, EVL_Event, 0.1))) { return false; }
if (!(PS = session->AddEventList(CPAP_PS, EVL_Event, 0.1))) { return false; }
}
EPAP->AddEvent(t, data[0] = buffer[pos++]);
IPAP->AddEvent(t, data[1] = buffer[pos++]);
PS->AddEvent(t, data[1] - data[0]);
break;
case 0x04: // Pressure Pulse
if (!PP) {
if (!(PP = session->AddEventList(CPAP_PressurePulse, EVL_Event))) { return false; }
}
PP->AddEvent(t, buffer[pos++]);
break;
case 0x05: // RERA
data[0] = buffer[pos++];
tt = t - (qint64(data[0]) * 1000L);
if (!RE) {
if (!(RE = session->AddEventList(CPAP_RERA, EVL_Event))) { return false; }
}
RE->AddEvent(tt, data[0]);
break;
case 0x06: // Obstructive Apoanea
data[0] = buffer[pos++];
tt = t - (qint64(data[0]) * 1000L);
OA->AddEvent(tt, data[0]);
break;
case 0x07: // Clear Airway
data[0] = buffer[pos++];
tt = t - (qint64(data[0]) * 1000L);
if (!CA) {
if (!(CA = session->AddEventList(CPAP_ClearAirway, EVL_Event))) { return false; }
}
CA->AddEvent(tt, data[0]);
break;
case 0x0a: // Hypopnea
data[0] = buffer[pos++];
tt = t - (qint64(data[0]) * 1000L);
HY->AddEvent(tt, data[0]);
break;
case 0x0c: // Flow Limitation
data[0] = buffer[pos++];
tt = t - (qint64(data[0]) * 1000L);
if (!FL) {
if (!(FL = session->AddEventList(CPAP_FlowLimit, EVL_Event))) { return false; }
}
FL->AddEvent(tt, data[0]);
break;
case 0x0b: // Hypopnea related code
data[0] = buffer[pos++];
data[1] = buffer[pos++];
if (!Code[12]) {
if (!(Code[12] = session->AddEventList(PRS1_0B, EVL_Event))) { return false; }
}
// FIXME
Code[12]->AddEvent(t, data[0]);
break;
case 0x0d: // Vibratory Snore
if (!VS) {
if (!(VS = session->AddEventList(CPAP_VSnore, EVL_Event))) { return false; }
}
VS->AddEvent(t, 0);
break;
case 0x11: // Leak Rate & Snore Graphs
data[0] = buffer[pos++];
data[1] = buffer[pos++];
LEAK->AddEvent(t, data[0]);
SNORE->AddEvent(t, data[1]);
if (data[1] > 0) {
if (!VS2) {
if (!(VS2 = session->AddEventList(CPAP_VSnore2, EVL_Event))) { return false; }
}
VS2->AddEvent(t, data[1]);
}
if (family == 0 && familyVersion >= 4) {
pos++;
}
break;
case 0x0e: // Unknown
data[0] = ((char *)buffer)[pos++];
data[1] = buffer[pos++]; //(buffer[pos+1] << 8) | buffer[pos];
//data[0]/=10.0;
//pos+=2;
data[2] = buffer[pos++];
if (!Code[17]) {
if (!(Code[17] = session->AddEventList(PRS1_0E, EVL_Event))) { return false; }
}
tdata = unsigned(data[1]) << 8 | unsigned(data[0]);
Code[17]->AddEvent(t, tdata);
//qDebug() << hex << data[0] << data[1] << data[2];
//session->AddEvent(new Event(t,cpapcode, 0, data, 3));
//tt-=data[1]*1000;
//session->AddEvent(new Event(t,CPAP_CSR, data, 2));
break;
case 0x10: // Unknown
data[0] = buffer[pos++]; // << 8) | buffer[pos];
data[1] = buffer[pos++];
data[2] = buffer[pos++];
if (!Code[20]) {
if (!(Code[20] = session->AddEventList(PRS1_10, EVL_Event))) { return false; }
}
Code[20]->AddEvent(t, data[0]);
break;
case 0x0f: // Cheyne Stokes Respiration
data[0] = buffer[pos + 1] << 8 | buffer[pos];
pos += 2;
data[1] = buffer[pos++];
tt = t - qint64(data[1]) * 1000L;
CSR->AddEvent(tt, data[0]);
break;
case 0x12: // Summary
data[0] = buffer[pos++];
data[1] = buffer[pos++];
data[2] = buffer[pos + 1] << 8 | buffer[pos];
pos += 2;
if (!Code[24]) {
if (!(Code[24] = session->AddEventList(PRS1_12, EVL_Event))) { return false; }
}
Code[24]->AddEvent(t, data[0]);
break;
default:
// ERROR!!!
qWarning() << "Some new fandangled PRS1 code detected in" << sequence << hex << int(
code) << " at " << pos - 1;
return false;
}
}
session->updateLast(t);
session->m_cnt.clear();
session->m_cph.clear();
session->m_lastchan.clear();
session->m_firstchan.clear();
session->m_valuesummary[CPAP_Pressure].clear();
session->m_valuesummary.erase(session->m_valuesummary.find(CPAP_Pressure));
return true;
}
//bool PRS1Loader::ParseWaveform(qint32 sequence, quint32 timestamp, unsigned char *data, quint16 size, quint16 duration, quint16 num_signals, quint16 interleave, quint8 sample_format)
//{
// Q_UNUSED(interleave)
// Q_UNUSED(sample_format)
// // this whole function is currently unused..
// if (!new_sessions.contains(sequence))
// return false;
// qint64 t=qint64(timestamp)*1000L;
// Session *session=new_sessions[sequence];
// if (num_signals==1) {
// session->updateFirst(t);
// double d=duration*1000;
// EventDataType rate=d / EventDataType(size);
// EventList *ev=session->AddEventList(CPAP_FlowRate,EVL_Waveform,1.0,0.00,0,0,rate);
// ev->AddWaveform(t,(char *)data,size,qint64(duration)*1000L);
// session->updateLast(t+qint64(duration)*1000L);
// }
// return true;
//}
bool PRS1Loader::OpenFile(Machine *mach, QString filename)
{
int sequence, family, familyVersion;
quint32 timestamp;
qint64 pos;
unsigned char ext, sum, htype;
unsigned char *header, *data;
int chunk, hl;
quint16 size, datasize, c16, crc;
// waveform stuff
vector<WaveHeaderList> whl;
quint16 interleave, duration, num_signals;
quint8 sample_format;
QFile f(filename);
if (!f.exists()) {
return false;
}
if (!f.open(QIODevice::ReadOnly)) {
return false;
}
qint64 filesize = f.size();
if (filesize > max_load_buffer_size) {
qWarning() << "Waveform too big, increase max_load_buffer_size in PRS1Loader sourcecode" <<
filename;
return false;
}
if (f.read((char *)m_buffer, filesize) < filesize) {
qDebug() << "Couldn't read full file" << filename;
return false;
}
pos = 0;
bool wasfaulty = false, faulty = false;
for (chunk = 0; pos < filesize; ++chunk, pos += size) {
header = &m_buffer[pos];
if (header[0] != PRS1_MAGIC_NUMBER) {
if (chunk == 0) {
qDebug() << "Invalid magic number" << filename;
}
return false;
break;
}
size = (header[2] << 8) | header[1];
htype = header[3]; // 00 = normal // 01=waveform // could be a bool?
Q_UNUSED(htype);
family = header[4]; // == 5
familyVersion = header[5];
ext = header[6];
sequence = (header[10] << 24) | (header[9] << 16) | (header[8] << 8) | header[7];
timestamp = (header[14] << 24) | (header[13] << 16) | (header[12] << 8) | header[11];
qDebug() << "family: " << family << " familyversion: " << familyVersion;
if (ext == 5) {
duration = header[0xf] | header[0x10] << 8; // block duration in seconds
Q_UNUSED(duration);
num_signals = header[0x12] | header[0x13] << 8;
if (num_signals > 2) {
qWarning() << "More than 2 Waveforms in " << filename;
return false;
}
long pos2 = 0x14 + (num_signals - 1) * 3;
// add the in reverse...
for (int i = 0; i < num_signals; i++) {
interleave = header[pos2] | header[pos2 + 1] << 8;
sample_format = header[pos2 + 2];
whl.push_back(WaveHeaderList(interleave, sample_format));
pos2 -= 3;
}
hl = 15 + 6 + (num_signals * 3);
} else { hl = 16; }
wasfaulty = faulty;
sum = 0;
for (int i = 0; i < hl - 1; i++) { sum += header[i]; }
unsigned char c8 = header[hl - 1];
if (sum != c8) {
if (chunk == 0) {
qDebug() << "File" << filename << "has faulty header at" << pos;
if ((size > 0) && (pos + size < filesize) && (header[size] == 2)) {
faulty = true;
continue;
}
return (chunk != 0);
}
break;
}
datasize = size - hl - 2;
data = &header[hl];
#ifdef PRS1_CRC_CHECK
c16 = CRC16(data, datasize);
crc = (data[datasize + 1] << 8) | data[datasize];
if (crc != c16) {
qDebug() << "File" << filename << "failed CRC check at chunk" << chunk << "wanted" << crc << "got"
<< c16;
faulty = true;
continue;
}
#endif
if (wasfaulty) {
qDebug() << "Managed to continue with next block";
}
qDebug() << "Loading" << QDir::toNativeSeparators(filename) << sequence << timestamp << size;
//if (ext==0) ParseCompliance(data,size);
if (ext <= 1) {
ParseSummary(mach, sequence, timestamp, data, datasize, family, familyVersion);
} else if (ext == 2) {
if (family == 5) {
if (!Parse002v5(sequence, timestamp, data, datasize)) {
qDebug() << "in file: " << QDir::toNativeSeparators(filename);
}
} else {
Parse002(sequence, timestamp, data, datasize, family, familyVersion);
}
} else if (ext == 5) {
// too messy to do here..
//ParseWaveform(mach,sequence,timestamp,data,datasize,duration,num_signals,interleave,sample_format);
}
}
return true;
}
bool PRS1Loader::OpenWaveforms(SessionID sid, QString filename)
{
Session *session = new_sessions[sid];
//int sequence,seconds,br,htype,version,numsignals;
QFile file(filename);
if (!file.open(QIODevice::ReadOnly)) {
qWarning() << "Couldn't open waveform file" << filename;
return false;
}
int pos, br, size = file.size();
if (size > max_load_buffer_size) {
qWarning() << "Waveform too big, increase max_load_buffer_size in PRS1Loader sourcecode" <<
filename;
return false;
}
br = file.read((char *)m_buffer, size);
if (br < size) {
qWarning() << "Couldn't read waveform data.. Disk error?" << filename;
return false;
}
// Look at the initial header and assume this header size for the lot.
if ((m_buffer[0] != 2) || (m_buffer[6] != 0x05)) {
qWarning() << "Not correct waveform format" << filename;
return false;
}
//quint8 version=m_buffer[4];
quint32 start = m_buffer[0xb] | m_buffer[0xc] << 8 | m_buffer[0xd] << 16 | m_buffer[0x0e] << 24;
session->updateFirst(qint64(start) * 1000L);
quint16 num_signals = m_buffer[0x12] | m_buffer[0x13] << 8;
if (num_signals > 2) {
qWarning() << "More than 2 Waveforms in " << filename;
return false;
}
pos = 0x14 + (num_signals - 1) * 3;
vector<WaveHeaderList> whl;
// add the signals to whl in reverse...
for (int i = 0; i < num_signals; i++) {
quint16 interleave = m_buffer[pos] | m_buffer[pos + 1] << 8;
quint8 sample_format = m_buffer[pos + 2];
whl.push_back(WaveHeaderList(interleave, sample_format));
pos -= 3;
}
int hl = 15 + 5 + (num_signals * 3);
quint16 duration, length = 0;
quint32 timestamp, lasttimestamp;
pos = 0;
int block = 0;
lasttimestamp = start;
duration = 0;
int corrupt = 0;
char waveform[2][500000]; // eek. That's a lot of Stack.
int wlength[2];
qint64 wdur[2];
//EventList *evl[num_signals];
for (int i = 0; i < num_signals; i++) {
wlength[i] = 0;
wdur[i] = 0;
//evl[i]=nullptr;
//waveform[i].resize(500000);
}
//SampleFormat *wf[num_signals];
//EventList *FlowData=EventList(CPAP_FlowRate, EVL_Waveform,1,0,-128,128);
//EventList *MaskData=EventList(CPAP_MaskPressure, EVL_Waveform,1,0,-128,128);
//QString FlowRate=CPAP_FlowRate;
//QString MaskPressure="MaskPressure";
ChannelID wc[2] = {CPAP_FlowRate, CPAP_MaskPressure};
unsigned char sum8; // additive checksum
do {
timestamp = m_buffer[pos + 0xb] | m_buffer[pos + 0xc] << 8 |
m_buffer[pos + 0xd] << 16 | m_buffer[pos + 0x0e] << 24;
// Calculate header checksum
sum8 = 0;
for (int i = 0; i < hl; i++) { sum8 += m_buffer[pos + i]; }
if (m_buffer[pos + hl] != sum8) {
if (block == 0) {
qDebug() << "Faulty Header Checksum, aborting" << filename;
return false;
}
if (++corrupt > 3) {
qDebug() << "3 Faulty Waveform Headers in a row.. Aborting" << filename;
return false;
}
qDebug() << "Faulty Header Checksum, skipping block" << block;
pos += length;
continue;
} else {
int diff = timestamp - (lasttimestamp + duration);
if (block == 1) {
if (diff > 0) {
start -= diff;
}
}
length = m_buffer[pos + 0x1] | m_buffer[pos + 0x2] << 8; // block length in bytes
duration = m_buffer[pos + 0xf] | m_buffer[pos + 0x10] << 8; // block duration in seconds
if (diff < 0) {
qDebug() << "Padding waveform to keep sync" << block;
//diff=qAbs(diff);
for (int i = 0; i < num_signals; i++) {
for (int j = 0; j < diff; j++) {
for (int k = 0; k < whl[i].interleave; k++) {
waveform[i][wlength[i]++] = 0;
}
}
wdur[i] += diff;
}
} else if (diff > 0 && wlength[0] > 0) {
qDebug() << "Timestamp resync" << block << diff << corrupt << duration << timestamp - lasttimestamp
<< filename;
for (int i = 0; i < num_signals; i++) {
double rate = (double(wdur[i]) * 1000.0) / double(wlength[i]);
double gain;
if (i == 1) { gain = 0.1; }
else { gain = 1; }
EventList *a = session->AddEventList(wc[i], EVL_Waveform, gain, 0, 0, 0, rate);
//EventList *a=new EventList(wc[i],EVL_Waveform,gain,0,0,0,rate);
//session->machine()->registerChannel(wc[i]);
if (whl[i].sample_format) {
a->AddWaveform(qint64(start) * 1000L, (unsigned char *)waveform[i], wlength[i],
qint64(wdur[i]) * 1000L);
} else {
a->AddWaveform(qint64(start) * 1000L, (char *)waveform[i], wlength[i], qint64(wdur[i]) * 1000L);
}
if (wc[i] == CPAP_FlowRate) {
a->setMax(120);
a->setMin(-120);
} else if (wc[i] == CPAP_MaskPressure) {
//int v=ceil(a->Max()/5);
//a->setMax(v*5);
//v=floor(a->Min()/5);
//a->setMin(v*5);
}
session->updateLast(start + (qint64(wdur[i]) * 1000L));
wlength[i] = 0;
wdur[i] = 0;
}
start = timestamp;
corrupt = 0;
}
}
pos += hl + 1;
//qDebug() << (duration*num_signals*whl[0].interleave) << duration;
if (num_signals == 1) { // no interleave.. this is much quicker.
int bs = duration * whl[0].interleave;
memcpy((char *) & (waveform[0])[wlength[0]], (char *)&m_buffer[pos], bs);
wlength[0] += bs;
pos += bs;
} else {
for (int i = 0; i < duration; i++) {
for (int s = 0; s < num_signals; s++) {
memcpy((char *) & (waveform[s])[wlength[s]], (char *)&m_buffer[pos], whl[s].interleave);
wlength[s] += whl[s].interleave;
pos += whl[s].interleave;
}
}
}
for (int i = 0; i < num_signals; i++) { wdur[i] += duration; }
pos += 2;
block++;
lasttimestamp = timestamp;
} while (pos < size);
for (int i = 0; i < num_signals; i++) {
double rate = (double(wdur[i]) * 1000.0) / double(wlength[i]);
double gain;
if (i == 1) { gain = 0.1; }
else { gain = 1; }
EventList *a = session->AddEventList(wc[i], EVL_Waveform, gain, 0, 0, 0, rate);
if (whl[i].sample_format) {
a->AddWaveform(qint64(start) * 1000L, (unsigned char *)waveform[i], wlength[i],
qint64(wdur[i]) * 1000L);
} else {
a->AddWaveform(qint64(start) * 1000L, (char *)waveform[i], wlength[i], qint64(wdur[i]) * 1000L);
}
if (wc[i] == CPAP_FlowRate) {
a->setMax(120);
a->setMin(-120);
} else if (wc[i] == CPAP_MaskPressure) {
}
session->updateLast(start + qint64(wdur[i]) * 1000L);
}
// lousy family 5 check to see if already has RespRate
return true;
}
void InitModelMap()
{
ModelMap[0x34] = "RemStar Pro with C-Flex+"; // 450/460P
ModelMap[0x35] = "RemStar Auto with A-Flex"; // 550/560P
ModelMap[0x36] = "RemStar BiPAP Pro with Bi-Flex";
ModelMap[0x37] = "RemStar BiPAP Auto with Bi-Flex";
ModelMap[0x38] = "RemStar Plus :("; // 150/250P/260P
ModelMap[0x41] = "BiPAP autoSV Advanced";
}
bool initialized = false;
void PRS1Loader::Register()
{
if (initialized) { return; }
qDebug() << "Registering PRS1Loader";
RegisterLoader(new PRS1Loader());
InitModelMap();
initialized = true;
}