mirror of
https://github.com/vishapoberon/vipak.git
synced 2026-04-05 20:42:26 +00:00
Code is written, nothing works
This commit is contained in:
parent
7a05c9b3e8
commit
344c0f0aa7
10 changed files with 176 additions and 42 deletions
32
PackageResolver.Mod
Normal file
32
PackageResolver.Mod
Normal file
|
|
@ -0,0 +1,32 @@
|
|||
MODULE PackageResolver;
|
||||
IMPORT FileManager, http, Strings;
|
||||
|
||||
CONST ArrayMaxNumber = 10000;
|
||||
|
||||
PROCEDURE *Resolve(remoteURL, port, packageName, version : ARRAY OF CHAR);
|
||||
BEGIN
|
||||
|
||||
END Resolve;
|
||||
|
||||
PROCEDURE ResolveFile *(host, port, packageName, version, fileName : ARRAY OF CHAR; VAR returnValue : ARRAY OF CHAR);
|
||||
VAR
|
||||
filePath: ARRAY ArrayMaxNumber OF CHAR;
|
||||
BEGIN
|
||||
filePath := "";
|
||||
Strings.Append("/", filePath);
|
||||
Strings.Append(packageName, filePath);
|
||||
Strings.Append("/", filePath);
|
||||
Strings.Append(version, filePath);
|
||||
Strings.Append("/", filePath);
|
||||
Strings.Append(fileName, filePath);
|
||||
|
||||
http.get(host, port, filePath, returnValue);
|
||||
|
||||
(* TODO: introduce write to file functionality *)
|
||||
(* FileManager.CreateDirectory(packageName); *)
|
||||
(* FileManager.Write(packageName + fileName, returnValue); *)
|
||||
|
||||
END ResolveFile;
|
||||
|
||||
|
||||
END PackageResolver.
|
||||
Loading…
Add table
Add a link
Reference in a new issue