/* Given an audio's file name, load lyrics from the default lyrics file name. */
void lyrics_autoload (const char *filename)
{
char *lyrics_filename, *extn;
assert (!raw_lyrics);
assert (lyrics_message);
if (filename == NULL) {
lyrics_message = "[No file playing!]";
return;
}
if (!options_get_bool ("AutoLoadLyrics")) {
lyrics_message = "[Lyrics not autoloaded!]";
return;
}
if (is_url (filename)) {
lyrics_message = "[Lyrics from URL is not supported!]";
return;
}
lyrics_filename = xstrdup (filename);
extn = ext_pos (lyrics_filename);
if (extn) {
*--extn = '\0';
raw_lyrics = lyrics_load_file (lyrics_filename);
}
else
lyrics_message = "[No lyrics file!]";
free (lyrics_filename);
}
static gboolean check_at(GtkText *gtktext, gint from_pos)
{
gint start, end;
gchar *buf;
if ( ! (buf = get_word_from_pos(gtktext, from_pos, &start, &end)) )
return FALSE;
if ( is_url(buf) )
{
if (highlight.pixel == 0)
{
/* add an entry for the highlight in the color map. */
GdkColormap *gc = gtk_widget_get_colormap(GTK_WIDGET(gtktext));
gdk_colormap_alloc_color(gc, &highlight, FALSE, TRUE);;
}
change_color(gtktext, start, end, &highlight);
return(TRUE);
}
else
{
change_color(gtktext, start, end, &(GTK_WIDGET(gtktext)->style->fg[0]));
return(FALSE);
}
}
int Key::import_file(const QString& File)
{
gnutls_datum_t contents = { NULL, 0 };
if (File.isEmpty() == true) {
return -1;
}
if (this->imported != false) {
this->clear();
}
if (is_url(File) == true) {
this->url = File;
imported = true;
return 0;
}
/* normal file */
int ret = gnutls_load_file(File.toLatin1().data(), &contents);
if (ret < 0) {
this->last_err = gnutls_strerror(ret);
return -1;
}
ret = import_Key(this->w, &this->privkey, &contents);
gnutls_free(contents.data);
if (ret < 0) {
this->last_err = gnutls_strerror(ret);
return -1;
}
imported = true;
return 0;
}
static FILE * xfopen(char const * identifier, char const * mode, lsx_io_type * io_type)
{
*io_type = lsx_io_file;
if (*identifier == '|') {
FILE * f = NULL;
#ifdef HAVE_POPEN
#ifndef POPEN_MODE
#define POPEN_MODE "r"
#endif
f = popen(identifier + 1, POPEN_MODE);
*io_type = lsx_io_pipe;
#else
lsx_fail("this build of SoX cannot open pipes");
#endif
return f;
}
else if (is_url(identifier)) {
FILE * f = NULL;
#ifdef HAVE_POPEN
char const * const command_format = "wget --no-check-certificate -q -O- \"%s\"";
char * command = lsx_malloc(strlen(command_format) + strlen(identifier));
sprintf(command, command_format, identifier);
f = popen(command, POPEN_MODE);
free(command);
*io_type = lsx_io_url;
#else
lsx_fail("this build of SoX cannot open URLs");
#endif
return f;
}
return fopen(identifier, mode);
}
static gboolean
test_local_cmdline(GApplication * application,
gchar *** arguments, gint * exit_status)
{
TrgGtkAppPrivate *priv = GET_PRIVATE(application);
gchar **argv;
gchar *cwd = g_get_current_dir();
gchar *tmp;
gint i;
argv = *arguments;
shift_args(argv, 0);
i = 0;
while (argv[i]) {
if (is_minimised_arg(argv[i])) {
shift_args(argv, i);
priv->min_start = TRUE;
} else if (!is_url(argv[i]) && !is_magnet(argv[i])
&& g_file_test(argv[i], G_FILE_TEST_IS_REGULAR)
&& !g_path_is_absolute(argv[i])) {
tmp = g_build_path(G_DIR_SEPARATOR_S, cwd, argv[i], NULL);
g_free(argv[i]);
argv[i] = tmp;
}
i++;
}
*exit_status = 0;
g_free(cwd);
return FALSE;
}
int
exec_add(int argc, char **argv)
{
struct pkgdb *db = NULL;
struct sbuf *failedpkgs = sbuf_new_auto();
char path[MAXPATHLEN + 1];
char *file;
int retcode = EPKG_OK;
int i;
int failedpkgcount = 0;
struct pkg *p = NULL;
if (argc < 2) {
usage_add();
return (EX_USAGE);
}
if (geteuid() != 0) {
warnx("adding packages can only be done as root");
return (EX_NOPERM);
}
if (pkgdb_open(&db, PKGDB_DEFAULT) != EPKG_OK) {
return (EX_IOERR);
}
for (i = 1; i < argc; i++) {
if (is_url(argv[i]) == EPKG_OK) {
snprintf(path, sizeof(path), "./%s", basename(argv[i]));
if ((retcode = pkg_fetch_file(argv[i], path)) != EPKG_OK)
break;
file = path;
} else
file = argv[i];
pkg_open(&p, file, NULL);
if ((retcode = pkg_add(db, file, 0)) != EPKG_OK) {
sbuf_cat(failedpkgs, argv[i]);
if (i != argc - 1)
sbuf_printf(failedpkgs, ", ");
failedpkgcount++;
}
}
pkgdb_close(db);
if(failedpkgcount > 0) {
sbuf_finish(failedpkgs);
printf("Failed to install the following %d package(s): %s.\n", failedpkgcount, sbuf_data(failedpkgs));
}
sbuf_delete(failedpkgs);
return (retcode == EPKG_OK ? EX_OK : EX_SOFTWARE);
}
int read_file_list(const char *file_list,int *n,char **argv[])
{
char buf[MAX_PATH_LEN];
int len, nfiles = 0;
char **files = NULL;
struct stat sb;
*n = 0;
*argv = NULL;
FILE *fh = fopen(file_list,"r");
if ( !fh )
{
fprintf(stderr,"%s: %s\n", file_list,strerror(errno));
return 1;
}
files = (char**) calloc(nfiles,sizeof(char*));
nfiles = 0;
while ( fgets(buf,MAX_PATH_LEN,fh) )
{
// allow empty lines and trailing spaces
len = strlen(buf);
while ( len>0 && isspace(buf[len-1]) ) len--;
if ( !len ) continue;
// check sanity of the file list
buf[len] = 0;
if (! (is_url(buf) || stat(buf, &sb) == 0))
{
// no such file, check if it is safe to print its name
int i, safe_to_print = 1;
for (i=0; i<len; i++)
if (!isprint(buf[i])) { safe_to_print = 0; break; }
if ( safe_to_print )
fprintf(stderr,"The file list \"%s\" appears broken, could not locate: %s\n", file_list,buf);
else
fprintf(stderr,"Does the file \"%s\" really contain a list of files and do all exist?\n", file_list);
return 1;
}
nfiles++;
files = (char**) realloc(files,nfiles*sizeof(char*));
files[nfiles-1] = strdup(buf);
}
fclose(fh);
if ( !nfiles )
{
fprintf(stderr,"No files read from %s\n", file_list);
return 1;
}
*argv = files;
*n = nfiles;
return 0;
}
/* Return 1 if the file is a directory, 0 if not, -1 on error. */
int is_dir (const char *file)
{
struct stat file_stat;
if (is_url (file))
return 0;
if (stat(file, &file_stat) == -1) {
error ("Can't stat %s: %s", file, strerror(errno));
return -1;
}
return S_ISDIR(file_stat.st_mode) ? 1 : 0;
}
int Cert::import_file(const QString& File)
{
if (File.isEmpty() == true) {
return -1;
}
if (this->imported != false) {
this->clear();
}
if (is_url(File)) {
gnutls_x509_crt_init(&this->crt);
int ret = gnutls_x509_crt_import_pkcs11_url(this->crt, File.toLatin1().data(), 0);
if (ret < 0) {
ret = gnutls_x509_crt_import_pkcs11_url(this->crt,
File.toLatin1().data(),
GNUTLS_PKCS11_OBJ_FLAG_LOGIN);
}
if (ret < 0) {
this->last_err = gnutls_strerror(ret);
return -1;
}
this->imported = true;
return 0;
}
/* normal file */
gnutls_datum_t contents = { nullptr, 0 };
int ret = gnutls_load_file(File.toLatin1().data(), &contents);
if (ret < 0) {
this->last_err = gnutls_strerror(ret);
return -1;
}
ret = import_cert(&this->crt, &contents, 0);
gnutls_free(contents.data);
if (ret < 0) {
this->last_err = gnutls_strerror(ret);
return -1;
}
this->imported = true;
return 0;
}
int main(int argc, char ** argv) {
int exit_code = EXIT_SUCCESS;
int longindex;
int opt;
static struct option long_options[] = {
{"version", no_argument, 0, 'v'},
{"help", no_argument, 0, 'h'},
{0,0,0,0}
};
while (-1 != (opt = getopt_long(argc, argv, SHORT_OPTS, long_options, &longindex))) {
switch (opt) {
case 'h':
print_help();
return EXIT_SUCCESS;
case 'v':
printf("%s\n", PACKAGE_STRING);
return EXIT_SUCCESS;
}
}
if (argc != 3) {
print_help();
} else {
char *item_cache = argv[1];
char *tag = argv[2];
char real_tag[PATH_MAX];
//initialize_logging("/dev/null");
if (is_url(tag)) {
strncpy(real_tag, tag, PATH_MAX);
} else if (NULL == realpath(tag, real_tag)) {
fprintf(stderr, "Could not find path %s: %s", tag, strerror(errno));
return EXIT_FAILURE;
}
if (start_classifier(item_cache)) {
printf("Error starting the classifier");
} else {
exit_code = EXIT_FAILURE == classify_directory(engine, real_tag) ? classify_file(engine, real_tag) : EXIT_SUCCESS;
}
}
return exit_code;
}
enum file_type file_type (const char *file)
{
struct stat file_stat;
assert (file != NULL);
if (is_url(file))
return F_URL;
if (stat(file, &file_stat) == -1)
return F_OTHER; /* Ignore the file if stat() failed */
if (S_ISDIR(file_stat.st_mode))
return F_DIR;
if (is_sound_file(file))
return F_SOUND;
if (is_plist_file(file))
return F_PLAYLIST;
return F_OTHER;
}
int track_info_matches(struct track_info *ti, const char *text, unsigned int flags)
{
const char *artist = comments_get_val(ti->comments, "artist");
const char *album = comments_get_val(ti->comments, "album");
const char *title = comments_get_val(ti->comments, "title");
char **words;
int i, matched = 1;
words = get_words(text);
if (words[0] == NULL)
matched = 0;
for (i = 0; words[i]; i++) {
const char *word = words[i];
if ((flags & TI_MATCH_ARTIST && artist) ||
(flags & TI_MATCH_ALBUM && album) ||
(flags & TI_MATCH_TITLE && title)) {
if (flags & TI_MATCH_ARTIST && artist && u_strcasestr(artist, word))
continue;
if (flags & TI_MATCH_ALBUM && album && u_strcasestr(album, word))
continue;
if (flags & TI_MATCH_TITLE && title && u_strcasestr(title, word))
continue;
} else {
/* compare with url or filename without path */
char *filename = ti->filename;
if (!is_url(filename)) {
char *slash = strrchr(ti->filename, '/');
if (slash)
filename = slash + 1;
}
if (u_strcasestr_filename(filename, word))
continue;
}
matched = 0;
break;
}
free_str_array(words);
return matched;
}
JsonNode *torrent_add(gchar * target, gint flags)
{
JsonNode *root;
JsonObject *args;
gboolean isMagnet = is_magnet(target);
gboolean isUri = isMagnet || is_url(target);
gchar *encodedFile;
if (!isUri && !g_file_test(target, G_FILE_TEST_IS_REGULAR)) {
g_message("file \"%s\" does not exist.", target);
return NULL;
}
root = base_request(METHOD_TORRENT_ADD);
args = node_get_arguments(root);
if (isUri) {
json_object_set_string_member(args, PARAM_FILENAME, target);
} else {
encodedFile = trg_base64encode(target);
if (encodedFile) {
json_object_set_string_member(args, PARAM_METAINFO,
encodedFile);
g_free(encodedFile);
} else {
g_error("unable to base64 encode file \"%s\".", target);
return NULL;
}
}
json_object_set_boolean_member(args, PARAM_PAUSED,
(flags & TORRENT_ADD_FLAG_PAUSED));
if ((flags & TORRENT_ADD_FLAG_DELETE))
g_unlink(target);
return root;
}
auto detect_file_or_url( const fs::path & file, const fs::path & saveTo, double k ) {
auto isExists = fs::exists( file );
auto isUrl = is_url( file );
if ( !isExists && !isUrl ) {
std::cout << "File or directory " << file << " not is exists" << std::endl;
return -1;
}
auto outDir = saveTo.empty() ? ( file.has_parent_path() ? file.parent_path() : "./" ) : saveTo;
if ( !isUrl ) {
outDir /= file.stem();
}
if ( !fs::exists( outDir ) && !fs::create_directories( outDir ) ) {
std::cout << "Unable to create directory " << outDir << std::endl;
return -1;
}
std::cout << "Begin. k = " << k << "." << std::endl;
std::cout << "Input " << ( isUrl ? "url" : "file" ) << " is " << file << std::endl;
std::cout << "Files save to " << outDir << std::endl;
return detect( file.string(), outDir.string(), k );
}
/* Convert file path to absolute path;
* resulting string is allocated and must be freed afterwards. */
char *absolute_path (const char *path, const char *cwd)
{
char tmp[2*PATH_MAX];
char *result;
assert (path);
assert (cwd);
if(path[0] != '/' && !is_url(path)) {
strncpy (tmp, cwd, sizeof(tmp));
tmp[sizeof(tmp)-1] = 0;
resolve_path (tmp, sizeof(tmp), path);
result = (char *)xmalloc (sizeof(char) * (strlen(tmp)+1));
strcpy (result, tmp);
}
else {
result = (char *)xmalloc (sizeof(char) * (strlen(path)+1));
strcpy (result, path);
}
return result;
}
/*
* Extract protocol and relevant parts from the specified connection URL.
* The caller must free() the returned strings.
*/
static enum protocol parse_connect_url(const char *url_orig, char **ret_host,
char **ret_path)
{
char *url;
char *host, *path;
char *end;
int separator = '/';
enum protocol protocol = PROTO_LOCAL;
if (is_url(url_orig))
url = url_decode(url_orig);
else
url = xstrdup(url_orig);
host = strstr(url, "://");
if (host) {
*host = '\0';
protocol = get_protocol(url);
host += 3;
} else {
host = url;
if (!url_is_local_not_ssh(url)) {
protocol = PROTO_SSH;
separator = ':';
}
}
/*
* Don't do destructive transforms as protocol code does
* '[]' unwrapping in get_host_and_port()
*/
end = host_end(&host, 0);
if (protocol == PROTO_LOCAL)
path = end;
else if (protocol == PROTO_FILE && has_dos_drive_prefix(end))
path = end; /* "file://$(pwd)" may be "file://C:/projects/repo" */
else
path = strchr(end, separator);
if (!path || !*path)
die("No path specified. See 'man git-pull' for valid url syntax");
/*
* null-terminate hostname and point path to ~ for URL's like this:
* ssh://host.xz/~user/repo
*/
end = path; /* Need to \0 terminate host here */
if (separator == ':')
path++; /* path starts after ':' */
if (protocol == PROTO_GIT || protocol == PROTO_SSH) {
if (path[1] == '~')
path++;
}
path = xstrdup(path);
*end = '\0';
*ret_host = xstrdup(host);
*ret_path = path;
free(url);
return protocol;
}
HTStream *HTSaveToFile( HTPresentation *pres, HTParentAnchor *anchor, HTStream *sink )
{
int eax;
HTStream *ret_obj;
char fnam[256];
char *suffix;
char *cp;
int c = 0;
BOOLEAN IsBinary = 1;
ret_obj = calloc( 1, sizeof( HTStream ) );
if ( ret_obj == 0 )
outofmem( "./HTFWriter.c", "HTSaveToFile" );
ret_obj->isa->name[0] = HTFWriter.name;
*(int*)&ret_obj->remove_command = 0;
*(int*)&ret_obj->end_command = 0;
ret_obj->input_format = pres->rep->next;
ret_obj->output_format = pres->rep_out;
ret_obj->anchor = anchor;
ret_obj->sink = sink;
if ( dump_output_immediately )
{
ret_obj->fp = stdout;
if ( HTOutputFormat != HTAtom_for( "www/download" ) )
return ret_obj;
}
else
{
LYCancelDownload = 0;
if ( HTOutputFormat != HTAtom_for( "www/download" ) )
{
if ( traversal || ( no_download && !override_no_download && no_disk_save ) )
{
if ( traversal == 0 )
{
HTAlert( gettext( "This file cannot be displayed on this terminal." ) );
}
LYCancelDownload = 1;
if ( traversal )
LYCancelledFetch = 1;
if ( ret_obj )
{
free( ret_obj );
ret_obj = 0;
}
return 0;
}
else
{
cp = strchr( (char*)pres->rep_out, ';' );
if ( cp && strstr( &cp[1], "charset" ) )
{
mustshow = 1;
user_message( gettext( "%s D)ownload, or C)ancel" ), (char*)pres->rep_out );
while ( 1 )
{
switch ( c )
{
case -1:
if ( keymap[0] != 47 )
{
c = LYgetch_single( );
}
break;
default:
if ( c & 34816 )
{
if ( ( c & 255 ) != 47 )
continue;
}
else
if ( keymap[ ( c & 2047 ) + 1 ] != 47 )
continue;
break;
}
switch ( c )
{
case -1:
if ( keymap[0] == 47 )
{
mustshow = 1;
statusline( gettext( "Cancelling file." ) );
LYCancelDownload = 1;
if ( ret_obj )
{
free( ret_obj );
ret_obj = 0;
}
return 0;
}
break;
default:
if ( c & 34816 )
{
if ( ( c & 255 ) == 47 )
continue;
}
else
if ( keymap[ ( c & 2047 ) + 1 ] == 47 )
continue;
break;
}
}
}
else
if ( pres->rep_out->next )
{
mustshow = 1;
user_message( gettext( "%s D)ownload, or C)ancel" ), (char*)pres->rep_out );
}
else
{
mustshow = 1;
statusline( gettext( "This file cannot be displayed on this terminal: D)ownload, or C)ancel" ) );
}
}
}
if ( LYCachedTemp( fnam, &anchor->FileCache ) & 255 )
{
ret_obj->fp = LYOpenTempRewrite( fnam, ".bin", "wb" );
}
else
{
if ( strcasecomp( (char*)pres->rep_out, "text/html" ) == 0 )
suffix = ".html";
else
{
if ( strncasecomp( (char*)pres->rep_out, "text/", 5 ) == 0 )
suffix = ".txt";
else
{
if ( strncasecomp( (char*)pres->rep_out, "application/", 12 ) == 0 )
suffix = ".bin";
else
{
suffix = HTFileSuffix( &pres->rep->next, &anchor->content_encoding );
if ( suffix == 0 || suffix[0] != '.' )
suffix = ".html";
}
}
}
ret_obj->fp = LYOpenTemp( fnam, suffix, "wb" );
}
if ( ret_obj->fp == 0 )
{
HTAlert( gettext( "Can't open output file! Cancelling!" ) );
if ( ret_obj )
{
free( ret_obj );
ret_obj = 0;
}
return 0;
}
else
{
if ( strncasecomp( (char*)pres->rep_out, "text/", 5 ) == 0 || strcasecomp( (char*)pres->rep_out, "application/postscript" ) == 0 || strcasecomp( (char*)pres->rep_out, "application/x-RUNOFF-MANUAL" ) == 0 )
IsBinary = 0;
HTInfoMsg2( gettext( "Content-type: %s" ), (char*)pres->rep_out );
HTSACopy( &WWW_Download_File, fnam );
*(int*)&ret_obj->remove_command = 0;
HTAddParam( &ret_obj->remove_command, "%s", 1, fnam );
HTEndParam( &ret_obj->remove_command, "%s", 1 );
HTSACopy( &ret_obj->end_command, "SaveToFile" );
mustshow = 1;
statusline( gettext( "Retrieving file. - PLEASE WAIT -" ) );
HTSACopy( &anchor->FileCache, fnam );
}
}
if ( LYPrependBaseToSource && strncasecomp( (char*)pres->rep_out, "text/html", 9 ) == 0 && anchor->content_encoding == 0 )
{
char *temp = 0;
if ( anchor->content_base && anchor->content_base[0] )
HTSACopy( &temp, &anchor->content_base );
else
if ( anchor->content_location && anchor->content_location[0] )
HTSACopy( &temp, &anchor->content_location );
if ( temp )
{
LYRemoveBlanks( temp );
if ( !is_url( temp ) && temp )
{
free( temp );
temp = 0;
}
}
fprintf( &ret_obj->fp, "<!-- X-URL: %s -->\n", &anchor->address );
if ( anchor->date && anchor->date[0] )
{
fprintf( &ret_obj->fp, "<!-- Date: %s -->\n", &anchor->date );
if ( anchor->last_modified && anchor->last_modified[0] && strcmp( &anchor->last_modified, &anchor->date ) && strcmp( &anchor->last_modified, "Thu, 01 Jan 1970 00:00:01 GMT" ) )
fprintf( &ret_obj->fp, "<!-- Last-Modified: %s -->\n", &anchor->last_modified );
}
fprintf( &ret_obj->fp, "<BASE HREF=\"%s\">\n\n", temp ? temp : &anchor->address );
if ( temp )
{
free( temp );
}
}
if ( LYPrependCharsetToSource && strncasecomp( (char*)pres->rep_out, "text/html", 9 ) == 0 && anchor->content_encoding == 0 )
{
char *temp = 0;
if ( anchor->charset && anchor->charset[0] )
{
HTSACopy( &temp, &anchor->charset );
LYRemoveBlanks( temp );
fprintf( &ret_obj->fp, "<META HTTP-EQUIV=\"Content-Type\" CONTENT=\"text/html; charset=%s\">\n\n", temp );
}
if ( temp )
{
free( temp );
}
}
return ret_obj;
}
int
exec_add(int argc, char **argv)
{
struct pkgdb *db = NULL;
struct sbuf *failedpkgs = NULL;
char path[MAXPATHLEN];
char *file;
int retcode;
int ch;
int i;
int failedpkgcount = 0;
pkg_flags f = PKG_FLAG_NONE;
struct pkg_manifest_key *keys = NULL;
const char *location = NULL;
/* options descriptor */
struct option longopts[] = {
{ "no-scripts", no_argument, NULL, 'I' },
{ "automatic", no_argument, NULL, 'A' },
{ "force", no_argument, NULL, 'f' },
{ "accept-missing", no_argument, NULL, 'M' },
{ "quiet", no_argument, NULL, 'q' },
{ "relocate", required_argument, NULL, 1 },
{ NULL, 0, NULL, 0 }
};
while ((ch = getopt_long(argc, argv, "IAfqM", longopts, NULL)) != -1) {
switch (ch) {
case 'I':
f |= PKG_ADD_NOSCRIPT;
break;
case 'A':
f |= PKG_ADD_AUTOMATIC;
break;
case 'f':
f |= PKG_ADD_FORCE;
force = true;
break;
case 'M':
f |= PKG_ADD_FORCE_MISSING;
break;
case 'q':
quiet = true;
break;
case 1:
location = optarg;
break;
default:
usage_add();
return (EX_USAGE);
}
}
argc -= optind;
argv += optind;
if (argc < 1) {
usage_add();
return (EX_USAGE);
}
retcode = pkgdb_access(PKGDB_MODE_READ |
PKGDB_MODE_WRITE |
PKGDB_MODE_CREATE,
PKGDB_DB_LOCAL);
if (retcode == EPKG_ENOACCESS) {
warnx("Insufficient privileges to add packages");
return (EX_NOPERM);
} else if (retcode != EPKG_OK)
return (EX_IOERR);
if (pkgdb_open(&db, PKGDB_DEFAULT) != EPKG_OK)
return (EX_IOERR);
if (pkgdb_obtain_lock(db, PKGDB_LOCK_EXCLUSIVE) != EPKG_OK) {
pkgdb_close(db);
warnx("Cannot get an exclusive lock on a database, it is locked by another process");
return (EX_TEMPFAIL);
}
failedpkgs = sbuf_new_auto();
pkg_manifest_keys_new(&keys);
for (i = 0; i < argc; i++) {
if (is_url(argv[i]) == EPKG_OK) {
snprintf(path, sizeof(path), "%s/%s.XXXXX",
getenv("TMPDIR") != NULL ? getenv("TMPDIR") : "/tmp", basename(argv[i]));
if ((retcode = pkg_fetch_file(NULL, argv[i], path, 0)) != EPKG_OK)
break;
file = path;
} else {
file = argv[i];
/* Special case: treat a filename of "-" as
meaning 'read from stdin.' It doesn't make
sense to have a filename of "-" more than
once per command line, but we aren't
testing for that at the moment */
if (strcmp(file, "-") != 0 && access(file, F_OK) != 0) {
warn("%s", file);
if (errno == ENOENT)
warnx("Was 'pkg install %s' meant?", file);
sbuf_cat(failedpkgs, argv[i]);
if (i != argc - 1)
sbuf_printf(failedpkgs, ", ");
failedpkgcount++;
continue;
}
}
if ((retcode = pkg_add(db, file, f, keys, location)) != EPKG_OK) {
sbuf_cat(failedpkgs, argv[i]);
if (i != argc - 1)
sbuf_printf(failedpkgs, ", ");
failedpkgcount++;
}
if (is_url(argv[i]) == EPKG_OK)
unlink(file);
}
pkg_manifest_keys_free(keys);
pkgdb_release_lock(db, PKGDB_LOCK_EXCLUSIVE);
pkgdb_close(db);
if(failedpkgcount > 0) {
sbuf_finish(failedpkgs);
printf("\nFailed to install the following %d package(s): %s\n", failedpkgcount, sbuf_data(failedpkgs));
retcode = EPKG_FATAL;
}
sbuf_delete(failedpkgs);
if (messages != NULL) {
sbuf_finish(messages);
printf("%s", sbuf_data(messages));
}
return (retcode == EPKG_OK ? EX_OK : EX_SOFTWARE);
}
static GtkMenu *make_menu(gchar *url)
{
GtkWidget *menu, *item;
gchar *caption;
gchar *s = "http://";
gchar *cmd;
switch( is_url(url) )
{
case GTKURL_URL:
url = g_strdup_printf("%s", url);
break;
case GTKURL_HOST:
url = g_strdup_printf("%s%s", s, url);
break;
}
menu = gtk_menu_new();
caption = g_strdup_printf("%s", url);
item = gtk_menu_item_new_with_label(caption);
g_free(caption);
gtk_widget_set_sensitive( GTK_WIDGET(item), FALSE);
/* I'd like to make it so this item is never selectable, like
* the menu titles in the GNOME panel... unfortunately, the GNOME
* panel creates their own custom widget to do this! */
gtk_widget_show(item);
gtk_menu_append(GTK_MENU(menu), item);
item = gtk_menu_item_new();
gtk_widget_show(item);
gtk_menu_append(GTK_MENU(menu), item);
#ifdef GTKURL_USE_GNOME
item = gtk_menu_item_new_with_label(_("Open with GNOME URL Handler"));
gtk_signal_connect(GTK_OBJECT(item), "activate",
GTK_SIGNAL_FUNC(visit_url_gnome_cb), g_strdup(url) );
gtk_menu_append(GTK_MENU(menu), item);
gtk_widget_show(item);
#endif /* GTKURL_USE_GNOME */
item = gtk_menu_item_new_with_label(_("Open with Netscape (Existing)"));
cmd = g_strdup_printf("netscape -remote 'openURL(%s)'", url);
gtk_signal_connect(GTK_OBJECT(item), "activate",
GTK_SIGNAL_FUNC(visit_url_cmd_cb), g_strdup(cmd) );
g_free(cmd);
gtk_menu_append(GTK_MENU(menu), item);
gtk_widget_show(item);
item = gtk_menu_item_new_with_label(_("Open with Netscape (New Window)"));
cmd = g_strdup_printf("netscape -remote 'openURL(%s,new-window)'", url);
gtk_signal_connect(GTK_OBJECT(item), "activate",
GTK_SIGNAL_FUNC(visit_url_cmd_cb), g_strdup(cmd) );
g_free(cmd);
gtk_menu_append(GTK_MENU(menu), item);
gtk_widget_show(item);
item = gtk_menu_item_new_with_label(_("Open with Netscape (Run New)"));
cmd = g_strdup_printf("netscape %s", url);
gtk_signal_connect(GTK_OBJECT(item), "activate",
GTK_SIGNAL_FUNC(visit_url_cmd_cb), g_strdup(cmd) );
g_free(cmd);
gtk_menu_append(GTK_MENU(menu), item);
gtk_widget_show(item);
g_free(url);
return GTK_MENU(menu);
}
int LYShowInfo( DocInfo *doc, DocInfo *newdoc, char *owner_address )
{
int eax;
int edx;
static char tempfile[256];
int url_type;
FILE *fp0;
char *Title = 0;
char *cp;
char *temp = 0;
BOOLEAN LYInfoAdvanced = user_mode == 2;
struct stat dir_info;
static char *name;
if ( LYReuseTempfiles )
{
fp0 = LYOpenTempRewrite( tempfile, ".html", "w" );
}
else
{
LYRemoveTemp( tempfile );
fp0 = LYOpenTemp( tempfile, ".html", "w" );
}
if ( fp0 == 0 )
{
HTAlert( gettext( "Can't open temporary file!" ) );
return -1;
}
else
{
LYLocalFileToURL( &newdoc->address, tempfile );
if ( nlinks > 0 && links[ doc->link ] )
{
url_type = is_url( links[ doc->link ].lname );
switch ( url_type )
{
case 26:
case 27:
{
char *last_slash = strrchr( links[ doc->link ].lname, '/' );
int next_to_last = strlen( links[ doc->link ].lname ) + -1;
if ( next_to_last == last_slash - links[ doc->link ].lname )
links[ doc->link ].lname[ ebp_1152 ] = 0;
}
break;
}
}
label_columns = 9;
WriteInternalTitle( fp0, gettext( "Information about the current document" ) );
fprintf( fp0, "<h1>%s %s (%s) (<a href=\"%s\">%s</a>)", "Lynx", "2.8.7dev.11", LYVersionDate( ), "http://lynx.isc.org/current/", LYVersionStatus( ) );
fwrite( "</h1>\n", 1, 6, fp0 );
if ( lynx_edit_mode && nlinks > 0 )
{
fprintf( fp0, "<h2>%s</h2>\n<dl compact>", gettext( "Directory that you are currently viewing" ) );
temp = HTnameOfFile_WWW( &doc->address, 0, 1 );
dt_String( fp0, gettext( "Name:" ), temp );
if ( temp )
{
free( temp );
temp = 0;
}
dt_String( fp0, gettext( "URL:" ), &doc->address );
fwrite( "\n</dl>\n", 1, 7, fp0 );
temp = HTnameOfFile_WWW( links[ doc->link ].lname, 0, 1 );
if ( lstat64( temp, &dir_info.st_dev ) == -1 )
{
if ( WWW_TraceFlag )
{
fprintf( TraceFP( ), "lstat(%s) failed, errno=%d\n", temp, *(int*)(__errno_location( )) );
}
HTAlert( gettext( "Failed to obtain status of current link!" ) );
}
else
{
char modes[80];
label_columns = 16;
if ( ( dir_info.st_mode & 61440 ) == 16384 )
{
fprintf( fp0, "<h2>%s</h2>\n<dl compact>", gettext( "Directory that you have currently selected" ) );
}
else
if ( ( dir_info.st_mode & 61440 ) == 32768 )
{
fprintf( fp0, "<h2>%s</h2>\n<dl compact>", gettext( "File that you have currently selected" ) );
}
else
if ( ( dir_info.st_mode & 61440 ) == 40960 )
{
fprintf( fp0, "<h2>%s</h2>\n<dl compact>", gettext( "Symbolic link that you have currently selected" ) );
}
else
{
fprintf( fp0, "<h2>%s</h2>\n<dl compact>", gettext( "Item that you have currently selected" ) );
}
dt_String( fp0, gettext( "Full name:" ), temp );
if ( ( dir_info.st_mode & 61440 ) == 40960 )
{
char buf[1024];
int buf_size = readlink( temp, buf, 1023 );
if ( buf_size != -1 )
buf[ buf_size ] = 0;
else
{
sprintf( buf, "%.*s", 1023, gettext( "Unable to follow link" ) );
}
dt_String( fp0, gettext( "Points to file:" ), buf );
}
name = HTAA_UidToName( (int)dir_info.st_uid );
if ( name[0] )
{
dt_String( fp0, gettext( "Name of owner:" ), name );
}
name = HTAA_GidToName( (int)dir_info.st_gid );
if ( name[0] )
{
dt_String( fp0, gettext( "Group name:" ), name );
}
if ( ( dir_info.st_mode & 61440 ) == 32768 )
{
dt_Number( fp0, gettext( "File size:" ), (int)( (long)(dir_info.st_size & 0xFFFFFFFF) ), gettext( "(bytes)" ) );
}
dt_String( fp0, gettext( "Creation date:" ), ctime( &dir_info.st_ctim.tv_sec ) );
dt_String( fp0, gettext( "Last modified:" ), ctime( &dir_info.st_mtim.tv_sec ) );
dt_String( fp0, gettext( "Last accessed:" ), ctime( &dir_info.st_atim.tv_sec ) );
fwrite( "\n</dl>\n", 1, 7, fp0 );
label_columns = 9;
fprintf( fp0, "<h2>%s</h2>\n<dl compact>", gettext( "Access Permissions" ) );
modes[0] = 0;
modes[1] = 0;
modes[2] = 0;
if ( dir_info.st_mode & 256 )
{
memcpy( modes[0] + strlen( modes ) );
}
if ( dir_info.st_mode & 128 )
{
memcpy( modes[0] + strlen( modes ) );
}
if ( dir_info.st_mode & 64 )
{
if ( ( dir_info.st_mode & 61440 ) == 16384 )
{
memcpy( modes[0] + strlen( modes ) );
}
else
{
memcpy( modes[0] + strlen( modes ) );
if ( dir_info.st_mode & 2048 )
{
memcpy( modes[0] + strlen( modes ) );
}
}
}
dt_String( fp0, gettext( "Owner:" ), &modes[2] );
modes[0] = 0;
modes[1] = 0;
modes[2] = 0;
if ( dir_info.st_mode & 32 )
{
memcpy( modes[0] + strlen( modes ) );
}
if ( dir_info.st_mode & 16 )
{
memcpy( modes[0] + strlen( modes ) );
}
if ( dir_info.st_mode & 8 )
{
if ( ( dir_info.st_mode & 61440 ) == 16384 )
{
memcpy( modes[0] + strlen( modes ) );
}
else
{
memcpy( modes[0] + strlen( modes ) );
if ( dir_info.st_mode & 1024 )
{
memcpy( modes[0] + strlen( modes ) );
}
}
}
dt_String( fp0, gettext( "Group:" ), &modes[2] );
modes[0] = 0;
modes[1] = 0;
modes[2] = 0;
if ( dir_info.st_mode & 4 )
{
memcpy( modes[0] + strlen( modes ) );
}
if ( dir_info.st_mode & 2 )
{
memcpy( modes[0] + strlen( modes ) );
}
if ( dir_info.st_mode & 1 )
{
if ( ( dir_info.st_mode & 61440 ) == 16384 )
{
memcpy( modes[0] + strlen( modes ) );
}
else
{
memcpy( modes[0] + strlen( modes ) );
if ( dir_info.st_mode & 512 )
{
memcpy( modes[0] + strlen( modes ) );
}
}
}
dt_String( fp0, gettext( "World:" ), &modes[2] );
fwrite( "\n</dl>\n", 1, 7, fp0 );
}
if ( temp )
{
free( temp );
temp = 0;
}
}
else
{
fprintf( fp0, "<h2>%s</h2>\n<dl compact>", gettext( "File that you are currently viewing" ) );
LYformTitle( &Title, &doc->title[0] );
HTSprintf( &temp, "%s%s", Title, "" );
dt_String( fp0, gettext( "Linkname:" ), temp );
if ( temp )
{
free( temp );
temp = 0;
}
dt_String( fp0, "URL:", &doc->address );
if ( HTLoadedDocumentCharset( ) )
{
dt_String( fp0, gettext( "Charset:" ), HTLoadedDocumentCharset( ) );
}
else
{
LYUCcharset *p_in = HTAnchor_getUCInfoStage( HTMainAnchor, 1 );
if ( p_in == 0 || p_in->MIMEname == 0 || p_in->MIMEname[0] == 0 || HTAnchor_getUCLYhndl( HTMainAnchor, 1 ) < 0 )
{
p_in = HTAnchor_getUCInfoStage( HTMainAnchor, 0 );
}
if ( p_in && p_in->MIMEname && p_in->MIMEname[0] && HTAnchor_getUCLYhndl( HTMainAnchor, 0 ) >= 0 )
{
HTSprintf( &temp, "%s %s", p_in->MIMEname, gettext( "(assumed)" ) );
dt_String( fp0, gettext( "Charset:" ), &p_in->MIMEname );
if ( temp )
{
free( temp );
temp = 0;
}
}
}
cp = HText_getServer( );
if ( cp && cp[0] )
{
dt_String( fp0, gettext( "Server:" ), cp );
}
cp = HText_getDate( );
if ( cp && cp[0] )
{
dt_String( fp0, gettext( "Date:" ), cp );
}
cp = HText_getLastModified( );
if ( cp && cp[0] )
{
dt_String( fp0, gettext( "Last Mod:" ), cp );
}
if ( LYInfoAdvanced )
{
if ( HTMainAnchor && HTMainAnchor->expires )
{
dt_String( fp0, gettext( "Expires:" ), &HTMainAnchor->expires );
}
if ( HTMainAnchor && HTMainAnchor->cache_control )
{
dt_String( fp0, gettext( "Cache-Control:" ), &HTMainAnchor->cache_control );
}
if ( HTMainAnchor && HTMainAnchor->content_length > 0 )
{
dt_Number( fp0, gettext( "Content-Length:" ), HTMainAnchor->content_length, gettext( "bytes" ) );
}
else
{
dt_Number( fp0, gettext( "Length:" ), HText_getNumOfBytes( ), gettext( "bytes" ) );
}
if ( HTMainAnchor && HTMainAnchor->content_language )
{
dt_String( fp0, gettext( "Language:" ), &HTMainAnchor->content_language );
}
}
if ( doc->post_data )
{
fprintf( fp0, "<dt><em>%s</em> <xmp>%.*s</xmp>\n", gettext( "Post Data:" ), 0, 0 );
dt_String( fp0, gettext( "Post Content Type:" ), &doc->post_content_type );
}
dt_String( fp0, gettext( "Owner(s):" ), owner_address ? owner_address : gettext( "Owner(s):" ) );
dt_Number( fp0, gettext( "size:" ), HText_getNumOfLines( ), gettext( "lines" ) );
if ( lynx_mode != 2 )
{
if ( HTisDocumentSource( ) )
{
}
else
{
}
}
else
{
}
HTSACopy( &temp, gettext( "source" ) );
if ( doc->safe )
{
HTSACat( &temp, gettext( ", safe" ) );
}
if ( doc->internal_link )
{
HTSACat( &temp, gettext( ", via internal link" ) );
}
if ( LYInfoAdvanced )
{
if ( HText_hasNoCacheSet( HTMainText ) & 255 )
{
HTSACat( &temp, gettext( ", no-cache" ) );
}
if ( HTAnchor_isISMAPScript( (int)( &HTMainAnchor->parent->parent ) ) & 255 )
{
HTSACat( &temp, gettext( ", ISMAP script" ) );
}
if ( doc->bookmark )
{
HTSACat( &temp, gettext( ", bookmark file" ) );
}
}
dt_String( fp0, gettext( "mode:" ), temp );
if ( temp )
{
free( temp );
temp = 0;
}
fwrite( "\n</dl>\n", 1, 7, fp0 );
if ( nlinks > 0 )
{
fprintf( fp0, "<h2>%s</h2>\n<dl compact>", gettext( "Link that you currently have selected" ) );
dt_String( fp0, gettext( "Linkname:" ), LYGetHiliteStr( doc->link, 0 ) );
if ( lynx_mode == 2 && links[ doc->link ].type == 1 )
{
if ( links[ doc->link ].l_form->submit_method )
{
int method = links[ doc->link ].l_form->submit_method;
char *enctype = &links[ doc->link ].l_form->submit_enctype;
dt_String( fp0, gettext( "Method:" ), "POST" );
dt_String( fp0, gettext( "Enctype:" ), "application/x-www-form-urlencoded" );
}
if ( links[ doc->link ].l_form->submit_action )
{
dt_String( fp0, gettext( "Action:" ), &links[ doc->link ].l_form->submit_action );
}
if ( links[ doc->link ].l_form->submit_method == 0 || links[ doc->link ].l_form->submit_action == 0 )
{
fprintf( fp0, "<dt> %s\n", gettext( "(Form field)" ) );
}
}
else
{
dt_String( fp0, "URL:", "" );
}
fwrite( "\n</dl>\n", 1, 7, fp0 );
}
else
{
fprintf( fp0, "<h2>%s</h2>", gettext( "No Links on the current page" ) );
}
}
EndInternalPage( fp0 );
LYrefresh( );
LYCloseTemp( tempfile );
if ( Title )
{
free( Title );
Title = 0;
}
return 0;
}
}
bool Utils::Misc::isUrl(const QString &s)
{
const QString scheme = QUrl(s).scheme();
QRegExp is_url("http[s]?|ftp", Qt::CaseInsensitive);
return is_url.exactMatch(scheme);
}
struct transport *transport_get(struct remote *remote, const char *url)
{
const char *helper;
struct transport *ret = xcalloc(1, sizeof(*ret));
ret->progress = isatty(2);
if (!remote)
BUG("No remote provided to transport_get()");
ret->got_remote_refs = 0;
ret->remote = remote;
helper = remote->foreign_vcs;
if (!url && remote->url)
url = remote->url[0];
ret->url = url;
/* maybe it is a foreign URL? */
if (url) {
const char *p = url;
while (is_urlschemechar(p == url, *p))
p++;
if (starts_with(p, "::"))
helper = xstrndup(url, p - url);
}
if (helper) {
transport_helper_init(ret, helper);
} else if (starts_with(url, "rsync:")) {
die(_("git-over-rsync is no longer supported"));
} else if (url_is_local_not_ssh(url) && is_file(url) && is_bundle(url, 1)) {
struct bundle_transport_data *data = xcalloc(1, sizeof(*data));
transport_check_allowed("file");
ret->data = data;
ret->vtable = &bundle_vtable;
ret->smart_options = NULL;
} else if (!is_url(url)
|| starts_with(url, "file://")
|| starts_with(url, "git://")
|| starts_with(url, "ssh://")
|| starts_with(url, "git+ssh://") /* deprecated - do not use */
|| starts_with(url, "ssh+git://") /* deprecated - do not use */
) {
/*
* These are builtin smart transports; "allowed" transports
* will be checked individually in git_connect.
*/
struct git_transport_data *data = xcalloc(1, sizeof(*data));
ret->data = data;
ret->vtable = &builtin_smart_vtable;
ret->smart_options = &(data->options);
data->conn = NULL;
data->got_remote_heads = 0;
} else {
/* Unknown protocol in URL. Pass to external handler. */
int len = external_specification_len(url);
char *handler = xmemdupz(url, len);
transport_helper_init(ret, handler);
}
if (ret->smart_options) {
ret->smart_options->thin = 1;
ret->smart_options->uploadpack = "git-upload-pack";
if (remote->uploadpack)
ret->smart_options->uploadpack = remote->uploadpack;
ret->smart_options->receivepack = "git-receive-pack";
if (remote->receivepack)
ret->smart_options->receivepack = remote->receivepack;
}
return ret;
}
struct transport *transport_get(struct remote *remote, const char *url)
{
const char *helper;
struct transport *ret = xcalloc(1, sizeof(*ret));
ret->progress = isatty(2);
if (!remote)
die("No remote provided to transport_get()");
ret->got_remote_refs = 0;
ret->remote = remote;
helper = remote->foreign_vcs;
if (!url && remote->url)
url = remote->url[0];
ret->url = url;
/* maybe it is a foreign URL? */
if (url) {
const char *p = url;
while (is_urlschemechar(p == url, *p))
p++;
if (starts_with(p, "::"))
helper = xstrndup(url, p - url);
}
if (helper) {
transport_helper_init(ret, helper);
} else if (starts_with(url, "rsync:")) {
ret->get_refs_list = get_refs_via_rsync;
ret->fetch = fetch_objs_via_rsync;
ret->push = rsync_transport_push;
ret->smart_options = NULL;
} else if (url_is_local_not_ssh(url) && is_file(url) && is_bundle(url, 1)) {
struct bundle_transport_data *data = xcalloc(1, sizeof(*data));
ret->data = data;
ret->get_refs_list = get_refs_from_bundle;
ret->fetch = fetch_refs_from_bundle;
ret->disconnect = close_bundle;
ret->smart_options = NULL;
} else if (!is_url(url)
|| starts_with(url, "file://")
|| starts_with(url, "git://")
|| starts_with(url, "ssh://")
|| starts_with(url, "git+ssh://")
|| starts_with(url, "ssh+git://")) {
/* These are builtin smart transports. */
struct git_transport_data *data = xcalloc(1, sizeof(*data));
ret->data = data;
ret->set_option = NULL;
ret->get_refs_list = get_refs_via_connect;
ret->fetch = fetch_refs_via_pack;
ret->push_refs = git_transport_push;
ret->connect = connect_git;
ret->disconnect = disconnect_git;
ret->smart_options = &(data->options);
data->conn = NULL;
data->got_remote_heads = 0;
} else {
/* Unknown protocol in URL. Pass to external handler. */
int len = external_specification_len(url);
char *handler = xmalloc(len + 1);
handler[len] = 0;
strncpy(handler, url, len);
transport_helper_init(ret, handler);
}
if (ret->smart_options) {
ret->smart_options->thin = 1;
ret->smart_options->uploadpack = "git-upload-pack";
if (remote->uploadpack)
ret->smart_options->uploadpack = remote->uploadpack;
ret->smart_options->receivepack = "git-receive-pack";
if (remote->receivepack)
ret->smart_options->receivepack = remote->receivepack;
}
return ret;
}
/*
** Output Wiki text while inserting the proper HTML control codes.
** The following formatting conventions are implemented:
**
** * Characters with special meaning to HTML are escaped.
**
** * Blank lines results in a paragraph break.
**
** * Paragraphs where the first line is indented by two or more
** spaces are shown verbatim. None of the following rules apply
** to verbatim text.
**
** * Lines beginning with "*: " begin a bullet in a bullet list.
**
** * Lines beginning with "1: " begin an item in an enumerated list.
**
** * Paragraphs beginning with "_: " are indented.
**
** * Multiple colons can be used in *:, 1:, and _: for multiple
** levels of indentation.
**
** * Text within _..._ is italic and text in *...* is bold.
** Text with in **...** or ***...*** bold with a larger font.
**
** * Wiki pages names (Words in initial caps) are enclosed in an
** appropriate hyperlink.
**
** * Words that begin with "http:", "https:", "ftp:", or "mailto:"
** are enclosed in an appropriate hyperlink.
**
** * Text of the form "#NNN" where NNN is a valid ticket number
** is converted into a hyperlink to the corresponding ticket.
**
** * Text of the form "[NNN]" where NNN is a valid check-in number
** becomes a hyperlink to the checkin.
**
** * {quote: XYZ} renders XYZ with all special meanings for XYZ escaped.
**
** * {link: URL TEXT} renders TEXT with a link to URL. URL can be
** relative.
**
** * {linebreak} renders a linebreak.
**
** * {image: URL ALT} renders an in-line image from URL. URL can be
** relative or it can be the name of an attachment to zPageId.
** {leftimage: URL ALT} and {rightimage: URL ALT} create wrap-around
** images at the left or right margin.
**
** * {clear} skips down the page far enough to clear any wrap-around
** images.
**
** * Text between <html>...</html> is interpreted as HTML. A restricted
** subset of tags are supported - things like forms and javascript are
** intentionally excluded. The initial <html> must occur at the
** beginning of a paragraph.
*/
void output_wiki(
const char *zText, /* The text to be formatted */
const char *zLinkSuffix, /* Suffix added to hyperlinks to Wiki */
const char *zPageId /* Name of current page */
){
int i, j, k;
int aList[20]; /* See adjust_list_nesting for details */
int inPRE = 0;
int inB = 0;
int inI = 0;
int v;
int wordStart = 1; /* At the start of a word */
int lineStart = 1; /* At the start of a line */
int paraStart = 1; /* At the start of a paragraph */
const char *zEndB; /* Text used to end a run of bold */
char **azAttach; /* Attachments to zPageId */
static int once = 1;
static int nTicket, nCommit;
if( once ){
nTicket = atoi(db_short_query("SELECT max(tn) FROM ticket"));
nCommit = atoi(db_short_query("SELECT max(cn) FROM chng"));
once = 0;
}
i = 0;
aList[0] = 0;
azAttach = 0;
zEndB = "";
while( zText[i] ){
char *z;
int n;
Markup sMarkup;
int c = zText[i];
/* Text between <html>...</html> is interpreted as HTML.
*/
if( c=='<' && (n = is_html(&zText[i]))>0 ){
put_htmlized_text(&zText, i);
zText += 6;
output_restricted_html(zText, n-13);
zText += n - 6;
i = 0;
continue;
}
/* Markup may consist of special strings contained in curly braces.
** Examples: "{linebreak}" or "{quote: *:}"
*/
if( c=='{' && is_markup(&zText[i], &sMarkup) ){
/*
** Markup of the form "{linebreak}" forces a line break.
*/
if( sMarkup.lenType==9 && strncmp(sMarkup.zType,"linebreak",9)==0 ){
put_htmlized_text(&zText, i);
zText += sMarkup.lenTotal;
i = 0;
cgi_printf("<br>\n");
wordStart = lineStart = paraStart = 0;
continue;
}
/*
** Markup of the form "{clear}" moves down past any left or right
** aligned images.
*/
if( sMarkup.lenType==5 && strncmp(sMarkup.zType,"clear",5)==0 ){
put_htmlized_text(&zText, i);
zText += sMarkup.lenTotal;
i = 0;
cgi_printf("<br clear=\"both\">\n");
wordStart = lineStart = paraStart = 0;
continue;
}
/*
** Markup of the form "{quote: ABC}" writes out the text ABC exactly
** as it appears. This can be used to escape special meanings
** associated with ABC.
*/
if( sMarkup.lenType==5 && strncmp(sMarkup.zType,"quote",5)==0 ){
int n;
put_htmlized_text(&zText, i);
if( sMarkup.zKey==sMarkup.zArgs ){
n = sMarkup.lenKey;
}else{
n = &sMarkup.zArgs[sMarkup.lenArgs] - sMarkup.zKey;
}
put_htmlized_text(&sMarkup.zKey, n);
zText += sMarkup.lenTotal;
i = 0;
wordStart = lineStart = paraStart = 0;
continue;
}
/*
** Markup of the form "{link: TO TEXT}" creates a hyperlink to TO.
** The hyperlink appears on the screen as TEXT. TO can be a any URL,
** including a relative URL such as "chngview?cn=123".
*/
if( sMarkup.lenType==4 && strncmp(sMarkup.zType,"link",4)==0 ){
put_htmlized_text(&zText, i);
cgi_printf("<a href=\"%.*s\">", sMarkup.lenKey, sMarkup.zKey);
put_htmlized_text(&sMarkup.zArgs, sMarkup.lenArgs);
cgi_printf("</a>");
zText += sMarkup.lenTotal;
i = 0;
wordStart = lineStart = paraStart = 0;
continue;
}
/*
** Markup of the form "{image: URL ALT}" creates an in-line image to
** URL with ALT as the alternate text. URL can be relative (for example
** the URL of an attachment.
**
** If the URL is the name of an attachment, then automatically
** convert it to the correct URL for that attachment.
*/
if( (sMarkup.lenType==5 && strncmp(sMarkup.zType,"image",5)==0)
|| (sMarkup.lenType==9 && strncmp(sMarkup.zType,"leftimage",9)==0)
|| (sMarkup.lenType==10 && strncmp(sMarkup.zType,"rightimage",10)==0)
){
char *zUrl = 0;
const char *zAlign;
char *zAlt = htmlize(sMarkup.zArgs, sMarkup.lenArgs);
if( azAttach==0 && zPageId!=0 ){
azAttach = (char **)
db_query("SELECT fname, atn FROM attachment "
"WHERE tn='%q'", zPageId);
}
if( azAttach ){
int ix;
for(ix=0; azAttach[ix]; ix+=2){
if( strncmp(azAttach[ix],sMarkup.zKey,sMarkup.lenKey)==0 ){
free(zUrl);
zUrl = mprintf("attach_get/%s/%h",
azAttach[ix+1], azAttach[ix]);
break;
}
}
}
if( zUrl==0 ){
zUrl = htmlize(sMarkup.zKey, sMarkup.lenKey);
}
put_htmlized_text(&zText, i);
switch( sMarkup.zType[0] ){
case 'l': case 'L': zAlign = " align=\"left\""; break;
case 'r': case 'R': zAlign = " align=\"right\""; break;
default: zAlign = ""; break;
}
cgi_printf("<img src=\"%s\" alt=\"%s\"%s>", zUrl, zAlt, zAlign);
free(zUrl);
free(zAlt);
zText += sMarkup.lenTotal;
i = 0;
wordStart = lineStart = paraStart = 0;
continue;
}
}
if( paraStart ){
put_htmlized_text(&zText, i);
/* Blank lines at the beginning of a paragraph are ignored.
*/
if( isspace(c) && (j = is_blank_line(&zText[i]))>0 ){
zText += j;
continue;
}
/* If the first line of a paragraph begins with a tab or with two
** or more spaces, then that paragraph is printed verbatim.
*/
if( c=='\t' || (c==' ' && (zText[i+1]==' ' || zText[i+1]=='\t')) ){
if( !inPRE ){
if( inB ){ cgi_printf(zEndB); inB=0; }
if( inI ){ cgi_printf("</i>"); inI=0; }
adjust_list_nesting(aList, 0);
cgi_printf("<pre>\n");
inPRE = 1;
}
}
} /* end if( paraStart ) */
if( lineStart ){
/* Blank lines in the middle of text cause a paragraph break
*/
if( isspace(c) && (j = is_blank_line(&zText[i]))>0 ){
put_htmlized_text(&zText, i);
zText += j;
if( inB ){ cgi_printf(zEndB); inB=0; }
if( inI ){ cgi_printf("</i>"); inI=0; }
if( inPRE ){ cgi_printf("</pre>\n"); inPRE = 0; }
is_list_elem(zText, &k);
if( abs(k)<aList[0] ) adjust_list_nesting(aList, k);
if( zText[0]!=0 ){ cgi_printf("\n<p>"); }
wordStart = lineStart = paraStart = 1;
i = 0;
continue;
}
} /* end if( lineStart ) */
if( lineStart && !inPRE ){
/* If we are not in verbatim text and a line begins with "*:", then
** generate a bullet. Or if the line begins with "NNN:" where NNN
** is a number, generate an enumeration item.
*/
if( (j = is_list_elem(&zText[i], &k))>0 ){
put_htmlized_text(&zText, i);
adjust_list_nesting(aList, k);
if( zText[0]!='_' ) cgi_printf("<li>");
zText += j;
i = 0;
wordStart = 1;
lineStart = paraStart = 0;
continue;
}
/* Four or more "-" characters on at the beginning of a line that
** contains no other text results in a horizontal rule.
*/
if( (c=='-' || c=='=') && (j = is_horizontal_rule(&zText[i]))>0 ){
put_htmlized_text(&zText, i);
adjust_list_nesting(aList, 0);
cgi_printf("<hr>\n");
zText += j;
if( *zText ) zText++;
i = 0;
lineStart = wordStart = 1;
paraStart = 1;
continue;
}
} /* end if( lineStart && !inPre ) */
if( wordStart && !inPRE ){
/* A wiki name at the beginning of a word which is not in verbatim
** text generates a hyperlink to that wiki page.
**
** Special case: If the name is in CamelCase but ends with a "_", then
** suppress the "_" and do not generate the hyperlink. This allows
** CamelCase words that are not wiki page names to appear in text.
*/
if( g.okRdWiki && isupper(c) && (j = is_wiki_name(&zText[i]))>0 ){
put_htmlized_text(&zText, i);
cgi_printf("<a href=\"wiki?p=%.*s%s\">%.*s</a>",
j, zText, zLinkSuffix, j, zText);
zText += j;
i = 0;
wordStart = lineStart = paraStart = 0;
continue;
}
/* A "_" at the beginning of a word puts us into an italic font.
*/
if( c=='_' && !inB && !inI && font_terminator(&zText[i+1],c,1) ){
put_htmlized_text(&zText, i);
i = 0;
zText++;
cgi_printf("<i>");
inI = 1;
continue;
}
/* A "*" at the beginning of a word puts us into a bold font.
*/
if( c=='*' && !inB && !inI && (j = count_stars(&zText[i]))>=1
&& j<=3 && font_terminator(&zText[i+j],c,j) ){
const char *zBeginB = "";
put_htmlized_text(&zText, i);
i = 0;
zText += j;
switch( j ){
case 1: zBeginB = "<b>"; zEndB = "</b>"; break;
case 2: zBeginB = "<big><b>"; zEndB = "</b></big>"; break;
case 3: zBeginB = "<big><big><b>"; zEndB = "</b></big></big>"; break;
}
cgi_printf(zBeginB);
inB = j;
continue;
}
/* Words that begin with "http:" or "https:" or "ftp:" or "mailto:"
** become hyperlinks.
*/
if( (c=='h' || c=='f' || c=='m') && (j=is_url(&zText[i]))>0 ){
put_htmlized_text(&zText, i);
z = htmlize(zText, j);
if( is_image(z, strlen(z)) ){
cgi_printf("<img src=\"%s\" alt=\"%s\">", z, z);
}else{
cgi_printf("<a href=\"%s\">%s</a>", z, z);
}
free(z);
zText += j;
i = 0;
wordStart = lineStart = paraStart = 0;
continue;
}
/* If the user has read permission on tickets and a word is of the
** form "#NNN" where NNN is a sequence of digits, then generate a
** hyperlink to ticket number NNN.
*/
if( c=='#' && g.okRead && (j = ndigit(&zText[i+1]))>0
&& is_eow(&zText[i+1+j],0)
&& (v = atoi(&zText[i+1]))>0 && v<=nTicket ){
put_htmlized_text(&zText, i);
cgi_printf("<a href=\"tktview?tn=%d\">#%d</a>", v, v);
zText += j;
if( *zText ) zText++;
i = 0;
wordStart = lineStart = paraStart = 0;
continue;
}
/* If the user has checkout permissions and a word is of the form
** "[NNN]" where NNN is a checkin number, then generate a hyperlink
** to check-in NNN.
*/
if( c=='[' && g.okCheckout && (j = ndigit(&zText[i+1]))>0
&& is_eow(&zText[i+j+2],0)
&& (v = atoi(&zText[i+1]))>0 && v<=nCommit
&& zText[i+j+1]==']' ){
put_htmlized_text(&zText, i);
cgi_printf("<a href=\"chngview?cn=%d\">[%d]</a>", v, v);
zText += j+1;
if( *zText ) zText++;
i = 0;
wordStart = lineStart = paraStart = 0;
continue;
}
} /* end if( wordStart && !inPre ) */
/* A "*" or a "_" at the end of a word takes us out of bold or
** italic mode.
*/
if( inB && c=='*' && !isspace(zText[i-1]) && zText[i-1]!='*' &&
(j = count_stars(&zText[i]))==inB && is_eow(&zText[i+j],0) ){
inB = 0;
put_htmlized_text(&zText, i);
i = 0;
zText += j;
cgi_printf(zEndB);
continue;
}
if( inI && c=='_' && !isspace(zText[i-1]) && is_eow(&zText[i+1],0) ){
put_htmlized_text(&zText, i);
i = 0;
zText++;
inI = 0;
cgi_printf("</i>");
continue;
}
if( wordStart ){
wordStart = isspace(c) || c=='(' || c=='"';
}else{
wordStart = isspace(c);
}
lineStart = c=='\n';
paraStart = 0;
i++;
}
if( zText[0] ) cgi_printf("%h", zText);
if( inB ) cgi_printf("%s\n",zEndB);
if( inI ) cgi_printf("</i>\n");
adjust_list_nesting(aList, 0);
if( inPRE ) cgi_printf("</pre>\n");
}
/*
* This returns a dummy child_process if the transport protocol does not
* need fork(2), or a struct child_process object if it does. Once done,
* finish the connection with finish_connect() with the value returned from
* this function (it is safe to call finish_connect() with NULL to support
* the former case).
*
* If it returns, the connect is successful; it just dies on errors (this
* will hopefully be changed in a libification effort, to return NULL when
* the connection failed).
*/
struct child_process *git_connect(int fd[2], const char *url_orig,
const char *prog, int flags)
{
char *url;
char *host, *path;
char *end;
int c;
struct child_process *conn = &no_fork;
enum protocol protocol = PROTO_LOCAL;
int free_path = 0;
char *port = NULL;
const char **arg;
struct strbuf cmd;
/* Without this we cannot rely on waitpid() to tell
* what happened to our children.
*/
signal(SIGCHLD, SIG_DFL);
if (is_url(url_orig))
url = url_decode(url_orig);
else
url = xstrdup(url_orig);
host = strstr(url, "://");
if (host) {
*host = '\0';
protocol = get_protocol(url);
host += 3;
c = '/';
} else {
host = url;
c = ':';
}
/*
* Don't do destructive transforms with git:// as that
* protocol code does '[]' unwrapping of its own.
*/
if (host[0] == '[') {
end = strchr(host + 1, ']');
if (end) {
if (protocol != PROTO_GIT) {
*end = 0;
host++;
}
end++;
} else
end = host;
} else
end = host;
path = strchr(end, c);
if (path && !has_dos_drive_prefix(end)) {
if (c == ':') {
if (host != url || path < strchrnul(host, '/')) {
protocol = PROTO_SSH;
*path++ = '\0';
} else /* '/' in the host part, assume local path */
path = end;
}
} else
path = end;
if (!path || !*path)
die("No path specified. See 'man git-pull' for valid url syntax");
/*
* null-terminate hostname and point path to ~ for URL's like this:
* ssh://host.xz/~user/repo
*/
if (protocol != PROTO_LOCAL && host != url) {
char *ptr = path;
if (path[1] == '~')
path++;
else {
path = xstrdup(ptr);
free_path = 1;
}
*ptr = '\0';
}
/*
* Add support for ssh port: ssh://host.xy:<port>/...
*/
if (protocol == PROTO_SSH && host != url)
port = get_port(end);
if (protocol == PROTO_GIT) {
/* These underlying connection commands die() if they
* cannot connect.
*/
char *target_host = xstrdup(host);
if (git_use_proxy(host))
conn = git_proxy_connect(fd, host);
else
git_tcp_connect(fd, host, flags);
/*
* Separate original protocol components prog and path
* from extended host header with a NUL byte.
*
* Note: Do not add any other headers here! Doing so
* will cause older git-daemon servers to crash.
*/
packet_write(fd[1],
"%s %s%chost=%s%c",
prog, path, 0,
target_host, 0);
free(target_host);
free(url);
if (free_path)
free(path);
return conn;
}
conn = xcalloc(1, sizeof(*conn));
strbuf_init(&cmd, MAX_CMD_LEN);
strbuf_addstr(&cmd, prog);
strbuf_addch(&cmd, ' ');
sq_quote_buf(&cmd, path);
if (cmd.len >= MAX_CMD_LEN)
die("command line too long");
conn->in = conn->out = -1;
conn->argv = arg = xcalloc(7, sizeof(*arg));
if (protocol == PROTO_SSH) {
const char *ssh = getenv("GIT_SSH");
int putty = ssh && strcasestr(ssh, "plink");
if (!ssh) ssh = "ssh";
*arg++ = ssh;
if (putty && !strcasestr(ssh, "tortoiseplink"))
*arg++ = "-batch";
if (port) {
/* P is for PuTTY, p is for OpenSSH */
*arg++ = putty ? "-P" : "-p";
*arg++ = port;
}
*arg++ = host;
}
else {
/* remove repo-local variables from the environment */
conn->env = local_repo_env;
conn->use_shell = 1;
}
*arg++ = cmd.buf;
*arg = NULL;
if (start_command(conn))
die("unable to fork");
fd[0] = conn->out; /* read from child's stdout */
fd[1] = conn->in; /* write to child's stdin */
strbuf_release(&cmd);
free(url);
if (free_path)
free(path);
return conn;
}
int
exec_add(int argc, char **argv)
{
struct pkgdb *db = NULL;
struct sbuf *failedpkgs = NULL;
char path[MAXPATHLEN + 1];
char *file;
int retcode;
int ch;
int i;
int failedpkgcount = 0;
pkg_flags f = PKG_FLAG_NONE;
struct pkg_manifest_key *keys = NULL;
while ((ch = getopt(argc, argv, "IAfq")) != -1) {
switch (ch) {
case 'I':
f |= PKG_ADD_NOSCRIPT;
break;
case 'A':
f |= PKG_FLAG_AUTOMATIC;
break;
case 'f':
f |= PKG_FLAG_FORCE;
break;
case 'q':
quiet = true;
break;
default:
usage_add();
return (EX_USAGE);
}
}
argc -= optind;
argv += optind;
if (argc < 1) {
usage_add();
return (EX_USAGE);
}
retcode = pkgdb_access(PKGDB_MODE_READ |
PKGDB_MODE_WRITE |
PKGDB_MODE_CREATE,
PKGDB_DB_LOCAL);
if (retcode == EPKG_ENOACCESS) {
warnx("Insufficient privilege to add packages");
return (EX_NOPERM);
} else if (retcode != EPKG_OK)
return (EX_IOERR);
if (pkgdb_open(&db, PKGDB_DEFAULT) != EPKG_OK)
return (EX_IOERR);
failedpkgs = sbuf_new_auto();
pkg_manifest_keys_new(&keys);
for (i = 0; i < argc; i++) {
if (is_url(argv[i]) == EPKG_OK) {
snprintf(path, sizeof(path), "./%s", basename(argv[i]));
if ((retcode = pkg_fetch_file(NULL, argv[i], path, 0)) != EPKG_OK)
break;
file = path;
} else {
file = argv[i];
if (access(file, F_OK) != 0) {
warn("%s",file);
if (errno == ENOENT)
warnx("Did you mean 'pkg install %s'?", file);
sbuf_cat(failedpkgs, argv[i]);
if (i != argc - 1)
sbuf_printf(failedpkgs, ", ");
failedpkgcount++;
continue;
}
}
if ((retcode = pkg_add(db, file, f, keys)) != EPKG_OK) {
sbuf_cat(failedpkgs, argv[i]);
if (i != argc - 1)
sbuf_printf(failedpkgs, ", ");
failedpkgcount++;
}
}
pkg_manifest_keys_free(keys);
pkgdb_close(db);
if(failedpkgcount > 0) {
sbuf_finish(failedpkgs);
printf("\nFailed to install the following %d package(s): %s\n", failedpkgcount, sbuf_data(failedpkgs));
retcode = EPKG_FATAL;
}
sbuf_delete(failedpkgs);
if (messages != NULL) {
sbuf_finish(messages);
printf("%s", sbuf_data(messages));
}
return (retcode == EPKG_OK ? EX_OK : EX_SOFTWARE);
}
/*
* LYShowInfo prints a page of info about the current file and the link that
* the cursor is on.
*/
int LYShowInfo(DocInfo *doc,
DocInfo *newdoc,
char *owner_address)
{
static char tempfile[LY_MAXPATH] = "\0";
int url_type;
FILE *fp0;
char *Title = NULL;
const char *cp;
char *temp = NULL;
char *buffer = NULL;
BOOLEAN LYInfoAdvanced = (BOOL) (user_mode == ADVANCED_MODE);
#ifdef DIRED_SUPPORT
struct stat dir_info;
const char *name;
#endif /* DIRED_SUPPORT */
if (LYReuseTempfiles) {
fp0 = LYOpenTempRewrite(tempfile, HTML_SUFFIX, "w");
} else {
(void) LYRemoveTemp(tempfile);
fp0 = LYOpenTemp(tempfile, HTML_SUFFIX, "w");
}
if (fp0 == NULL) {
HTAlert(CANNOT_OPEN_TEMP);
return (-1);
}
/*
* Point the address pointer at this Url
*/
LYLocalFileToURL(&newdoc->address, tempfile);
if (nlinks > 0 && links[doc->link].lname != NULL &&
(url_type = is_url(links[doc->link].lname)) != 0 &&
(url_type == LYNXEXEC_URL_TYPE ||
url_type == LYNXPROG_URL_TYPE)) {
char *last_slash = strrchr(links[doc->link].lname, '/');
int next_to_last = (int) strlen(links[doc->link].lname) - 1;
if ((last_slash - links[doc->link].lname) == next_to_last) {
links[doc->link].lname[next_to_last] = '\0';
}
}
label_columns = 9;
WriteInternalTitle(fp0, SHOWINFO_TITLE);
fprintf(fp0, "<h1>%s %s (%s) (<a href=\"%s\">%s</a>)",
LYNX_NAME, LYNX_VERSION,
LYVersionDate(),
(LYVersionIsRelease()? LYNX_WWW_HOME : LYNX_WWW_DIST),
LYVersionStatus());
fprintf(fp0, "</h1>\n"); /* don't forget to close <h1> */
#ifdef DIRED_SUPPORT
if (lynx_edit_mode && nlinks > 0) {
BEGIN_DL(gettext("Directory that you are currently viewing"));
temp = HTfullURL_toFile(doc->address);
ADD_SS(gettext("Name:"), temp);
FREE(temp);
dt_URL(fp0, doc->address);
END_DL();
temp = HTfullURL_toFile(links[doc->link].lname);
if (lstat(temp, &dir_info) == -1) {
CTRACE((tfp, "lstat(%s) failed, errno=%d\n", temp, errno));
HTAlert(CURRENT_LINK_STATUS_FAILED);
} else {
char modes[80];
label_columns = 16;
if (S_ISDIR(dir_info.st_mode)) {
BEGIN_DL(gettext("Directory that you have currently selected"));
} else if (S_ISREG(dir_info.st_mode)) {
BEGIN_DL(gettext("File that you have currently selected"));
#ifdef S_IFLNK
} else if (S_ISLNK(dir_info.st_mode)) {
BEGIN_DL(gettext("Symbolic link that you have currently selected"));
#endif
} else {
BEGIN_DL(gettext("Item that you have currently selected"));
}
ADD_SS(gettext("Full name:"), temp);
#ifdef S_IFLNK
if (S_ISLNK(dir_info.st_mode)) {
char buf[MAX_LINE];
int buf_size;
size_t limit = sizeof(buf) - 1;
if ((buf_size = (int) readlink(temp, buf, limit)) != -1) {
if (buf_size > (int) limit)
buf_size = (int) limit;
buf[buf_size] = '\0';
} else {
sprintf(buf, "%.*s", (int) limit,
gettext("Unable to follow link"));
}
ADD_SS(gettext("Points to file:"), buf);
}
#endif
name = HTAA_UidToName((int) dir_info.st_uid);
if (*name)
ADD_SS(gettext("Name of owner:"), name);
name = HTAA_GidToName((int) dir_info.st_gid);
if (*name)
ADD_SS(gettext("Group name:"), name);
if (S_ISREG(dir_info.st_mode)) {
ADD_NN(gettext("File size:"),
(long) dir_info.st_size,
gettext("(bytes)"));
}
/*
* Include date and time information.
*/
ADD_SS(gettext("Creation date:"),
ctime(&dir_info.st_ctime));
ADD_SS(gettext("Last modified:"),
ctime(&dir_info.st_mtime));
ADD_SS(gettext("Last accessed:"),
ctime(&dir_info.st_atime));
END_DL();
label_columns = 9;
BEGIN_DL(gettext("Access Permissions"));
modes[0] = '\0';
modes[1] = '\0'; /* In case there are no permissions */
modes[2] = '\0';
if ((dir_info.st_mode & S_IRUSR))
strcat(modes, ", read");
if ((dir_info.st_mode & S_IWUSR))
strcat(modes, ", write");
if ((dir_info.st_mode & S_IXUSR)) {
if (S_ISDIR(dir_info.st_mode))
strcat(modes, ", search");
else {
strcat(modes, ", execute");
if ((dir_info.st_mode & S_ISUID))
strcat(modes, ", setuid");
}
}
ADD_SS(gettext("Owner:"), &modes[2]);
modes[0] = '\0';
modes[1] = '\0'; /* In case there are no permissions */
modes[2] = '\0';
if ((dir_info.st_mode & S_IRGRP))
strcat(modes, ", read");
if ((dir_info.st_mode & S_IWGRP))
strcat(modes, ", write");
if ((dir_info.st_mode & S_IXGRP)) {
if (S_ISDIR(dir_info.st_mode))
strcat(modes, ", search");
else {
strcat(modes, ", execute");
if ((dir_info.st_mode & S_ISGID))
strcat(modes, ", setgid");
}
}
ADD_SS(gettext("Group:"), &modes[2]);
modes[0] = '\0';
modes[1] = '\0'; /* In case there are no permissions */
modes[2] = '\0';
if ((dir_info.st_mode & S_IROTH))
strcat(modes, ", read");
if ((dir_info.st_mode & S_IWOTH))
strcat(modes, ", write");
if ((dir_info.st_mode & S_IXOTH)) {
if (S_ISDIR(dir_info.st_mode))
strcat(modes, ", search");
else {
strcat(modes, ", execute");
#ifdef S_ISVTX
if ((dir_info.st_mode & S_ISVTX))
strcat(modes, ", sticky");
#endif
}
}
ADD_SS(gettext("World:"), &modes[2]);
END_DL();
}
FREE(temp);
} else {
#endif /* DIRED_SUPPORT */
BEGIN_DL(gettext("File that you are currently viewing"));
LYformTitle(&Title, doc->title);
HTSprintf(&temp, "%s%s",
LYEntifyTitle(&buffer, Title),
((doc->isHEAD &&
!strstr(Title, " (HEAD)") &&
!strstr(Title, " - HEAD")) ? " (HEAD)" : ""));
ADD_SS(gettext("Linkname:"), temp);
FREE(temp);
dt_URL(fp0, doc->address);
if (HTLoadedDocumentCharset()) {
ADD_SS(gettext("Charset:"),
HTLoadedDocumentCharset());
} else {
LYUCcharset *p_in = HTAnchor_getUCInfoStage(HTMainAnchor,
UCT_STAGE_PARSER);
if (!p_in || isEmpty(p_in->MIMEname) ||
HTAnchor_getUCLYhndl(HTMainAnchor, UCT_STAGE_PARSER) < 0) {
p_in = HTAnchor_getUCInfoStage(HTMainAnchor, UCT_STAGE_MIME);
}
if (p_in && non_empty(p_in->MIMEname) &&
HTAnchor_getUCLYhndl(HTMainAnchor, UCT_STAGE_MIME) >= 0) {
HTSprintf(&temp, "%s %s",
LYEntifyTitle(&buffer, p_in->MIMEname),
gettext("(assumed)"));
ADD_SS(gettext("Charset:"), p_in->MIMEname);
FREE(temp);
}
}
if ((cp = HText_getServer()) != NULL && *cp != '\0')
ADD_SS(gettext("Server:"), cp);
if ((cp = HText_getDate()) != NULL && *cp != '\0')
ADD_SS(gettext("Date:"), cp);
if ((cp = HText_getLastModified()) != NULL && *cp != '\0')
ADD_SS(gettext("Last Mod:"), cp);
if (LYInfoAdvanced) {
if (HTMainAnchor && HTMainAnchor->expires) {
ADD_SS(gettext("Expires:"), HTMainAnchor->expires);
}
if (HTMainAnchor && HTMainAnchor->cache_control) {
ADD_SS(gettext("Cache-Control:"), HTMainAnchor->cache_control);
}
if (HTMainAnchor && HTMainAnchor->content_length > 0) {
ADD_NN(gettext("Content-Length:"),
HTMainAnchor->content_length,
gettext("bytes"));
} else {
ADD_NN(gettext("Length:"),
HText_getNumOfBytes(),
gettext("bytes"));
}
if (HTMainAnchor && HTMainAnchor->content_language) {
ADD_SS(gettext("Language:"), HTMainAnchor->content_language);
}
}
if (doc->post_data) {
fprintf(fp0, "<dt><em>%s</em> <xmp>%.*s</xmp>\n",
LYEntifyTitle(&buffer, gettext("Post Data:")),
BStrLen(doc->post_data),
BStrData(doc->post_data));
ADD_SS(gettext("Post Content Type:"), doc->post_content_type);
}
ADD_SS(gettext("Owner(s):"),
(owner_address
? owner_address
: NO_NOTHING));
ADD_NN(gettext("size:"),
HText_getNumOfLines(),
gettext("lines"));
StrAllocCopy(temp,
((lynx_mode == FORMS_LYNX_MODE)
? gettext("forms mode")
: (HTisDocumentSource()
? gettext("source")
: gettext("normal"))));
if (doc->safe)
StrAllocCat(temp, gettext(", safe"));
if (doc->internal_link)
StrAllocCat(temp, gettext(", via internal link"));
if (LYInfoAdvanced) {
if (HText_hasNoCacheSet(HTMainText))
StrAllocCat(temp, gettext(", no-cache"));
if (HTAnchor_isISMAPScript((HTAnchor *) HTMainAnchor))
StrAllocCat(temp, gettext(", ISMAP script"));
if (doc->bookmark)
StrAllocCat(temp, gettext(", bookmark file"));
}
ADD_SS(gettext("mode:"), temp);
FREE(temp);
END_DL();
if (nlinks > 0) {
BEGIN_DL(gettext("Link that you currently have selected"));
ADD_SS(gettext("Linkname:"),
LYGetHiliteStr(doc->link, 0));
if (lynx_mode == FORMS_LYNX_MODE &&
links[doc->link].type == WWW_FORM_LINK_TYPE) {
if (links[doc->link].l_form->submit_method) {
int method = links[doc->link].l_form->submit_method;
char *enctype = links[doc->link].l_form->submit_enctype;
ADD_SS(gettext("Method:"),
((method == URL_POST_METHOD) ? "POST" :
((method == URL_MAIL_METHOD) ? "(email)" :
"GET")));
ADD_SS(gettext("Enctype:"),
(non_empty(enctype)
? enctype
: "application/x-www-form-urlencoded"));
}
if (links[doc->link].l_form->submit_action) {
ADD_SS(gettext("Action:"),
links[doc->link].l_form->submit_action);
}
if (!(links[doc->link].l_form->submit_method &&
links[doc->link].l_form->submit_action)) {
fprintf(fp0, "<dt> %s\n",
LYEntifyTitle(&buffer, gettext("(Form field)")));
}
} else {
dt_URL(fp0, NonNull(links[doc->link].lname));
}
END_DL();
} else {
fprintf(fp0, "<h2>%s</h2>",
LYEntifyTitle(&buffer,
gettext("No Links on the current page")));
}
if ((cp = HText_getHttpHeaders()) != 0) {
fprintf(fp0, "<h2>%s</h2>",
LYEntifyTitle(&buffer, gettext("Server Headers:")));
fprintf(fp0, "<pre>%s</pre>",
LYEntifyTitle(&buffer, cp));
}
#ifdef DIRED_SUPPORT
}
#endif /* DIRED_SUPPORT */
EndInternalPage(fp0);
LYrefresh();
LYCloseTemp(tempfile);
FREE(Title);
FREE(buffer);
return (0);
}
void dostart(Char ** vc, struct command *c) {
char *cmdstr,*cmdend,*ptr;
char argv0[256];/*FIXBUF*/
DWORD cmdsize;
char *currdir=NULL;
char *savepath;
char **v = NULL;
STARTUPINFO si;
PROCESS_INFORMATION pi;
DWORD dwCreationFlags=CREATE_NEW_CONSOLE;
DWORD k,cmdlen,j,jj,ret;
UNREFERENCED_PARAMETER(c);
vc++;
cmdsize = 512;
cmdstr = heap_alloc(cmdsize);
cmdend = cmdstr;
cmdlen = 0;
memset(&si,0,sizeof(si));
si.cb = sizeof(si);
vc = glob_all_or_error(vc);
v = short2blk(vc);
if(v == NULL) {
stderror(ERR_NOMEM);
return;
}
blkfree(vc);
for (k = 0; v[k] != NULL ; k++){
if ( v[k][0] == '-' ) {
/* various options */
if( (v[k][1] == 'T') || (v[k][1] == 't'))
si.lpTitle =&( v[k][2]);
else if ( (v[k][1] == 'D') || (v[k][1] == 'd'))
currdir =&( v[k][2]);
else if (!_stricmp(&v[k][1],"MIN") )
si.wShowWindow = SW_SHOWMINIMIZED;
else if (!_stricmp(&v[k][1],"MAX") )
si.wShowWindow = SW_SHOWMAXIMIZED;
else if (!_stricmp(&v[k][1],"SEPARATE") )
dwCreationFlags |= CREATE_SEPARATE_WOW_VDM;
else if (!_stricmp(&v[k][1],"SHARED") )
dwCreationFlags |= CREATE_SHARED_WOW_VDM;
else if (!_stricmp(&v[k][1],"LOW") )
dwCreationFlags |= IDLE_PRIORITY_CLASS;
else if (!_stricmp(&v[k][1],"NORMAL") )
dwCreationFlags |= NORMAL_PRIORITY_CLASS;
else if (!_stricmp(&v[k][1],"HIGH") )
dwCreationFlags |= HIGH_PRIORITY_CLASS;
else if (!_stricmp(&v[k][1],"REALTIME") )
dwCreationFlags |= REALTIME_PRIORITY_CLASS;
else{
blkfree((Char **)v);
stderror(ERR_SYSTEM,start_usage,"See CMD.EXE for more info");/*FIXRESET*/
}
}
else{ // non-option arg
break;
}
}
/*
* Stop the insanity of requiring start "tcsh -l"
* Option processing now stops at first non-option arg
* -amol 5/30/96
*/
for (jj=k;v[jj] != NULL; jj++) {
j=(lstrlen(v[jj]) + 2);
if (j + cmdlen > cmdsize) {
ptr = cmdstr;
cmdstr = heap_realloc(cmdstr, max(cmdsize << 1, j+cmdlen) );
if(!cmdstr)
{
heap_free(ptr);
stderror(ERR_NOMEM,"start");/*FIXRESET*/
}
cmdend = cmdstr + (cmdend - ptr);
cmdsize <<= 1;
}
ptr = v[jj];
while (*ptr) {
*cmdend++ = *ptr++;
cmdlen++;
}
*cmdend++ = ' ';
cmdlen++;
}
if (jj == k) {
blkfree((Char **)v);
stderror(ERR_SYSTEM,start_usage,"See CMD.EXE for more info");/*FIXRESET*/
return;
}
*cmdend = 0;
StringCbCopy(argv0,sizeof(argv0),v[k]);
/*
* strictly speaking, it should do no harm to set the path
* back to '\'-delimited even in the parent, but in the
* interest of consistency, we save the old value and restore it
* later
*/
savepath = fix_path_for_child();
if (! CreateProcess(NULL,
cmdstr,
NULL,
NULL,
FALSE,
dwCreationFlags,
NULL,
currdir,
&si,
&pi) ) {
restore_path(savepath);
ret = GetLastError();
if (ret == ERROR_BAD_EXE_FORMAT || ret == ERROR_ACCESS_DENIED ||
(ret == ERROR_FILE_NOT_FOUND &&
(is_url(v[k]) || is_directory(v[k]))
)
) {
char erbuf[MAX_PATH];
errno = ENOEXEC;
try_shell_ex(&v[k],0,FALSE);
heap_free(cmdstr); /* free !! */
if (errno) {
strerror_s(erbuf,sizeof(erbuf),errno);
stderror(ERR_ARCH,argv0,erbuf);/*FIXRESET*/
}
}
else if (ret == ERROR_INVALID_PARAMETER) {
errno = ENAMETOOLONG;
heap_free(cmdstr); /* free !! */
stderror(ERR_TOOLARGE,argv0);/*FIXRESET*/
}
else {
errno = ENOENT;
if (
( (v[k][0] == '\\') ||(v[k][0] == '/') ) &&
( (v[k][1] == '\\') ||(v[k][1] == '/') ) &&
(!v[k+1])
)
try_shell_ex(&v[k],0,FALSE);
heap_free(cmdstr); /* free !! */
if (errno) {
stderror(ERR_NOTFOUND,argv0);/*FIXRESET*/
}
}
}
else {
CloseHandle(pi.hProcess);
CloseHandle(pi.hThread);
heap_free(cmdstr);
restore_path(savepath);
}
blkfree((Char **)v);
return;
}
int main(int argc, char** argv) {
int store_width, store_height, store_autow, store_autoh;
FILE *fout = stdout;
#ifdef FEAT_CURL
FILE *fr;
int fd;
#endif
FILE *fp;
int n;
parse_options(argc, argv);
store_width = width;
store_height = height;
store_autow = auto_width;
store_autoh = auto_height;
if ( strcmp(fileout, "-") ) {
if ( (fout = fopen(fileout, "wb")) == NULL ) {
fprintf(stderr, "Could not open '%s' for writing.\n", fileout);
return 1;
}
}
for ( n=1; n<argc; ++n ) {
width = store_width;
height = store_height;
auto_width = store_autow;
auto_height = store_autoh;
// skip options
if ( argv[n][0]=='-' && argv[n][1] )
continue;
// read from stdin
if ( argv[n][0]=='-' && !argv[n][1] ) {
#ifdef _WIN32
// Good news, everyone!
_setmode( _fileno( stdin ), _O_BINARY );
#endif
decompress(stdin, fout);
continue;
}
#ifdef FEAT_CURL
if ( is_url(argv[n]) ) {
if ( verbose )
fprintf(stderr, "URL: %s\n", argv[n]);
fd = curl_download(argv[n], debug);
if ( (fr = fdopen(fd, "rb")) == NULL ) {
fputs("Could not fdopen read pipe\n", stderr);
return 1;
}
decompress(fr, fout);
fclose(fr);
close(fd);
continue;
}
#endif
// read files
if ( (fp = fopen(argv[n], "rb")) != NULL ) {
if ( verbose )
fprintf(stderr, "File: %s\n", argv[n]);
decompress(fp, fout);
fclose(fp);
continue;
} else {
fprintf(stderr, "Can't open %s\n", argv[n]);
return 1;
}
}
if ( fout != stdout )
fclose(fout);
return 0;
}
void try_shell_ex(char **argv,int exitsuccess, BOOL throw_ok) {/*FIXRESET*/
char *prog;
char *cmdstr, *p2, *cmdend;
char *originalPtr = NULL;
unsigned int cmdsize,cmdlen;
char err2[256];
char *ptr;
SHELLEXECUTEINFO shinfo;
unsigned long mask = SEE_MASK_FLAG_NO_UI;
BOOL rc;
char *extension;
prog=*argv;
dprintf("trying shellex for prog %s\n",prog);
ptr = prog;
if (!is_url(prog)) {
while(*ptr) {
if (*ptr == '/')
*ptr = '\\';
ptr++;
}
extension = ptr;
// search back for "."
while(extension != prog) {
if (*extension == '.') {
extension++;
break;
}
else
extension--;
}
/* check if this matches a member in the no_assoc array.
*/
if (extension != prog) {
if (find_no_assoc(extension))
return;
}
}
originalPtr = cmdstr= heap_alloc(MAX_PATH<<2);
cmdsize = MAX_PATH<<2;
p2 = cmdstr;
cmdlen = 0;
cmdend = p2;
argv++; // the first arg is the command
dprintf("try_shell_ex calling c_a_a_q");
if(!concat_args_and_quote(argv,&originalPtr,&cmdstr,&cmdlen,&cmdend,&cmdsize))
{
errno = ENOMEM;
heap_free(originalPtr);
return;
}
*cmdend = 0;
memset(&shinfo,0,sizeof(shinfo));
shinfo.cbSize = sizeof(shinfo);
shinfo.fMask = SEE_MASK_FLAG_DDEWAIT | mask;
shinfo.hwnd = NULL;
shinfo.lpVerb = NULL;
shinfo.lpFile = prog;
shinfo.lpParameters = &cmdstr[0];
shinfo.lpDirectory = 0;
shinfo.nShow = SW_SHOWDEFAULT;
ptr = fix_path_for_child();
rc = pShellExecuteEx(&shinfo);
if (rc ) {
if (exitsuccess)
ExitProcess(0);
errno = 0;
heap_free(originalPtr);
return;
}
if (throw_ok) {
// if we got here, ShellExecuteEx failed, so reset() via stderror()
// this may cause the caller to leak, but the assumption is that
// only a child process sets exitsuccess, so it will be dead soon
// anyway
restore_path(ptr);
make_err_str(GetLastError(),cmdstr,512);//don't need the full size
(void)StringCbPrintf(err2,sizeof(err2),"%s",prog);
stderror(ERR_SYSTEM,err2,cmdstr);/*FIXRESET*/
}
heap_free(originalPtr);
restore_path(ptr);
errno = ENOEXEC;
}
