clark-conkeror/clark.js
Tom Willemsen 7cd8f9d196 Add clark-remove command
Removes the current url from the database.
2013-03-24 16:30:52 +01:00

210 lines
7.1 KiB
JavaScript
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/* Copyright (C) 2013 Tom Willemsen <tom at ryuslash dot org>
This file is part of CLark
CLark is free software: you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.
CLark is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
General Public License for more details.
You should have received a copy of the GNU General Public License
along with CLark. If not, see <http://www.gnu.org/licenses/>.
*/
/// Commentary:
// A wrapper script that should allow conkeror to interface with
// CLark.
/// Code:
define_variable("clark_program", "clark",
"The location of the clark executable.");
define_browser_object_class(
"clark-bookmark", null,
function (I, prompt) {
check_buffer(I.buffer, content_buffer);
var result = yield I.buffer.window.minibuffer.read(
$prompt = prompt, $completer = clark_complete
);
yield co_return(result);
}
);
function clark_add_url(I, url, title)
{ // Add URL to clark, ask for a title (provide TITLE as a
// default), description and any number of tags.
let url_string = load_spec_uri_string(load_spec(url));
let title = yield I.minibuffer.read($prompt="name (required): ",
$initial_value=title);
let description = yield I.minibuffer.read(
$prompt="extended description: "
);
let tags = yield I.minibuffer.read(
$prompt="tags (comma delimited): "
);
let command = clark_program + ' add "' + url_string + '" "' + title
+ '" "' + description + '" \''
+ tags.split(',').map(function (str)
{ return str.trim(); }).join("' '")
+ "'";
yield shell_command(command);
}
function clark_add(I) {
check_buffer(I.buffer, content_buffer);
let result = yield clark_add_url(I, I.buffer.top_frame,
I.buffer.title);
if (!result)
I.window.minibuffer.message('Added to clark');
else
I.window.minibuffer.message('Couldn\'t add to clark');
}
interactive("clark-add",
"Bookmark the current page in clark",
clark_add);
function clark_add_link(I) {
check_buffer(I.buffer, content_buffer);
var bo = yield read_browser_object(I);
let result = yield clark_add_url(I, encodeURIComponent(bo),
bo.textContent);
if (!result)
I.window.minibuffer.message('Added to clark');
else
I.window.minibuffer.message('Couldn\'t add to clark');
}
interactive("clark-add-link",
"Select and bookmark a link in clark",
clark_add_link);
function clark_complete(input, pos, conservative)
{
if (pos == 0 && conservative)
yield co_return(undefined);
let str = input.substring(0, pos);
var data = "", error = "", ret = [];
var result = 0;
if (str == "")
result = yield shell_command(
clark_program + " --script",
$fds = [{ output: async_binary_string_writer("") },
{ input: async_binary_reader(function (s) data += s || "") },
{ input: async_binary_reader(function (s) error += s || "") }]);
else
result = yield shell_command_with_argument(
clark_program + " --script search {}", str,
$fds = [{ output: async_binary_string_writer("") },
{ input: async_binary_reader(function (s) data += s || "") },
{ input: async_binary_reader(function (s) error += s || "") }]);
if (result != 0 || error != "")
throw new Error("result: " + result + ", error: " + error);
else if (data != "") {
data.split('').forEach(function (row) {
ret.push(row.split(''));
});
let c = { count: ret.length,
get_string: function (i) ret[i][0],
get_description: function (i) ret[i][1],
get_input_state: function (i) [ret[i][2]] };
yield co_return(c);
}
}
interactive("clark-find-url",
"Find a page from clark in the current buffer",
"find-url",
$browser_object = browser_object_clark_bookmark);
interactive("clark-find-url-new-buffer",
"Find a page from clark in a new buffer",
"find-url-new-buffer",
$browser_object = browser_object_clark_bookmark);
function clark_edit(I) {
check_buffer(I.buffer, content_buffer);
let url_string =
load_spec_uri_string(load_spec(I.buffer.top_frame));
let title = yield I.minibuffer.read(
$prompt="name (leave empty to skip): ",
$initial_value=I.buffer.title
);
let description = yield I.minibuffer.read(
$prompt="description (leave empty to skip): "
);
let command = clark_program + ' edit "' + url_string + '" ';
if (title == "" && description == "")
I.window.minibuffer.message('Nothing to change');
else {
if (title != "")
command += "--name '" + title + "' ";
if (description != "")
command += "--description '" + description + "' ";
var result = yield shell_command(command);
I.window.minibuffer.message("CLark done");
}
}
interactive("clark-edit", "Edit information for the current URL.",
clark_edit);
function clark_exists_p(I) {
check_buffer(I.buffer, content_buffer);
let url_string =
load_spec_uri_string(load_spec(I.buffer.top_frame));
let command = clark_program + ' exists "' + url_string + '"';
var data = "", error = "";
var result = yield shell_command(
command,
$fds = [{ output: async_binary_string_writer("") },
{ input: async_binary_reader(function (s) data += s || "") },
{ input: async_binary_reader(function (s) error += s || "") }]
);
if (error != "")
throw new Error("Error occurred with CLark: " + error);
I.window.minibuffer.message(data);
}
interactive("clark-exists-p", "Check to see if the current url"
+ " exists in the database.", clark_exists_p);
function clark_remove(I) {
check_buffer(I.buffer, content_buffer);
let url_string =
load_spec_uri_string(load_spec(I.buffer.top_frame));
let command = clark_program + ' remove "' + url_string + '"';
let result = yield shell_command(command);
I.window.minibuffer.message("CLark done");
}
interactive("clark-remove", "Remove the bookmark of the current URL"
+ " from the database.", clark_remove);
define_keymap("clark_keymap");
define_key(clark_keymap, "?", "clark-exists-p");
define_key(clark_keymap, "a", "clark-add");
define_key(clark_keymap, "A", "clark-add-link");
define_key(clark_keymap, "e", "clark-edit");
define_key(clark_keymap, "f", "clark-find-url");
define_key(clark_keymap, "F", "clark-find-url-new-buffer");
define_key(clark_keymap, "r", "clark-remove");
provide("clark");