mirror of
https://github.com/vishapoberon/vipak.git
synced 2026-04-05 20:42:26 +00:00
freebsd makefile and vpkFiles.
This commit is contained in:
Norayr Chilingarian
parent
8762f456a6
commit
dd610c89eb
4 changed files with 261 additions and 5 deletions
11
makefile
11
makefile
|
|
@ -12,6 +12,7 @@ VIPACK = vipack
|
|||
|
||||
|
||||
all: deps
|
||||
|
||||
#git submodule init
|
||||
#git submodule update
|
||||
mkdir -p $(build_dir_path)
|
||||
|
|
@ -23,7 +24,7 @@ all: deps
|
|||
cd $(build_dir_path) && \
|
||||
$(VOC) -s \
|
||||
../src/vpkSettings.Mod \
|
||||
../src/unix/vpkFiles.Mod \
|
||||
../src/unix/vpkLinuxFiles.Mod \
|
||||
../src/unix/vpkTime.Mod \
|
||||
../src/vpkLogger.Mod \
|
||||
../src/vpkHttp.Mod \
|
||||
|
|
@ -44,10 +45,10 @@ all: deps
|
|||
deps:
|
||||
mkdir -p $(mkfile_dir_path)/$(DPS)
|
||||
cd $(mkfile_dir_path)/$(DPS)
|
||||
test ! -d Internet && git clone https://github.com/norayr/Internet
|
||||
test ! -d lists && git clone https://github.com/norayr/lists
|
||||
test ! -d opts && git clone https://github.com/norayr/opts
|
||||
test ! -d time && git clone https://github.com/norayr/time
|
||||
test -d Internet && cd Internet; git pull || git clone https://github.com/norayr/Internet
|
||||
test -d lists && cd lists; git pull || git clone https://github.com/norayr/lists
|
||||
test -d opts && cd opts; git pull || git clone https://github.com/norayr/opts
|
||||
test -d time && cd time; git pull || git clone https://github.com/norayr/time
|
||||
|
||||
tests:
|
||||
mkdir -p $(mkfile_dir_path)/$(BLD)
|
||||
|
|
|
|||
64
makefile_freebsd
Normal file
64
makefile_freebsd
Normal file
|
|
@ -0,0 +1,64 @@
|
|||
mkfile_path := $(abspath $(lastword $(MAKEFILE_LIST)))
|
||||
mkfile_dir_path := $(shell dirname $(realpath $(firstword $(MAKEFILE_LIST))))
|
||||
build_dir_path := $(mkfile_dir_path)/build
|
||||
current_dir := $(notdir $(patsubst %/,%,$(dir $(mkfile_path))))
|
||||
BLD := $(mkfile_dir_path)/build
|
||||
|
||||
VOC = voc
|
||||
VERSION_FILE = ./VersionFile.json
|
||||
BLD = build
|
||||
DPS = dps
|
||||
VIPACK = vipack
|
||||
|
||||
|
||||
all: deps
|
||||
|
||||
#git submodule init
|
||||
#git submodule update
|
||||
mkdir -p $(build_dir_path)
|
||||
cd $(build_dir_path)
|
||||
make -f $(mkfile_dir_path)/dps/lists/makefile BUILD=$(build_dir_path)
|
||||
make -f $(mkfile_dir_path)/dps/Internet/makefile BUILD=$(build_dir_path)
|
||||
make -f $(mkfile_dir_path)/dps/time/makefile BUILD=$(build_dir_path)
|
||||
make -f $(mkfile_dir_path)/dps/opts/makefile BUILD=$(build_dir_path)
|
||||
cd $(build_dir_path) && \
|
||||
$(VOC) -s \
|
||||
../src/vpkSettings.Mod \
|
||||
../src/unix/vpkFreeBSDFiles.Mod \
|
||||
../src/unix/vpkTime.Mod \
|
||||
../src/vpkLogger.Mod \
|
||||
../src/vpkHttp.Mod \
|
||||
../src/unix/vpkEnv.Mod \
|
||||
../src/unix/vpkGit.Mod \
|
||||
../src/vpkCharacterStack.Mod \
|
||||
../src/vpkJsonParser.Mod \
|
||||
../src/vpkConf.Mod \
|
||||
../src/vpkStorage.Mod \
|
||||
../src/vpkSyncer.Mod \
|
||||
../src/vpkdepTree.Mod \
|
||||
../src/vpkDot.Mod \
|
||||
../src/vpkResolver.Mod \
|
||||
../src/vpkJsonDepRetriever.Mod \
|
||||
../src/vpkInstaller.Mod \
|
||||
../src/vipack.Mod -m
|
||||
|
||||
deps:
|
||||
mkdir -p $(mkfile_dir_path)/$(DPS)
|
||||
cd $(mkfile_dir_path)/$(DPS)
|
||||
test -d Internet && cd Internet; git pull || git clone https://github.com/norayr/Internet
|
||||
test -d lists && cd lists; git pull || git clone https://github.com/norayr/lists
|
||||
test -d opts && cd opts; git pull || git clone https://github.com/norayr/opts
|
||||
test -d time && cd time; git pull || git clone https://github.com/norayr/time
|
||||
|
||||
tests:
|
||||
mkdir -p $(mkfile_dir_path)/$(BLD)
|
||||
cd $(mkfile_dir_path)/$(BLD)
|
||||
$(VOC) -s ../src/unix/vpkFiles.Mod ../tst/testFiles.Mod -m
|
||||
cd $(BLD) && $(VOC) -s ../src/vpkJsonParser.Mod ../tst/testJsonParser.Mod -m
|
||||
mkfifo /tmp/fifo
|
||||
$(BLD)/testFiles
|
||||
rm /tmp/fifo
|
||||
$(BLD)/testJsonParser
|
||||
|
||||
clean:
|
||||
if [ -d "$(BLD)" ]; then rm -rf $(BLD); fi
|
||||
191
src/unix/vpkFreeBSDFiles.Mod
Normal file
191
src/unix/vpkFreeBSDFiles.Mod
Normal file
|
|
@ -0,0 +1,191 @@
|
|||
MODULE vpkFiles;
|
||||
IMPORT SYSTEM;
|
||||
|
||||
CONST
|
||||
dir* = 0; char* = 1; block* = 2; file* = 3; fifo* = 4;
|
||||
symlink* = 5; socket* = 6;
|
||||
|
||||
TYPE
|
||||
fileInfo* = RECORD;
|
||||
name* : ARRAY 256 OF CHAR;
|
||||
attr- : SET
|
||||
END;
|
||||
|
||||
(* https://github.com/vishaps/voc/blob/4bebc891a4d0d1184d74134908bdc1a91e3ad5be/src/lib/system/freebsd/clang/x86_64/Unix.Mod
|
||||
from output of cpp /usr/include/sys/stat.h
|
||||
struct stat {
|
||||
__dev_t st_dev;
|
||||
ino_t st_ino;
|
||||
mode_t st_mode;
|
||||
nlink_t st_nlink;
|
||||
uid_t st_uid;
|
||||
gid_t st_gid;
|
||||
__dev_t st_rdev;
|
||||
struct timespec st_atim;
|
||||
struct timespec st_mtim;
|
||||
struct timespec st_ctim;
|
||||
off_t st_size;
|
||||
blkcnt_t st_blocks;
|
||||
blksize_t st_blksize;
|
||||
fflags_t st_flags;
|
||||
__uint32_t st_gen;
|
||||
__int32_t st_lspare;
|
||||
struct timespec st_birthtim;
|
||||
# 148 "/usr/include/sys/stat.h"
|
||||
unsigned int :(8 / 2) * (16 - (int)sizeof(struct timespec));
|
||||
unsigned int :(8 / 2) * (16 - (int)sizeof(struct timespec));
|
||||
};
|
||||
sizes on freebsd 64 bit
|
||||
short int 2
|
||||
int 4
|
||||
long 8
|
||||
long int 8
|
||||
size_t 8
|
||||
dev_t 4
|
||||
ino_t 4
|
||||
mode_t 2
|
||||
nlink_t 2
|
||||
uid_t 4
|
||||
gid_t 4
|
||||
off_t 8
|
||||
blksize_t 4
|
||||
blkcnt_t 8
|
||||
time_t 8
|
||||
fflags_t 4
|
||||
__uint32_t 4
|
||||
__int32_t 4
|
||||
*)
|
||||
Status* = RECORD (* struct stat *)
|
||||
dev* : INTEGER; (* dev_t 4 *)
|
||||
ino* : INTEGER; (* ino_t 4 *)
|
||||
mode*: SHORTINT; mode1*: SHORTINT; (* mode_t 2 *)
|
||||
nlink* : SHORTINT; nlink1*: SHORTINT; (* nlink_t 2 *)
|
||||
uid*, gid*: INTEGER; (* uid_t, gid_t 4 *)
|
||||
rdev*: INTEGER; (* dev_t 4 *)
|
||||
atime* : LONGINT; atimences* : LONGINT; (* struct timespec 16 *)
|
||||
mtime* : LONGINT; mtimences* : LONGINT; (* struct timespec 16 *)
|
||||
ctime* : LONGINT; ctimences* : LONGINT; (* struct timespec 16 *)
|
||||
size*: LONGINT; (* off_t 8 *)
|
||||
blocks* : LONGINT;
|
||||
blksize* : INTEGER;
|
||||
flags* : INTEGER;
|
||||
gen* : INTEGER;
|
||||
lspare* : INTEGER;
|
||||
birthtime* : LONGINT; birthtimences* : LONGINT; (* struct timespec 16 *)
|
||||
END ;
|
||||
(*
|
||||
Status = RECORD (* struct stat *)
|
||||
dev* : HUGEINT; (* dev_t 8 *)
|
||||
ino* : HUGEINT; (* ino 8 *)
|
||||
nlink* : HUGEINT;
|
||||
mode* : LONGINT;
|
||||
uid*, gid*: LONGINT;
|
||||
pad0* : LONGINT;
|
||||
rdev* : HUGEINT;
|
||||
size* : HUGEINT;
|
||||
blksize* : HUGEINT;
|
||||
blocks* : HUGEINT;
|
||||
atime* : HUGEINT;
|
||||
atimences* : HUGEINT;
|
||||
mtime* : HUGEINT;
|
||||
mtimensec* : HUGEINT;
|
||||
ctime* : HUGEINT;
|
||||
ctimensec* : HUGEINT;
|
||||
unused0*, unused1*, unused2*: HUGEINT;
|
||||
END;
|
||||
*)
|
||||
PROCEDURE -Aincludesysstat '#include <sys/stat.h>';
|
||||
PROCEDURE -Aincludesystypes '#include <sys/types.h>';
|
||||
|
||||
PROCEDURE -mkdir(VAR path: ARRAY OF CHAR): INTEGER
|
||||
"(int)mkdir(path, 0755)";
|
||||
|
||||
PROCEDURE mkDir*(VAR path: ARRAY OF CHAR): BOOLEAN;
|
||||
VAR res: INTEGER;
|
||||
BEGIN
|
||||
res := mkdir(path);
|
||||
IF res = 0 THEN RETURN TRUE ELSE RETURN FALSE END
|
||||
END mkDir;
|
||||
|
||||
PROCEDURE -stat(VAR path : ARRAY OF CHAR; st: Status): INTEGER
|
||||
"stat((const char*)path, (struct stat*)&st)";
|
||||
|
||||
PROCEDURE -isDir(mode: LONGINT): INTEGER
|
||||
"S_ISDIR(mode)";
|
||||
|
||||
PROCEDURE -isChar(mode: LONGINT): INTEGER
|
||||
"S_ISCHR(mode)";
|
||||
|
||||
PROCEDURE -isBlock(mode: LONGINT): INTEGER
|
||||
"S_ISBLK(mode)";
|
||||
|
||||
PROCEDURE -isReg(mode: LONGINT): INTEGER
|
||||
"S_ISREG(mode)";
|
||||
|
||||
PROCEDURE -isFIFO(mode: LONGINT): INTEGER
|
||||
"S_ISFIFO(mode)";
|
||||
|
||||
PROCEDURE -isLnk(mode: LONGINT): INTEGER
|
||||
"S_ISLNK(mode)";
|
||||
|
||||
PROCEDURE -isSock(mode: LONGINT): INTEGER
|
||||
"S_ISSOCK(mode)";
|
||||
|
||||
PROCEDURE Exists*(VAR fl : fileInfo): BOOLEAN;
|
||||
VAR
|
||||
i : INTEGER;
|
||||
st: Status;
|
||||
BEGIN
|
||||
fl.attr := {};
|
||||
i := stat(fl.name, st);
|
||||
IF i < 0 THEN RETURN FALSE END;
|
||||
IF i = 0 THEN (* file exists*)
|
||||
i := isDir(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {dir} END;
|
||||
i := isChar(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {char} END;
|
||||
i := isBlock(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {block} END;
|
||||
i := isReg(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {file} END;
|
||||
i := isFIFO(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {fifo} END;
|
||||
i := isLnk(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {symlink} END;
|
||||
i := isSock(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {socket} END;
|
||||
RETURN TRUE
|
||||
END;
|
||||
END Exists;
|
||||
|
||||
PROCEDURE ExistsByName*(VAR fileName : ARRAY OF CHAR): BOOLEAN;
|
||||
VAR
|
||||
i : INTEGER;
|
||||
st: Status;
|
||||
fl: fileInfo;
|
||||
BEGIN
|
||||
fl.attr := {};
|
||||
COPY(fileName, fl.name);
|
||||
i := stat(fl.name, st);
|
||||
IF i < 0 THEN RETURN FALSE END;
|
||||
IF i = 0 THEN (* file exists*)
|
||||
i := isDir(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {dir} END;
|
||||
i := isChar(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {char} END;
|
||||
i := isBlock(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {block} END;
|
||||
i := isReg(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {file} END;
|
||||
i := isFIFO(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {fifo} END;
|
||||
i := isLnk(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {symlink} END;
|
||||
i := isSock(st.mode);
|
||||
IF i # 0 THEN fl.attr := fl.attr + {socket} END;
|
||||
RETURN TRUE
|
||||
END;
|
||||
END ExistsByName;
|
||||
|
||||
|
||||
END vpkFiles.
|
||||
Loading…
Add table
Add a link
Reference in a new issue