Return to getshput.c CVS log

Up to [Research Unix] / researchv10no / libc / gen

Annotation of researchv10no/libc/gen/getshput.c, revision 1.1.1.1

1.1       root        1: /*LINTLIBRARY*/
                      2: 
                      3: /*
                      4: **     Reads, modifies, and writes the record in the ``shares'' file
                      5: **     whose uid matches "lp->l_uid".
                      6: **
                      7: **     The function indicated by the "func" argument is called with the address
                      8: **     of the original structure, and the address of the structure to be updated.
                      9: **
                     10: **     Returns value returned by passed function for success and 0 for error
                     11: **     But note, that if the function returns 0 itself, then the ``shares'' file
                     12: **     will not be updated.
                     13: **
                     14: **     Otherwise, the value returned by the function is used to update the
                     15: **     ``extime'' field in the shares record.
                     16: */ 
                     17: 
                     18: #include       <shares.h>
                     19: 
                     20: 
                     21: unsigned long
                     22: getshput(lp, func)
                     23:        struct lnode *  lp;
                     24:        unsigned long   (*func)();
                     25: {
                     26:        unsigned long   ri;
                     27:        struct lnode    p;
                     28: 
                     29:        (void)getshares(&p, lp->l_uid, 1);
                     30: 
                     31:        if ( (ri = (*func)(lp, &p)) != 0 )
                     32:                if ( putshares(&p, ri) <= 0 )
                     33:                        return 0;
                     34: 
                     35:        return ri;
                     36: }

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