Bruce/nuke
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Tidying up spaces and such.

Browse Source
This commit is contained in:
Bruce Hill 2019-01-05 21:44:59 -08:00
parent c4df03cc8b
commit acfffade06
4 changed files with 504 additions and 581 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
colors.h
View File

@ -1,4 +1,5 @@
#ifndef __colors #ifndef __colors
#define __colors #define __colors
const int WHITE = 1, YELLOW = 2, RED = 3, BLUE = 4, GREEN = 5, BLACK = 6; const int WHITE = 1, YELLOW = 2, RED = 3, BLUE = 4, GREEN = 5, BLACK = 6, WHITE_BG = 7,
BLACK_ON_RED = 8, BLACK_ON_GREEN = 9;
#endif #endif

247
globe.h
View File

@ -1,6 +1,6 @@
/** /**
* ASCII spinning glboe * ASCII spinning glboe
*/ */
#include "colors.h" #include "colors.h"
#include <curses.h> #include <curses.h>
@ -12,165 +12,168 @@
#include <poll.h> #include <poll.h>
static const double GOLDEN_RATIO = 1.6180339887498948482045868343656381; static const double GOLDEN_RATIO = 1.6180339887498948482045868343656381;
static const int NUM_WAVES = 7; static const int NUM_WAVES = 7;
// Randomly generated x/y offsets:
static const double OFFSETS[2*NUM_WAVES] = { static const double OFFSETS[2*NUM_WAVES] = {
0.5459919526, 0.6072439135, 0.6217563193, 0.5444045324, 0.8923452588, 0.5459919526, 0.6072439135, 0.6217563193, 0.5444045324, 0.8923452588,
0.4626828607, 0.9422234679, 0.4626828607, 0.9422234679,
0.7870886548, 0.7425605127, 0.1510923405, 0.3889282293, 0.3730024274, 0.7870886548, 0.7425605127, 0.1510923405, 0.3889282293, 0.3730024274,
0.1450487012, 0.9051931355, 0.1450487012, 0.9051931355,
}; };
// 0.83^n amplitudes
static const double AMPLITUDES[NUM_WAVES] = { static const double AMPLITUDES[NUM_WAVES] = {
//0.9, 0.81, 0.729, 0.6561, 0.59049, 0.531441, 0.4782969 0.83, 0.6889, 0.571787, 0.47458321, 0.3939040643, 0.326940373369, 0.27136050989627
0.83, 0.6889, 0.571787, 0.47458321, 0.3939040643, 0.326940373369, 0.27136050989627
}; };
// See: https://blog.bruce-hill.com/hill-noise/
static double hillnoise(double x, double y) static double hillnoise(double x, double y)
{ {
double noise = 0; double noise = 0;
double sigma = 0; double sigma = 0;
for (int i = 0; i < NUM_WAVES; i++) { for (int i = 0; i < NUM_WAVES; i++) {
// Rotate coordinates // Rotate coordinates
double rotation = fmod(((float)i)*GOLDEN_RATIO, 1.0)*2.0*M_PI; double rotation = fmod(((float)i)*GOLDEN_RATIO, 1.0)*2.0*M_PI;
double u = x*cos(rotation) - y*sin(rotation); double u = x*cos(rotation) - y*sin(rotation);
double v = -x*sin(rotation) - y*cos(rotation); double v = -x*sin(rotation) - y*cos(rotation);
double size = AMPLITUDES[i]; double size = AMPLITUDES[i];
double offsetx = OFFSETS[2*i]; double offsetx = OFFSETS[2*i];
double offsety = OFFSETS[2*i+1]; double offsety = OFFSETS[2*i+1];
noise += (size/2.)*(sin(u/size + offsetx) + sin(v/size + offsety)); noise += (size/2.)*(sin(u/size + offsetx) + sin(v/size + offsety));
sigma += size*size; sigma += size*size;
} }
sigma = sqrt(sigma)/2.; sigma = sqrt(sigma)/2.;
noise /= 2.*sigma; noise /= 2.*sigma;
return (0.5*(noise < 0 ? -1. : 1.)*sqrt(1 - exp(-2./M_PI * noise*noise)) + 0.5); return (0.5*(noise < 0 ? -1. : 1.)*sqrt(1 - exp(-2./M_PI * noise*noise)) + 0.5);
} }
static double mix(double a, double b, double amount) static double mix(double a, double b, double amount)
{ {
return (1.-amount)*a + amount*b; return (1.-amount)*a + amount*b;
} }
void draw_stars(double t) void draw_stars(double t)
{ {
int rows,cols; int rows,cols;
getmaxyx(stdscr,rows,cols); getmaxyx(stdscr,rows,cols);
attron(COLOR_PAIR(WHITE)); attron(COLOR_PAIR(WHITE));
for (int r = 0; r < rows; r++) { for (int r = 0; r < rows; r++) {
for (int c = 0; c < cols; c++) { for (int c = 0; c < cols; c++) {
double n = hillnoise(r*1,c*2+(t*.04)); double n = hillnoise(r*1,c*2+(t*.04));
if (n > .8) { if (n > .8) {
mvaddch(r,c,n > .9 ? '*' : '.'); mvaddch(r,c,n > .9 ? '*' : '.');
} }
}
} }
} attroff(COLOR_PAIR(WHITE));
attroff(COLOR_PAIR(WHITE));
} }
static double get_rotation(double t) static double get_rotation(double t)
{ {
return t * (2*M_PI)/60. + M_PI; return t * (2*M_PI)/60. + M_PI;
} }
void draw_globe(double t, double zoom) void draw_globe(double t, double zoom)
{ {
int rows,cols; int rows,cols;
getmaxyx(stdscr,rows,cols); getmaxyx(stdscr,rows,cols);
double rotation = get_rotation(t); double rotation = get_rotation(t);
const double rho = rows/2.; const double rho = rows/2.;
for (int r = 0; r < rows; r++) { for (int r = 0; r < rows; r++) {
for (int c = 0; c < cols; c++) { for (int c = 0; c < cols; c++) {
double y = (c - cols/2) * 0.5 / zoom; double y = (c - cols/2) * 0.5 / zoom;
double z = (r - rows/2) * 1.0 / zoom; double z = (r - rows/2) * 1.0 / zoom;
double x = sqrt(rho*rho - z*z - y*y); double x = sqrt(rho*rho - z*z - y*y);
if (z*z + y*y > rho*rho) { if (z*z + y*y > rho*rho) {
continue; continue;
} }
double theta = atan2(z, sqrt(x*x + y*y)); double theta = atan2(z, sqrt(x*x + y*y));
double phi = fmod(atan2(y, x) + rotation, 2.*M_PI); double phi = fmod(atan2(y, x) + rotation, 2.*M_PI);
double elevation = hillnoise(theta*4., phi*4.); double elevation = hillnoise(theta*4., phi*4.);
double clouds = hillnoise(theta*12., phi*6. - 1.*rotation - 140.); double clouds = hillnoise(theta*12., phi*6. - 1.*rotation - 140.);
int color; int color;
int ch; int ch;
if ((fabs(z)/rho) > .9) { if ((fabs(z)/rho) > .9) {
elevation = elevation + mix(.0, 1., 10.*(fabs(z)/rho - .9)) > .6 ? 1. : 0.; elevation = elevation + mix(.0, 1., 10.*(fabs(z)/rho - .9)) > .6 ? 1. : 0.;
} }
if (clouds < .4) { if (clouds < .4) {
continue; continue;
} else if (elevation < .55) { } else if (elevation < .55) {
// Water // Water
ch = '~'; ch = '~';
color = COLOR_PAIR(BLUE); color = COLOR_PAIR(BLUE);
} else if (elevation < .65) { } else if (elevation < .65) {
// Sand // Sand
ch = ':'; ch = ':';
color = COLOR_PAIR(YELLOW); color = COLOR_PAIR(YELLOW);
} else if (elevation < .75) { } else if (elevation < .75) {
// Grass // Grass
ch = ',' | A_BOLD; ch = ',' | A_BOLD;
color = COLOR_PAIR(GREEN); color = COLOR_PAIR(GREEN);
} else if (elevation < .85) { } else if (elevation < .85) {
// Forest // Forest
ch = '&'; ch = '&';
color = COLOR_PAIR(GREEN); color = COLOR_PAIR(GREEN);
} else { } else {
// Mountain // Mountain
ch = '#'; ch = '#';
color = COLOR_PAIR(WHITE); color = COLOR_PAIR(WHITE);
} }
attron(color); attron(color);
mvaddch(r,c,ch); mvaddch(r,c,ch);
attroff(color); attroff(color);
}
} }
}
} }
void draw_clouds(double t, double zoom) void draw_clouds(double t, double zoom)
{ {
int rows,cols; int rows,cols;
getmaxyx(stdscr,rows,cols); getmaxyx(stdscr,rows,cols);
double rotation = get_rotation(t); double rotation = get_rotation(t);
const double rho = rows/2.; const double rho = rows/2.;
for (int r = 0; r < rows; r++) { for (int r = 0; r < rows; r++) {
for (int c = 0; c < cols; c++) { for (int c = 0; c < cols; c++) {
double y = (c - cols/2) * 0.5 / zoom; double y = (c - cols/2) * 0.5 / zoom;
double z = (r - rows/2) * 1.0 / zoom; double z = (r - rows/2) * 1.0 / zoom;
double x = sqrt(rho*rho - z*z - y*y); double x = sqrt(rho*rho - z*z - y*y);
if (z*z + y*y > rho*rho) { if (z*z + y*y > rho*rho) {
continue; continue;
} }
double theta = atan2(z, sqrt(x*x + y*y)); double theta = atan2(z, sqrt(x*x + y*y));
double phi = fmod(atan2(y, x) + rotation, 2.*M_PI); double phi = fmod(atan2(y, x) + rotation, 2.*M_PI);
double clouds = hillnoise(theta*12., phi*6. - 1.*rotation - 140.); double clouds = hillnoise(theta*12., phi*6. - 1.*rotation - 140.);
int color; int color;
int ch; int ch;
if (clouds < .4) { if (clouds < .4) {
ch = (clouds < .3 ? '0' : '%') | A_BOLD; ch = (clouds < .3 ? '0' : '%') | A_BOLD;
color = COLOR_PAIR(WHITE); color = COLOR_PAIR(WHITE);
attron(color); attron(color);
mvaddch(r,c,ch); mvaddch(r,c,ch);
attroff(color); attroff(color);
} }
}
} }
}
} }
int latlon_to_rc(double t, double zoom, double lat, double lon, int *r, int *c) int latlon_to_rc(double t, double zoom, double lat, double lon, int *r, int *c)
{ {
int rows,cols; int rows,cols;
getmaxyx(stdscr,rows,cols); getmaxyx(stdscr,rows,cols);
const double rho = rows/2.; const double rho = rows/2.;
double theta = lat; double theta = lat;
double phi = lon + get_rotation(t); double phi = lon + get_rotation(t);
double x = rho*sin(theta)*cos(phi); double x = rho*sin(theta)*cos(phi);
double y = rho*sin(theta)*sin(phi); double y = rho*sin(theta)*sin(phi);
double z = rho*cos(theta); double z = rho*cos(theta);
*r = z / (1.0/zoom) + rows/2; *r = z / (1.0/zoom) + rows/2;
*c = y / (.5/zoom) + cols/2; *c = y / (.5/zoom) + cols/2;
return x < 0; return x < 0;
} }
const double target_lat = M_PI/2*1.01; const double target_lat = M_PI/2*1.01;
@ -178,5 +181,5 @@ const double target_lon = M_PI + 2.6;
// return 1 if visible, else 0 // return 1 if visible, else 0
int get_target_pos(double t, double zoom, int *targetr, int *targetc) int get_target_pos(double t, double zoom, int *targetr, int *targetc)
{ {
return latlon_to_rc(t, zoom, target_lat, target_lon, targetr, targetc); return latlon_to_rc(t, zoom, target_lat, target_lon, targetr, targetc);
} }

80
list.h
View File

@ -1,54 +1,58 @@
/**
* Helper functions for adding files to a dynamically resizing array.
*/
#include <dirent.h> #include <dirent.h>
#include <string.h> #include <string.h>
#include <stdlib.h> #include <stdlib.h>
#include <stdio.h> #include <stdio.h>
#define MAX_FILES 200 #define MAX_FILES 200
void add_file(char *name, char ***files, int *size, int *capacity) void add_file(char *name, char ***files, int *size, int *capacity)
{ {
// Prevent from taking too long // Prevent from taking too long
if (*size > MAX_FILES) return; if (*size > MAX_FILES) return;
if (*size == *capacity) { if (*size == *capacity) {
*capacity *= 2; *capacity *= 2;
*files = realloc(*files, sizeof(char*) * (*capacity)); *files = realloc(*files, sizeof(char*) * (*capacity));
} }
if (*size == MAX_FILES) if (*size == MAX_FILES)
(*files)[*size] = strdup("...too many to list..."); (*files)[*size] = strdup("...too many to list...");
else else
(*files)[*size] = strdup(name); (*files)[*size] = strdup(name);
(*size)++; (*size)++;
} }
void add_files(char *name, char ***files, int *size, int *capacity) void add_files(char *name, char ***files, int *size, int *capacity)
{ {
DIR *dir; DIR *dir;
struct dirent *entry; struct dirent *entry;
// Prevent from taking too long
if (*size > MAX_FILES) return;
add_file(name, files, size, capacity);
if (!(dir = opendir(name))) {
return;
}
char path[1024];
while ((entry = readdir(dir)) != NULL) {
if (entry->d_type == DT_DIR) {
if (strcmp(entry->d_name, ".") == 0 || strcmp(entry->d_name, "..") == 0)
continue;
if (name[strlen(name)-1] == '/')
snprintf(path, sizeof(path), "%s%s", name, entry->d_name);
else
snprintf(path, sizeof(path), "%s/%s", name, entry->d_name);
add_files(path, files, size, capacity);
} else {
snprintf(path, sizeof(path), "%s/%s", name, entry->d_name);
add_file(path, files, size, capacity);
}
// Prevent from taking too long // Prevent from taking too long
if (*size > MAX_FILES) return; if (*size > MAX_FILES) return;
}
closedir(dir); add_file(name, files, size, capacity);
if (!(dir = opendir(name))) {
return;
}
char path[1024];
while ((entry = readdir(dir)) != NULL) {
if (entry->d_type == DT_DIR) {
if (strcmp(entry->d_name, ".") == 0 || strcmp(entry->d_name, "..") == 0)
continue;
if (name[strlen(name)-1] == '/')
snprintf(path, sizeof(path), "%s%s", name, entry->d_name);
else
snprintf(path, sizeof(path), "%s/%s", name, entry->d_name);
add_files(path, files, size, capacity);
} else {
snprintf(path, sizeof(path), "%s/%s", name, entry->d_name);
add_file(path, files, size, capacity);
}
// Prevent from taking too long
if (*size > MAX_FILES) return;
}
closedir(dir);
} }

755
nuke.c
View File

@ -1,9 +1,8 @@
/** /**
* ASCII explosion from squeamish ossifrage at: * A program to nuke files from orbit.
* https://codegolf.stackexchange.com/questions/24462/display-the-explosion-of-a-star-in-ascii-art/24554#24554 */
*/
#include "colors.h" #include "colors.h"
#include "explosion.h"
#include "globe.h" #include "globe.h"
#include "list.h" #include "list.h"
#include <curses.h> #include <curses.h>
@ -17,447 +16,363 @@
#include <unistd.h> #include <unistd.h>
#define NUM_FRAMES 100 #define NUM_FRAMES 100
#define NUM_BLOBS 800 // 30 FPS:
#define PERSPECTIVE 50.0 #define FRAME_USEC 33333
#define ESCDELAY 10
typedef struct {
double x,y,z;
} spaceblob;
static int color_ramp1[] = {1,1,1,2,2,2,3,3,3,1,1, -1}; static int color_ramp1[] = {1,1,1,2,2,2,3,3,3,1,1, -1};
static int bold_ramp1[] = {1,1,0,1,0,0,1,0,0,0,0, -1}; static int bold_ramp1[] = {1,1,0,1,0,0,1,0,0,0,0, -1};
static int color_ramp2[] = {1,1,1,1,2,2,2,2,2,3,3,3,3,3,1,1,1,1,1,1, -1}; static int color_ramp2[] = {1,1,1,1,2,2,2,2,2,3,3,3,3,3,1,1,1,1,1,1, -1};
static int bold_ramp2[] = {1,1,0,0,1,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0, -1}; static int bold_ramp2[] = {1,1,0,0,1,1,0,0,0,1,1,0,0,0,0,0,0,0,0,0, -1};
double prng() {
static long long s=1;
s = s * 1488248101 + 981577151;
return ((s % 65536) - 32768) / 32768.0;
}
static void sighandler(int sig) { static void sighandler(int sig) {
(void)sig; (void)sig;
curs_set(1); curs_set(1);
endwin(); endwin();
exit(EXIT_FAILURE); exit(EXIT_FAILURE);
}
static void draw_frame(int i, int midx, int midy, spaceblob* blobs) {
int rows,cols;
getmaxyx(stdscr,rows,cols);
int maxx,minx,maxy,miny;
minx = -midx;
maxx = cols+minx-1;
miny = -midy;
maxy = rows+miny-1;
chtype line[cols+1];
for (int y=miny; y<=maxy; y++) {
int row = y+midy;
for (int x=minx; x<=maxx; x++) {
int col = x+midx;
/* Show expanding star in next 7 frames */
if (i<8) {
double r = sqrt(x*x + 4*y*y);
if (r < i*2)
mvaddch(row,col,'@');
continue;
}
/* Otherwise show blast wave */
double r = sqrt(x*x + 4*y*y) * (0.5 + (prng()/3.0)*cos(16.*atan2(y*2.+0.01,x+0.01))*.3);
int v = i - r - 7;
if (v<0) {
if (i<19) {
int attr = 0;//color_ramp1[i-8];
line[col] = "%@W#H=+~-:."[i-8] | attr;
} else {
line[col] = ' ';
}
} else if (v<20) {
int attr = 0;//color_ramp2[v];
line[col] = " .:!HIOMW#%$&@08O=+-"[v] | attr;
} else {
line[col] = ' ';
}
}
if (i >= 8) {
line[cols+1] = '\0';
mvaddchstr(row,0,line);
}
}
/* Add blobs with perspective effect */
if (i>6) {
int i0 = i-6;
for (int j=0; j<NUM_BLOBS; j++) {
double bx = blobs[j].x * i0;
double by = blobs[j].y * i0;
double bz = blobs[j].z * i0;
if (bz<5-PERSPECTIVE || bz>PERSPECTIVE) continue;
int x = midx + bx * PERSPECTIVE / (bz+PERSPECTIVE);
int y = midy + by * PERSPECTIVE / (bz+PERSPECTIVE);
if (x>=0 && x<cols && y>=0 && y<rows) {
int row = y, col = x;
mvaddch(row,col,(bz>40) ? '.' : (bz>-20) ? 'o' : '@');
}
}
}
} }
static int remove_callback(const char *path, const struct stat *sb, int typeflag, struct FTW *ftwbuf) static int remove_callback(const char *path, const struct stat *sb, int typeflag, struct FTW *ftwbuf)
{ {
int rv = remove(path); int rv = remove(path);
if (rv) perror(path); if (rv) perror(path);
return rv; return rv;
} }
int main(int argc, char *argv[]) int main(int argc, char *argv[])
{ {
if (argc > 1 && strcmp(argv[1], "--help") == 0) { if (argc > 1 && strcmp(argv[1], "--help") == 0) {
printf("nuke: Nuke files from orbit.\nUsage: nuke [files...]\n"); printf("nuke: Nuke files from orbit.\nUsage: nuke [files...]\n");
return EXIT_SUCCESS; return EXIT_SUCCESS;
}
char *failure_message = "nothing was deleted";
int rows,cols;
int delay=1E5;
spaceblob *blobs;
int capacity = 32, num_files= 0;
char **files = malloc(sizeof(char*)*capacity);
for (int i = 1; i < argc; i++) {
add_files(argv[i], &files, &num_files, &capacity);
}
if (argc == 1) {
add_file("<testing grounds>", &files, &num_files, &capacity);
}
/* Initialize ncurses and get window dimensions */
//initscr();
char* term_type = getenv("TERM");
if (term_type == NULL || *term_type == '\0') {
term_type = "unknown";
}
FILE* term_in = fopen("/dev/tty", "r");
if (term_in == NULL) {
perror("fopen(/dev/tty)");
exit(EXIT_FAILURE);
}
SCREEN* main_screen = newterm(term_type, stdout, term_in);
set_term(main_screen);
signal(SIGINT, sighandler);
start_color();
init_pair(WHITE, COLOR_WHITE, COLOR_BLACK);
init_pair(YELLOW, COLOR_YELLOW, COLOR_BLACK);
init_pair(RED, COLOR_RED, COLOR_BLACK);
init_pair(BLUE, COLOR_BLUE, COLOR_BLACK);
init_pair(GREEN, COLOR_GREEN, COLOR_BLACK);
init_pair(BLACK, COLOR_BLACK, COLOR_BLACK);
for (int i = 0; color_ramp1[i] >= 0; i++)
color_ramp1[i] = COLOR_PAIR(color_ramp1[i]) | (bold_ramp1[i] ? A_BOLD : 0);
for (int i = 0; color_ramp2[i] >= 0; i++)
color_ramp2[i] = COLOR_PAIR(color_ramp2[i]) | (bold_ramp2[i] ? A_BOLD : 0);
const int BLACK_ON_RED = 7, BLACK_ON_GREEN = 8;
init_pair(BLACK_ON_RED, COLOR_BLACK, COLOR_RED);
init_pair(BLACK_ON_GREEN, COLOR_BLACK, COLOR_GREEN);
getmaxyx(stdscr,rows,cols);
/* Generate random blob coordinates */
blobs = (spaceblob*)malloc(NUM_BLOBS * sizeof(spaceblob));
for (int i=0; i<NUM_BLOBS; i++) {
double bx,by,bz,br;
bx = prng();
by = prng();
bz = prng();
br = sqrt(bx*bx + by*by + bz*bz);
blobs[i].x = (bx / br) * (1.3 + 0.2 * prng());
blobs[i].y = (0.5 * by / br) * (1.3 + 0.2 * prng());;
blobs[i].z = (bz / br) * (1.3 + 0.2 * prng());;
}
curs_set(0); /* hide text cursor */
noecho();
keypad(stdscr, 1);
// First frame
int max_line = 0;
for (int f = 0; f < num_files; f++) {
int len = strlen(files[f]);
if (len > max_line) max_line = len;
}
erase();
int padwidth = max_line < cols*3/4 ? max_line : cols*3/4;
int padheight = num_files < rows*3/4 ? num_files : rows*3/4;
int padframer = rows/2-padheight/2-1;
int padframec = cols/2-padwidth/2-1;
WINDOW *padframe = newwin(padheight+2, padwidth+2, padframer, padframec);
if (!padframe) {
failure_message = "Couldn't create pad frame";
goto exit_failure;
}
wattron(padframe, COLOR_PAIR(YELLOW) | A_BOLD);
box(padframe, 0, 0);
WINDOW *pad = newpad(padheight, max_line);
if (!pad) {
failure_message = "Couldn't create pad";
goto exit_failure;
}
/* Display confirmation */
attron(COLOR_PAIR(BLACK_ON_RED));
char *description = num_files == 1 ? " TARGET: " : " TARGETS: ";
mvprintw(padframer-2, cols/2 - strlen(description)/2, "%s", description);
attron(COLOR_PAIR(BLACK_ON_RED) | A_BLINK);
const char confirm[] = " FIRE NUKE? y/n ";
mvprintw(padframer+padheight+3, cols/2 - strlen(confirm)/2, "%s", confirm);
attroff(COLOR_PAIR(BLACK_ON_RED) | A_BLINK);
refresh();
//immedok(pad, 1);
int scrollx = 0, scrolly = 0;
timeout(10);
while (1) {
// Draw scroll bar
if (padheight < num_files) {
mvaddch(padframer, padframec+padwidth+2, ACS_UARROW);
mvaddch(padframer+padheight+1, padframec+padwidth+2, ACS_DARROW);
for (int i = 1; i <= padheight; i++)
mvaddch(padframer+i, padframec+padwidth+2, ACS_VLINE);
for (int i = scrolly*padheight/num_files; i <= scrolly*padheight/num_files+padheight*padheight/num_files; i++)
mvaddch(padframer+1+i, padframec+padwidth+2, ACS_CKBOARD);
} }
char *failure_message = "nothing was deleted";
int rows,cols;
int delay=1E5;
int capacity = 32, num_files= 0;
char **files = malloc(sizeof(char*)*capacity);
for (int i = 1; i < argc; i++) {
add_files(argv[i], &files, &num_files, &capacity);
}
if (argc == 1) {
add_file("<testing grounds>", &files, &num_files, &capacity);
}
/* Initialize ncurses and get window dimensions */
//initscr();
char* term_type = getenv("TERM");
if (term_type == NULL || *term_type == '\0') {
term_type = "unknown";
}
FILE* term_in = fopen("/dev/tty", "r");
if (term_in == NULL) {
perror("fopen(/dev/tty)");
exit(EXIT_FAILURE);
}
SCREEN* main_screen = newterm(term_type, stdout, term_in);
set_term(main_screen);
signal(SIGINT, sighandler);
start_color();
init_pair(WHITE, COLOR_WHITE, COLOR_BLACK);
init_pair(YELLOW, COLOR_YELLOW, COLOR_BLACK);
init_pair(RED, COLOR_RED, COLOR_BLACK);
init_pair(BLUE, COLOR_BLUE, COLOR_BLACK);
init_pair(GREEN, COLOR_GREEN, COLOR_BLACK);
init_pair(BLACK, COLOR_BLACK, COLOR_BLACK);
init_pair(WHITE_BG, COLOR_BLACK, COLOR_WHITE);
init_pair(BLACK_ON_RED, COLOR_BLACK, COLOR_RED);
init_pair(BLACK_ON_GREEN, COLOR_BLACK, COLOR_GREEN);
for (int i = 0; color_ramp1[i] >= 0; i++)
color_ramp1[i] = COLOR_PAIR(color_ramp1[i]) | (bold_ramp1[i] ? A_BOLD : 0);
for (int i = 0; color_ramp2[i] >= 0; i++)
color_ramp2[i] = COLOR_PAIR(color_ramp2[i]) | (bold_ramp2[i] ? A_BOLD : 0);
getmaxyx(stdscr,rows,cols);
curs_set(0); /* hide text cursor */
noecho();
keypad(stdscr, 1);
// First frame
int max_line = 0;
for (int f = 0; f < num_files; f++) {
int len = strlen(files[f]);
if (len > max_line) max_line = len;
}
erase();
int padwidth = max_line < cols*3/4 ? max_line : cols*3/4;
int padheight = num_files < rows*3/4 ? num_files : rows*3/4;
int padframer = rows/2-padheight/2-1;
int padframec = cols/2-padwidth/2-1;
WINDOW *padframe = newwin(padheight+2, padwidth+2, padframer, padframec);
if (!padframe) {
failure_message = "Couldn't create pad frame";
goto exit_failure;
}
wattron(padframe, COLOR_PAIR(YELLOW) | A_BOLD);
box(padframe, 0, 0); box(padframe, 0, 0);
if (wrefresh(padframe) == ERR) goto exit_failure; WINDOW *pad = newpad(padheight, max_line);
// Redo this each time so that pad doesn't have to hold everything in memory if (!pad) {
werase(pad); failure_message = "Couldn't create pad";
for (int f = scrolly; f < scrolly+padheight; f++) {
mvwprintw(pad,f-scrolly,0,"%s",files[f]);
}
if (prefresh(pad, 0, scrollx, padframer+1, padframec+1, padframer+padheight, padframec+padwidth) == ERR)
goto exit_failure;
//prefresh(pad, scrolly, scrollx, 1, 1, 1+padheight, 1+padwidth);
//prefresh(pad, scrolly, scrollx, rows/2-padheight/2, cols/2-padwidth/2, rows/2+padheight/2, cols/2+padwidth/2);
refresh();
get_input:
switch(getch()) {
case 'y':
goto do_the_nuking;
case 'n': case 'q': case 27:
goto exit_failure; goto exit_failure;
case KEY_DOWN: case 'j': case ' ':
scrolly++;
break;
case KEY_UP: case 'k':
scrolly--;
break;
case KEY_RIGHT: case 'l':
scrollx++;
break;
case KEY_LEFT: case 'h':
scrollx--;
break;
case 'J': case KEY_NPAGE:
scrolly += num_files/20+1;
break;
case 'K': case KEY_PPAGE:
scrolly -= num_files/20+1;
break;
case KEY_SRIGHT: case 'L':
scrollx += 10;
break;
case KEY_SLEFT: case 'H':
scrollx -= 10;
break;
case KEY_HOME: case 'g':
scrolly = 0;
break;
case KEY_END: case 'G':
scrolly = num_files-padheight;
break;
default:
goto get_input;
}
if (scrolly < 0) scrolly = 0;
if (scrolly > num_files-padheight) scrolly = num_files-padheight;
if (scrollx < 0) scrollx = 0;
if (scrollx > max_line-padwidth) scrollx = max_line-padwidth;
}
do_the_nuking: ;
double zoom = .8; // percent of viewport globe will fill
const double targeting_time = 2.5;
const double anticipation = 0.5;
const double firing_time = 1.0;
const double nuking_time = .5;
const double aftermath = 100.0;
int f = 0;
int targetr, targetc;
double t = 0.0;
for (; t < targeting_time + anticipation + firing_time; t += 1./30.) {
erase();
draw_stars(t);
draw_globe(t, zoom);
if (get_target_pos(t, zoom, &targetr, &targetc)) {
// If visible draw '*' on globe
attron(COLOR_PAIR(YELLOW));
mvaddch(targetr,targetc, '*' | A_BOLD);
attroff(COLOR_PAIR(YELLOW));
}
draw_clouds(t, zoom);
// Draw crosshair
double wobble = t > targeting_time ? 0. : targeting_time - t;
int r = targetr, c = targetc;
if (wobble > .01) {
r = mix(r, rows*hillnoise(784,5.*t), wobble);
c = mix(c, cols*hillnoise(-784,5.*t), wobble);
}
int attr = COLOR_PAIR(RED);
attron(attr);
mvaddch(r-1,c-2,ACS_ULCORNER | A_BOLD);
mvaddch(r-1,c-1,ACS_HLINE | A_BOLD);
mvaddch(r-1,c+1,ACS_HLINE | A_BOLD);
mvaddch(r-1,c+2,ACS_URCORNER | A_BOLD);
mvaddch(r+1,c+2,ACS_LRCORNER | A_BOLD);
mvaddch(r+1,c+1,ACS_HLINE | A_BOLD);
mvaddch(r+1,c-1,ACS_HLINE | A_BOLD);
mvaddch(r+1,c-2,ACS_LLCORNER | A_BOLD);
mvaddch(r,c,'X' | A_BOLD);
attroff(attr);
// Draw label
if (get_target_pos(t, zoom, &targetr, &targetc)) {
attron(COLOR_PAIR(RED));
mvaddch(targetr-1,targetc+1,'/');
attroff(COLOR_PAIR(RED));
attron(COLOR_PAIR(BLACK_ON_RED));
mvprintw(targetr-2,targetc+2,"%s", argc > 1 ? argv[f+1] : "testing grounds");
attroff(COLOR_PAIR(BLACK_ON_RED));
if (argc > 2)
f = (f + 1) % (argc - 1);
}
// Draw nuke
if (t > targeting_time + anticipation) {
double k = (t-targeting_time-anticipation)/firing_time;
int nuker = mix(rows, targetr, k), nukec = mix(cols/2, targetc, k);
attron(COLOR_PAIR(WHITE) | A_BOLD);
mvaddch(nuker, nukec, "A^' "[(int)(k*4.)]);
attroff(COLOR_PAIR(WHITE) | A_BOLD);
// Draw nuke label
attron(COLOR_PAIR(RED));
mvaddch(nuker-1,nukec-1,'\\');
attroff(COLOR_PAIR(RED));
attron(COLOR_PAIR(BLACK_ON_RED));
mvprintw(nuker-2,nukec-2-5,"%0.3f", (targeting_time + anticipation + firing_time)-t);
attroff(COLOR_PAIR(BLACK_ON_RED));
} }
/* Display confirmation */
attron(COLOR_PAIR(BLACK_ON_RED));
char *description = num_files == 1 ? " TARGET: " : " TARGETS: ";
mvprintw(padframer-2, cols/2 - strlen(description)/2, "%s", description);
attron(COLOR_PAIR(BLACK_ON_RED) | A_BLINK);
const char confirm[] = " FIRE NUKE? y/n ";
mvprintw(padframer+padheight+3, cols/2 - strlen(confirm)/2, "%s", confirm);
attroff(COLOR_PAIR(BLACK_ON_RED) | A_BLINK);
refresh(); refresh();
// Check for input //immedok(pad, 1);
int ch = getch(); int scrollx = 0, scrolly = 0;
if (ch == 'q' || ch == 27) {
if (t <= targeting_time + anticipation) {
goto exit_failure;
} else {
goto exit_success;
}
}
usleep(33333); // 30 FPS
}
t += nuking_time; timeout(10);
for (int i=1; i<NUM_FRAMES; i++) { while (1) {
draw_frame(i, targetc, targetr, blobs); // Draw scroll bar
refresh(); if (padheight < num_files) {
/* Quit early? */ mvaddch(padframer, padframec+padwidth+2, ACS_UARROW);
int ch = getch(); mvaddch(padframer+padheight+1, padframec+padwidth+2, ACS_DARROW);
if (ch == 'q' || ch == 27) { for (int i = 1; i <= padheight; i++)
goto exit_success; mvaddch(padframer+i, padframec+padwidth+2, ACS_VLINE);
} for (int i = scrolly*padheight/num_files; i <= scrolly*padheight/num_files+padheight*padheight/num_files; i++)
usleep(33333); // 30 FPS mvaddch(padframer+1+i, padframec+padwidth+2, ACS_CKBOARD);
} }
box(padframe, 0, 0);
for (; t < targeting_time + anticipation + firing_time + nuking_time + aftermath; t += 1./30.) { if (wrefresh(padframe) == ERR) goto exit_failure;
erase(); // Redo this each time so that pad doesn't have to hold everything in memory
draw_stars(t); werase(pad);
draw_globe(t, zoom); for (int f = scrolly; f < scrolly+padheight; f++) {
// Draw crater mvwprintw(pad,f-scrolly,0,"%s",files[f]);
if (get_target_pos(t, zoom, &targetr, &targetc)) { }
attron(COLOR_PAIR(BLACK) | A_BOLD); if (prefresh(pad, 0, scrollx, padframer+1, padframec+1, padframer+padheight, padframec+padwidth) == ERR)
for (int i = 31; i >= 0; i--) { goto exit_failure;
double rad = 4./31.*i; //prefresh(pad, scrolly, scrollx, 1, 1, 1+padheight, 1+padwidth);
double a = i*2*M_PI*GOLDEN_RATIO; //prefresh(pad, scrolly, scrollx, rows/2-padheight/2, cols/2-padwidth/2, rows/2+padheight/2, cols/2+padwidth/2);
int r = targetr+(int)(rad*sin(a)/2), c = targetc+(int)(rad*cos(a)); refresh();
if ((r-rows/2)*(r-rows/2) + (c/2-cols/4)*(c/2-cols/4) <= (zoom*rows/2)*(zoom*rows/2)) get_input:
mvaddch(r, c, " #*."[i*4/31]); switch (getch()) {
} case 'y':
attroff(COLOR_PAIR(BLACK) | A_BOLD); goto do_the_nuking;
/* case 'n': case 'q': case 27:
for (double =target_lat goto exit_failure;
mvprintw(targetr-1,targetc-1,"****"); case KEY_DOWN: case 'j': case ' ':
mvprintw(targetr,targetc-2, "** **"); scrolly++;
mvprintw(targetr+1,targetc-1,"****"); break;
*/ case KEY_UP: case 'k':
} scrolly--;
draw_clouds(t, zoom); break;
if (get_target_pos(t, zoom, &targetr, &targetc)) { case KEY_RIGHT: case 'l':
// Draw label scrollx++;
attron(COLOR_PAIR(GREEN)); break;
mvaddch(targetr-1,targetc+1,'/'); case KEY_LEFT: case 'h':
attroff(COLOR_PAIR(GREEN)); scrollx--;
attron(COLOR_PAIR(BLACK_ON_GREEN)); break;
mvprintw(targetr-2,targetc+2," DELETED "); case 'J': case KEY_NPAGE:
attroff(COLOR_PAIR(BLACK_ON_GREEN)); scrolly += num_files/20+1;
break;
case 'K': case KEY_PPAGE:
scrolly -= num_files/20+1;
break;
case KEY_SRIGHT: case 'L':
scrollx += 10;
break;
case KEY_SLEFT: case 'H':
scrollx -= 10;
break;
case KEY_HOME: case 'g':
scrolly = 0;
break;
case KEY_END: case 'G':
scrolly = num_files-padheight;
break;
default:
goto get_input;
}
if (scrolly < 0) scrolly = 0;
if (scrolly > num_files-padheight) scrolly = num_files-padheight;
if (scrollx < 0) scrollx = 0;
if (scrollx > max_line-padwidth) scrollx = max_line-padwidth;
} }
attron(COLOR_PAIR(BLACK_ON_GREEN) | A_BLINK); do_the_nuking: ;
const char *any_key = " PRESS ANY KEY TO EXIT ";
mvprintw(rows-(1.-zoom)*rows/4, cols/2-strlen(any_key)/2, any_key);
attroff(COLOR_PAIR(BLACK_ON_GREEN) | A_BLINK);
refresh(); double zoom = .8; // percent of viewport globe will fill
if (getch() != -1)
goto exit_success;
usleep(33333); // 30 FPS
}
exit_success:
curs_set(1); /* unhide cursor */
endwin(); /* Exit ncurses */
for (int i = 1; i < argc; i++) {
int failure;
DIR *dir;
if (!(dir = opendir(argv[i]))) {
failure = remove(argv[i]);
} else {
closedir(dir);
failure = nftw(argv[i], remove_callback, 64, FTW_DEPTH | FTW_PHYS);
}
if (!failure) {
printf("deleted %s\n", argv[i]);
} else {
printf("unable to delete %s\n (%s)", argv[i], strerror(errno));
return EXIT_FAILURE;
}
}
return EXIT_SUCCESS;
exit_failure: const double targeting_time = 2.5;
curs_set(1); /* unhide cursor */ const double anticipation = 0.5;
endwin(); /* Exit ncurses */ const double firing_time = 1.0;
printf("%s\n",failure_message); const double nuking_time = .5;
return EXIT_FAILURE; const double aftermath = 100.0;
int f = 0;
int targetr, targetc;
double t = 0.0;
for (; t < targeting_time + anticipation + firing_time; t += 1./30.) {
erase();
draw_stars(t);
draw_globe(t, zoom);
if (get_target_pos(t, zoom, &targetr, &targetc)) {
// If visible draw '*' on globe
attron(COLOR_PAIR(YELLOW));
mvaddch(targetr,targetc, '*' | A_BOLD);
attroff(COLOR_PAIR(YELLOW));
}
draw_clouds(t, zoom);
// Draw crosshair
double wobble = t > targeting_time ? 0. : targeting_time - t;
int r = targetr, c = targetc;
if (wobble > .01) {
r = mix(r, rows*hillnoise(784,5.*t), wobble);
c = mix(c, cols*hillnoise(-784,5.*t), wobble);
}
int attr = COLOR_PAIR(RED);
attron(attr);
mvaddch(r-1,c-2,ACS_ULCORNER | A_BOLD);
mvaddch(r-1,c-1,ACS_HLINE | A_BOLD);
mvaddch(r-1,c+1,ACS_HLINE | A_BOLD);
mvaddch(r-1,c+2,ACS_URCORNER | A_BOLD);
mvaddch(r+1,c+2,ACS_LRCORNER | A_BOLD);
mvaddch(r+1,c+1,ACS_HLINE | A_BOLD);
mvaddch(r+1,c-1,ACS_HLINE | A_BOLD);
mvaddch(r+1,c-2,ACS_LLCORNER | A_BOLD);
mvaddch(r,c,'X' | A_BOLD);
attroff(attr);
// Draw label
if (get_target_pos(t, zoom, &targetr, &targetc)) {
attron(COLOR_PAIR(RED));
mvaddch(targetr-1,targetc+1,'/');
attroff(COLOR_PAIR(RED));
attron(COLOR_PAIR(BLACK_ON_RED));
mvprintw(targetr-2,targetc+2,"%s", argc > 1 ? argv[f+1] : "testing grounds");
attroff(COLOR_PAIR(BLACK_ON_RED));
if (argc > 2)
f = (f + 1) % (argc - 1);
}
// Draw nuke
if (t > targeting_time + anticipation) {
double k = (t-targeting_time-anticipation)/firing_time;
int nuker = mix(rows, targetr, k), nukec = mix(cols/2, targetc, k);
attron(COLOR_PAIR(WHITE) | A_BOLD);
mvaddch(nuker, nukec, "A^' "[(int)(k*4.)]);
attroff(COLOR_PAIR(WHITE) | A_BOLD);
// Draw nuke label
attron(COLOR_PAIR(RED));
mvaddch(nuker-1,nukec-1,'\\');
attroff(COLOR_PAIR(RED));
attron(COLOR_PAIR(BLACK_ON_RED));
mvprintw(nuker-2,nukec-2-5,"%0.3f", (targeting_time + anticipation + firing_time)-t);
attroff(COLOR_PAIR(BLACK_ON_RED));
}
refresh();
// Check for input
int ch = getch();
if (ch == 'q' || ch == 27) {
if (t <= targeting_time + anticipation) {
goto exit_failure;
} else {
goto exit_success;
}
}
usleep(FRAME_USEC);
}
for (int i=0; i<100; i++) {
draw_explosion(i, targetc, targetr);
refresh();
/* Quit early? */
int ch = getch();
if (ch == 'q' || ch == 27) {
goto exit_success;
}
if (i == 0)
usleep(8*FRAME_USEC); // flash for 8 frames
else
usleep(FRAME_USEC);
}
t += nuking_time;
for (; t < targeting_time + anticipation + firing_time + nuking_time + aftermath; t += 1./30.) {
erase();
draw_stars(t);
draw_globe(t, zoom);
// Draw crater
if (get_target_pos(t, zoom, &targetr, &targetc)) {
attron(COLOR_PAIR(BLACK) | A_BOLD);
for (int i = 31; i >= 0; i--) {
double rad = 4./31.*i;
double a = i*2*M_PI*GOLDEN_RATIO;
int r = targetr+(int)(rad*sin(a)/2), c = targetc+(int)(rad*cos(a));
if ((r-rows/2)*(r-rows/2) + (c/2-cols/4)*(c/2-cols/4) <= (zoom*rows/2)*(zoom*rows/2))
mvaddch(r, c, " #*."[i*4/31]);
}
attroff(COLOR_PAIR(BLACK) | A_BOLD);
/*
for (double =target_lat
mvprintw(targetr-1,targetc-1,"****");
mvprintw(targetr,targetc-2, "** **");
mvprintw(targetr+1,targetc-1,"****");
*/
}
draw_clouds(t, zoom);
if (get_target_pos(t, zoom, &targetr, &targetc)) {
// Draw label
attron(COLOR_PAIR(GREEN));
mvaddch(targetr-1,targetc+1,'/');
attroff(COLOR_PAIR(GREEN));
attron(COLOR_PAIR(BLACK_ON_GREEN));
mvprintw(targetr-2,targetc+2," DELETED ");
attroff(COLOR_PAIR(BLACK_ON_GREEN));
}
attron(COLOR_PAIR(BLACK_ON_GREEN) | A_BLINK);
const char *any_key = " PRESS ANY KEY TO EXIT ";
mvprintw(rows-(1.-zoom)*rows/4, cols/2-strlen(any_key)/2, any_key);
attroff(COLOR_PAIR(BLACK_ON_GREEN) | A_BLINK);
refresh();
if (getch() != -1)
goto exit_success;
usleep(FRAME_USEC);
}
exit_success:
curs_set(1); /* unhide cursor */
endwin(); /* Exit ncurses */
for (int i = 1; i < argc; i++) {
int failure;
DIR *dir;
if (!(dir = opendir(argv[i]))) {
failure = remove(argv[i]);
} else {
closedir(dir);
failure = nftw(argv[i], remove_callback, 64, FTW_DEPTH | FTW_PHYS);
}
if (!failure) {
printf("deleted %s\n", argv[i]);
} else {
printf("unable to delete %s\n (%s)", argv[i], strerror(errno));
return EXIT_FAILURE;
}
}
return EXIT_SUCCESS;
exit_failure:
curs_set(1); /* unhide cursor */
endwin(); /* Exit ncurses */
printf("%s\n",failure_message);
return EXIT_FAILURE;
} }