ULONG RGOM_RegisterUI(SW_IDATA *idata, SWP_RegUI *UI)
{
Object *g;
LONG x;
if (!idata->RegWin) {
idata->RegWin = WindowObject,
MUIA_Window_Title, "Registration",
MUIA_Window_ID, MAKE_ID('r','g','s','r'),
WindowContents, VGroup,
Child, ScrollgroupObject,
MUIA_Scrollgroup_FreeHoriz, FALSE,
MUIA_Scrollgroup_Contents, VirtgroupObject,
VirtualFrame,
Child, g = ColGroup(3),
GroupFrameT("Registration Information"),
End,
End,
End,
Child, HGroup, GroupFrame,
Child, idata->B_Generate = SimpleButton("_Generate"),
Child, idata->B_Cancel = SimpleButton("_Cancel"),
End,
End,
End;
if (!idata->RegWin) return FAILURE;
for (x=0; RG_ParseTable[x].Keyword; x++) {
DoMethod(g, OM_ADDMEMBER, Label2(RG_ParseTable[x].Keyword));
DoMethod(g, OM_ADDMEMBER,
idata->Gads[x] =String("", SWF_CryptLineSize));
set(idata->Gads[x], MUIA_CycleChain, 1);
set(idata->Gads[x], MUIA_String_AdvanceOnCR, 1);
DoMethod(g, OM_ADDMEMBER,
Label2(RG_ParseTable[x].Required ? "Req" : "Opt"));
}
set(idata->B_Generate, MUIA_CycleChain, 1);
set(idata->B_Cancel, MUIA_CycleChain, 1);
DoMethod(idata->B_Generate, MUIM_Notify, MUIA_Pressed, FALSE,
UI->App, 6, MUIM_CallHook, &RGOM_Hook_Generate,
idata, UI->Prog, UI->Cost1, UI->Cost2);
SW_NOTIFYSINGLE(idata->B_Cancel, MUIA_Pressed, FALSE,
idata->RegWin, MUIA_Window_Open, FALSE);
SW_NOTIFYCLOSEWIN(idata->RegWin);
DoMethod(UI->App, OM_ADDMEMBER, idata->RegWin);
}
if (!idata->RegWin) return FAILURE;
set(idata->RegWin, MUIA_Window_Open, TRUE);
return SUCCESS;
}
VOID png_write(struct RecorderData *data, APTR fh, APTR argb, ULONG modulo, ULONG width, ULONG height, ULONG dupcount)
{
struct png_header ihdr;
ULONG length, length2;
UBYTE *buffer;
buffer = data->writebuffer;
ihdr.width = width;
ihdr.height = height;
ihdr.depth = 8;
ihdr.colortype = 2; /* RGB */
ihdr.compression = 0;
ihdr.filter = 0;
ihdr.interlaced = 0;
length = write_chunk(buffer, sizeof(ihdr), LE_SWAPLONG_C(MAKE_ID('I','H','D','R')), &ihdr);
length2 = png_encode(&buffer[length], data->writebuffersize - length - 8, argb, modulo, width, height);
if (length2)
{
static const struct png_iend iend = { { 0, LE_SWAPLONG_C(MAKE_ID('I','E','N','D')) }, 0xae426082 };
ULONG i;
length += length2;
qcopy((APTR)&iend, &buffer[length], sizeof(iend));
for (i = 0; i < dupcount; i++)
{
dowrite(fh, buffer, length);
}
}
}
HMISong::HMISong (FileReader &reader, EMidiDevice type)
: MIDIStreamer(type), MusHeader(0), Tracks(0)
{
#ifdef _WIN32
if (ExitEvent == NULL)
{
return;
}
#endif
int len = reader.GetLength();
if (len < 0x100)
{ // Way too small to be HMI.
return;
}
MusHeader = new BYTE[len];
SongLen = len;
NumTracks = 0;
if (reader.Read(MusHeader, len) != len)
return;
// Do some validation of the MIDI file
if (memcmp(MusHeader, HMI_SONG_MAGIC, sizeof(HMI_SONG_MAGIC)) == 0)
{
SetupForHMI(len);
}
else if (((DWORD *)MusHeader)[0] == MAKE_ID('H','M','I','M') &&
((DWORD *)MusHeader)[1] == MAKE_ID('I','D','I','P'))
{
SetupForHMP(len);
}
}
FTexture *PNGTexture_TryCreate(FileReader & data, int lumpnum)
{
union
{
uint32_t dw;
uint16_t w[2];
uint8_t b[4];
} first4bytes;
uint32_t width, height;
uint8_t bitdepth, colortype, compression, filter, interlace;
// This is most likely a PNG, but make sure. (Note that if the
// first 4 bytes match, but later bytes don't, we assume it's
// a corrupt PNG.)
data.Seek(0, SEEK_SET);
if (data.Read (first4bytes.b, 4) != 4) return NULL;
if (first4bytes.dw != MAKE_ID(137,'P','N','G')) return NULL;
if (data.Read (first4bytes.b, 4) != 4) return NULL;
if (first4bytes.dw != MAKE_ID(13,10,26,10)) return NULL;
if (data.Read (first4bytes.b, 4) != 4) return NULL;
if (first4bytes.dw != MAKE_ID(0,0,0,13)) return NULL;
if (data.Read (first4bytes.b, 4) != 4) return NULL;
if (first4bytes.dw != MAKE_ID('I','H','D','R')) return NULL;
// The PNG looks valid so far. Check the IHDR to make sure it's a
// type of PNG we support.
data.Read(&width, 4);
data.Read(&height, 4);
data >> bitdepth >> colortype >> compression >> filter >> interlace;
if (compression != 0 || filter != 0 || interlace > 1)
{
return NULL;
}
if (!((1 << colortype) & 0x5D))
{
return NULL;
}
if (!((1 << bitdepth) & 0x116))
{
return NULL;
}
// Just for completeness, make sure the PNG has something more than an IHDR.
data.Seek (4, SEEK_CUR);
data.Read (first4bytes.b, 4);
if (first4bytes.dw == 0)
{
data.Read (first4bytes.b, 4);
if (first4bytes.dw == MAKE_ID('I','E','N','D'))
{
return NULL;
}
}
return new FPNGTexture (data, lumpnum, FString(), BigLong((int)width), BigLong((int)height),
bitdepth, colortype, interlace);
}
void FStringTable::LoadStrings (bool enuOnly)
{
int lastlump, lump;
int i, j;
FreeNonDehackedStrings ();
lastlump = 0;
while ((lump = Wads.FindLump ("LANGUAGE", &lastlump)) != -1)
{
j = 0;
if (!enuOnly)
{
LoadLanguage (lump, MAKE_ID('*',0,0,0), true, ++j);
for (i = 0; i < 4; ++i)
{
LoadLanguage (lump, LanguageIDs[i], true, ++j);
LoadLanguage (lump, LanguageIDs[i] & MAKE_ID(0xff,0xff,0,0), true, ++j);
LoadLanguage (lump, LanguageIDs[i], false, ++j);
}
}
// Fill in any missing strings with the default language
LoadLanguage (lump, MAKE_ID('*','*',0,0), true, ++j);
}
}
/**************************************************************************
Prepares the clipboard so that text can be written into it
**************************************************************************/
struct IFFHandle *PrepareClipboard(void)
{
struct IFFHandle *iff = AllocIFF();
if(iff)
{
if((iff->iff_Stream = (ULONG) OpenClipboard (0)))
{
InitIFFasClip(iff);
if(!OpenIFF(iff,IFFF_WRITE))
{
if(!PushChunk(iff, MAKE_ID('F','T','X','T'), MAKE_ID('F','O','R','M'), IFFSIZE_UNKNOWN))
{
if(!PushChunk(iff, 0, MAKE_ID('C','H','R','S'), IFFSIZE_UNKNOWN))
{
return iff;
}
PopChunk(iff);
}
CloseIFF(iff);
}
CloseClipboard((struct ClipboardHandle*)iff->iff_Stream);
}
FreeIFF(iff);
}
return NULL;
}
int XMISong::FindXMIDforms(const BYTE *chunk, int len, TrackInfo *songs) const
{
int count = 0;
for (int p = 0; p <= len - 12; )
{
int chunktype = GetNativeInt(chunk + p);
int chunklen = GetBigInt(chunk + p + 4);
if (chunktype == MAKE_ID('F','O','R','M'))
{
if (GetNativeInt(chunk + p + 8) == MAKE_ID('X','M','I','D'))
{
if (songs != NULL)
{
FoundXMID(chunk + p + 12, chunklen - 4, songs + count);
}
count++;
}
}
else if (chunktype == MAKE_ID('C','A','T',' '))
{
// Recurse to handle CAT chunks.
count += FindXMIDforms(chunk + p + 12, chunklen - 4, songs + count);
}
// IFF chunks are padded to even byte boundaries to avoid
// unaligned reads on 68k processors.
p += 8 + chunklen + (chunklen & 1);
// Avoid crashes from corrupt chunks which indicate a negative size.
if (chunklen < 0) p = len;
}
return count;
}
long FoliageEffectFolFileEditGUI::HandleSCChange(NativeControl Handle, NativeGUIWin NW, int CtrlID)
{
NotifyTag Changes[2];
Changes[1] = 0;
switch (CtrlID)
{
case IDC_CHECKENABLED:
{
Changes[0] = MAKE_ID(Active->GetNotifyClass(), Active->GetNotifySubclass(), 0xff, WCS_NOTIFYCOMP_OBJECT_ENABLEDCHANGED);
GlobalApp->AppEx->GenerateNotify(Changes, Active->GetRAHostRoot());
break;
} // IDC_CHECKENABLED
case IDC_CHECKPREVIEWENABLED:
{
Changes[0] = MAKE_ID(Active->GetNotifyClass(), Active->GetNotifySubclass(), 0xff, WCS_NOTIFYCOMP_OBJECT_VALUECHANGED);
GlobalApp->AppEx->GenerateNotify(Changes, Active->GetRAHostRoot());
break;
} // IDC_CHECKPREVIEWENABLED
case IDC_CHECKDISSOLVEENABLED:
case IDC_CHECKRENDEROCCLUDED:
{
Changes[0] = MAKE_ID(Active->Ecotp.GetNotifyClass(), Active->Ecotp.GetNotifySubclass(), 0xff, WCS_NOTIFYCOMP_OBJECT_VALUECHANGED);
GlobalApp->AppEx->GenerateNotify(Changes, Active->Ecotp.GetRAHostRoot());
break;
} // IDC_CHECKDISSOLVEENABLED
default:
break;
} // switch CtrlID
return(0);
} // FoliageEffectFolFileEditGUI::HandleSCChange
long TerraffectorEditGUI::HandleSCChange(NativeControl Handle, NativeGUIWin NW, int CtrlID)
{
NotifyTag Changes[2];
Changes[1] = 0;
switch (CtrlID)
{
case IDC_CHECKENABLED:
{
Changes[0] = MAKE_ID(Active->GetNotifyClass(), Active->GetNotifySubclass(), 0xff, WCS_NOTIFYCOMP_OBJECT_ENABLEDCHANGED);
GlobalApp->AppEx->GenerateNotify(Changes, Active->GetRAHostRoot());
break;
} //
//case IDC_CHECKOVERLAP:
case IDC_CHECKSPLINE:
{
Changes[0] = MAKE_ID(Active->GetNotifyClass(), Active->GetNotifySubclass(), 0xff, WCS_NOTIFYCOMP_OBJECT_VALUECHANGED);
GlobalApp->AppEx->GenerateNotify(Changes, Active->GetRAHostRoot());
break;
} //
//case IDC_CHECKFLOATING:
// {
// EffectsHost->TerraffectorBase.SetFloating(EffectsHost->TerraffectorBase.Floating, ProjHost); // this sends the valuechanged message
// break;
// } //
default:
break;
} // switch CtrlID
return(0);
} // TerraffectorEditGUI::HandleSCChange
/*(@!*****************************************************************************************
* Nom : CElemCycle
* Role : definition du traitement sur un cycle
* --------------------------------------------------------------------------------------------
* Contraintes : sans objet
* Donnees en entree : sans objet
* Donnees en sortie : sans objet
* --------------------------------------------------------------------------------------------
* Pseudo code : sans objet
*
*****************************************************************************************@!)*/
CElemCycle::CElemCycle() : CElemList(NBR_CYCLE_STEP_MAX)
{
m_iType = MAKE_ID(0xFF,0xFF,eTYPE_CYCLE,0xFF);
SetLabel(_T("CElemCycle"));
//InitializeCriticalSection(&m_hCriticalSection);
CElemCycle::m_CurrentStep.SetType(MAKE_ID(0xFF,0xFF,eTYPE_CYCLE_STEP,eID_STREAM_CURRENT_STEP));
}
CoordsCalculatorGUI::CoordsCalculatorGUI(EffectsLib *EffectsSource, CoordSys *ActiveSource)
: GUIFenetre('CSCU', this, "Coordinate System Calculator") // Yes, I know...
{
static NotifyTag AllEvents[] = {
#ifdef WCS_BUILD_VNS
MAKE_ID(WCS_EFFECTSSUBCLASS_COORDSYS, 0xff, 0xff, 0xff),
#endif // WCS_BUILD_VNS
0};
static NotifyTag AllProjPrefsEvents[] = {MAKE_ID(WCS_PROJECTCLASS_PREFS, WCS_SUBCLASS_PROJPREFS_UNITS, 0xff, 0xff),
0};
ConstructError = 0;
EffectsHost = EffectsSource;
Source = ActiveSource;
Dest = NULL;
SetWinManFlags(WCS_FENETRE_WINMAN_NODOCK | WCS_FENETRE_WINMAN_NOPOPUP);
SourceElev.SetMetricType(WCS_ANIMDOUBLE_METRIC_HEIGHT);
DestElev.SetMetricType(WCS_ANIMDOUBLE_METRIC_HEIGHT);
ReverseElev.SetMetricType(WCS_ANIMDOUBLE_METRIC_HEIGHT);
if (EffectsSource)
{
GlobalApp->AppEx->RegisterClient(this, AllEvents);
GlobalApp->MainProj->RegisterClient(this, AllProjPrefsEvents);
} // if
else
ConstructError = 1;
} // CoordsCalculatorGUI::CoordsCalculatorGUI
void DEMEditGUI::HandleNotifyEvent(void)
{
NotifyTag *Changes, Interested[7];
int Done = 0;
DiagnosticData *Diagnostics;
if (! NativeWin)
return;
Changes = Activity->ChangeNotify->ChangeList;
Interested[0] = MAKE_ID(WCS_RAHOST_OBJTYPE_DEM, 0xff, 0xff, WCS_NOTIFYCOMP_OBJECT_COUNTCHANGED);
Interested[1] = NULL;
if (GlobalApp->AppEx->MatchNotifyClass(Interested, Changes, 0))
{
} // if DEM count changed
Interested[0] = MAKE_ID(WCS_PROJECTCLASS_PREFS, WCS_SUBCLASS_PROJPREFS_UNITS, 0xff, 0xff);
Interested[1] = NULL;
if (GlobalApp->AppEx->MatchNotifyClass(Interested, Changes, 0))
{
} // if units changed
if (Active)
{
Interested[0] = MAKE_ID(WCS_EFFECTSSUBCLASS_COORDSYS, 0xff, 0xff, 0xff);
Interested[1] = NULL;
if (GlobalApp->AppEx->MatchNotifyClass(Interested, Changes, 0))
{
ConfigureCoords();
Done = 1;
} // if
Interested[0] = MAKE_ID(Active->GetNotifyClass(), 0xff, 0xff, WCS_NOTIFYCOMP_OBJECT_VALUECHANGED);
Interested[1] = NULL;
if (GlobalApp->AppEx->MatchNotifyClass(Interested, Changes, 0))
{
DisableWidgets();
Done = 1;
} // if
Interested[0] = MAKE_ID(WCS_NOTIFYCLASS_DIAGNOSTICDATA, WCS_SUBCLASS_DIAGNOSTIC_DATA, 0xff, 0xff);
Interested[1] = NULL;
if (GlobalApp->AppEx->MatchNotifyClass(Interested, Changes, 0))
{
if (Diagnostics = (DiagnosticData *)Activity->ChangeNotify->NotifyData)
{
if (Diagnostics->ValueValid[WCS_DIAGNOSTIC_LATITUDE] && Diagnostics->ValueValid[WCS_DIAGNOSTIC_LONGITUDE])
SelectPoints(Diagnostics->Value[WCS_DIAGNOSTIC_LATITUDE], Diagnostics->Value[WCS_DIAGNOSTIC_LONGITUDE]);
} // if
Done = 1;
} // if
} // if
if (! Done)
ConfigureWidgets();
} // DEMEditGUI::HandleNotifyEvent()
//==========================================================================
//
// RenameNerve
//
// Renames map headers and map name pictures in nerve.wad so as to load it
// alongside Doom II and offer both episodes without causing conflicts.
// MD5 checksum for NERVE.WAD: 967d5ae23daf45196212ae1b605da3b0
//
//==========================================================================
void FWadCollection::RenameNerve ()
{
if (gameinfo.gametype != GAME_Doom)
return;
bool found = false;
BYTE cksum[16];
static const BYTE nerve[16] = { 0x96, 0x7d, 0x5a, 0xe2, 0x3d, 0xaf, 0x45, 0x19,
0x62, 0x12, 0xae, 0x1b, 0x60, 0x5d, 0xa3, 0xb0
};
size_t nervesize = 3819855; // NERVE.WAD's file size
int w = IWAD_FILENUM;
while (++w < GetNumWads())
{
FileReader *fr = GetFileReader(w);
if (fr == NULL)
{
continue;
}
if (fr->GetLength() != (long)nervesize)
{
// Skip MD5 computation when there is a
// cheaper way to know this is not the file
continue;
}
fr->Seek(0, SEEK_SET);
MD5Context md5;
md5.Update(fr, fr->GetLength());
md5.Final(cksum);
if (memcmp(nerve, cksum, 16) == 0)
{
found = true;
break;
}
}
if (!found)
return;
for (int i = GetFirstLump(w); i <= GetLastLump(w); i++)
{
// Only rename the maps from NERVE.WAD
assert(LumpInfo[i].wadnum == w);
if (LumpInfo[i].lump->dwName == MAKE_ID('C', 'W', 'I', 'L'))
{
LumpInfo[i].lump->Name[0] = 'N';
}
else if (LumpInfo[i].lump->dwName == MAKE_ID('M', 'A', 'P', '0'))
{
LumpInfo[i].lump->Name[6] = LumpInfo[i].lump->Name[4];
LumpInfo[i].lump->Name[5] = '0';
LumpInfo[i].lump->Name[4] = 'L';
LumpInfo[i].lump->dwName = MAKE_ID('L', 'E', 'V', 'E');
}
}
}
//==========================================================================
//
// Draws the savegame picture with its original palette
//
//==========================================================================
void gl_DrawSavePic(DCanvas * canvas, const char * Filename, int x, int y, int dx, int dy)
{
static const char * cmp_filename=NULL;
static BYTE * cmp_buffer=NULL;
static union
{
DWORD palette[256];
BYTE pngpal[256][3];
};
DWORD len,id;
canvas->Lock();
// I hope this is sufficient!
if (cmp_filename!=Filename || canvas->GetBuffer()!=cmp_buffer)
{
cmp_filename = Filename;
cmp_buffer = canvas->GetBuffer();
// Read the palette from the savegame.
FILE * file = fopen (Filename, "rb");
if (file)
{
FileReader fr(file);
fr.Seek (33, SEEK_SET);
fr >> len >> id;
while (id != MAKE_ID('I','D','A','T') && id != MAKE_ID('I','E','N','D'))
{
len = BigLong((unsigned int)len);
if (id == MAKE_ID('P','L','T','E'))
{
int PaletteSize = MIN<int> (len / 3, 256);
fr.Read (pngpal, PaletteSize * 3);
if (PaletteSize * 3 != (int)len)
{
fr.Seek (len - PaletteSize * 3, SEEK_CUR);
}
for (int i = PaletteSize - 1; i >= 0; --i)
{
palette[i] = MAKERGB(pngpal[i][0], pngpal[i][1], pngpal[i][2]);
}
}
else
{
fr.Seek (len, SEEK_CUR);
}
fr >> len >> len; // Skip CRC
id = MAKE_ID('I','E','N','D');
fr >> id;
}
fclose(file);
}
else memcpy(palette, GPalette.BaseColors, sizeof(palette));
ProjectPrefsGUI::ProjectPrefsGUI(Project *Moi, InterCommon *ISource)
: GUIFenetre('PREF', this, "Preferences") // Yes, I know...
{
static NotifyTag AllICEvents[] = {MAKE_ID(WCS_INTERCLASS_VECTOR, WCS_INTERVEC_SUBCLASS_VALUE, WCS_INTERVEC_ITEM_PROJREFCOORD, 0xff),
MAKE_ID(WCS_INTERCLASS_VECTOR, WCS_INTERVEC_SUBCLASS_VALUE, WCS_INTERVEC_ITEM_PROJREFCOORDFLOAT, 0xff),
MAKE_ID(WCS_INTERCLASS_MISC, WCS_INTERMISC_SUBCLASS_MISC, WCS_INTERMISC_ITEM_PROJFRAMERATE, 0xff),
0};
static NotifyTag ProjEvents[] = {MAKE_ID(WCS_PROJECTCLASS_PATHS, 0xff, 0xff, 0xff),
MAKE_ID(WCS_PROJECTCLASS_PREFS, WCS_SUBCLASS_PROJPREFS_UNITS, 0xff, 0xff),
0};
double RangeDefaults[3];
ConstructError = 0;
HostProj = Moi;
InterStash = ISource;
MoveInProgress = 0;
SwapInProgress = 0;
#ifdef _WIN32
Curse = NULL;
#endif // _WIN32
strcpy(Dirname, HostProj->dirname);
DLCopy = HostProj->DirList_Copy(HostProj->DL);
RangeDefaults[0] = 90.0;
RangeDefaults[1] = -90.0;
RangeDefaults[2] = 1.0;
RefLatADT.SetDefaults(NULL, 0, HostProj->Interactive->GetProjRefCoords(WCS_INTERVEC_COMP_Y));
RefLatADT.SetRangeDefaults(RangeDefaults);
RefLatADT.SetMetricType(WCS_ANIMDOUBLE_METRIC_LATITUDE);
RefLatADT.SetFlags(WCS_ANIMCRITTER_FLAG_NONODES | WCS_ANIMCRITTER_FLAG_SUPPRESSNOTIFY | WCS_ANIMCRITTER_FLAG_SUPPRESSACTIVATE);
RangeDefaults[0] = 360.0;
RangeDefaults[1] = -360.0;
RangeDefaults[2] = 1.0;
RefLonADT.SetDefaults(NULL, 0, HostProj->Interactive->GetProjRefCoords(WCS_INTERVEC_COMP_X));
RefLonADT.SetRangeDefaults(RangeDefaults);
RefLonADT.SetMetricType(WCS_ANIMDOUBLE_METRIC_LONGITUDE);
RefLonADT.SetFlags(WCS_ANIMCRITTER_FLAG_NONODES | WCS_ANIMCRITTER_FLAG_SUPPRESSNOTIFY | WCS_ANIMCRITTER_FLAG_SUPPRESSACTIVATE);
RangeDefaults[0] = 1000000.0;
RangeDefaults[1] = -1000000.0;
RangeDefaults[2] = 1.0;
RefElevADT.SetDefaults(NULL, 0, HostProj->Interactive->GetProjRefCoords(WCS_INTERVEC_COMP_Z));
RefElevADT.SetRangeDefaults(RangeDefaults);
RefElevADT.SetMetricType(WCS_ANIMDOUBLE_METRIC_HEIGHT);
RefElevADT.SetFlags(WCS_ANIMCRITTER_FLAG_NONODES | WCS_ANIMCRITTER_FLAG_SUPPRESSNOTIFY | WCS_ANIMCRITTER_FLAG_SUPPRESSACTIVATE);
InterStash->RegisterClient(this, AllICEvents);
HostProj->RegisterClient(this, ProjEvents);
SetWinManFlags(WCS_FENETRE_WINMAN_NODOCK | WCS_FENETRE_WINMAN_NOPOPUP);
} // ProjectPrefsGUI::ProjectPrefsGUI
void ProjectPrefsGUI::DoCancel(void)
{
NotifyTag Changes[3];
Changes[0] = MAKE_ID(WCS_PROJECTCLASS_PATHS, WCS_PATHS_DIRLIST, 0, 0);
Changes[1] = MAKE_ID(WCS_PROJECTCLASS_PATHS, WCS_PATHS_DEFAULTDIR, 0, 0);
Changes[2] = 0;
swmem(&DLCopy, &HostProj->DL, sizeof (struct DirList *));
strcpy(HostProj->dirname, Dirname);
HostProj->GenerateNotify(Changes);
} // ProjectPrefsGUI::DoCancel()
/*
* Go through serial mouse data and add hd entries.
*/
void add_serial_mouse(hd_data_t *hd_data)
{
hd_t *hd;
char buf[4];
ser_device_t *sm;
for(sm = hd_data->ser_mouse; sm; sm = sm->next) {
if(sm->is_mouse) {
hd = add_hd_entry(hd_data, __LINE__, 0);
hd->base_class.id = bc_mouse;
hd->sub_class.id = sc_mou_ser;
hd->bus.id = bus_serial;
hd->unix_dev_name = new_str(sm->dev_name);
hd->attached_to = sm->hd_idx;
if(*sm->pnp_id) {
strncpy(buf, sm->pnp_id, 3);
buf[3] = 0;
hd->vendor.id = name2eisa_id(buf);
if(!hd->vendor.id) { /* in case it's a really strange one... */
hd->vendor.name = new_str(buf);
}
hd->device.id = MAKE_ID(TAG_EISA, strtol(sm->pnp_id + 3, NULL, 16));
hd->serial = new_str(sm->serial);
if(sm->user_name) hd->device.name = new_str(sm->user_name);
if(sm->vend) {
free_mem(hd->vendor.name);
hd->vendor.name = new_str(sm->vend);
}
if(sm->dev_id && strlen(sm->dev_id) >= 7) {
char buf[5], *s;
unsigned u1, u2;
u1 = name2eisa_id(sm->dev_id);
if(u1) {
strncpy(buf, sm->dev_id + 3, 4);
buf[4] = 0;
u2 = strtol(sm->dev_id + 3, &s, 16);
if(!*s) {
hd->compat_vendor.id = u1;
hd->compat_device.id = MAKE_ID(TAG_EISA, u2);
}
}
}
}
else {
hd->vendor.id = MAKE_ID(TAG_SPECIAL, 0x0200);
hd->device.id = MAKE_ID(TAG_SPECIAL, 0x0003);
}
}
}
}
//***********************************************************
// Descend into a chunk, i.e., a set of one or more subchunks
// contained in a parent chunk
//***********************************************************
WORD RIFFClass::Descend(void)
{
//// We are at a RIFF or LIST ID ////
if ((dwLastID == MAKE_ID(RIFF)) || (dwLastID == MAKE_ID(LIST)))
{
return (ReadCkHdr());
}
//// There are no more RIFF or LIST chunks within this chunk ////
else
{
return (RIFF_ERROR);
}
}
/**************************************************************************
MUIM_Configdata_Save
**************************************************************************/
IPTR Configdata__MUIM_Save(struct IClass *cl, Object * obj,
struct MUIP_Configdata_Save *msg)
{
struct IFFHandle *iff;
if ((iff = AllocIFF()))
{
if (!(iff->iff_Stream = (IPTR)Open(msg->filename,MODE_NEWFILE)))
{
/* Try to Create the directory where the file is located */
char *path = StrDup(msg->filename);
if (path)
{
char *path_end = PathPart(path);
if (path_end != path)
{
BPTR lock;
*path_end = 0;
if ((lock = CreateDir(path)))
{
UnLock(lock);
iff->iff_Stream = (IPTR)Open(msg->filename,MODE_NEWFILE);
}
}
FreeVec(path);
}
}
if (iff->iff_Stream)
{
InitIFFasDOS(iff);
if (!OpenIFF(iff, IFFF_WRITE))
{
if (!PushChunk(iff, MAKE_ID('P','R','E','F'), ID_FORM, IFFSIZE_UNKNOWN))
{
Configdata_SetWindowPos(cl, obj, (APTR)msg);
if (SavePrefsHeader(iff))
{
DoMethod(obj,MUIM_Dataspace_WriteIFF, (IPTR)iff, 0, MAKE_ID('M','U','I','C'));
}
PopChunk(iff);
}
CloseIFF(iff);
}
Close((BPTR)iff->iff_Stream);
}
FreeIFF(iff);
}
return 0;
}
int main(int argc, char *argv[])
{
if(argc < 3) {
fprintf(stderr, "Usage:\n%s fontdesc.def outfile.iff\n", argv[0]);
return 0;
}
def = file_new(argv[1], 0);
if(!def) {
fprintf(stderr, "Can't find font definition '%s'\n", argv[1]);
return 1;
}
file_load(def);
if(!def->buf) {
file_free(def);
fprintf(stderr, "Not enough memory to load %s\n", argv[1]);
return 2;
}
if(!parse_def()) {
file_free(def);
return 1;
}
font = iff_new(argv[2], MAKE_ID('F','O','N','T'));
if(!font) {
file_free(def);
}
iff_newchunk(font, MAKE_ID('N','A','M','E'));
iff_writechunkdata(font, name, strlen(name)+1);
iff_endchunk(font);
iff_newchunk(font, MAKE_ID('F','I','L','E'));
iff_writechunkdata(font, file, strlen(file)+1);
iff_endchunk(font);
iff_newchunk(font, MAKE_ID('A','U','T','H'));
iff_writechunkdata(font, author, strlen(author)+1);
iff_endchunk(font);
parse_letters();
iff_close(font);
file_free(def);
return 0;
}
int FStringTable::LoadLanguage (DWORD code, bool exactMatch, BYTE *start, BYTE *end)
{
const DWORD orMask = exactMatch ? 0 : MAKE_ID(0,0,0xff,0);
int count = 0;
code |= orMask;
while (start < end)
{
const DWORD langLen = LELONG(*(DWORD *)&start[4]);
if (((*(DWORD *)start) | orMask) == code)
{
start[3] = 1;
const BYTE *probe = start + 8;
while (probe < start + langLen)
{
int index = probe[0] | (probe[1]<<8);
if (Strings[index] == NULL)
{
Strings[index] = copystring ((const char *)(probe + 2));
++count;
}
probe += 3 + strlen ((const char *)(probe + 2));
}
}
start += langLen + 8;
start += (4 - (ptrdiff_t)start) & 3;
}
return count;
}
FTexture *PNGTexture_CreateFromFile(PNGHandle *png, const FString &filename)
{
uint32_t width, height;
uint8_t bitdepth, colortype, compression, filter, interlace;
if (M_FindPNGChunk(png, MAKE_ID('I','H','D','R')) == 0)
{
return NULL;
}
// Check the IHDR to make sure it's a type of PNG we support.
png->File->Read(&width, 4);
png->File->Read(&height, 4);
(*png->File) >> bitdepth >> colortype >> compression >> filter >> interlace;
if (compression != 0 || filter != 0 || interlace > 1)
{
return NULL;
}
if (!((1 << colortype) & 0x5D))
{
return NULL;
}
if (!((1 << bitdepth) & 0x116))
{
return NULL;
}
return new FPNGTexture (*png->File, -1, filename, BigLong((int)width), BigLong((int)height),
bitdepth, colortype, interlace);
}
bool P_IsBuildMap(MapData *map)
{
DWORD len = map->Size(ML_LABEL);
if (len < 4)
{
return false;
}
BYTE *data = new BYTE[len];
map->Seek(ML_LABEL);
map->Read(ML_LABEL, data);
// Check for a Blood map.
if (*(DWORD *)data == MAKE_ID('B','L','M','\x1a'))
{
delete[] data;
return true;
}
const int numsec = LittleShort(*(WORD *)(data + 20));
int numwalls;
if (len < 26 + numsec*sizeof(sectortype) ||
(numwalls = LittleShort(*(WORD *)(data + 22 + numsec*sizeof(sectortype))),
len < 24 + numsec*sizeof(sectortype) + numwalls*sizeof(walltype)) ||
LittleLong(*(DWORD *)data) != 7 ||
LittleShort(*(WORD *)(data + 16)) >= 2048)
{ // Can't possibly be a version 7 BUILD map
delete[] data;
return false;
}
delete[] data;
return true;
}
long TerraffectorEditGUI::HandleFIChange(NativeControl Handle, NativeGUIWin NW, int CtrlID)
{
NotifyTag Changes[2];
Changes[1] = 0;
switch (CtrlID)
{
//case IDC_RESOLUTION:
// {
// EffectsHost->TerraffectorBase.SetFloating(0, ProjHost); // this sends the valuechanged message
// break;
// } //
case IDC_PRIORITY:
case IDC_EVALORDER:
{
Changes[0] = MAKE_ID(Active->GetNotifyClass(), Active->GetNotifySubclass(), 0xff, WCS_NOTIFYCOMP_OBJECT_VALUECHANGED);
GlobalApp->AppEx->GenerateNotify(Changes, Active->GetRAHostRoot());
break;
} //
default:
break;
} // switch CtrlID
return(0);
} // TerraffectorEditGUI::HandleFIChange
long TerraffectorEditGUI::HandleSRChange(NativeControl Handle, NativeGUIWin NW, int CtrlID)
{
NotifyTag Changes[2];
Changes[1] = 0;
switch (CtrlID)
{
case IDC_RADIOMODTERRAIN:
case IDC_RADIOUNMODTERRAIN:
case IDC_RADIOINCORDEC:
case IDC_RADIOINCONLY:
case IDC_RADIODECONLY:
case IDC_RADIOABSOLUTE:
case IDC_RADIORELATIVEGRND:
case IDC_RADIORELATIVEJOE:
{
Changes[0] = MAKE_ID(Active->GetNotifyClass(), Active->GetNotifySubclass(), 0xff, WCS_NOTIFYCOMP_OBJECT_VALUECHANGED);
GlobalApp->AppEx->GenerateNotify(Changes, Active->GetRAHostRoot());
break;
} //
default:
break;
} // switch CtrlID
return(0);
} // TerraffectorEditGUI::HandleSRChange
long CmapEditGUI::HandleSRChange(NativeControl Handle, NativeGUIWin NW, int CtrlID)
{
NotifyTag Changes[2];
Changes[1] = 0;
switch (CtrlID)
{
case IDC_RADIOCOLORBYPIXEL:
case IDC_RADIOCOLORBYPOLY:
{
if (Active->Orientation == WCS_CMAP_ORIENTATION_TOPWEST && Active->EvalByPixel == WCS_CMAP_EVAL_BYPIXEL)
{
if (UserMessageYN("Color Map", "This is an old format Color Map component which has West at the top of the image. Color Maps with West at the top can not be draped. Do you wish to modify the format (the image will need to be rotated counter-clockwise by 90 degrees in a paint program)?"))
Active->Orientation = WCS_CMAP_ORIENTATION_TOPNORTH;
else
Active->EvalByPixel = WCS_CMAP_EVAL_BYPOLYGON;
} // if
Changes[0] = MAKE_ID(Active->GetNotifyClass(), Active->GetNotifySubclass(), 0xff, WCS_NOTIFYCOMP_OBJECT_VALUECHANGED);
GlobalApp->AppEx->GenerateNotify(Changes, Active->GetRAHostRoot());
break;
} //
} // switch CtrlID
return(0);
} // CmapEditGUI::HandleSRChange
int up_window_open(void)
{
#if 0
int rc;
rc = FALSE;
if (!win_up)
{
win_up = transwndObject,
MUIA_Window_ID, MAKE_ID('T','R','U','P'),
End;
if (win_up)
{
DoMethod(win_up, MUIM_Notify, MUIA_transwnd_Aborted, TRUE, win_up, 3, MUIM_CallHook, &hook_standard, up_abort);
DoMethod(App, OM_ADDMEMBER, win_up);
}
}
if(win_up != NULL)
{
set(win_up, MUIA_Window_Open, TRUE);
rc = TRUE;
}
return(rc);
#endif
}
long CmapEditGUI::HandleFIChange(NativeControl Handle, NativeGUIWin NW, int CtrlID)
{
NotifyTag Changes[2];
switch (CtrlID)
{
case IDC_MATCHRED:
case IDC_MATCHGREEN:
case IDC_MATCHBLUE:
case IDC_MATCHRED2:
case IDC_MATCHGREEN2:
case IDC_MATCHBLUE2:
{
if (ActiveEco && EffectsHost->IsEffectValid(ActiveEco, WCS_EFFECTSSUBCLASS_ECOSYSTEM, 0))
{
MatchColorsChanged = 1;
// these float ints aren't really configured to anim colortimes but that's what everyone ese is listening for
Changes[0] = MAKE_ID(WCS_EFFECTSSUBCLASS_ECOSYSTEM, WCS_SUBCLASS_ANIMCOLORTIME, 0xff, WCS_NOTIFYCOMP_ANIM_VALUECHANGED);
Changes[1] = NULL;
GlobalApp->AppEx->GenerateNotify(Changes, ActiveEco->GetRAHostRoot());
} // if
break;
} //
default:
break;
} // switch CtrlID
return(0);
} // CmapEditGUI::HandleFIChange
long FoliageEffectFolFileEditGUI::HandleSRChange(NativeControl Handle, NativeGUIWin NW, int CtrlID)
{
NotifyTag Changes[2];
Changes[1] = 0;
switch (CtrlID)
{
case IDC_RADIOBYPIXEL:
case IDC_RADIOBYIMAGEHT:
{
if (! UserMessageOKCAN("Common Distance Dissolve", "Warning! This change will affect how all Foliage Effects and all Ecotype foliage is rendered."))
{
GlobalApp->AppEffects->EcosystemBase.DissolveByImageSize = 1 - GlobalApp->AppEffects->EcosystemBase.DissolveByImageSize;
} // if
Changes[0] = MAKE_ID(Active->Ecotp.GetNotifyClass(), Active->Ecotp.GetNotifySubclass(), 0xff, WCS_NOTIFYCOMP_OBJECT_VALUECHANGED);
GlobalApp->AppEx->GenerateNotify(Changes, Active->Ecotp.GetRAHostRoot());
break;
} //
default:
break;
} // switch CtrlID
return(0);
} // FoliageEffectFolFileEditGUI::HandleSRChange
FoliageEffectFolFileEditGUI::FoliageEffectFolFileEditGUI(EffectsLib *EffectsSource, FoliageEffect *ActiveSource)
: GUIFenetre('EDFO', this, "Foliage Effect Editor") // Yes, I know...
{
static NotifyTag AllEvents[] = {0,
0};
char NameStr[256];
_OwnerdrawMode = WCS_FENETRE_OWNERDRAW_MODE_BASIC;
ConstructError = 0;
EffectsHost = EffectsSource;
Active = ActiveSource;
if (EffectsHost && ActiveSource)
{
AllEvents[0] = MAKE_ID(Active->GetNotifyClass(), 0xff, 0xff, 0xff);
sprintf(NameStr, "FoliageEffect Editor - %s ", Active->GetName());
if (Active->GetRAHostRoot()->TemplateItem)
strcat(NameStr, " (Templated)");
SetTitle(NameStr);
Active->Copy(&Backup, Active);
GlobalApp->AppEx->RegisterClient(this, AllEvents);
} // if
else
ConstructError = 1;
} // FoliageEffectFolFileEditGUI::FoliageEffectFolFileEditGUI
