File Manager

003 File Manager

Current Path: /usr/src/contrib/lua/src

usr / src / contrib / lua / src /

📁 ..
📄 Makefile(7.34 KB)
📄 lapi.c(34.08 KB)
📄 lapi.h(1.27 KB)
📄 lauxlib.c(30.94 KB)
📄 lauxlib.h(8.64 KB)
📄 lbaselib.c(14.44 KB)
📄 lcode.c(49.85 KB)
📄 lcode.h(3.71 KB)
📄 lcorolib.c(4.57 KB)
📄 lctype.c(2.4 KB)
📄 lctype.h(2.07 KB)
📄 ldblib.c(12.94 KB)
📄 ldebug.c(24.61 KB)
📄 ldebug.h(1.87 KB)
📄 ldo.c(27.19 KB)
📄 ldo.h(2.77 KB)
📄 ldump.c(4.66 KB)
📄 lfunc.c(8.95 KB)
📄 lfunc.h(1.72 KB)
📄 lgc.c(54.47 KB)
📄 lgc.h(5.87 KB)
📄 linit.c(1.58 KB)
📄 liolib.c(21.25 KB)
📄 ljumptab.h(1.62 KB)
📄 llex.c(16.38 KB)
📄 llex.h(2.35 KB)
📄 llimits.h(8.72 KB)
📄 lmathlib.c(18.43 KB)
📄 lmem.c(5.83 KB)
📄 lmem.h(3.29 KB)
📄 loadlib.c(22.39 KB)
📄 lobject.c(18.45 KB)
📄 lobject.h(21.49 KB)
📄 lopcodes.c(4.03 KB)
📄 lopcodes.h(12.38 KB)
📄 lopnames.h(1.12 KB)
📄 loslib.c(11.53 KB)
📄 lparser.c(54.72 KB)
📄 lparser.h(5.8 KB)
📄 lprefix.h(828 B)
📄 lstate.c(10.73 KB)
📄 lstate.h(13.24 KB)
📄 lstring.c(7.32 KB)
📄 lstring.h(1.57 KB)
📄 lstrlib.c(52.83 KB)
📄 ltable.c(29.89 KB)
📄 ltable.h(1.92 KB)
📄 ltablib.c(12.82 KB)
📄 ltm.c(7.97 KB)
📄 ltm.h(2.84 KB)
📄 lua.c(18.46 KB)
📄 lua.h(15.4 KB)
📄 lua.hpp(191 B)
📄 luac.c(14.79 KB)
📄 luaconf.h.dist(20.27 KB)
📄 lualib.h(1.16 KB)
📄 lundump.c(7.68 KB)
📄 lundump.h(863 B)
📄 lutf8lib.c(7.9 KB)
📄 lvm.c(55.76 KB)
📄 lvm.h(4.25 KB)
📄 lzio.c(1.29 KB)
📄 lzio.h(1.4 KB)

Editing: lzio.c

/*
** $Id: lzio.c $
** Buffered streams
** See Copyright Notice in lua.h
*/

#define lzio_c
#define LUA_CORE

#include "lprefix.h"

#include <string.h>

#include "lua.h"

#include "llimits.h"
#include "lmem.h"
#include "lstate.h"
#include "lzio.h"

int luaZ_fill (ZIO *z) {
  size_t size;
  lua_State *L = z->L;
  const char *buff;
  lua_unlock(L);
  buff = z->reader(L, z->data, &size);
  lua_lock(L);
  if (buff == NULL || size == 0)
    return EOZ;
  z->n = size - 1;  /* discount char being returned */
  z->p = buff;
  return cast_uchar(*(z->p++));
}

void luaZ_init (lua_State *L, ZIO *z, lua_Reader reader, void *data) {
  z->L = L;
  z->reader = reader;
  z->data = data;
  z->n = 0;
  z->p = NULL;
}

/* --------------------------------------------------------------- read --- */
size_t luaZ_read (ZIO *z, void *b, size_t n) {
  while (n) {
    size_t m;
    if (z->n == 0) {  /* no bytes in buffer? */
      if (luaZ_fill(z) == EOZ)  /* try to read more */
        return n;  /* no more input; return number of missing bytes */
      else {
        z->n++;  /* luaZ_fill consumed first byte; put it back */
        z->p--;
      }
    }
    m = (n <= z->n) ? n : z->n;  /* min. between n and z->n */
    memcpy(b, z->p, m);
    z->n -= m;
    z->p += m;
    b = (char *)b + m;
    n -= m;
  }
  return 0;
}

003 File Manager

Editing: lzio.c

Upload File

Create Folder