ref: 52965c9a8366b1b30742215543032ef863f0b217
author: spew <spew@palas>
date: Wed Feb 19 01:46:23 EST 2025
add files
--- /dev/null
+++ b/mkfile
@@ -1,0 +1,6 @@
+</$objtype/mkfile
+
+LIB=libscroll.$O.a
+OFILES=scroll.$O
+
+</sys/src/cmd/mklib
--- /dev/null
+++ b/scroll.c
@@ -1,0 +1,51 @@
+#include <u.h>
+#include <libc.h>
+#include <draw.h>
+#include <thread.h>
+#include <mouse.h>
+#include <frame.h>
+#include "scroll.h"
+
+enum {+ Scrollwid = 12, /* width of scroll bar */
+ Scrollgap = 4, /* gap right of scroll bar */
+};
+
+Rectangle
+scrollinit(Scroll *s, Rectangle r, Image *b, Image **cols)
+{+ if(cols != nil)
+ memmove(s->cols, cols, sizeof(s->cols));
+ s->r = r;
+ s->r.max.x = r.min.x + Scrollwid;
+ s->image = b;
+ r.min.x += Scrollwid + Scrollgap;
+ return r;
+}
+
+void
+scrollpos(Scroll *s, uint p₀, uint p₁, uint tot)
+{+ Rectangle q;
+ int h;
+
+ q = s->r;
+ h = Dy(q);
+ if(tot > 1024*1024){+ tot>>=10;
+ p₀>>=10;
+ p₁>>=10;
+ }
+ if(tot > 0){+ q.min.y += h*p₀/tot;
+ q.max.y = q.min.y+h*(p₁-p₀)/tot;
+ }
+ draw(s->image, s->r, s->cols[BORD], nil, ZP);
+ draw(s->image, insetrect(q, 1), s->cols[BACK], nil, ZP);
+}
+
+int
+scrollscr(Scroll *s, Mouse *m, uint *p₀)
+{+ return -1;
+}
--- /dev/null
+++ b/scroll.h
@@ -1,0 +1,11 @@
+typedef struct Scroll Scroll;
+
+struct Scroll {+ Rectangle r;
+ Image *image, *cols[NCOL];
+ vlong pos, part, tot;
+};
+
+Rectangle scrollinit(Scroll *s, Rectangle r, Image *b, Image **cols);
+void scrollpos(Scroll *s, uint p₀, uint p₁, uint tot);
+int scrollscr(Scroll *s, Mouse *m, uint *p₀);