Subversion Repositories Kolibri OS

Compare Revisions

No changes between revisions

Regard whitespace Rev 5736 → Rev 5737

/contrib/other/kpm/kpm.c
1,153 → 1,96
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <sys/stat.h>
#include <sys/unistd.h>
#include <fcntl.h>
#include <kos32sys.h>
#include <sys/kos_io.h>
 
#include "getopt.h"
#include "package.h"
#include "http.h"
 
#define BUFFSIZE (64*1024)
 
char conbuf[256];
extern char conbuf[256];
 
char *make_url(const char *name)
{
static char url_buf[128] = "http://ftp.kolibrios.org/users/Serge/new/OS/";
strcpy(&url_buf[44], name);
return url_buf;
};
#define OPTION_STD_BASE 150
 
char *make_tmp_path(const char *path)
enum option_values
{
static char path_buf[64] = "/tmp0/1/";
strcpy(&path_buf[8], path);
return path_buf;
OPTION_HELP = OPTION_STD_BASE,
OPTION_LIST_PACKAGES,
OPTION_LIST_INSTALLED
};
 
char *make_cache_path(const char *path)
static const struct option longopts[] =
{
static char path_buf[64] = "/kolibrios/kpm/cache/";
strcpy(&path_buf[21], path);
return path_buf;
{"list-packages", no_argument, NULL, OPTION_LIST_PACKAGES},
{"list-installed",no_argument, NULL, OPTION_LIST_INSTALLED},
{NULL,0,NULL,0}
};
 
int http_load_file(const char *path, const char *url)
int main(int argc, char *argv[])
{
http_t *http;
int received = 0;
int offset = 0;
int tail;
char *buf;
int fd;
int i;
LIST_HEAD(server_list);
LIST_HEAD(download_list);
LIST_HEAD(cache_list);
LIST_HEAD(local_list);
LIST_HEAD(task_list);
 
buf = user_alloc(BUFFSIZE);
for(i = 0; i < 16; i++)
buf[i*4096] = 0;
int count;
char *cache_path;
char *tmp_path;
 
fd = open(path, O_CREAT|O_WRONLY);
if(fd == -1)
{
user_free(buf);
return 0;
};
if(http_init())
goto err_init;
 
http = http_get(url, NULL,FLAG_STREAM|FLAG_REUSE_BUFFER, NULL);
if(http == NULL)
goto err_get;
set_cwd("/tmp0/1");
 
do
{
if(http_receive_with_retry(http, 500) == 0)
{
int count;
con_init(80, 25, 80, 250, "Kolibri package manager");
 
// if(http->flags & 0xffff0000)
// break;
tmp_path = make_tmp_path("packages.xml");
 
count = http->content_received - received;
if(count+offset <= BUFFSIZE)
{
memcpy(buf+offset, http->content_ptr, count);
offset+= count;
- else
- {
- tail = count+offset-BUFFSIZE;
- count = BUFFSIZE - offset;
+ count = http_load_file(tmp_path, make_url("packages.xml"));
+
if(count)
- {
- memcpy(buf+offset, http->content_ptr, count);
- offset = 0;
- };
+ build_server_list(&server_list, tmp_path);
- write(fd, buf, BUFFSIZE);
-
- if(tail)
+ while(1)
{
- memcpy(buf, http->content_ptr+count, tail);
- offset = tail;
- }
+ int val;
+ int index;
- sprintf(conbuf, "%d bytes loaded\r", http->content_received);
- con_write_asciiz(conbuf);
+ val = getopt_long_only(argc, argv,"",longopts, &index);
- }
- received = http->content_received;
- }
- else break;
+ if(val == -1)
+ break;
- }while( (http->flags & FLAG_GOT_ALL_DATA) == 0);
-
- if(offset)
+ switch(val)
{
- write(fd, buf, offset);
- }
+ case OPTION_LIST_PACKAGES:
+ sprintf(conbuf,"available packages:\n\n");
+ con_write_asciiz(conbuf);
+ print_pkg_list(&server_list);
+ con_exit(0);
+ return 0;
-// ftruncate(fd, received);
- close(fd);
+ case OPTION_LIST_INSTALLED:
+ sprintf(conbuf,"installed packages:\n\n");
+ con_write_asciiz(conbuf);
+ print_pkg_list(&local_list);
+ con_exit(0);
+ return 0;
- if(http->content_ptr)
- user_free(http->content_ptr);
- http_free(http);
-
- user_free(buf);
-
- return received;
-
-err_get:
- printf("HTTP GET failed\n");
- return received;
+ default:
+ break;
}
+ };
-int main(int argc, char *argv[])
+#if 0
{
- int count;
- char *cache_path;
- char *tmp_path;
-
- if(http_init())
- goto err_init;
-
- con_init(80, 25, 80, 250, "Kolibri package manager");
-
- tmp_path = make_tmp_path("packages.xml");
-
- count = http_load_file(tmp_path, make_url("packages.xml"));
-
- if(count)
- {
- collection_t *collection;
package_t *pkg;
LIST_HEAD(install_list);
LIST_HEAD(download_list);
- collection = load_collection_file(tmp_path);
-
if(collection && build_install_list(&install_list, collection))
{
if(build_download_list(&download_list, &install_list))
@@ -162,11 +105,10 @@
con_write_asciiz(conbuf);
};
- set_cwd("/tmp0/1");
-
do_install(&install_list);
};
}
+#endif
con_exit(0);
@@ -177,97 +119,6 @@
return -1;
}
-int build_install_list(list_t *list, collection_t *collection)
-{
- pkg_group_t *gr;
- int count = 0;
- list_for_each_entry(gr, &collection->groups, list)
- {
- package_t *pkg, *tmp;
- list_for_each_entry(tmp, &gr->packages, list)
- {
- pkg = (package_t*)malloc(sizeof(package_t));
- INIT_LIST_HEAD(&pkg->file_list);
- pkg->id = tmp->id;
- pkg->name = strdup(tmp->name);
- pkg->version = strdup(tmp->version);
- pkg->filename = strdup(tmp->filename);
- pkg->description = strdup(tmp->description);
- list_add_tail(&pkg->list, list);
- count++;
- }
- };
- return count;
-}
-
-int build_download_list(list_t *download, list_t *src)
-{
- int count = 0;
- char *cache_path;
- package_t *pkg, *tmp;
- fileinfo_t info;
- list_for_each_entry(tmp, src, list)
- {
- cache_path = make_cache_path(tmp->filename);
-
- if( get_fileinfo(cache_path, &info) != 0)
- {
- pkg = (package_t*)malloc(sizeof(package_t));
-
- INIT_LIST_HEAD(&pkg->file_list);
- pkg->id = tmp->id;
- pkg->name = strdup(tmp->name);
- pkg->version = strdup(tmp->version);
- pkg->filename = strdup(tmp->filename);
- pkg->description = strdup(tmp->description);
- list_add_tail(&pkg->list, download);
- count++;
- };
- }
- return count;
-};
-
-void do_download(list_t *download_list)
-{
- package_t *pkg, *tmp;
- char *cache_path;
- int count;
-
- list_for_each_entry_safe(pkg, tmp, download_list, list)
- {
- sprintf(conbuf,"package %s-%s\n", pkg->name, pkg->version);
- con_write_asciiz(conbuf);
- cache_path = make_cache_path(pkg->filename);
- count = http_load_file(cache_path, make_url(pkg->filename));
- sprintf(conbuf,"%s %d bytes loaded\n",cache_path, count);
- con_write_asciiz(conbuf);
- if( !test_archive(cache_path))
- list_del_pkg(pkg);
- else
- unlink(cache_path);
- };
-}
-
-void remove_missing_packages(list_t *install, list_t *missed)
-{
- package_t *mpkg, *mtmp, *ipkg, *itmp;
-
- list_for_each_entry_safe(mpkg, mtmp, missed, list)
- {
- list_for_each_entry_safe(ipkg, itmp, install, list)
- {
- if(ipkg->id == mpkg->id)
- {
- sprintf(conbuf,"skip missing package %s-%s\n", ipkg->name, ipkg->version);
- con_write_asciiz(conbuf);
- list_del_pkg(ipkg);
- };
- }
- list_del_pkg(mpkg);
- };
-};
-
-