Example #1
0
/* %%Function:CommAllELOF %%Owner:bradch */
CommAllELOF()
{
    struct ELOF ** hELOF;
    int stm;

    CommSzNum("Displaying all ELOF's, 1 through ", stmLast);
    for (stm = stmMin; stm < stmMax; stm++)
    {
        CommSzNum("  ELOF number ", stm);
        hELOF = mpstmM1hELOF[stm - 1];
        if (hELOF == hNil)
        {
            CommSz("    hELOF is hNil.\r\n");
        }
        else
        {
            CommSzNum("    hFile=", (*hELOF)->hFile);
            CommSzNum("    ofs.fFixedDisk=", (unsigned) (*hELOF)->ofs.fFixedDisk);
            CommSzNum("    ofs.nErrCode=", (*hELOF)->ofs.nErrCode);
            CommSzSz("    ofs.szFile=", (*hELOF)->ofs.szFile);
            switch ((*hELOF)->wMode)
            {
            case OF_READ:
                CommSz("    wMode=OF_READ\r\n");
                break;
            case OF_WRITE:
                CommSz("    wMode=OF_WRITE\r\n");
                break;
            default:
                CommSz("    wMode=unknown...\r\n");
                break;
            }
            CommSzLong("    lcch=", (*hELOF)->lcch);
        }
    }
}
Example #2
0
/* %%Function:FInitCvt %%Owner:peterj */
BOOL FInitCvt()
{
	BOOL    fRetry = fTrue;

LRetry:

	if (vhsttbCvt == hNil)
		{
		int     i, iMac;
		BOOL    fValid;
		CHAR   *pchApnd, *pchApndSv;
		int     cch;
		CHAR    szKey[ichMaxCvtKey];
		CHAR    szBuf[ichMaxCvt];

		if ((vhsttbCvt = HsttbInit(0, fTrue/*fExt*/)) == hNil)
			return fFalse;

		Assert(cbCvtNum < ichMaxCvtKey);
		bltbx((CHAR FAR *) szCvtNum, (CHAR FAR *) szKey, cbCvtNum);

		iMac = GetProfileInt((CHAR FAR *) szApp, (CHAR FAR *) szKey, 0);
		bltbx((CHAR FAR *) szCvt, (CHAR FAR *) szKey, cbCvt);

		if (iMac >= 0)
			{
			pchApndSv = szKey + cbCvt - 1;
			for (i = 0; i < iMac; i++)
				{
				pchApnd = pchApndSv;
				CchIntToPpch(i + 1, &pchApnd);
				*pchApnd = '\0';
				cch = GetProfileString((CHAR FAR *) szApp, 
						(CHAR FAR *) szKey,
						(CHAR FAR *) szEmpty,
						(CHAR FAR *) szBuf, ichMaxCvt);
#ifdef SHOWCVT
				CommSzSz(SzShared("Converter String Read: "), szBuf);
#endif
				if ((cch = CchStripString(szBuf, cch)) == 0 ||
						ItMaxInSz(szBuf) < itCvtExtMin)
					{
					continue;
					}

				SzToStInPlace(szBuf);
				if (IbstAddStToSttb(vhsttbCvt, szBuf) == ibstNil)
					break;
				}
			}
		}

	if (vhsttbCvt != hNil && (*vhsttbCvt)->ibstMac == 0 && vpexcr == NULL
			&& fRetry)
		{
		BOOL fAnyFound;
		struct EXCR excr;
		fRetry = fFalse;
		InitExcr(&excr);
		fAnyFound = FFindOtherConvtrs();
		FreeExcr(&excr);
		if (fAnyFound)
			{
			FreePh(&vhsttbCvt);
			goto LRetry;
			}
		}

	return fTrue;
}