Ubuntu Sverige

Kod: Markera allt

#include <stdlib.h>
#include <unistd.h>
#include <X11/Xlib.h>

int main()
{
        Display *dpy;
        Window win;
        XWindowAttributes xwa;

        XColor xcl;
        int i, red, green, blue, r, g, b;
        int ctab[256];

        XGCValues gcv;
        GC gc;
        XImage *xim;

        XEvent event;

        unsigned char *flame;
        int fwidth, fheight, hspread, vspread, residual;
        int x, y, v1, v2, v3, v4;
        int top, newtop, used;
        unsigned char *ptr1, *ptr2;
        unsigned int *ptr;

        int ihspread = 30;
        int ivspread = 97;
        int iresidual = 99;
        int variance = 50;
        int vartrend = 20;
        int delay = 10000;


        dpy = XOpenDisplay(NULL);
        if (!dpy) return 1;
        win = DefaultRootWindow(dpy);

        XGetWindowAttributes(dpy, win, &xwa);
        fwidth  = (xwa.width + 1) / 2;
        fheight = (xwa.height + 1) / 2;

        if (!XParseColor(dpy, xwa.colormap, "#FFAF5F", &xcl)) return 1;
        if (!XAllocColor(dpy, xwa.colormap, &xcl)) return 1;
        XQueryColor(dpy, xwa.colormap, &xcl);

        red = 3 * (255 - (xcl.red >> 8));
        green = 3 * (255 - (xcl.green >> 8));
        blue = 3 * (255 - (xcl.blue >> 8));
        for (i = 0; i < 256; i++)
        {
                r = 6*i - red;
                g = 6*i - green;
                b = 6*i - blue;

                if (r < 0) r = 0;
                if (g < 0) g = 0;
                if (b < 0) b = 0;
                if (r > 255) r = 255;
                if (g > 255) g = 255;
                if (b > 255) b = 255;

                xcl.red   = (unsigned short) ((r << 8) | r);
                xcl.green = (unsigned short) ((g << 8) | g);
                xcl.blue  = (unsigned short) ((b << 8) | b);
                xcl.flags = DoRed | DoGreen | DoBlue;

                XAllocColor(dpy, xwa.colormap, &xcl);
                ctab[i] = (int) xcl.pixel;
        }

        gcv.subwindow_mode = IncludeInferiors;
        xim = XCreateImage(
                dpy, xwa.visual, xwa.depth, ZPixmap,
                0, NULL, xwa.width, xwa.height, 32, 0);
        if (!xim) return 1;
        xim->data = (char *) calloc(xim->height, xim->bytes_per_line);
        if (!xim->data) return 1;
        gc = XCreateGC(dpy, win, GCSubwindowMode, &gcv);
        if (!gc) return 1;

        XGrabServer(dpy);
        if (    XGrabKeyboard(dpy, win, False,
                              GrabModeAsync, GrabModeAsync,
                              CurrentTime) != GrabSuccess ||
                XGrabPointer(dpy, win, False, ButtonPressMask,
                             GrabModeAsync, GrabModeAsync,
                             None, 0, CurrentTime) != GrabSuccess
                ) return 1;
        XImage *ximbak = XGetImage(
                dpy, win, 0, 0, xwa.width, xwa.height, AllPlanes, ZPixmap);
        XFillRectangle(dpy, win, gc, 0, 0, xwa.width, xwa.height);

        flame = (unsigned char *)
                malloc((fwidth + 2) * (fheight + 2) * sizeof(unsigned char));
        if (!flame) return 1;

        for (y = 0; y < fheight + 1; y++)
        {
                ptr1 = flame + 1 + (y * (fwidth + 2));
                for (x = 0; x < fwidth; x++)
                {
                        *ptr1 = 0;
                        ptr1++;
                }
        }
        hspread = ihspread;
        vspread = ivspread;
        residual = iresidual;

        for(top = 1;;) {
                ptr1 = flame + (fheight + 1) * (fwidth + 2);
                for (x = 0; x < fwidth + 2; x++)
                {
                        v1 = *ptr1 + ((random() % variance) - vartrend);
                        *ptr1++ = v1 % 255;
                }
                hspread = ((ihspread * 10) + (hspread * 90)) / 100;
                vspread = ((ivspread * 10) + (vspread * 90)) / 100;
                residual = ((iresidual * 10) + (residual * 90)) / 100;

                for (newtop = top, y = fheight + 1; y >= top; y--)
                {
                        ptr1 = flame + 1 + (y * (fwidth + 2));
                        for (used = 0, x = 0; x < fwidth; x++)
                        {
                                v1 = (int) *ptr1;
                                if (v1 > 0)
                                {
                                        used = 1;
                                        ptr2 = ptr1 - fwidth - 2;
                                        v3 = (v1 * vspread) >> 8;
                                        v2 = (int)*(ptr2);
                                        v2 += v3;
                                        if (v2 > 255) v2 = 255;

                                        *(ptr2) = (unsigned char) v2;
                                        v3 = (v1 * hspread) >> 8;
                                        v2 = (int)*(ptr2 + 1);
                                        v2 += v3;
                                        if (v2 > 255) v2 = 255;

                                        *(ptr2 + 1) = (unsigned char) v2;
                                        v2 = (int)*(ptr2 - 1);
                                        v2 += v3;
                                        if (v2 > 255) v2 = 255;

                                        *(ptr2 - 1) = (unsigned char) v2;

                                        if (y < fheight + 1)
                                        {
                                                v1 = (v1 * residual) >> 8;
                                                *ptr1 = (unsigned char) v1;
                                        }
                                }
                                ptr1++;
                                if (used) newtop = y - 1;
                        }
                        *ptr1 = (unsigned char)
                                ((((int)*ptr1) * residual) >> 8);
                }
                top = newtop - 1;
                if (top < 1) top = 1;

                ptr1 = flame + 1 + (top * (fwidth + 2));
                ptr  = (unsigned int *)xim->data + (top << 1) * xwa.width;
                for (y = top; y < fheight; y++, ptr1 += 2, ptr += xwa.width)
                {
                        for (x = 0; x < fwidth; x++, ptr1++)
                        {
                                v1 = (int) *ptr1;
                                v2 = (int) *(ptr1 + 1);
                                v3 = (int) *(ptr1 + 2 + fwidth);
                                v4 = (int) *(ptr1 + 3 + fwidth);

                                *ptr = (unsigned int) ctab[v1];
                                ptr++;

                                *ptr = (unsigned int) ctab[(v1 + v2) >> 1];
                                ptr += xwa.width - 1;

                                *ptr = (unsigned int) ctab[(v1 + v3) >> 1];
                                ptr ++;

                                *ptr = (unsigned int) ctab[(v1 + v4) >> 1];
                                ptr -= xwa.width - 1;
                        }
                }

                XPutImage(dpy, win, gc, xim, 0,
                          (top - 1) << 1, 0, (top - 1) << 1,
                          xwa.width, xwa.height - ((top - 1) << 1));
                XSync(dpy, False);
                usleep(delay);
                while (XPending(dpy))
                {
                        XNextEvent(dpy, &event);
                        switch (event.type)
                        {
                        case KeyPress:
                        case ButtonPress:
                                XPutImage(
                                        dpy, win, gc, ximbak,
                                        0, 0, 0, 0, xwa.width, xwa.height);
                                XUngrabPointer(dpy, CurrentTime);
                                XUngrabKeyboard(dpy, CurrentTime);
                                XUngrabServer(dpy);
                                XCloseDisplay(dpy);
                                return 0;
                        }
                }
        }
}

Kod: Markera allt

sudo apt-get install libx11-dev