Return to llib-lld.c CVS log

Up to [Research Unix] / researchv9 / jerq / sgs / libld

Annotation of researchv9/jerq/sgs/libld/llib-lld.c, revision 1.1

1.1     ! root        1: /*     @(#)llib-lld.c  1.2 10/17/83    */
        !             2: /*LINTLIBRARY*/
        !             3: #include <ar.h>
        !             4: #include <stdio.h>
        !             5: #include <values.h>
        !             6: #include "filehdr.h"
        !             7: #include "ldfcn.h"
        !             8: #include "linenum.h"
        !             9: #include "scnhdr.h"
        !            10: #include "syms.h"
        !            11: 
        !            12: LDFILE * allocldptr() { LDFILE *ldptr; return(ldptr); }
        !            13: 
        !            14: int freeldptr(ldptr) LDFILE *ldptr; { int success; return(success); }
        !            15: 
        !            16: int ldclose(ldptr) LDFILE *ldptr; { int success; return(success); }
        !            17: int ldaclose(ldptr) LDFILE *ldptr; { int success; return(success); }
        !            18: 
        !            19: int ldahread(ldptr, arhead) LDFILE *ldptr; ARCHDR *arhead; { int success; return(success); }
        !            20: 
        !            21: LDFILE *ldaopen(filename,oldptr) char *filename; LDFILE *oldptr; { LDFILE *ldptr; return(ldptr); }
        !            22: 
        !            23: int ldfhread(ldptr, filehead) LDFILE *ldptr; FILHDR *filehead; { int success; return(success); }
        !            24: 
        !            25: char *ldgetname(ldptr,symbol) LDFILE *ldptr; SYMENT *symbol; { char *buffer; return(buffer); }
        !            26: 
        !            27: int ldlread(ldptr,fcnindex,linenum,linent) LDFILE *ldptr; long fcnindex; 
        !            28:        unsigned short linenum; LINENO linent; { int success; return(success); }
        !            29: int ldlinit(ldptr, fcnindex) LDFILE *ldptr; long fcnindex; { int success; return(success); }
        !            30: int ldlitem(ldptr, linenum, linent) LDFILE *ldptr; unsigned short linenum;
        !            31:        LINENO linent; { int success; return(success); }
        !            32: 
        !            33: int ldlseek(ldptr, sectindx) LDFILE *ldptr; unsigned short sectindx; { int success; return(success); }
        !            34: int ldnlseek(ldptr, sectname) LDFILE *ldptr; char *sectname; { int success; return(success); }
        !            35: 
        !            36: int ldrseek(ldptr, sectindx) LDFILE *ldptr; unsigned short sectindx; { int success; return(success); }
        !            37: int ldnrseek(ldptr, sectname) LDFILE *ldptr; char *sectname; { int success; return(success); }
        !            38: 
        !            39: int ldshread(ldptr, sectindx, secthead) LDFILE *ldptr; unsigned short sectindx;
        !            40:        SCNHDR *secthead; { int success; return(success); }
        !            41: int ldnshread(ldptr, sectname, secthead) LDFILE *ldptr; char *sectname;
        !            42:        SCNHDR *secthead; { int success; return(success); }
        !            43: 
        !            44: int ldsseek(ldptr,sectindx) LDFILE *ldptr; unsigned short sectindx; { int success; return(success); }
        !            45: int ldnsseek(ldptr,sectname) LDFILE *ldptr; char *sectname; { int success; return(success); }
        !            46: 
        !            47: int ldohseek(ldptr) LDFILE *ldptr; { int success; return(success); }
        !            48: 
        !            49: LDFILE *ldopen(filename, ldptr) char *filename; LDFILE *ldptr; { LDFILE *ldptrb;
        !            50:        return(ldptrb); }
        !            51: 
        !            52: long ldtbindex(ldptr) LDFILE *ldptr; { long index; return(index); }
        !            53: 
        !            54: int ldtbread(ldptr, symindex, symbol) LDFILE *ldptr; long symindex;
        !            55:        SYMENT *symbol; { int success; return(success); }
        !            56: 
        !            57: int ldtbseek(ldptr) LDFILE *ldptr; { int success; return(success); }
        !            58: 
        !            59: long sgetl(buffer) char *buffer; { long byt; return(byt); }
        !            60: sputl(value, buffer) long value; char *buffer; { }
        !            61: 
        !            62: int vldldptr(ldptr) LDFILE *ldptr; { int success; return(success); }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.