src/ecmascript/spidermonkey/unibar.c

   1 /* The SpiderMonkey location and history objects implementation. */
   2
   3 #ifdef HAVE_CONFIG_H
   4 #include "config.h"
   5 #endif
   6
   7 #include <stdio.h>
   8 #include <stdlib.h>
   9 #include <string.h>
  10
  11 #include "elinks.h"
  12
  13 #include "ecmascript/spidermonkey/util.h"
  14
  15 #include "bfu/dialog.h"
  16 #include "cache/cache.h"
  17 #include "cookies/cookies.h"
  18 #include "dialogs/menu.h"
  19 #include "dialogs/status.h"
  20 #include "document/html/frames.h"
  21 #include "document/document.h"
  22 #include "document/forms.h"
  23 #include "document/view.h"
  24 #include "ecmascript/ecmascript.h"
  25 #include "ecmascript/spidermonkey/unibar.h"
  26 #include "intl/gettext/libintl.h"
  27 #include "main/select.h"
  28 #include "osdep/newwin.h"
  29 #include "osdep/sysname.h"
  30 #include "protocol/http/http.h"
  31 #include "protocol/uri.h"
  32 #include "session/history.h"
  33 #include "session/location.h"
  34 #include "session/session.h"
  35 #include "session/task.h"
  36 #include "terminal/tab.h"
  37 #include "terminal/terminal.h"
  38 #include "util/conv.h"
  39 #include "util/memory.h"
  40 #include "util/string.h"
  41 #include "viewer/text/draw.h"
  42 #include "viewer/text/form.h"
  43 #include "viewer/text/link.h"
  44 #include "viewer/text/vs.h"
  45
  46
  47 static JSBool unibar_get_property(JSContext *ctx, JSObject *obj, jsval id, jsval *vp);
  48 static JSBool unibar_set_property(JSContext *ctx, JSObject *obj, jsval id, jsval *vp);
  49
  50 const JSClass menubar_class = {
  51         "menubar",
  52         JSCLASS_HAS_PRIVATE,    /* const char * "t" */
  53         JS_PropertyStub, JS_PropertyStub,
  54         unibar_get_property, unibar_set_property,
  55         JS_EnumerateStub, JS_ResolveStub, JS_ConvertStub, JS_FinalizeStub
  56 };
  57 const JSClass statusbar_class = {
  58         "statusbar",
  59         JSCLASS_HAS_PRIVATE,    /* const char * "s" */
  60         JS_PropertyStub, JS_PropertyStub,
  61         unibar_get_property, unibar_set_property,
  62         JS_EnumerateStub, JS_ResolveStub, JS_ConvertStub, JS_FinalizeStub
  63 };
  64
  65 enum unibar_prop { JSP_UNIBAR_VISIBLE };
  66 const JSPropertySpec unibar_props[] = {
  67         { "visible",    JSP_UNIBAR_VISIBLE,     JSPROP_ENUMERATE },
  68         { NULL }
  69 };
  70
  71
  72 static JSBool
  73 unibar_get_property(JSContext *ctx, JSObject *obj, jsval id, jsval *vp)
  74 {
  75         JSObject *parent = JS_GetParent(ctx, obj);
  76         struct view_state *vs = JS_GetPrivate(ctx, parent);
  77         struct document_view *doc_view = vs->doc_view;
  78         struct session_status *status = &doc_view->session->status;
  79         unsigned char *bar = JS_GetPrivate(ctx, obj);
  80
  81         if (!JSVAL_IS_INT(id))
  82                 return JS_TRUE;
  83
  84         switch (JSVAL_TO_INT(id)) {
  85         case JSP_UNIBAR_VISIBLE:
  86 #define unibar_fetch(bar) \
  87         boolean_to_jsval(ctx, vp, status->force_show_##bar##_bar >= 0 \
  88                   ? status->force_show_##bar##_bar \
  89                   : status->show_##bar##_bar)
  90                 switch (*bar) {
  91                 case 's':
  92                         unibar_fetch(status);
  93                         break;
  94                 case 't':
  95                         unibar_fetch(title);
  96                         break;
  97                 default:
  98                         boolean_to_jsval(ctx, vp, 0);
  99                         break;
 100                 }
 101 #undef unibar_fetch
 102                 break;
 103         default:
 104                 INTERNAL("Invalid ID %d in unibar_get_property().", JSVAL_TO_INT(id));
 105                 break;
 106         }
 107
 108         return JS_TRUE;
 109 }
 110
 111 static JSBool
 112 unibar_set_property(JSContext *ctx, JSObject *obj, jsval id, jsval *vp)
 113 {
 114         JSObject *parent = JS_GetParent(ctx, obj);
 115         struct view_state *vs = JS_GetPrivate(ctx, parent);
 116         struct document_view *doc_view = vs->doc_view;
 117         struct session_status *status = &doc_view->session->status;
 118         unsigned char *bar = JS_GetPrivate(ctx, obj);
 119
 120         if (!JSVAL_IS_INT(id))
 121                 return JS_TRUE;
 122
 123         switch (JSVAL_TO_INT(id)) {
 124         case JSP_UNIBAR_VISIBLE:
 125                 switch (*bar) {
 126                 case 's':
 127                         status->force_show_status_bar = jsval_to_boolean(ctx, vp);
 128                         break;
 129                 case 't':
 130                         status->force_show_title_bar = jsval_to_boolean(ctx, vp);
 131                         break;
 132                 default:
 133                         break;
 134                 }
 135                 register_bottom_half(update_status, NULL);
 136                 break;
 137         default:
 138                 INTERNAL("Invalid ID %d in unibar_set_property().", JSVAL_TO_INT(id));
 139                 return JS_TRUE;
 140         }
 141
 142         return JS_TRUE;
 143 }