DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download
Index: T i

⟦066dc46ec⟧ TextFile

    Length: 6388 (0x18f4)
    Types: TextFile
    Names: »ibstencil.c«

Derivation

└─⟦8648bda34⟧ Bits:30007244 EUUGD5_II: X11R5
    └─⟦87c3ac0e0⟧ »./contrib-3/contrib-3.00« 
        └─⟦de8ce1454⟧ 
            └─⟦this⟧ »contrib/lib/iv/src/bin/ibuild/ibstencil.c« 

TextFile

/*
 * Copyright (c) 1991 Stanford University
 *
 * Permission to use, copy, modify, distribute, and sell this software and its
 * documentation for any purpose is hereby granted without fee, provided
 * that the above copyright notice appear in all copies and that both that
 * copyright notice and this permission notice appear in supporting
 * documentation, and that the name of Stanford not be used in advertising or
 * publicity pertaining to distribution of the software without specific,
 * written prior permission.  Stanford makes no representations about
 * the suitability of this software for any purpose.  It is provided "as is"
 * without express or implied warranty.
 *
 * STANFORD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
 * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS.
 * IN NO EVENT SHALL STANFORD BE LIABLE FOR ANY SPECIAL, INDIRECT OR
 * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
 * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
 * OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
 * WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

/*
 * IStencil component definitions.
 */

#include "ibstencil.h"
#include "ibclasses.h"
#include "ibvars.h"
#include "ibglobals.h"
#include <Unidraw/statevars.h>
#include <Unidraw/unidraw.h>
#include <Unidraw/catalog.h>
#include <Unidraw/Graphic/stencil.h>
#include <stream.h>
#include <string.h>

/*****************************************************************************/
static const char* stencilcomp_delim = "%stencilcomp_delim";
/*****************************************************************************/

IStencilComp::IStencilComp (Stencil* graphic) {
    GetClassNameVar()->SetName("Stencil");
    GetClassNameVar()->SetBaseClass("Stencil");
    if (!_release || graphic != nil) {
        _target = new StencilComp(graphic);
        if (graphic != nil) {
            Append(_target);
        }
    }
}

ClassId IStencilComp::GetSubstId(const char*& delim) {
    delim = stencilcomp_delim;
    return RASTER_COMP;
}

ClassId IStencilComp::GetClassId () { return ISTENCIL_COMP; }

boolean IStencilComp::IsA (ClassId id) {
    return ISTENCIL_COMP == id || IComp::IsA(id);
}

/*****************************************************************************/

ClassId StencilCode::GetClassId () { return ISTENCIL_CODE; }

boolean StencilCode::IsA(ClassId id) {
    return ISTENCIL_CODE == id || CodeView::IsA(id);
}

StencilCode::StencilCode (
    IStencilComp* subj
) : CodeView(subj) {}

void StencilCode::Update () {
    CodeView::Update();
    GetIStencilComp()->Bequeath();
}

IStencilComp* StencilCode::GetIStencilComp () {
    return (IStencilComp*) GetSubject(); 
}

boolean StencilCode::Definition (ostream& out) {
    boolean ok = true;

    IStencilComp* iscomp = GetIStencilComp();
    StencilComp* target = (StencilComp*) iscomp->GetTarget();
    Stencil* stencil = target->GetStencil();
    SubclassNameVar* snamer = iscomp->GetClassNameVar();
    MemberNameVar* mnamer = iscomp->GetMemberNameVar();
    const char* mname = mnamer->GetName();
    const char* subclass = snamer->GetName();

    if (_emitGraphicState) {
        ok = WriteGraphicDecls(stencil, out);

    } else if (
        _emitInstanceDecls || _emitForward || 
        _emitClassHeaders || _emitHeaders
    ) {
        ok = CodeView::Definition(out);

    } else if (_emitExpHeader) {
        if (!snamer->IsSubclass()) {
            if (
                _scope && mnamer->GetExport() && 
                !_namelist->Search("stencil")
            ) {
                _namelist->Append("stencil");
                out << "#include <Unidraw/Graphic/stencil.h> \n";
            }
        } else {
            ok = CodeView::Definition(out);
        }

    } else if (_emitCorehHeader) {
        if (snamer->IsSubclass() && strcmp(subclass, _classname) == 0) {
            if (!_namelist->Search("stencil")) {
                _namelist->Append("stencil");
                out << "#include <Unidraw/Graphic/stencil.h> \n";
            }
        }

    } else if (_emitInstanceInits) {
        char substName[CHARBUFSIZE];
        const char* sfile = target->GetFileName();
        Catalog* catalog = unidraw->GetCatalog();

        if (!catalog->Exists(sfile)) {
            char orig[CHARBUFSIZE];
            const char* name = catalog->GetName(iscomp->GetRoot());
            char* dir = GetDirName(name);
            char* index = strrchr(sfile, '/');
            if (index == nil) {
                strcpy(orig, sfile);
            } else {
                strcpy(orig, &index[1]);
            }
            strcpy(substName, dir);
            strcat(substName, orig);
            sfile = substName;
            if (!catalog->Exists(sfile)) {
                catalog->Save(target, sfile);
            }
        }
        out << "    {\n";
        out << "        GraphicComp* " << mname << "_comp = ";
        out << "ImportCmd::Import(\"" << sfile << "\");\n";
        out << "        " << mname << " = (" << subclass << "*) " << mname;
        out << "_comp->GetGraphic();\n";
        ok = WriteGraphicInits(stencil, out);
        if (_emitGraphicComp) {
            out << "        " << mname << "_comp = new StencilComp(";
            out << mname << ");\n";
            out << "        " << mname << "_comp->Update();\n";
        }
        out << "    }\n";

    } else if (
        _emitCoreDecls || _emitCoreInits || _emitClassDecls || _emitClassInits
    ) {
	ok = true;
    }
    return ok && out.good();
}

boolean StencilCode::EmitIncludeHeaders(ostream& out) {
    SubclassNameVar* snamer = GetIComp()->GetClassNameVar();

    if (!snamer->IsSubclass() && !_namelist->Search("stencil")) {
        _namelist->Append("stencil");
        out << "#include <Unidraw/Graphic/stencil.h> \n";
    }
    if (
        strcmp(snamer->GetName(), _classname) != 0 && 
        !_namelist->Search("import")
    ) {
        _namelist->Append("import");
        out << "#include <Unidraw/Components/grcomp.h> \n";
        out << "#include <Unidraw/Commands/import.h> \n";
    }
    if (
        strcmp(snamer->GetName(), _classname) != 0 && 
        !_namelist->Search("stencilcomp") && _emitGraphicComp
    ) {
        _namelist->Append("stencilcomp");
        out << "#include <Unidraw/Components/stencilcomp.h> \n";
    }
    return out.good();
}