mirror of
https://github.com/Motion-Project/motion.git
synced 2026-02-02 11:01:40 -05:00
20e3327a87
* * Detect changes in a video stream. * Copyright 2000 by Jeroen Vreeken (pe1rxq@amsat.org) * This software is distributed under the GNU public license version 2 * See also the file 'COPYING'. * */ #include "ffmpeg.h" #include "motion.h" #ifdef __freebsd__ #include "video_freebsd.h" #else #include "video.h" #endif /* __freebsd__ */ #include "conf.h" #include "alg.h" #include "track.h" #include "event.h" #include "picture.h" #include "rotate.h" /** * tls_key_threadnr * * TLS key for storing thread number in thread-local storage. */ pthread_key_t tls_key_threadnr; /** * global_lock * * Protects any global variables (like 'threads_running') during updates, * to prevent problems with multiple threads updating at the same time. */ //pthread_mutex_t global_lock = PTHREAD_MUTEX_INITIALIZER; pthread_mutex_t global_lock; /** * cnt_list * * List of context structures, one for each main Motion thread. */ struct context **cnt_list=NULL; /** * threads_running * * Keeps track of number of Motion threads currently running. Also used * by 'main' to know when all threads have exited. */ volatile int threads_running=0; /* * debug_level is for developers, normally used to control which * types of messages get output. */ int debug_level; /** * restart * * Differentiates between a quit and a restart. When all threads have * finished running, 'main' checks if 'restart' is true and if so starts * up again (instead of just quitting). */ int restart=0; /** * context_init * * Initializes a context struct with the default values for all the * variables. * * Parameters: * * cnt - the context struct to destroy * * Returns: nothing */ static void context_init (struct context *cnt) { /* * We first clear the entire structure to zero, then fill in any * values which have non-zero default values. Note that this * assumes that a NULL address pointer has a value of binary 0 * (this is also assumed at other places within the code, i.e. * there are instances of "if (ptr)"). Just for possible future * changes to this assumption, any pointers which are intended * to be initialised to NULL are listed within a comment. */ memset(cnt, 0, sizeof(struct context)); cnt->noise=255; cnt->lastrate=25; memcpy(&cnt->track, &track_template, sizeof(struct trackoptions)); cnt->pipe=-1; cnt->mpipe=-1; // /* Here are the pointers required to be set */ // #ifdef HAVE_MYSQL // cnt->database=NULL; // #endif /* HAVE_MYSQL */ // // #ifdef HAVE_PGSQL // cnt->database_pg=NULL; // #endif /* HAVE_PGSQL */ // // #ifdef HAVE_FFMPEG // cnt->ffmpeg_new=NULL; // cnt->ffmpeg_motion=NULL; // cnt->ffmpeg_timelapse=NULL; // #endif /* HAVE_FFMPEG */ } /** * context_destroy * * Destroys a context struct by freeing allocated memory, calling the * appropriate cleanup functions and finally freeing the struct itself. * * Parameters: * * cnt - the context struct to destroy * * Returns: nothing */ static void context_destroy(struct context *cnt) { int j; if (cnt->imgs.out) free(cnt->imgs.out); if (cnt->imgs.ref) free(cnt->imgs.ref); if (cnt->imgs.image_virgin) free(cnt->imgs.image_virgin); if (cnt->imgs.image_ring_buffer) free(cnt->imgs.image_ring_buffer); if (cnt->imgs.labels) free(cnt->imgs.labels); if (cnt->imgs.labelsize) free(cnt->imgs.labelsize); if (cnt->imgs.smartmask) free(cnt->imgs.smartmask); if (cnt->imgs.smartmask_final) free(cnt->imgs.smartmask_final); if (cnt->imgs.smartmask_buffer) free(cnt->imgs.smartmask_buffer); if (cnt->imgs.common_buffer) free(cnt->imgs.common_buffer); if (cnt->imgs.timestamp) free(cnt->imgs.timestamp); if (cnt->imgs.shotstamp) free(cnt->imgs.shotstamp); if (cnt->imgs.preview_buffer) free(cnt->imgs.preview_buffer); rotate_deinit(cnt); /* cleanup image rotation data */ if(cnt->pipe != -1) close(cnt->pipe); if(cnt->mpipe != -1) close(cnt->mpipe); /* Cleanup the netcam part */ if(cnt->netcam) netcam_cleanup(cnt->netcam, 0); /* Cleanup the current time structure */ if (cnt->currenttime_tm) free(cnt->currenttime_tm); /* Cleanup the event time structure */ if (cnt->eventtime_tm) free(cnt->eventtime_tm); /* Free memory allocated for config parameters */ for (j = 0; config_params[j].param_name != NULL; j++) { if (config_params[j].copy == copy_string) { void **val; val = (void *)((char *)cnt+(int)config_params[j].conf_value); if (*val) { free(*val); *val = NULL; } } } free(cnt); } /** * sig_handler * * Our SIGNAL-Handler. We need this to handle alarms and external signals. */ static void sig_handler(int signo) { int i; switch(signo) { case SIGALRM: /* Somebody (maybe we ourself) wants us to make a snapshot * This feature triggers snapshots on ALL threads that have * snapshot_interval different from 0. */ if (cnt_list) { i = -1; while (cnt_list[++i]) { if (cnt_list[i]->conf.snapshot_interval) { cnt_list[i]->snapshot=1; } } } break; case SIGUSR1: /* Ouch! We have been hit from the outside! Someone wants us to make a movie! */ if (cnt_list) { i = -1; while (cnt_list[++i]) cnt_list[i]->makemovie=1; } break; case SIGHUP: restart = 1; /* Fall through, as the value of 'restart' is the only difference * between SIGHUP and the ones below. */ case SIGINT: case SIGQUIT: case SIGTERM: /* Somebody wants us to quit! We should better finish the actual movie and end up! */ if (cnt_list) { i = -1; while (cnt_list[++i]) { cnt_list[i]->makemovie=1; cnt_list[i]->finish=1; } } break; case SIGSEGV: exit(0); } } /** * sigchild_handler * * This function is a POSIX compliant replacement of the commonly used * signal(SIGCHLD, SIG_IGN). */ static void sigchild_handler(int signo ATTRIBUTE_UNUSED) { #ifdef WNOHANG while (waitpid(-1, NULL, WNOHANG) > 0) {}; #endif /* WNOHANG */ return; } /** * motion_detected * * Called from 'motion_loop' when motion is detected, or when to act as if * motion was detected (e.g. in post capture). * * Parameters: * * cnt - current thread's context struct * diffs - number of different pixels between the reference image and the * new image (may be zero) * dev - video device file descriptor * devpipe - file descriptor of still image pipe * devmpipe - file descriptor of motion pipe * newimg - pointer to the newly captured image */ static void motion_detected(struct context *cnt, int diffs, int dev, unsigned char *newimg) { struct config *conf = &cnt->conf; struct images *imgs = &cnt->imgs; struct coord *location = &cnt->location; cnt->lasttime = cnt->currenttime; /* Take action if this is a new event */ if (cnt->event_nr != cnt->prev_event) { int i, tmpshots; struct tm tmptime; cnt->preview_max = 0; /* Reset prev_event number to current event and save event time * in both time_t and struct tm format. */ cnt->prev_event = cnt->event_nr; cnt->eventtime = cnt->currenttime; localtime_r(&cnt->eventtime, cnt->eventtime_tm); /* Since this is a new event we create the event_text_string used for * the %C conversion specifier. We may already need it for * on_motion_detected_commend so it must be done now. */ mystrftime(cnt, cnt->text_event_string, sizeof(cnt->text_event_string), cnt->conf.text_event, cnt->eventtime_tm, NULL, 0); /* EVENT_FIRSTMOTION triggers on_event_start_command and event_ffmpeg_newfile */ event(cnt, EVENT_FIRSTMOTION, newimg, NULL, NULL, cnt->currenttime_tm); if (cnt->conf.setup_mode) motion_log(-1, 0, "Motion detected - starting event %d", cnt->event_nr); /* pre_capture frames are written as jpegs and to the ffmpeg film * We store the current cnt->shots temporarily until we are done with * the pre_capture stuff */ tmpshots = cnt->shots; for (i=cnt->precap_cur; i < cnt->precap_nr; i++) { localtime_r(cnt->imgs.timestamp + i, &tmptime); cnt->shots = *(cnt->imgs.shotstamp + i); event(cnt, EVENT_IMAGE_DETECTED, cnt->imgs.image_ring_buffer + (cnt->imgs.size * i), NULL, NULL, &tmptime); } if (cnt->precap_cur) { localtime_r(cnt->imgs.timestamp+cnt->precap_nr, &tmptime); cnt->shots = *(cnt->imgs.shotstamp + cnt->precap_nr); event(cnt, EVENT_IMAGE_DETECTED, cnt->imgs.image_ring_buffer + (cnt->imgs.size * cnt->precap_nr), NULL, NULL, &tmptime); } for (i=0; i < cnt->precap_cur-1; i++) { localtime_r(cnt->imgs.timestamp + i, &tmptime); cnt->shots = *(cnt->imgs.shotstamp + i); event(cnt, EVENT_IMAGE_DETECTED, cnt->imgs.image_ring_buffer + (cnt->imgs.size * i), NULL, NULL, &tmptime); } /* If output_normal=first always capture first motion frame as preview-shot */ if (cnt->new_img == NEWIMG_FIRST){ cnt->preview_shot = 1; if (cnt->locate == LOCATE_PREVIEW){ alg_draw_location(location, imgs, imgs->width, newimg, LOCATE_NORMAL); } } cnt->shots = tmpshots; } /* motion_detected is called with diffs = 0 during post_capture * and if cnt->conf.output_all is enabled. We only want to draw location * and call EVENT_MOTION when it is a picture frame with actual motion detected. */ if (diffs) { if (cnt->locate == LOCATE_ON) alg_draw_location(location, imgs, imgs->width, newimg, LOCATE_BOTH); /* EVENT_MOTION triggers event_beep and on_motion_detected_command */ event(cnt, EVENT_MOTION, NULL, NULL, NULL, cnt->currenttime_tm); } /* Check for most significant preview-shot when output_normal=best */ if (cnt->new_img == NEWIMG_BEST && diffs > cnt->preview_max) { memcpy(cnt->imgs.preview_buffer, newimg, cnt->imgs.size); cnt->preview_max = diffs; if (cnt->locate == LOCATE_PREVIEW){ alg_draw_location(location, imgs, imgs->width, cnt->imgs.preview_buffer, LOCATE_NORMAL); } } if (cnt->shots < conf->frame_limit && cnt->currenttime - cnt->lastshottime >= conf->mingap ) { cnt->lastshottime = cnt->currenttime; /* Output the latest picture 'image_new' or image_out for motion picture. */ event(cnt, EVENT_IMAGE_DETECTED, newimg, NULL, NULL, cnt->currenttime_tm); /* If config option webcam_motion is enabled, send the latest motion detected image * to the webcam but only if it is not the first shot within a second. This is to * avoid double frames since we already have sent a frame to the webcam. * We also disable this in setup_mode. */ if (conf->webcam_motion && !conf->setup_mode && cnt->shots != 1) event(cnt, EVENT_WEBCAM, newimg, NULL, NULL, cnt->currenttime_tm); cnt->preview_shot = 0; } if (cnt->track.type != 0 && diffs != 0) { cnt->moved = track_move(cnt, dev, &cnt->location, imgs, 0); } } /** * motion_init * * This routine is called from motion_loop (the main thread of the program) to do * all of the initialisation required before starting the actual run. * * Parameters: * * cnt Pointer to the motion context structure * * Returns: nothing */ static void motion_init(struct context *cnt) { int i; FILE *picture; /* Store thread number in TLS. */ pthread_setspecific(tls_key_threadnr, (void *)((unsigned long)cnt->threadnr)); cnt->diffs = 0; cnt->currenttime_tm = mymalloc(sizeof(struct tm)); cnt->eventtime_tm = mymalloc(sizeof(struct tm)); cnt->smartmask_speed = 0; /* We initialize cnt->event_nr to 1 and cnt->prev_event to 0 (not really needed) so * that certain code below does not run until motion has been detected the first time */ cnt->event_nr = 1; cnt->prev_event = 0; motion_log(LOG_DEBUG, 0, "Thread started"); if (!cnt->conf.filepath) cnt->conf.filepath = strdup("."); /* set the device settings */ cnt->video_dev = vid_start(cnt); /* We still cannot handle a V4L type camera not being available * during startup. We have no other option than to die */ if (cnt->video_dev == -1 && !cnt->conf.netcam_url) { motion_log(LOG_ERR, 0, "Capture error calling vid_start"); motion_log(-1 , 0, "Thread finishing..."); exit(1); } /* We failed to get an initial image from a network camera * So we need to guess height and width based on the config * file options. */ if (cnt->video_dev == -1) { motion_log(LOG_ERR, 0, "Could not fetch initial image from network camera"); motion_log(LOG_ERR, 0, "Motion continues using width and height from config file(s)"); cnt->imgs.width = cnt->conf.width; cnt->imgs.height = cnt->conf.height; cnt->imgs.size = cnt->conf.width * cnt->conf.height * 3 / 2; cnt->imgs.motionsize = cnt->conf.width * cnt->conf.height; cnt->imgs.type = VIDEO_PALETTE_YUV420P; } cnt->imgs.image_ring_buffer = mymalloc(cnt->imgs.size); memset(cnt->imgs.image_ring_buffer, 0x80, cnt->imgs.size); /* initialize to grey */ cnt->imgs.ref = mymalloc(cnt->imgs.size); cnt->imgs.out = mymalloc(cnt->imgs.size); cnt->imgs.image_virgin = mymalloc(cnt->imgs.size); memset(cnt->imgs.image_virgin, 0x80, cnt->imgs.size); /* initialize to grey */ cnt->imgs.smartmask = mymalloc(cnt->imgs.motionsize); cnt->imgs.smartmask_final = mymalloc(cnt->imgs.motionsize); cnt->imgs.smartmask_buffer = mymalloc(cnt->imgs.motionsize * sizeof(int)); cnt->imgs.labels = mymalloc(cnt->imgs.motionsize * sizeof(cnt->imgs.labels)); cnt->imgs.labelsize = mymalloc((cnt->imgs.motionsize/2+1) * sizeof(cnt->imgs.labelsize)); cnt->imgs.timestamp = mymalloc(sizeof(time_t)); cnt->imgs.shotstamp = mymalloc(sizeof(int)); /* Allocate a buffer for temp. usage in some places */ /* Only despeckle for now... */ cnt->imgs.common_buffer = mymalloc(3 * cnt->imgs.width); /* Now is a good time to init rotation data. Since vid_start has been * called, we know that we have imgs.width and imgs.height. When capturing * from a V4L device, these are copied from the corresponding conf values * in vid_start. When capturing from a netcam, they get set in netcam_start, * which is called from vid_start. * * rotate_init will set cap_width and cap_height in cnt->rotate_data. */ rotate_init(cnt); /* rotate_deinit is called in main */ /* Allow videodevice to settle in */ /* Capture first image, or we will get an alarm on start */ if (cnt->video_dev > 0) { for (i = 0; i < 10; i++) { if (vid_next(cnt, cnt->imgs.image_virgin) == 0) break; SLEEP(2,0); } /* We still cannot handle a V4L type camera not being available * during startup. We have no other option than to die */ if (i >= 10) { motion_log(LOG_ERR, 0, "Error capturing first image"); motion_log(-1, 0, "Thread finishing..."); exit(1); } } /* create a reference frame */ memcpy(cnt->imgs.ref, cnt->imgs.image_virgin, cnt->imgs.size); #ifndef WITHOUT_V4L #ifndef __freebsd__ /* open video loopback devices if enabled */ if (cnt->conf.vidpipe) { if (cnt->conf.setup_mode) motion_log(-1, 0, "Opening video loopback device for normal pictures"); /* vid_startpipe should get the output dimensions */ cnt->pipe = vid_startpipe(cnt->conf.vidpipe, cnt->imgs.width, cnt->imgs.height, cnt->imgs.type); if (cnt->pipe < 0) { motion_log(LOG_ERR, 0, "Failed to open video loopback"); motion_log(-1, 0, "Thread finishing..."); exit(1); } } if (cnt->conf.motionvidpipe) { if (cnt->conf.setup_mode) motion_log(-1, 0, "Opening video loopback device for motion pictures"); /* vid_startpipe should get the output dimensions */ cnt->mpipe = vid_startpipe(cnt->conf.motionvidpipe, cnt->imgs.width, cnt->imgs.height, cnt->imgs.type); if (cnt->mpipe < 0) { motion_log(LOG_ERR, 0, "Failed to open video loopback"); motion_log(-1, 0, "Thread finishing..."); exit(1); } } #endif /* __freebsd__ */ #endif /*WITHOUT_V4L*/ #ifdef HAVE_MYSQL if(cnt->conf.mysql_db) { cnt->database = (MYSQL *) mymalloc(sizeof(MYSQL)); mysql_init(cnt->database); if (!mysql_real_connect(cnt->database, cnt->conf.mysql_host, cnt->conf.mysql_user, cnt->conf.mysql_password, cnt->conf.mysql_db, 0, NULL, 0)) { motion_log(LOG_ERR, 0, "Cannot connect to MySQL database %s on host %s with user %s", cnt->conf.mysql_db, cnt->conf.mysql_host, cnt->conf.mysql_user); motion_log(LOG_ERR, 0, "MySQL error was %s", mysql_error(cnt->database)); motion_log(-1, 0, "Thread finishing..."); exit(1); } } #endif /* HAVE_MYSQL */ #ifdef HAVE_PGSQL if (cnt->conf.pgsql_db) { char connstring[255]; /* create the connection string. Quote the values so we can have null values (blank)*/ snprintf(connstring, 255, "dbname='%s' host='%s' user='%s' password='%s' port='%d'", cnt->conf.pgsql_db, /* dbname */ (cnt->conf.pgsql_host ? cnt->conf.pgsql_host : ""), /* host (may be blank) */ (cnt->conf.pgsql_user ? cnt->conf.pgsql_user : ""), /* user (may be blank) */ (cnt->conf.pgsql_password ? cnt->conf.pgsql_password : ""), /* password (may be blank) */ cnt->conf.pgsql_port ); cnt->database_pg = PQconnectdb(connstring); if (PQstatus(cnt->database_pg) == CONNECTION_BAD) { motion_log(LOG_ERR, 0, "Connection to PostgreSQL database '%s' failed: %s", cnt->conf.pgsql_db, PQerrorMessage(cnt->database_pg)); motion_log(-1, 0, "Thread finishing..."); exit(1); } } #endif /* HAVE_PGSQL */ #if defined(HAVE_MYSQL) || defined(HAVE_PGSQL) /* Set the sql mask file according to the SQL config options*/ cnt->sql_mask = cnt->conf.sql_log_image * (FTYPE_IMAGE + FTYPE_IMAGE_MOTION) + cnt->conf.sql_log_snapshot * FTYPE_IMAGE_SNAPSHOT + cnt->conf.sql_log_mpeg * (FTYPE_MPEG + FTYPE_MPEG_MOTION) + cnt->conf.sql_log_timelapse * FTYPE_MPEG_TIMELAPSE; #endif /* defined(HAVE_MYSQL) || defined(HAVE_PGSQL) */ /* Load the mask file if any */ if (cnt->conf.mask_file) { if ((picture = fopen(cnt->conf.mask_file, "r"))) { /* NOTE: The mask is expected to have the output dimensions. I.e., the mask * applies to the already rotated image, not the capture image. Thus, use * width and height from imgs. */ cnt->imgs.mask = get_pgm(picture, cnt->imgs.width, cnt->imgs.height); fclose(picture); } else { motion_log(LOG_ERR, 1, "Error opening mask file %s", cnt->conf.mask_file); /* Try to write an empty mask file to make it easier for the user to edit it */ put_fixed_mask(cnt, cnt->conf.mask_file); } if (!cnt->imgs.mask) { motion_log(LOG_ERR, 0, "Failed to read mask image. Mask feature disabled."); } else { if (cnt->conf.setup_mode) motion_log(-1, 0, "Maskfile \"%s\" loaded.",cnt->conf.mask_file); } } else cnt->imgs.mask=NULL; /* Always initialize smart_mask - someone could turn it on later... */ memset(cnt->imgs.smartmask, 0, cnt->imgs.motionsize); memset(cnt->imgs.smartmask_final, 255, cnt->imgs.motionsize); memset(cnt->imgs.smartmask_buffer, 0, cnt->imgs.motionsize*sizeof(int)); /* Set noise level */ cnt->noise = cnt->conf.noise; /* Set threshold value */ cnt->threshold = cnt->conf.max_changes; /* Initialize webcam server if webcam port is specified to not 0 */ if (cnt->conf.webcam_port) { if ( webcam_init(cnt) == -1 ) { motion_log(LOG_ERR, 1, "Problem enabling stream server"); cnt->finish = 1; cnt->makemovie = 0; } motion_log(LOG_DEBUG, 0, "Started stream webcam server in port %d", cnt->conf.webcam_port); } /* Prevent first few frames from triggering motion... */ cnt->moved = 8; } /** * motion_loop * * Thread function for the motion handling threads. * */ static void *motion_loop(void *arg) { struct context *cnt = arg; int i, j, detecting_motion = 0; time_t lastframetime = 0; int postcap = 0; int frame_buffer_size; int smartmask_ratio = 0; int smartmask_count = 20; int smartmask_lastrate = 0; int olddiffs = 0; int text_size_factor; int passflag = 0; long int *rolling_average_data; long int rolling_average_limit, required_frame_time, frame_delay, delay_time_nsec; int rolling_frame = 0; struct timeval tv1, tv2; unsigned long int rolling_average, elapsedtime; unsigned long long int timenow = 0, timebefore = 0; unsigned char *newimg = NULL; /* Pointer to where new image is stored */ int vid_return_code = 0; /* Return code used when calling vid_next */ #ifdef HAVE_FFMPEG /* Next two variables are used for timelapse feature * time_last_frame is set to 1 so that first comming timelapse or second=0 * is acted upon. */ unsigned long int time_last_frame=1, time_current_frame; #endif /* HAVE_FFMPEG */ motion_init(cnt); /* Initialize the double sized characters if needed. */ if(cnt->conf.text_double) text_size_factor = 2; else text_size_factor = 1; /* Work out expected frame rate based on config setting */ if (cnt->conf.frame_limit) required_frame_time = 1000000L / cnt->conf.frame_limit; else required_frame_time = 0; frame_delay = required_frame_time; /* * Reserve enough space for a 10 second timing history buffer. Note that, * if there is any problem on the allocation, mymalloc does not return. */ rolling_average_limit = 10 * cnt->conf.frame_limit; rolling_average_data = mymalloc(sizeof(long int) * rolling_average_limit); /* Preset history buffer with expected frame rate */ for (j=0; j< rolling_average_limit; j++) rolling_average_data[j]=required_frame_time; /* MAIN MOTION LOOP BEGINS HERE */ /* Should go on forever... unless you bought vaporware :) */ while (!cnt->finish || cnt->makemovie) { /***** MOTION LOOP - PREPARE FOR NEW FRAME SECTION *****/ /* Get current time and preserver last time for frame interval calc. */ timebefore = timenow; gettimeofday(&tv1, NULL); timenow = tv1.tv_usec + 1000000L * tv1.tv_sec; /* since we don't have sanity checks done when options are set, * this sanity check must go in the main loop :(, before pre_captures * are attempted. */ if (cnt->conf.minimum_motion_frames < 1) cnt->conf.minimum_motion_frames = 1; if (cnt->conf.pre_capture < 0) cnt->conf.pre_capture = 0; /* Check if our buffer is still the right size * If pre_capture or minimum_motion_frames has been changed * via the http remote control we need to re-size the ring buffer */ frame_buffer_size = cnt->conf.pre_capture + cnt->conf.minimum_motion_frames - 1; if (cnt->precap_nr != frame_buffer_size) { /* Only decrease if at last position in new buffer */ if (frame_buffer_size > cnt->precap_nr || frame_buffer_size == cnt->precap_cur) { unsigned char *tmp; time_t *tmp2; int *tmp3; int smallest; smallest = (cnt->precap_nr < frame_buffer_size) ? cnt->precap_nr : frame_buffer_size; tmp=mymalloc(cnt->imgs.size*(1+frame_buffer_size)); tmp2=mymalloc(sizeof(time_t)*(1+frame_buffer_size)); tmp3=mymalloc(sizeof(int)*(1+frame_buffer_size)); memcpy(tmp, cnt->imgs.image_ring_buffer, cnt->imgs.size * (1+smallest)); memcpy(tmp2, cnt->imgs.timestamp, sizeof(time_t) * (1+smallest)); memcpy(tmp3, cnt->imgs.shotstamp, sizeof(int) * (1+smallest)); free(cnt->imgs.image_ring_buffer); free(cnt->imgs.timestamp); free(cnt->imgs.shotstamp); cnt->imgs.image_ring_buffer = tmp; cnt->imgs.timestamp = tmp2; cnt->imgs.shotstamp = tmp3; cnt->precap_nr = frame_buffer_size; } } /* Get time for current frame */ cnt->currenttime = time(NULL); /* localtime returns static data and is not threadsafe * so we use localtime_r which is reentrant and threadsafe */ localtime_r(&cnt->currenttime, cnt->currenttime_tm); /* If we have started on a new second we reset the shots variable * lastrate is updated to be the number of the last frame. last rate * is used as the ffmpeg framerate when motion is detected. */ if (lastframetime != cnt->currenttime) { cnt->lastrate = cnt->shots + 1; cnt->shots = -1; lastframetime = cnt->currenttime; } /* Increase the shots variable for each frame captured within this second */ cnt->shots++; /* Store time with pre_captured image*/ *(cnt->imgs.timestamp + cnt->precap_cur) = cnt->currenttime; /* Store shot number with pre_captured image*/ *(cnt->imgs.shotstamp+cnt->precap_cur) = cnt->shots; /* newimg now points to the current image. With precap_cur incremented it * will be pointing to the position in the buffer for the NEXT image frame * not the current!!! So newimg points to current frame about to be loaded * and the cnt->precap_cur already have been incremented to point to the * next frame. */ newimg = cnt->imgs.image_ring_buffer + (cnt->imgs.size * (cnt->precap_cur++)); /* If we are at the end of the ring buffer go to the start */ if (cnt->precap_cur > cnt->precap_nr) cnt->precap_cur=0; /***** MOTION LOOP - RETRY INITIALIZING NETCAM SECTION *****/ /* If a network camera is not available we keep on retrying every 10 seconds * until it shows up. */ if (cnt->video_dev == -1 && cnt->conf.netcam_url && cnt->currenttime % 10 == 0 && cnt->shots == 0) { motion_log(LOG_ERR, 0, "Retrying until successful initial connection with network camera"); netcam_cleanup(cnt->netcam, 1); cnt->netcam = NULL; cnt->video_dev = vid_start(cnt); /* if the netcam has different dimentions than in the config file * we need to restart Motion to re-allocate all the buffers */ if (cnt->imgs.width != cnt->imgs.width || cnt->imgs.height != cnt->conf.height) { motion_log(LOG_ERR, 0, "Network camera has finally become available"); motion_log(LOG_ERR, 0, "Network camera image has different width and height " "from what is in the config file. You should fix that"); motion_log(LOG_ERR, 0, "Restarting Motion to reinitialize all " "image buffers to new picture dimensions"); kill(getpid(), 1); break; } } /***** MOTION LOOP - IMAGE CAPTURE SECTION *****/ /* Fetch next frame from camera * If vid_next returns 0 all is well and we got a new picture * Any non zero value is an error. * 0 = OK, valid picture * <0 = fatal error - leave the thread by breaking out of the main loop * >0 = non fatal error - copy last image or show grey image with message */ vid_return_code = vid_next(cnt, newimg); if (vid_return_code == 0) { /* If all is well reset missing_frame_counter */ if (cnt->missing_frame_counter >= MISSING_FRAMES_TIMEOUT * cnt->conf.frame_limit) { /* If we previously logged starting a grey image, now log video re-start */ motion_log(LOG_ERR, 0, "Video signal re-acquired"); // event for re-acquired video signal can be called here } cnt->missing_frame_counter = 0; #ifdef HAVE_FFMPEG /* Deinterlace the image with ffmpeg, before the image is modified. */ if(cnt->conf.ffmpeg_deinterlace) { ffmpeg_deinterlace(newimg, cnt->imgs.width, cnt->imgs.height); } #endif /* save the newly captured still virgin image to a buffer * which we will not alter with text and location graphics */ memcpy(cnt->imgs.image_virgin, newimg, cnt->imgs.size); /* If the camera is a netcam we let the camera decide the pace. * Otherwise we will keep on adding duplicate frames. * By resetting the timer the framerate becomes maximum the rate * of the Netcam. */ if (cnt->conf.netcam_url) { gettimeofday(&tv1, NULL); timenow = tv1.tv_usec + 1000000L * tv1.tv_sec; } } else { if (vid_return_code < 0) { /* Fatal error - break out of main loop terminating thread */ motion_log(LOG_ERR, 0, "Video device fatal error - terminating camera thread"); break; } else { /* Non fatal errors */ if (debug_level) motion_log(-1, 0, "vid_return_code %d", vid_return_code); /* Netcams that change dimensions while Motion is running will * require that Motion restarts to reinitialize all the many * buffers inside Motion. It will be a mess to try and recover any * other way */ if (vid_return_code == NETCAM_RESTART_ERROR) { motion_log(LOG_ERR, 0, "Restarting Motion to reinitialize all " "image buffers"); kill(getpid(), 1); break; } /* First missed frame - store timestamp */ if (!cnt->missing_frame_counter) cnt->connectionlosttime = cnt->currenttime; /* If we are waiting for first image prevent the * cnt->connectionlosttime from being updated each time we come back */ if (cnt->video_dev == -1) cnt->missing_frame_counter = 1; /* Increase missing_frame_counter * The first MISSING_FRAMES_TIMEOUT seconds we copy previous virgin image * After 30 seconds we put a grey error image in the buffer * Note: at low_cpu the timeout will be longer but we live with that * If we still have not yet received the initial image from a camera * we go straight for the grey error image. */ if (cnt->video_dev != -1 && ++cnt->missing_frame_counter < (MISSING_FRAMES_TIMEOUT * cnt->conf.frame_limit)) { memcpy(newimg, cnt->imgs.image_virgin, cnt->imgs.size); } else { char tmpout[80]; char tmpin[] = "CONNECTION TO CAMERA LOST\\nSINCE %Y-%m-%d %T"; struct tm tmptime; localtime_r(&cnt->connectionlosttime, &tmptime); memset(newimg, 0x80, cnt->imgs.size); mystrftime(cnt, tmpout, sizeof(tmpout), tmpin, &tmptime, NULL, 0); draw_text(newimg, 10, 20 * text_size_factor, cnt->imgs.width, tmpout, cnt->conf.text_double); /* Write error message only once */ if (cnt->missing_frame_counter == MISSING_FRAMES_TIMEOUT * cnt->conf.frame_limit) { motion_log(LOG_ERR, 0, "Video signal lost - Adding grey image"); // Event for lost video signal can be called from here } } } } /***** MOTION LOOP - MOTION DETECTION SECTION *****/ /* The actual motion detection takes place in the following * diffs is the number of pixels detected as changed * Make a differences picture in image_out * * alg_diff_standard is the slower full feature motion detection algorithm * alg_diff first calls a fast detection algorithm which only looks at a * fraction of the pixels. If this detects possible motion alg_diff_standard * is called. */ if (cnt->threshold && !cnt->pause) { /* if we've already detected motion and we want to see if there's * still motion, don't bother trying the fast one first. IF there's * motion, the alg_diff will trigger alg_diff_standard * anyway */ if (detecting_motion || cnt->conf.setup_mode) cnt->diffs = alg_diff_standard(cnt, cnt->imgs.image_virgin); else cnt->diffs = alg_diff(cnt, cnt->imgs.image_virgin); /* Lightswitch feature - has light intensity changed? * This can happen due to change of light conditions or due to a sudden change of the camera * sensitivity. If alg_lightswitch detects lightswitch we suspend motion detection the next * 5 frames to allow the camera to settle. */ if (cnt->conf.lightswitch) { if (alg_lightswitch(cnt, cnt->diffs)) { if (cnt->conf.setup_mode) motion_log(-1, 0, "Lightswitch detected"); if (cnt->moved < 5) cnt->moved = 5; cnt->diffs = 0; } } /* Switchfilter feature tries to detect a change in the video signal * from one camera to the next. This is normally used in the Round * Robin feature. The algoritm is not very safe. * The algoritm takes a little time so we only call it when needed * ie. when feature is enabled and diffs>threshold. * We do not suspend motion detection like we did for lightswith * because with Round Robin this is controlled by roundrobin_skip. */ if (cnt->conf.switchfilter && cnt->diffs > cnt->threshold) { cnt->diffs = alg_switchfilter(cnt, cnt->diffs, newimg); if (cnt->diffs <= cnt->threshold) { cnt->diffs = 0; if (cnt->conf.setup_mode) motion_log(-1, 0, "Switchfilter detected"); } } /* Despeckle feature * First we run (as given by the despeckle option iterations * of erode and dilate algoritms. * Finally we run the labelling feature. * All this is done in the alg_despeckle code. */ cnt->imgs.total_labels = 0; cnt->imgs.largest_label = 0; olddiffs = 0; if (cnt->conf.despeckle && cnt->diffs > 0) { olddiffs = cnt->diffs; cnt->diffs = alg_despeckle(cnt, olddiffs); } } else if (!cnt->conf.setup_mode) cnt->diffs = 0; /* Manipulate smart_mask sensitivity (only every smartmask_ratio seconds) */ if (cnt->smartmask_speed) { if (!--smartmask_count){ alg_tune_smartmask(cnt); smartmask_count = smartmask_ratio; } } /* cnt->moved is set by the tracking code when camera has been asked to move. * When camera is moving we do not want motion to detect motion or we will * get our camera chasing itself like crazy and we will get motion detected * which is not really motion. So we pretend there is no motion by setting * cnt->diffs = 0. * We also pretend to have a moving camera when we start Motion and when light * switch has been detected to allow camera to settle. */ if (cnt->moved) { cnt->moved--; cnt->diffs = 0; } /***** MOTION LOOP - TUNING SECTION *****/ /* if noise tuning was selected, do it now. but only when * no frames have been recorded and only once per second */ if (cnt->conf.noise_tune && cnt->shots == 0) { if (!detecting_motion && (cnt->diffs <= cnt->threshold)) alg_noise_tune(cnt, cnt->imgs.image_virgin); } /* if we are not noise tuning lets make sure that remote controlled * changes of noise_level are used. */ if (!cnt->conf.noise_tune) cnt->noise = cnt->conf.noise; /* threshold tuning if enabled * if we are not threshold tuning lets make sure that remote controlled * changes of threshold are used. */ if (cnt->conf.threshold_tune) alg_threshold_tune(cnt, cnt->diffs, detecting_motion); else cnt->threshold = cnt->conf.max_changes; /***** MOTION LOOP - TEXT AND GRAPHICS OVERLAY SECTION *****/ /* Some overlays on top of the motion image * Note that these now modifies the cnt->imgs.out so this buffer * can no longer be used for motion detection features until next * picture frame is captured. */ /* Fixed mask overlay */ if (cnt->imgs.mask && (cnt->conf.motion_img || cnt->conf.ffmpeg_cap_motion || cnt->conf.setup_mode) ) overlay_fixed_mask(cnt, cnt->imgs.out); /* Smartmask overlay */ if (cnt->smartmask_speed && (cnt->conf.motion_img || cnt->conf.ffmpeg_cap_motion || cnt->conf.setup_mode) ) overlay_smartmask(cnt, cnt->imgs.out); /* Largest labels overlay */ if (cnt->imgs.largest_label && (cnt->conf.motion_img || cnt->conf.ffmpeg_cap_motion || cnt->conf.setup_mode) ) overlay_largest_label(cnt, cnt->imgs.out); /* If motion is detected (cnt->diffs > cnt->threshold) and before we add text to the pictures we find the center and size coordinates of the motion to be used for text overlays and later for adding the locate rectangle */ if (cnt->diffs > cnt->threshold) alg_locate_center_size(&cnt->imgs, cnt->imgs.width, cnt->imgs.height, &cnt->location); /* Initialize the double sized characters if needed. */ if(cnt->conf.text_double && text_size_factor == 1) text_size_factor = 2; /* If text_double is set to off, then reset the scaling text_size_factor. */ else if(!cnt->conf.text_double && text_size_factor == 2) { text_size_factor = 1; } /* Add changed pixels in upper right corner of the pictures */ if (cnt->conf.text_changes) { char tmp[15]; sprintf(tmp, "%d", cnt->diffs); draw_text(newimg, cnt->imgs.width - 10, 10, cnt->imgs.width, tmp, cnt->conf.text_double); } /* Add changed pixels to motion-images (for webcam) in setup_mode and always overlay smartmask (not only when motion is detected) */ if (cnt->conf.setup_mode) { char tmp[PATH_MAX]; sprintf(tmp, "D:%5d L:%3d N:%3d", cnt->diffs, cnt->imgs.total_labels, cnt->noise); draw_text(cnt->imgs.out, cnt->imgs.width - 10, cnt->imgs.height - 30 * text_size_factor, cnt->imgs.width, tmp, cnt->conf.text_double); sprintf(tmp, "THREAD %d SETUP", cnt->threadnr); draw_text(cnt->imgs.out, cnt->imgs.width - 10, cnt->imgs.height - 10 * text_size_factor, cnt->imgs.width, tmp, cnt->conf.text_double); } /* Add text in lower left corner of the pictures */ if (cnt->conf.text_left) { char tmp[PATH_MAX]; mystrftime(cnt, tmp, sizeof(tmp), cnt->conf.text_left, cnt->currenttime_tm, NULL, 0); draw_text(newimg, 10, cnt->imgs.height - 10 * text_size_factor, cnt->imgs.width, tmp, cnt->conf.text_double); } /* Add text in lower right corner of the pictures */ if (cnt->conf.text_right) { char tmp[PATH_MAX]; mystrftime(cnt, tmp, sizeof(tmp), cnt->conf.text_right, cnt->currenttime_tm, NULL, 0); draw_text(newimg, cnt->imgs.width - 10, cnt->imgs.height - 10 * text_size_factor, cnt->imgs.width, tmp, cnt->conf.text_double); } /***** MOTION LOOP - ACTIONS AND EVENT CONTROL SECTION *****/ /* If motion has been detected we take action and start saving * pictures and movies etc by calling motion_detected(). * Is output_all enabled we always call motion_detected() * If post_capture is enabled we also take care of this in the this * code section. */ if (cnt->conf.output_all) { detecting_motion = 1; motion_detected(cnt, 0, cnt->video_dev, newimg); } else if (cnt->diffs > cnt->threshold) { /* Did we detect motion (like the cat just walked in :) )? * If so, ensure the motion is sustained if minimum_motion_frames * is set, and take action by calling motion_detected(). * pre_capture is handled by motion_detected(), and we handle * post_capture here. */ if (!detecting_motion) detecting_motion = 1; detecting_motion++; if (detecting_motion > cnt->conf.minimum_motion_frames) { motion_detected(cnt, cnt->diffs, cnt->video_dev, newimg); postcap = cnt->conf.post_capture; } } else if (postcap) { motion_detected(cnt, 0, cnt->video_dev, newimg); postcap--; } else { detecting_motion = 0; } /* Is the mpeg movie to long? Then make movies * First test for max mpegtime */ if (cnt->conf.maxmpegtime && cnt->event_nr == cnt->prev_event) if (cnt->currenttime - cnt->eventtime >= cnt->conf.maxmpegtime) cnt->makemovie = 1; /* Now test for quiet longer than 'gap' OR make movie as decided in * previous statement. */ if (((cnt->currenttime - cnt->lasttime >= cnt->conf.gap) && cnt->conf.gap > 0) || cnt->makemovie) { if (cnt->event_nr == cnt->prev_event || cnt->makemovie) { /* When output_normal=best save best preview_shot here at the end of event */ if (cnt->new_img == NEWIMG_BEST && cnt->preview_max) { preview_best(cnt); cnt->preview_max = 0; } event(cnt, EVENT_ENDMOTION, NULL, NULL, NULL, cnt->currenttime_tm); /* if tracking is enabled we center our camera so it does not * point to a place where it will miss the next action */ if (cnt->track.type) cnt->moved = track_center(cnt, cnt->video_dev, 0, 0, 0); if (cnt->conf.setup_mode) motion_log(-1, 0, "End of event %d", cnt->event_nr); cnt->makemovie = 0; /* Finally we increase the event number */ cnt->event_nr++; /* And we unset the text_event_string to avoid that buffered * images get a timestamp from previous event. */ cnt->text_event_string[0] = '\0'; } } /***** MOTION LOOP - REFERENCE FRAME SECTION *****/ /* Update reference frame */ if (cnt->moved && (cnt->track.type || cnt->conf.lightswitch)) { /* Prevent the motion created by moving camera or sudden light intensity * being detected by creating a fresh reference frame */ memcpy(cnt->imgs.ref, cnt->imgs.image_virgin, cnt->imgs.size); } else if (cnt->threshold) { /* Old image slowly decays, this will make it even harder on * a slow moving object to stay undetected */ unsigned char *imgs_ref_ptr = cnt->imgs.ref; unsigned char *newimg_ptr = cnt->imgs.image_virgin; for (i=cnt->imgs.size-1; i>=0; i--) { *imgs_ref_ptr = (*imgs_ref_ptr + *newimg_ptr)/2; imgs_ref_ptr++; newimg_ptr++; } } /***** MOTION LOOP - SETUP MODE CONSOLE OUTPUT SECTION *****/ /* If setup_mode enabled output some numbers to console */ if (cnt->conf.setup_mode){ char msg[1024] = "\0"; char part[100]; if (cnt->conf.despeckle) { snprintf(part, 99, "Raw changes: %5d - changes after '%s': %5d", olddiffs, cnt->conf.despeckle, cnt->diffs); strcat(msg, part); if (strchr(cnt->conf.despeckle, 'l')){ sprintf(part, " - labels: %3d", cnt->imgs.total_labels); strcat(msg, part); } } else{ sprintf(part, "Changes: %5d", cnt->diffs); strcat(msg, part); } if (cnt->conf.noise_tune){ sprintf(part, " - noise level: %2d", cnt->noise); strcat(msg, part); } if (cnt->conf.threshold_tune){ sprintf(part, " - threshold: %d", cnt->threshold); strcat(msg, part); } motion_log(-1, 0, "%s", msg); } /***** MOTION LOOP - SNAPSHOT FEATURE SECTION *****/ /* Did we get triggered to make a snapshot from control http? Then shoot a snap * If snapshot_interval is not zero and time since epoch MOD snapshot_interval = 0 then snap * Note: Negative value means SIGALRM snaps are enabled * httpd-control snaps are always enabled. */ if ( (cnt->conf.snapshot_interval > 0 && cnt->shots==0 && cnt->currenttime % cnt->conf.snapshot_interval == 0) || cnt->snapshot) { event(cnt, EVENT_IMAGE_SNAPSHOT, newimg, NULL, NULL, cnt->currenttime_tm); cnt->snapshot = 0; } /***** MOTION LOOP - TIMELAPSE FEATURE SECTION *****/ #ifdef HAVE_FFMPEG time_current_frame = cnt->currenttime; if (cnt->conf.timelapse) { /* Check to see if we should start a new timelapse file. We start one when * we are on the first shot, and and the seconds are zero. We must use the seconds * to prevent the timelapse file from getting reset multiple times during the minute. */ if (cnt->currenttime_tm->tm_min == 0 && (time_current_frame % 60 < time_last_frame % 60) && cnt->shots == 0) { if (strcasecmp(cnt->conf.timelapse_mode,"manual") == 0) ;/* No action */ /* If we are daily, raise timelapseend event at midnight */ else if (strcasecmp(cnt->conf.timelapse_mode, "daily") == 0) { if (cnt->currenttime_tm->tm_hour == 0) event(cnt, EVENT_TIMELAPSEEND, NULL, NULL, NULL, cnt->currenttime_tm); } /* handle the hourly case */ else if (strcasecmp(cnt->conf.timelapse_mode, "hourly") == 0) { event(cnt, EVENT_TIMELAPSEEND, NULL, NULL, NULL, cnt->currenttime_tm); } /* If we are weekly-sunday, raise timelapseend event at midnight on sunday */ else if (strcasecmp(cnt->conf.timelapse_mode, "weekly-sunday") == 0) { if (cnt->currenttime_tm->tm_wday == 0 && cnt->currenttime_tm->tm_hour == 0) event(cnt, EVENT_TIMELAPSEEND, NULL, NULL, NULL, cnt->currenttime_tm); } /* If we are weekly-monday, raise timelapseend event at midnight on monday */ else if (strcasecmp(cnt->conf.timelapse_mode, "weekly-monday") == 0) { if (cnt->currenttime_tm->tm_wday == 1 && cnt->currenttime_tm->tm_hour == 0) event(cnt, EVENT_TIMELAPSEEND, NULL, NULL, NULL, cnt->currenttime_tm); } /* If we are monthly, raise timelapseend event at midnight on first day of month */ else if (strcasecmp(cnt->conf.timelapse_mode, "monthly") == 0) { if (cnt->currenttime_tm->tm_mday == 1 && cnt->currenttime_tm->tm_hour == 0) event(cnt, EVENT_TIMELAPSEEND, NULL, NULL, NULL, cnt->currenttime_tm); } /* If invalid we report in syslog once and continue in manual mode */ else { motion_log(LOG_ERR, 0, "Invalid timelapse_mode argument '%s'", cnt->conf.timelapse_mode); motion_log(LOG_ERR, 0, "Defaulting to manual timelapse mode"); conf_cmdparse(&cnt, (char *)"ffmpeg_timelapse_mode",(char *)"manual"); } } /* If ffmpeg timelapse is enabled and time since epoch MOD ffmpeg_timelaps = 0 * add a timelapse frame to the timelapse mpeg. */ if (cnt->shots == 0 && time_current_frame % cnt->conf.timelapse <= time_last_frame % cnt->conf.timelapse) event(cnt, EVENT_TIMELAPSE, newimg, NULL, NULL, cnt->currenttime_tm); } /* if timelapse mpeg is in progress but conf.timelapse is zero then close timelapse file * This is an important feature that allows manual roll-over of timelapse file using xmlrpc * via a cron job */ else if (cnt->ffmpeg_timelapse) event(cnt, EVENT_TIMELAPSEEND, NULL, NULL, NULL, cnt->currenttime_tm); time_last_frame = time_current_frame; #endif /* HAVE_FFMPEG */ /***** MOTION LOOP - VIDEO LOOPBACK SECTION *****/ /* feed last image and motion image to video device pipes and the webcam clients * In setup mode we send the special setup mode image to both webcam and vloopback pipe * In normal mode we feed the latest image to vloopback device and we send * the image to the webcam. We always send the first image in a second to the webcam. * Other image are sent only when the config option webcam_motion is off * The result is that with webcam_motion on the webcam stream is normally at the minimal * 1 frame per second but the minute motion is detected the motion_detected() function * sends all detected pictures to the webcam except the 1st per second which is already sent. */ if (cnt->conf.setup_mode) { event(cnt, EVENT_IMAGE, cnt->imgs.out, NULL, &cnt->pipe, cnt->currenttime_tm); event(cnt, EVENT_WEBCAM, cnt->imgs.out, NULL, NULL, cnt->currenttime_tm); } else { event(cnt, EVENT_IMAGE, newimg, NULL, &cnt->pipe, cnt->currenttime_tm); if (!cnt->conf.webcam_motion || cnt->shots == 1) event(cnt, EVENT_WEBCAM, newimg, NULL, NULL, cnt->currenttime_tm); } event(cnt, EVENT_IMAGEM, cnt->imgs.out, NULL, &cnt->mpipe, cnt->currenttime_tm); /***** MOTION LOOP - ONCE PER SECOND PARAMETER UPDATE SECTION *****/ /* Check for some config parameter changes but only every second */ if (cnt->shots == 0){ if (strcasecmp(cnt->conf.output_normal, "on") == 0) cnt->new_img=NEWIMG_ON; else if (strcasecmp(cnt->conf.output_normal, "first") == 0) cnt->new_img=NEWIMG_FIRST; else if (strcasecmp(cnt->conf.output_normal, "best") == 0){ cnt->new_img=NEWIMG_BEST; /* alocate buffer here when not yet done */ if (!cnt->imgs.preview_buffer){ cnt->imgs.preview_buffer = mymalloc(cnt->imgs.size); if (cnt->conf.setup_mode) motion_log(-1, 0, "Preview buffer allocated"); } } else cnt->new_img = NEWIMG_OFF; if (strcasecmp(cnt->conf.locate, "on") == 0) cnt->locate = LOCATE_ON; else if (strcasecmp(cnt->conf.locate, "preview") == 0) cnt->locate = LOCATE_PREVIEW; else cnt->locate = LOCATE_OFF; /* Sanity check for smart_mask_speed, silly value disables smart mask */ if (cnt->conf.smart_mask_speed < 0 || cnt->conf.smart_mask_speed > 10) cnt->conf.smart_mask_speed = 0; /* Has someone changed smart_mask_speed or framerate? */ if (cnt->conf.smart_mask_speed != cnt->smartmask_speed || smartmask_lastrate != cnt->lastrate){ if (cnt->conf.smart_mask_speed == 0){ memset(cnt->imgs.smartmask, 0, cnt->imgs.motionsize); memset(cnt->imgs.smartmask_final, 255, cnt->imgs.motionsize); } smartmask_lastrate = cnt->lastrate; cnt->smartmask_speed = cnt->conf.smart_mask_speed; /* Decay delay - based on smart_mask_speed (framerate independent) This is always 5*smartmask_speed seconds */ smartmask_ratio = 5 * cnt->lastrate * (11 - cnt->smartmask_speed); } #if defined(HAVE_MYSQL) || defined(HAVE_PGSQL) /* Set the sql mask file according to the SQL config options * We update it for every frame in case the config was updated * via remote control. */ cnt->sql_mask = cnt->conf.sql_log_image * (FTYPE_IMAGE + FTYPE_IMAGE_MOTION) + cnt->conf.sql_log_snapshot * FTYPE_IMAGE_SNAPSHOT + cnt->conf.sql_log_mpeg * (FTYPE_MPEG + FTYPE_MPEG_MOTION) + cnt->conf.sql_log_timelapse * FTYPE_MPEG_TIMELAPSE; #endif /* defined(HAVE_MYSQL) || defined(HAVE_PGSQL) */ } /***** MOTION LOOP - FRAMERATE TIMING AND SLEEPING SECTION *****/ /* Work out expected frame rate based on config setting which may have changed from http-control */ if (cnt->conf.frame_limit) required_frame_time = 1000000L / cnt->conf.frame_limit; else required_frame_time = 0; /* Get latest time to calculate time taken to process video data */ gettimeofday(&tv2, NULL); elapsedtime = (tv2.tv_usec + 1000000L * tv2.tv_sec) - timenow; /* Update history buffer but ignore first pass as timebefore variable will be inaccurate */ if (passflag) rolling_average_data[rolling_frame] = timenow-timebefore; else passflag = 1; rolling_frame++; if (rolling_frame >= rolling_average_limit) rolling_frame = 0; /* Calculate 10 second average and use deviation in delay calculation */ rolling_average = 0L; for (j=0; j < rolling_average_limit; j++) rolling_average += rolling_average_data[j]; rolling_average /= rolling_average_limit; frame_delay = required_frame_time-elapsedtime - (rolling_average - required_frame_time); if (frame_delay > 0) { /* Apply delay to meet frame time */ if (frame_delay > required_frame_time) frame_delay = required_frame_time; /* Delay time in nanoseconds for SLEEP */ delay_time_nsec = frame_delay * 1000; if (delay_time_nsec > 999999999) delay_time_nsec = 999999999; /* SLEEP as defined in motion.h A safe sleep using nanosleep */ SLEEP(0, delay_time_nsec); } /* This will limit the framerate to 1 frame while not detecting motion. Using a different motion flag to allow for multiple frames per second */ if (cnt->conf.low_cpu && !detecting_motion) { /* Recalculate remaining time to delay for a total of 1/low_cpu seconds */ if (frame_delay + elapsedtime < (1000000L / cnt->conf.low_cpu)) { frame_delay = (1000000L / cnt->conf.low_cpu) - frame_delay - elapsedtime; /* Delay time in nanoseconds for SLEEP */ delay_time_nsec = frame_delay * 1000; if (delay_time_nsec > 999999999) delay_time_nsec = 999999999; /* SLEEP as defined in motion.h A safe sleep using nanosleep */ SLEEP(0, delay_time_nsec); /* Correct frame times to ensure required_frame_time is maintained * This is done by taking the time NOW and subtract the time * required_frame_time. This way we pretend that timenow was set * one frame ago. */ gettimeofday(&tv1, NULL); timenow = tv1.tv_usec + 1000000L * tv1.tv_sec - required_frame_time; } } } /* END OF MOTION MAIN LOOP * If code continues here it is because the thread is exiting or restarting */ if (cnt->netcam) { netcam_cleanup(cnt->netcam, 0); cnt->netcam = NULL; } if (rolling_average_data) free(rolling_average_data); motion_log(-1, 0, "Thread exiting"); if (!cnt->finish) motion_log(LOG_ERR, 1, "Somebody stole the video device, lets hope we got his picture"); event(cnt, EVENT_STOP, NULL, NULL, NULL, NULL); pthread_mutex_lock(&global_lock); threads_running--; pthread_mutex_unlock(&global_lock); pthread_exit(NULL); } /** * become_daemon * * Turns Motion into a daemon through forking. The parent process (i.e. the * one initially calling this function) will exit inside this function, while * control will be returned to the child process. Standard input/output are * released properly, and the current directory is set to / in order to not * lock up any file system. * * Parameters: * * cnt - current thread's context struct * * Returns: nothing */ static void become_daemon(void) { int i; struct sigaction sig_ign_action; /* Setup sig_ign_action */ #ifdef SA_RESTART sig_ign_action.sa_flags = SA_RESTART; #else sig_ign_action.sa_flags = 0; #endif sig_ign_action.sa_handler = SIG_IGN; sigemptyset(&sig_ign_action.sa_mask); if (fork()) { motion_log(-1, 0, "Motion going to daemon mode"); exit(0); } /* changing dir to root enables people to unmount a disk without having to stop Motion */ if (chdir("/")) { motion_log(LOG_ERR, 1, "Could not change directory"); } #ifdef __freebsd__ setpgrp(0, getpid()); #else setpgrp(); #endif /* __freebsd__ */ if ((i = open("/dev/tty", O_RDWR)) >= 0) { ioctl(i, TIOCNOTTY, NULL); close(i); } setsid(); i = open("/dev/null", O_RDONLY); if(i != -1) { dup2(i, STDIN_FILENO); close(i); } i = open("/dev/null", O_WRONLY); if(i != -1) { dup2(i, STDOUT_FILENO); dup2(i, STDERR_FILENO); close(i); } sigaction(SIGTTOU, &sig_ign_action, NULL); sigaction(SIGTTIN, &sig_ign_action, NULL); sigaction(SIGTSTP, &sig_ign_action, NULL); } /** * cntlist_create * * Sets up the 'cnt_list' variable by allocating room for (and actually * allocating) one context struct. Also loads the configuration from * the config file(s). * * Parameters: * argc - size of argv * argv - command-line options, passed initially from 'main' * * Returns: nothing */ static void cntlist_create(int argc, char *argv[]) { /* cnt_list is an array of pointers to the context structures cnt for each thread. * First we reserve room for a pointer to thread 0's context structure * and a NULL pointer which indicates that end of the array of pointers to * thread context structures. */ cnt_list = mymalloc(sizeof(struct context *)*2); /* Now we reserve room for thread 0's context structure and let cnt_list[0] point to it */ cnt_list[0] = mymalloc(sizeof(struct context)); /* Populate context structure with start/default values */ context_init(cnt_list[0]); /* cnt_list[1] pointing to zero indicates no more thread context structures - they get added later */ cnt_list[1] = NULL; /* Command line arguments are being pointed to from cnt_list[0] and we call conf_load which loads * the config options from motion.conf, thread config files and the command line. */ cnt_list[0]->conf.argv = argv; cnt_list[0]->conf.argc = argc; cnt_list = conf_load(cnt_list); } /** * motion_shutdown * * Responsible for performing cleanup when Motion is shut down or restarted, * including freeing memory for all the context structs as well as for the * context struct list itself. * * Parameters: none * * Returns: nothing */ static void motion_shutdown(void) { int i = -1; while (cnt_list[++i]){ context_destroy(cnt_list[i]); } free(cnt_list); #ifndef WITHOUT_V4L vid_close(); vid_cleanup(); #endif } /** * motion_startup * * Responsible for initializing stuff when Motion starts up or is restarted, * including daemon initialization and creating the context struct list. * * Parameters: * * daemonize - non-zero to do daemon init (if the config parameters says so), * or 0 to skip it * argc - size of argv * argv - command-line options, passed initially from 'main' * * Returns: nothing */ static void motion_startup(int daemonize, int argc, char *argv[]) { /* Initialize our global mutex */ pthread_mutex_init(&global_lock, NULL); /* Create the list of context structures and load the * configuration. */ cntlist_create(argc, argv); initialize_chars(); if (daemonize) { /* If daemon mode is requested, and we're not going into setup mode, * become daemon. */ if (cnt_list[0]->daemon && cnt_list[0]->conf.setup_mode == 0) { become_daemon(); motion_log(LOG_INFO, 0, "Motion running as daemon process"); if (cnt_list[0]->conf.low_cpu) { motion_log(LOG_INFO, 0, "Capturing %d frames/s when idle", cnt_list[0]->conf.low_cpu); } } } #ifndef WITHOUT_V4L vid_init(); #endif } /** * setup_signals * * Attaches handlers to a number of signals that Motion need to catch. * * Parameters: sigaction structs for signals in general and SIGCHLD. * * Returns: nothing */ static void setup_signals(struct sigaction *sig_handler_action, struct sigaction *sigchild_action) { #ifdef SA_NOCLDWAIT sigchild_action->sa_flags = SA_NOCLDWAIT; #else sigchild_action->sa_flags = 0; #endif sigchild_action->sa_handler = sigchild_handler; sigemptyset(&sigchild_action->sa_mask); #ifdef SA_RESTART sig_handler_action->sa_flags = SA_RESTART; #else sig_handler_action->sa_flags = 0; #endif sig_handler_action->sa_handler = sig_handler; sigemptyset(&sig_handler_action->sa_mask); /* Enable automatic zombie reaping */ sigaction(SIGCHLD, sigchild_action, NULL); sigaction(SIGPIPE, sigchild_action, NULL); sigaction(SIGALRM, sig_handler_action, NULL); sigaction(SIGHUP, sig_handler_action, NULL); sigaction(SIGINT, sig_handler_action, NULL); sigaction(SIGQUIT, sig_handler_action, NULL); sigaction(SIGTERM, sig_handler_action, NULL); sigaction(SIGUSR1, sig_handler_action, NULL); } /** * main * * Main entry point of Motion. Launches all the motion threads and contains * the logic for starting up, restarting and cleaning up everything. * * Parameters: * * argc - size of argv * argv - command-line options * * Returns: Motion exit status = 0 always */ int main (int argc, char **argv) { int i, j; int webcam_port; pthread_attr_t thread_attr; pthread_t thread_id; /* Setup signals and do some initialization. 1 in the call to * 'motion_startup' means that Motion will become a daemon if so has been * requested, and argc and argc are necessary for reading the command * line options. */ struct sigaction sig_handler_action; struct sigaction sigchild_action; setup_signals(&sig_handler_action, &sigchild_action); motion_startup(1, argc, argv); #ifdef HAVE_FFMPEG /* FFMpeg initialization is only performed if FFMpeg support was found * and not disabled during the configure phase. */ ffmpeg_init(); #endif /* HAVE_FFMPEG */ /* In setup mode, Motion is very communicative towards the user, which * allows the user to experiment with the config parameters in order to * optimize motion detection and stuff. */ if(cnt_list[0]->conf.setup_mode) motion_log(-1, 0, "Motion running in setup mode."); /* Create and a thread attribute for the threads we spawn later on. * PTHREAD_CREATE_DETACHED means to create threads detached, i.e. * their termination cannot be synchronized through 'pthread_join'. */ pthread_attr_init(&thread_attr); pthread_attr_setdetachstate(&thread_attr, PTHREAD_CREATE_DETACHED); /* Create the TLS key for thread number. */ pthread_key_create(&tls_key_threadnr, NULL); do { if (restart) { /* Handle the restart situation. Currently the approach is to * cleanup everything, and then initialize everything again * (including re-reading the config file(s)). */ motion_shutdown(); restart = 0; /* only one reset for now */ #ifndef WITHOUT_V4L SLEEP(5,0); // maybe some cameras needs less time #endif motion_startup(0, argc, argv); /* 0 = skip daemon init */ } /* Check the webcam port number for conflicts. * First we check for conflict with the control port. * Second we check for that two threads does not use the same port number * for the webcam. If a duplicate port is found the webcam feature gets disabled (port =0) * for this thread and a warning is written to console and syslog. */ for (i = 1; cnt_list[i]; i++) { /* Get the webcam port for thread 'i', may be 0. */ webcam_port = cnt_list[i]->conf.webcam_port; if (cnt_list[0]->conf.setup_mode) motion_log(LOG_ERR, 0, "Webcam port %d", webcam_port); /* Compare against the control port. */ if (cnt_list[0]->conf.control_port == webcam_port && webcam_port != 0) { cnt_list[i]->conf.webcam_port = 0; motion_log(LOG_ERR, 0, "Webcam port number %d for thread %d conflicts with the control port", webcam_port, i); motion_log(LOG_ERR, 0, "Webcam feature for thread %d is disabled.", i); } /* Compare against webcam ports of other threads. */ j = i; while (cnt_list[++j]) { if (cnt_list[j]->conf.webcam_port == webcam_port && webcam_port != 0) { cnt_list[j]->conf.webcam_port = 0; motion_log(LOG_ERR, 0, "Webcam port number %d for thread %d conflicts with thread %d", webcam_port, j, i); motion_log(LOG_ERR, 0, "Webcam feature for thread %d is disabled.", j); } } } /* Start the motion threads. First 'cnt_list' item is global if 'thread' * option is used, so start at 1 then and 0 otherwise. */ for (i = cnt_list[1] != NULL ? 1 : 0; cnt_list[i]; i++) { if (cnt_list[0]->conf.setup_mode) motion_log(-1, 0, "Thread device: %s input %d", cnt_list[i]->conf.netcam_url ? cnt_list[i]->conf.netcam_url : cnt_list[i]->conf.video_device, cnt_list[i]->conf.netcam_url ? -1 : cnt_list[i]->conf.input ); /* Assign the thread number for this thread. This is done within a * mutex lock to prevent multiple simultaneous updates to * 'threads_running'. */ pthread_mutex_lock(&global_lock); cnt_list[i]->threadnr = ++threads_running; pthread_mutex_unlock(&global_lock); if ( strcmp(cnt_list[i]->conf_filename,"") ) motion_log(LOG_INFO, 0, "Thread is from %s", cnt_list[i]->conf_filename ); /* Create the actual thread. Use 'motion_loop' as the thread * function. */ pthread_create(&thread_id, &thread_attr, &motion_loop, cnt_list[i]); } /* Create a thread for the control interface if requested. Create it * detached and with 'motion_web_control' as the thread function. */ if (cnt_list[0]->conf.control_port) pthread_create(&thread_id, &thread_attr, &motion_web_control, cnt_list); if (cnt_list[0]->conf.setup_mode) motion_log(-1, 0,"Waiting for threads to finish, pid: %d", getpid()); /* Crude way of waiting for all threads to finish - check the thread * counter (because we cannot do join on the detached threads). */ while(threads_running > 0) { SLEEP(1,0); } if (cnt_list[0]->conf.setup_mode) motion_log(LOG_DEBUG, 0, "Threads finished"); /* Rest for a while if we're supposed to restart. */ if (restart) SLEEP(2,0); } while (restart); /* loop if we're supposed to restart */ motion_log(LOG_INFO, 0, "Motion terminating"); /* Perform final cleanup. */ pthread_key_delete(tls_key_threadnr); pthread_attr_destroy(&thread_attr); pthread_mutex_destroy(&global_lock); motion_shutdown(); return 0; } /** * mymalloc * * Allocates some memory and checks if that succeeded or not. If it failed, * do some errorlogging and bail out. * * NOTE: Kenneth Lavrsen changed printing of size_t types so instead of using * conversion specifier %zd I changed it to %llu and casted the size_t * variable to unsigned long long. The reason for this nonsense is that older * versions of gcc like 2.95 uses %Zd and does not understand %zd. So to avoid * this mess I used a more generic way. Long long should have enough bits for * 64-bit machines with large memory areas. * * Parameters: * * nbytes - no. of bytes to allocate * * Returns: a pointer to the allocated memory */ void * mymalloc(size_t nbytes) { void *dummy = malloc(nbytes); if (!dummy) { motion_log(LOG_EMERG, 1, "Could not allocate %llu bytes of memory!", (unsigned long long)nbytes); exit(1); } return dummy; } /** * myrealloc * * Re-allocate (i.e., resize) some memory and check if that succeeded or not. * If it failed, do some errorlogging and bail out. If the new memory size * is 0, the memory is freed. * * Parameters: * * ptr - pointer to the memory to resize/reallocate * size - new memory size * desc - name of the calling function * * Returns: a pointer to the reallocated memory, or NULL if the memory was * freed */ void *myrealloc(void *ptr, size_t size, const char *desc) { void *dummy = NULL; if (size == 0) { free(ptr); motion_log(LOG_WARNING, 0, "Warning! Function %s tries to resize memoryblock at %p to 0 bytes!", desc, ptr); } else { dummy = realloc(ptr, size); if (!dummy) { motion_log(LOG_EMERG, 0, "Could not resize memory-block at offset %p to %llu bytes (function %s)!", ptr, (unsigned long long)size, desc); exit(1); } } return dummy; } /** * create_path * * This function creates a whole path, like mkdir -p. Example paths: * this/is/an/example/ * /this/is/an/example/ * Warning: a path *must* end with a slash! * * Parameters: * * cnt - current thread's context structure (for logging) * path - the path to create * * Returns: 0 on success, -1 on failure */ int create_path(const char *path) { char *start; mode_t mode = S_IRWXU | S_IRGRP | S_IXGRP | S_IROTH | S_IXOTH; if (path[0] == '/') start = strchr(path + 1, '/'); else start = strchr(path, '/'); while(start) { char *buffer = strdup(path); buffer[start-path] = 0x00; if (mkdir(buffer, mode) == -1 && errno != EEXIST) { motion_log(LOG_ERR, 1, "Problem creating directory %s", buffer); free(buffer); return -1; } free(buffer); start = strchr(start + 1, '/'); } return 0; } /** * myfopen * * This function opens a file, if that failed because of an ENOENT error * (which is: path does not exist), the path is created and then things are * tried again. This is faster then trying to create that path over and over * again. If someone removes the path after it was created, myfopen will * recreate the path automatically. * * Parameters: * * path - path to the file to open * mode - open mode * * Returns: the file stream object */ FILE * myfopen(const char *path, const char *mode) { /* first, just try to open the file */ FILE *dummy = fopen(path, mode); /* could not open file... */ if (!dummy) { /* path did not exist? */ if (errno == ENOENT) { //DEBUG CODE syslog(LOG_DEBUG, "Could not open file %s directly; path did not exist. Creating path & retrying.", path); /* create path for file... */ if (create_path(path) == -1) return NULL; /* and retry opening the file */ dummy = fopen(path, mode); if (dummy) return dummy; } /* two possibilities * 1: there was an other error while trying to open the file for the first time * 2: could still not open the file after the path was created */ motion_log(LOG_ERR, 1, "Error opening file %s with mode %s", path, mode); return NULL; } return dummy; } /** * mystrftime * * Motion-specific variant of strftime(3) that supports additional format * specifiers in the format string. * * Parameters: * * cnt - current thread's context structure * s - destination string * max - max number of bytes to write * userformat - format string * tm - time information * filename - string containing full path of filename * set this to NULL if not relevant * sqltype - Filetype as used in SQL feature, set to 0 if not relevant * * Returns: number of bytes written to the string s */ size_t mystrftime(struct context *cnt, char *s, size_t max, const char *userformat, const struct tm *tm, const char *filename, int sqltype) { char formatstring[PATH_MAX] = ""; char tempstring[255] = ""; char *format, *tempstr; const char *pos_userformat; format = formatstring; /* if mystrftime is called with userformat = NULL we return a zero length string */ if (userformat == NULL) { *s = '\0'; return 0; } for (pos_userformat = userformat; *pos_userformat; ++pos_userformat) { if (*pos_userformat == '%') { /* Reset 'tempstr' to point to the beginning of 'tempstring', * otherwise we will eat up tempstring if there are many * format specifiers. */ tempstr = tempstring; tempstr[0] = '\0'; switch (*++pos_userformat) { case '\0': // end of string --pos_userformat; break; case 'v': // event sprintf(tempstr, "%02d", cnt->event_nr); break; case 'q': // shots sprintf(tempstr, "%02d", cnt->shots); break; case 'D': // diffs sprintf(tempstr, "%d", cnt->diffs); break; case 'N': // noise sprintf(tempstr, "%d", cnt->noise); break; case 'i': // motion width sprintf(tempstr, "%d", cnt->location.width); break; case 'J': // motion height sprintf(tempstr, "%d", cnt->location.height); break; case 'K': // motion center x sprintf(tempstr, "%d", cnt->location.x); break; case 'L': // motion center y sprintf(tempstr, "%d", cnt->location.y); break; case 'o': // threshold sprintf(tempstr, "%d", cnt->threshold); break; case 'Q': // number of labels sprintf(tempstr, "%d", cnt->imgs.total_labels); break; case 't': // thread number sprintf(tempstr, "%d",(int)(unsigned long) pthread_getspecific(tls_key_threadnr)); break; case 'C': // text_event if (cnt->text_event_string && cnt->text_event_string[0]) sprintf(tempstr, "%s", cnt->text_event_string); else ++pos_userformat; break; case 'f': // filename if (filename) sprintf(tempstr, "%s", filename); else ++pos_userformat; break; case 'n': // sqltype if (sqltype) sprintf(tempstr, "%d", sqltype); else ++pos_userformat; break; default: // Any other code is copied with the %-sign *format++ = '%'; *format++ = *pos_userformat; continue; } /* If a format specifier was found and used, copy the result from * 'tempstr' to 'format'. */ if (tempstr[0]) { while ((*format = *tempstr++) != '\0') ++format; continue; } } /* For any other character than % we just simply copy the character */ *format++ = *pos_userformat; } *format = '\0'; format = formatstring; return strftime(s, max, format, tm); } /** * motion_log * * This routine is used for printing all informational, debug or error * messages produced by any of the other motion functions. It always * produces a message of the form "[n] {message}", and (if the param * 'errno_flag' is set) follows the message with the associated error * message from the library. * * Parameters: * * level logging level for the 'syslog' function * (-1 implies no syslog message should be produced) * errno_flag if set, the log message should be followed by the * error message. * fmt the format string for producing the message * ap variable-length argument list * * Returns: * Nothing */ void motion_log(int level, int errno_flag, const char *fmt, ...) { int errno_save, n; char buf[1024]; #ifndef __freebsd__ char msg_buf[100]; #endif va_list ap; int threadnr; /* If pthread_getspecific fails (e.g., because the thread's TLS doesn't * contain anything for thread number, it returns NULL which casts to zero, * which is nice because that's what we want in that case. */ threadnr = (unsigned long)pthread_getspecific(tls_key_threadnr); /* * First we save the current 'error' value. This is required because * the subsequent calls to vsnprintf could conceivably change it! */ errno_save = errno; /* Prefix the message with the thread number */ n = snprintf(buf, sizeof(buf), "[%d] ", threadnr); /* Next add the user's message */ va_start(ap, fmt); n += vsnprintf(buf + n, sizeof(buf) - n, fmt, ap); /* If errno_flag is set, add on the library error message */ if (errno_flag) { strcat(buf, ": "); n += 2; /* * this is bad - apparently gcc/libc wants to use the non-standard GNU * version of strerror_r, which doesn't actually put the message into * my buffer :-(. I have put in a 'hack' to get around this. */ #ifdef __freebsd__ strerror_r(errno_save, buf + n, sizeof(buf) - n); /* 2 for the ': ' */ #else strcat(buf, strerror_r(errno_save, msg_buf, sizeof(msg_buf))); #endif } /* If 'level' is not negative, send the message to the syslog */ if (level >= 0) syslog(level, buf); /* For printing to stderr we need to add a newline */ strcat(buf, "\n"); fputs(buf, stderr); fflush(stderr); /* Clean up the argument list routine */ va_end(ap); }
2144 lines
68 KiB
C
2144 lines
68 KiB
C
/*
|
|
* webhttpd.c
|
|
*
|
|
* HTTP Control interface for motion.
|
|
*
|
|
* Specs : http://www.lavrsen.dk/twiki/bin/view/Motion/MotionHttpAPI
|
|
*
|
|
* Copyright 2004-2005 by Angel Carpintero (ack@telefonica.net)
|
|
* This software is distributed under the GNU Public License Version 2
|
|
* See also the file 'COPYING'.
|
|
*
|
|
*/
|
|
#include "motion.h"
|
|
#include <sys/types.h>
|
|
#include <sys/socket.h>
|
|
#include <netinet/in.h>
|
|
#include <arpa/inet.h>
|
|
#include <netdb.h>
|
|
#include "conf.h"
|
|
#include "webhttpd.h"
|
|
#include "netcam_wget.h"
|
|
|
|
pthread_mutex_t httpd_mutex;
|
|
|
|
int warningkill; // This is a dummy variable use to kill warnings when not checking sscanf and similar functions
|
|
|
|
static const char* ini_template =
|
|
"<html><head></head>\n"
|
|
"<body>\n";
|
|
|
|
static const char *set_template =
|
|
"<html><head><script language='javascript'>"
|
|
"function show(){top.location.href="
|
|
"'set?'+document.n.onames.options[document.n.onames.selectedIndex].value"
|
|
"+'='+document.s.valor.value;"
|
|
"}</script>\n</head>\n"
|
|
"<body>\n";
|
|
|
|
static const char* end_template =
|
|
"</body>\n"
|
|
"</html>\n";
|
|
|
|
static const char* ok_response =
|
|
"HTTP/1.1 200 OK\r\n"
|
|
"Server: Motion-httpd/"VERSION"\r\n"
|
|
"Connection: close\r\n"
|
|
"Max-Age: 0\r\n"
|
|
"Expires: 0\r\n"
|
|
"Cache-Control: no-cache\r\n"
|
|
"Cache-Control: private\r\n"
|
|
"Pragma: no-cache\r\n"
|
|
"Content-type: text/html\r\n\r\n";
|
|
|
|
static const char* ok_response_raw =
|
|
"HTTP/1.1 200 OK\r\n"
|
|
"Server: Motion-httpd/"VERSION"\r\n"
|
|
"Connection: close\r\n"
|
|
"Max-Age: 0\r\n"
|
|
"Expires: 0\r\n"
|
|
"Cache-Control: no-cache\r\n"
|
|
"Cache-Control: private\r\n"
|
|
"Pragma: no-cache\r\n"
|
|
"Content-type: text/plain\r\n\r\n";
|
|
|
|
|
|
static const char* bad_request_response =
|
|
"HTTP/1.0 400 Bad Request\r\n"
|
|
"Content-type: text/html\r\n\r\n"
|
|
"<html>\n"
|
|
"<body>\n"
|
|
"<h1>Bad Request</h1>\n"
|
|
"<p>The server did not understand your request.</p>\n"
|
|
"</body>\n"
|
|
"</html>\n";
|
|
|
|
static const char* bad_request_response_raw =
|
|
"HTTP/1.0 400 Bad Request\r\n"
|
|
"Content-type: text/plain\r\n\r\n"
|
|
"Bad Request";
|
|
|
|
static const char* not_found_response_template =
|
|
"HTTP/1.0 404 Not Found\r\n"
|
|
"Content-type: text/html\r\n\r\n"
|
|
"<html>\n"
|
|
"<body>\n"
|
|
"<h1>Not Found</h1>\n"
|
|
"<p>The requested URL was not found on the server.</p>\n"
|
|
"</body>\n"
|
|
"</html>\n";
|
|
|
|
static const char* not_found_response_template_raw =
|
|
"HTTP/1.0 404 Not Found\r\n"
|
|
"Content-type: text/plain\r\n\r\n"
|
|
"Not Found";
|
|
|
|
static const char* not_found_response_valid =
|
|
"HTTP/1.0 404 Not Valid\r\n"
|
|
"Content-type: text/html\r\n\r\n"
|
|
"<html>\n"
|
|
"<body>\n"
|
|
"<h1>Not Valid</h1>\n"
|
|
"<p>The requested URL is not valid.</p>\n"
|
|
"</body>\n"
|
|
"</html>\n";
|
|
|
|
static const char* not_found_response_valid_raw =
|
|
"HTTP/1.0 404 Not Valid\r\n"
|
|
"Content-type: text/plain\r\n\r\n"
|
|
"The requested URL is not valid.";
|
|
|
|
static const char* not_valid_syntax =
|
|
"HTTP/1.0 404 Not Valid Syntax\r\n"
|
|
"Content-type: text/html\r\n\r\n"
|
|
"<html>\n"
|
|
"<body>\n"
|
|
"<h1>Not Valid Syntax</h1>\n"
|
|
"</body>\n"
|
|
"</html>\n";
|
|
|
|
static const char* not_valid_syntax_raw =
|
|
"HTTP/1.0 404 Not Valid Syntax\r\n"
|
|
"Content-type: text/plain\r\n\r\n"
|
|
"Not Valid Syntax\n";
|
|
|
|
static const char* not_track =
|
|
"HTTP/1.0 200 OK\r\n"
|
|
"Content-type: text/html\r\n\r\n"
|
|
"<html>\n"
|
|
"<body>\n"
|
|
"<h1>Tracking Not Enabled</h1>\n";
|
|
|
|
static const char* not_track_raw =
|
|
"HTTP/1.0 200 OK\r\n"
|
|
"Content-type: text/plain\r\n\r\n"
|
|
"Tracking Not Enabled";
|
|
|
|
static const char* track_error =
|
|
"HTTP/1.0 200 OK\r\n"
|
|
"Content-type: text/html\r\n\r\n"
|
|
"<html>\n"
|
|
"<body>\n"
|
|
"<h1>Track Error</h1>\n";
|
|
|
|
static const char* track_error_raw =
|
|
"HTTP/1.0 200 OK\r\n"
|
|
"Content-type: text/plain\r\n\r\n"
|
|
"Track Error";
|
|
|
|
static const char* error_value =
|
|
"HTTP/1.0 200 OK\r\n"
|
|
"Content-type: text/html\r\n\r\n"
|
|
"<html>\n"
|
|
"<body>\n"
|
|
"<h1>Value Error</h1>\n";
|
|
|
|
static const char* error_value_raw =
|
|
"HTTP/1.0 200 OK\r\n"
|
|
"Content-type: text/plain\r\n\r\n"
|
|
"Value Error";
|
|
|
|
static const char* not_found_response_valid_command =
|
|
"HTTP/1.0 404 Not Valid Command\r\n"
|
|
"Content-type: text/html\r\n\r\n"
|
|
"<html>\n"
|
|
"<body>\n"
|
|
"<h1>Not Valid Command</h1>\n"
|
|
"<p>The requested URL is not valid Command.</p>\n"
|
|
"</body>\n"
|
|
"</html>\n";
|
|
|
|
static const char* not_found_response_valid_command_raw =
|
|
"HTTP/1.0 404 Not Valid Command\r\n"
|
|
"Content-type: text/plain\n\n"
|
|
"Not Valid Command\n";
|
|
|
|
static const char* bad_method_response_template =
|
|
"HTTP/1.0 501 Method Not Implemented\r\n"
|
|
"Content-type: text/html\r\n\r\n"
|
|
"<html>\n"
|
|
"<body>\n"
|
|
"<h1>Method Not Implemented</h1>\n"
|
|
"<p>The method is not implemented by this server.</p>\n"
|
|
"</body>\n"
|
|
"</html>\n";
|
|
|
|
static const char* bad_method_response_template_raw =
|
|
"HTTP/1.0 501 Method Not Implemented\r\n"
|
|
"Content-type: text/plain\r\n\r\n"
|
|
"Method Not Implemented\n";
|
|
|
|
static const char *request_auth_response_template=
|
|
"HTTP/1.0 401 Authorization Required\r\n"
|
|
"WWW-Authenticate: Basic realm=\"Motion Security Access\"\r\n";
|
|
|
|
static void send_template_ini_client(int client_socket, const char* template)
|
|
{
|
|
ssize_t nwrite = 0;
|
|
nwrite = write(client_socket, ok_response, strlen (ok_response));
|
|
nwrite += write(client_socket, template, strlen(template));
|
|
if (nwrite != (ssize_t)(strlen(ok_response) + strlen(template)))
|
|
motion_log(LOG_ERR, 1, "httpd send_template_ini_client");
|
|
}
|
|
|
|
static void send_template_ini_client_raw(int client_socket)
|
|
{
|
|
ssize_t nwrite = 0;
|
|
nwrite = write(client_socket, ok_response_raw, strlen (ok_response_raw));
|
|
if (nwrite != (ssize_t)strlen(ok_response_raw))
|
|
motion_log(LOG_ERR, 1, "httpd send_template_ini_client_raw");
|
|
}
|
|
|
|
static void send_template(int client_socket, char *res)
|
|
{
|
|
ssize_t nwrite = 0;
|
|
nwrite = write(client_socket, res, strlen(res));
|
|
if ( nwrite != (ssize_t)strlen(res))
|
|
motion_log(LOG_ERR, 1, "httpd send_template failure write");
|
|
}
|
|
|
|
static void send_template_raw(int client_socket, char *res)
|
|
{
|
|
ssize_t nwrite = 0;
|
|
nwrite = write(client_socket, res, strlen(res));
|
|
}
|
|
|
|
static void send_template_end_client(int client_socket)
|
|
{
|
|
ssize_t nwrite = 0;
|
|
nwrite = write(client_socket, end_template, strlen(end_template));
|
|
}
|
|
|
|
static void response_client(int client_socket, const char* template, char *back)
|
|
{
|
|
ssize_t nwrite = 0;
|
|
nwrite = write(client_socket, template, strlen(template));
|
|
if (back != NULL) {
|
|
send_template(client_socket, back);
|
|
send_template_end_client(client_socket);
|
|
}
|
|
}
|
|
|
|
|
|
static int check_authentication(char *authentication, char *auth_base64, size_t size_auth, const char *conf_auth)
|
|
{
|
|
int ret = 0;
|
|
char *userpass = NULL;
|
|
|
|
authentication = (char *) mymalloc(BASE64_LENGTH(size_auth) + 1);
|
|
userpass = mymalloc(size_auth + 4);
|
|
/* base64_encode can read 3 bytes after the end of the string, initialize it */
|
|
memset(userpass, 0, size_auth + 4);
|
|
strcpy(userpass, conf_auth);
|
|
base64_encode(userpass, authentication, size_auth);
|
|
free(userpass);
|
|
|
|
if (!strcmp(authentication, auth_base64))
|
|
ret=1;
|
|
|
|
return ret;
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
This function decode the values from GET request following the http RFC.
|
|
*/
|
|
|
|
static int url_decode(char *urlencoded, int length)
|
|
{
|
|
char *data=urlencoded;
|
|
char *urldecoded=urlencoded;
|
|
|
|
while (length > 0) {
|
|
if (*data == '%') {
|
|
char c[3];
|
|
int i;
|
|
data++;
|
|
length--;
|
|
c[0] = *data++;
|
|
length--;
|
|
c[1] = *data;
|
|
c[2] = 0;
|
|
warningkill = sscanf(c, "%x", &i);
|
|
if (i < 128)
|
|
*urldecoded++ = (char)i;
|
|
else {
|
|
*urldecoded++ = '%';
|
|
*urldecoded++ = c[0];
|
|
*urldecoded++ = c[1];
|
|
}
|
|
} else if (*data=='+') {
|
|
*urldecoded++=' ';
|
|
|
|
}
|
|
else {
|
|
*urldecoded++=*data;
|
|
}
|
|
data++;
|
|
length--;
|
|
}
|
|
*urldecoded = '\0';
|
|
return 0;
|
|
}
|
|
|
|
|
|
/*
|
|
This function manages/parses the config action for motion ( set , get , write , list ).
|
|
*/
|
|
|
|
static int config(char *pointer, char *res, int length_uri, int thread, int client_socket, void *userdata)
|
|
{
|
|
char question;
|
|
char command[256] = {'\0'};
|
|
int i;
|
|
struct context **cnt = userdata;
|
|
|
|
warningkill = sscanf (pointer, "%256[a-z]%c", command , &question);
|
|
if (!strcmp(command,"list")) {
|
|
pointer = pointer + 4;
|
|
length_uri = length_uri - 4;
|
|
if (length_uri == 0) {
|
|
const char *value = NULL;
|
|
char *retval = NULL;
|
|
/*call list*/
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res, "<a href=/%d/config><- back</a>", thread);
|
|
send_template(client_socket, res);
|
|
|
|
for (i=0; config_params[i].param_name != NULL; i++) {
|
|
value = config_params[i].print(cnt, NULL, i, thread);
|
|
|
|
if (value == NULL) {
|
|
retval=NULL;
|
|
|
|
/* Only get the thread value for main thread */
|
|
if (thread == 0)
|
|
config_params[i].print(cnt, &retval, i, thread);
|
|
|
|
/* thread value*/
|
|
|
|
if (retval) {
|
|
|
|
if (!strcmp(retval,"")) {
|
|
free(retval);
|
|
retval = strdup("No threads");
|
|
} else {
|
|
char *temp=retval;
|
|
size_t retval_miss = 0;
|
|
size_t retval_len = strlen(retval);
|
|
int ind=0;
|
|
char thread_strings[1024]={'\0'};
|
|
|
|
while (retval_miss != retval_len) {
|
|
while (*temp != '\n') {
|
|
thread_strings[ind++] = *temp;
|
|
retval_miss++;
|
|
temp++;
|
|
}
|
|
temp++;
|
|
thread_strings[ind++] = '<';
|
|
thread_strings[ind++] = 'b';
|
|
thread_strings[ind++] = 'r';
|
|
thread_strings[ind++] = '>';
|
|
retval_miss++;
|
|
}
|
|
free(retval);
|
|
retval = NULL;
|
|
retval = strdup(thread_strings);
|
|
}
|
|
|
|
sprintf(res, "<li><a href=/%d/config/set?%s>%s</a> = %s</li>\n", thread,
|
|
config_params[i].param_name, config_params[i].param_name, retval);
|
|
free(retval);
|
|
} else if (thread != 0) {
|
|
/* get the value from main thread for the rest of threads */
|
|
value = config_params[i].print(cnt, NULL, i, 0);
|
|
|
|
sprintf(res,"<li><a href=/%d/config/set?%s>%s</a> = %s</li>\n", thread,
|
|
config_params[i].param_name, config_params[i].param_name,
|
|
value ? value : "(not defined)");
|
|
} else {
|
|
sprintf(res, "<li><a href=/%d/config/set?%s>%s</a> = %s</li>\n", thread,
|
|
config_params[i].param_name, config_params[i].param_name,
|
|
"(not defined)");
|
|
}
|
|
|
|
} else {
|
|
sprintf(res,"<li><a href=/%d/config/set?%s>%s</a> = %s</li>\n",thread,
|
|
config_params[i].param_name, config_params[i].param_name, value);
|
|
}
|
|
send_template(client_socket, res);
|
|
}
|
|
|
|
sprintf(res,"<br><a href=/%d/config><- back</a>",thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
for (i=0; config_params[i].param_name != NULL; i++) {
|
|
value=config_params[i].print(cnt, NULL, i, thread);
|
|
if (value == NULL)
|
|
value=config_params[i].print(cnt, NULL, i, 0);
|
|
sprintf(res,"%s = %s\n", config_params[i].param_name, value);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else if (!strcmp(command,"set")) {
|
|
/* set?param_name=value */
|
|
pointer = pointer + 3;
|
|
length_uri = length_uri - 3;
|
|
if ((length_uri != 0) && (question == '?')) {
|
|
pointer++;
|
|
length_uri--;
|
|
warningkill = sscanf(pointer,"%256[a-z_]%c", command, &question);
|
|
/*check command , question == '=' length_uri too*/
|
|
if ((question == '=') && (command[0]!='\0')) {
|
|
length_uri = length_uri - strlen(command) - 1;
|
|
pointer = pointer + strlen(command) + 1;
|
|
/* check if command exists and type of command and not end of URI */
|
|
i=0;
|
|
while (config_params[i].param_name != NULL) {
|
|
if (!strcasecmp(command, config_params[i].param_name))
|
|
break;
|
|
i++;
|
|
}
|
|
|
|
if (config_params[i].param_name) {
|
|
if (length_uri > 0) {
|
|
char Value[1024]={'\0'};
|
|
warningkill = sscanf(pointer,"%1024s", Value);
|
|
length_uri = length_uri - strlen(Value);
|
|
if ( (length_uri == 0) && (strlen(Value) > 0) ) {
|
|
/* FIXME need to asure that is a valid value */
|
|
url_decode(Value,strlen(Value));
|
|
conf_cmdparse(cnt + thread, config_params[i].param_name, Value);
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res,
|
|
"<li><a href=/%d/config/set?%s>%s</a> = %s</li> <b>Done</b><br>\n"
|
|
"<a href=/%d/config/list><- back</a>\n",
|
|
thread, config_params[i].param_name,
|
|
config_params[i].param_name, Value, thread);
|
|
|
|
send_template_ini_client(client_socket, ini_template);
|
|
send_template(client_socket,res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res, "%s = %s\nDone\n", config_params[i].param_name, Value);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_valid_syntax, NULL);
|
|
else
|
|
response_client(client_socket, not_valid_syntax_raw, NULL);
|
|
}
|
|
} else {
|
|
char *type = NULL;
|
|
type = strdup(config_type(&config_params[i]));
|
|
|
|
if (!strcmp(type,"string")) {
|
|
char *value = NULL;
|
|
conf_cmdparse(cnt+thread, config_params[i].param_name, value);
|
|
free(type);
|
|
type = strdup("(null)");
|
|
} else if (!strcmp(type,"int")) {
|
|
free(type);
|
|
type = strdup("0");
|
|
conf_cmdparse(cnt+thread, config_params[i].param_name, type);
|
|
} else if (!strcmp(type,"bool")) {
|
|
free(type);
|
|
type = strdup("off");
|
|
conf_cmdparse(cnt+thread, config_params[i].param_name, type);
|
|
} else {
|
|
free(type);
|
|
type = strdup("unknown");
|
|
}
|
|
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res,
|
|
"<li><a href=/%d/config/set?%s>%s</a> = %s</li> <b>Done</b><br>\n"
|
|
"<a href=/%d/config/list><- back</a>",
|
|
thread, config_params[i].param_name,
|
|
config_params[i].param_name, type, thread);
|
|
|
|
send_template_ini_client(client_socket, ini_template);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res, "%s = %s\nDone\n", config_params[i].param_name,type);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
free(type);
|
|
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else {
|
|
/* Show param_name dialogue only for html output */
|
|
if ( (cnt[0]->conf.control_html_output) && (command[0]!='\0') &&
|
|
(((length_uri = length_uri - strlen(command)) == 0 )) ) {
|
|
i=0;
|
|
while (config_params[i].param_name != NULL) {
|
|
if (!strcasecmp(command, config_params[i].param_name))
|
|
break;
|
|
i++;
|
|
}
|
|
/* param_name exists */
|
|
if (config_params[i].param_name) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
if (!strcmp ("bool",config_type(&config_params[i])) )
|
|
sprintf(res, "<b>Thread %d </b>\n"
|
|
"<form action=set?>\n"
|
|
"<b>%s</b> <select name='%s'>\n"
|
|
"<option value='on'>on</option>\n"
|
|
"<option value='off'>off</option></select>\n"
|
|
"<input type='submit' value='set'>\n"
|
|
"</form>\n"
|
|
"<a href=/%d/config/list><- back</a>\n", thread,
|
|
config_params[i].param_name, config_params[i].param_name, thread);
|
|
else
|
|
sprintf(res, "<b>Thread %d </b>\n"
|
|
"<form action=set?>\n"
|
|
"<b>%s</b> <input type=text name='%s' value=''>\n"
|
|
"<input type='submit' value='set'>\n"
|
|
"</form>\n"
|
|
"<a href=/%d/config/list><- back</a>\n", thread,
|
|
config_params[i].param_name, config_params[i].param_name, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
}
|
|
} else if (length_uri == 0) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, set_template);
|
|
sprintf(res, "<b>Thread %d </b>\n<form name='n'>\n<select name='onames'>\n", thread);
|
|
send_template(client_socket, res);
|
|
for (i=0; config_params[i].param_name != NULL; i++) {
|
|
sprintf(res, "<option value='%s'>%s</option>\n",
|
|
config_params[i].param_name, config_params[i].param_name);
|
|
send_template(client_socket, res);
|
|
}
|
|
sprintf(res, "</select>\n</form>\n"
|
|
"<form action=set name='s'"
|
|
"ONSUBMIT='if (!this.submitted) return false; else return true;'>\n"
|
|
"<input type=text name='valor' value=''>\n"
|
|
"<input type='button' value='set' onclick='javascript:show()'>\n"
|
|
"</form>\n"
|
|
"<a href=/%d/config><- back</a>\n", thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"set needs param_name=value\n");
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else if (!strcmp(command,"get")) {
|
|
/* get?query=param_name */
|
|
pointer = pointer + 3;
|
|
length_uri = length_uri - 3;
|
|
|
|
if ((length_uri > 7) && (question == '?')) {
|
|
/* 8 -> query=param_name FIXME minimun length param_name */
|
|
pointer++;
|
|
length_uri--;
|
|
warningkill = sscanf(pointer,"%256[a-z]%c", command, &question);
|
|
|
|
if ( (question == '=') && (!strcmp(command,"query")) ) {
|
|
pointer = pointer + 6;
|
|
length_uri = length_uri - 6;
|
|
warningkill = sscanf(pointer, "%256[a-z_]", command);
|
|
/*check if command exist, length_uri too*/
|
|
length_uri = length_uri-strlen(command);
|
|
|
|
if (length_uri == 0) {
|
|
const char *value = NULL;
|
|
i = 0;
|
|
while (config_params[i].param_name != NULL) {
|
|
if (!strcasecmp(command, config_params[i].param_name))
|
|
break;
|
|
i++;
|
|
}
|
|
/* FIXME bool values or commented values maybe that should be
|
|
solved with config_type */
|
|
|
|
if (config_params[i].param_name) {
|
|
const char *type=NULL;
|
|
type = config_type(&config_params[i]);
|
|
if (!strcmp(type,"unknown")) {
|
|
/*error doesn't exists this param_name */
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
return 1;
|
|
} else {
|
|
value = config_params[i].print(cnt, NULL, i, thread);
|
|
if (value == NULL)
|
|
value=config_params[i].print(cnt, NULL, i, 0);
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket,ini_template);
|
|
sprintf(res,"<li>%s = %s</li><br>\n"
|
|
"<a href=/%d/config/get><- back</a>\n",
|
|
config_params[i].param_name,value, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"%s = %s\nDone\n", config_params[i].param_name,value);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
}
|
|
} else if (length_uri == 0) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"<b>Thread %d </b><br>\n"
|
|
"<form action=get>\n"
|
|
"<select name='query'>\n", thread);
|
|
send_template(client_socket, res);
|
|
for (i=0; config_params[i].param_name != NULL; i++) {
|
|
sprintf(res,"<option value='%s'>%s</option>\n",
|
|
config_params[i].param_name, config_params[i].param_name);
|
|
send_template(client_socket, res);
|
|
}
|
|
sprintf(res,"</select>\n"
|
|
"<input type='submit' value='get'>\n"
|
|
"</form>\n"
|
|
"<a href=/%d/config><- back</a>\n", thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"get needs param_name\n");
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_valid_syntax, NULL);
|
|
else
|
|
response_client(client_socket, not_valid_syntax_raw, NULL);
|
|
}
|
|
} else if (!strcmp(command,"write")) {
|
|
pointer = pointer + 5;
|
|
length_uri = length_uri - 5;
|
|
if (length_uri == 0) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"Are you sure? <a href=/%d/config/writeyes>Yes</a><br>\n"
|
|
"<a href=/%d/config>No</a>\n", thread, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
conf_print(cnt);
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"Thread %d write\nDone\n", thread);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
|
|
} else if (!strcmp(command, "writeyes")) {
|
|
pointer = pointer + 8;
|
|
length_uri = length_uri - 8;
|
|
if (length_uri==0) {
|
|
conf_print(cnt);
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"<b>Thread %d</b> write done !<br>\n"
|
|
"<a href=/%d/config><- back</a>\n", thread, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"Thread %d write\nDone\n", thread);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output) {
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
}
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
/*
|
|
This function manages/parses the actions for motion ( makemovie , snapshot , restart , quit ).
|
|
*/
|
|
|
|
static int action(char *pointer, char *res, int length_uri, int thread, int client_socket, void *userdata)
|
|
{
|
|
/* parse action commands */
|
|
char command[256] = {'\0'};
|
|
struct context **cnt = userdata;
|
|
|
|
warningkill = sscanf (pointer, "%256[a-z]" , command);
|
|
if (!strcmp(command,"makemovie")) {
|
|
pointer = pointer + 9;
|
|
length_uri = length_uri - 9;
|
|
if (length_uri == 0) {
|
|
/*call makemovie*/
|
|
|
|
if (thread == 0) {
|
|
int i = 0;
|
|
while (cnt[++i])
|
|
cnt[i]->makemovie=1;
|
|
} else {
|
|
cnt[thread]->makemovie=1;
|
|
}
|
|
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"makemovie for thread %d done<br>\n"
|
|
"<a href=/%d/action><- back</a>\n", thread, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"makemovie for thread %d\nDone\n", thread);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket,not_found_response_valid_command,NULL);
|
|
else
|
|
response_client(client_socket,not_found_response_valid_command_raw,NULL);
|
|
}
|
|
} else if (!strcmp(command,"snapshot")) {
|
|
pointer = pointer + 8;
|
|
length_uri = length_uri - 8;
|
|
if (length_uri == 0) {
|
|
/*call snapshot*/
|
|
|
|
if (thread == 0) {
|
|
int i = 0;
|
|
while (cnt[++i])
|
|
cnt[i]->snapshot=1;
|
|
} else {
|
|
cnt[thread]->snapshot=1;
|
|
}
|
|
|
|
cnt[thread]->snapshot = 1;
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"snapshot for thread %d done<br>\n"
|
|
"<a href=/%d/action><- back</a>\n", thread, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"snapshot for thread %d\nDone\n", thread);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else if (!strcmp(command, "restart")) {
|
|
pointer = pointer + 7;
|
|
length_uri = length_uri - 7;
|
|
if (length_uri == 0) {
|
|
int i = 0;
|
|
do {
|
|
motion_log(LOG_DEBUG, 0, "httpd restart");
|
|
kill(getpid(),1);
|
|
} while (cnt[++i]);
|
|
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"restart in progress ... bye<br>\n<a href='/'>Home</a>");
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"restart in progress ...\nDone\n");
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
return 0; // to restart
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket,not_found_response_valid_command,NULL);
|
|
else
|
|
response_client(client_socket,not_found_response_valid_command_raw,NULL);
|
|
}
|
|
} else if (!strcmp(command,"quit")) {
|
|
pointer = pointer + 4;
|
|
length_uri = length_uri - 4;
|
|
if (length_uri == 0) {
|
|
int i = 0;
|
|
/*call quit*/
|
|
do {
|
|
motion_log(LOG_DEBUG, 0, "httpd quitting");
|
|
cnt[i]->makemovie = 1;
|
|
cnt[i]->finish = 1;
|
|
} while (cnt[++i]);
|
|
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"quit in progress ... bye");
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"quit in progress ... bye\nDone\n");
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
return 0; // to quit
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
/*
|
|
This function manages/parses the detection actions for motion ( status , start , pause ).
|
|
*/
|
|
|
|
static int detection(char *pointer, char *res, int length_uri, int thread, int client_socket, void *userdata)
|
|
{
|
|
char command[256]={'\0'};
|
|
struct context **cnt=userdata;
|
|
|
|
warningkill = sscanf (pointer, "%256[a-z]" , command);
|
|
if (!strcmp(command,"status")) {
|
|
pointer = pointer + 6;
|
|
length_uri = length_uri - 6;
|
|
if (length_uri == 0) {
|
|
/*call status*/
|
|
if (cnt[thread]->pause)
|
|
sprintf(res, "Thread %d Detection status PAUSE\n", thread);
|
|
else
|
|
sprintf(res, "Thread %d Detection status ACTIVE\n", thread);
|
|
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
send_template(client_socket, res);
|
|
sprintf(res, "<br><a href=/%d/detection><- back</a>\n", thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else if (!strcmp(command, "start")) {
|
|
pointer = pointer + 5;
|
|
length_uri = length_uri - 5;
|
|
if (length_uri == 0) {
|
|
/*call start*/
|
|
cnt[thread]->pause = 0;
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket,ini_template);
|
|
sprintf(res,"Thread %i Detection resumed<br>\n"
|
|
"<a href=/%d/detection><- back</a>\n", thread, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"Thread %i Detection resumed\nDone\n", thread);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else if (!strcmp(command,"pause")){
|
|
pointer = pointer + 5;
|
|
length_uri = length_uri - 5;
|
|
if (length_uri==0) {
|
|
/*call pause*/
|
|
cnt[thread]->pause=1;
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"Thread %i Detection paused<br>\n"
|
|
"<a href=/%d/detection><- back</a>\n",thread,thread);
|
|
send_template(client_socket,res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"Thread %i Detection paused\nDone\n", thread);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error*/
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
/*
|
|
This function manages/parses the track action for motion ( set , pan , tilt , auto ).
|
|
*/
|
|
|
|
static int track(char *pointer, char *res, int length_uri, int thread, int client_socket, void *userdata)
|
|
{
|
|
char question;
|
|
char command[256] = {'\0'};
|
|
struct context **cnt = userdata;
|
|
|
|
warningkill = sscanf(pointer, "%256[a-z]%c", command, &question);
|
|
if (!strcmp(command, "set")) {
|
|
pointer=pointer+3;length_uri=length_uri-3;
|
|
/* FIXME need to check each value */
|
|
/* Relative movement set?pan=0&tilt=0 | set?pan=0 | set?tilt=0*/
|
|
/* Absolute movement set?x=0&y=0 | set?x=0 | set?y=0 */
|
|
|
|
if ((question == '?') && (length_uri > 2)) {
|
|
char panvalue[12] = {'\0'}, tiltvalue[12] = {'\0'};
|
|
char x_value[12] = {'\0'}, y_value[12] = {'\0'};
|
|
struct context *setcnt;
|
|
int pan = 0, tilt = 0, X = 0 , Y = 0;
|
|
|
|
pointer++;
|
|
length_uri--;
|
|
/* set?pan=value&tilt=value */
|
|
/* set?x=value&y=value */
|
|
/* pan= or x= | tilt= or y= */
|
|
|
|
warningkill = sscanf (pointer, "%256[a-z]%c" , command, &question);
|
|
|
|
if (( question != '=' ) || (command[0] == '\0')) {
|
|
/* no valid syntax */
|
|
motion_log(LOG_WARNING, 0, "httpd debug race 1");
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_valid_syntax, NULL);
|
|
else
|
|
response_client(client_socket, not_valid_syntax_raw, NULL);
|
|
return 1;
|
|
}
|
|
|
|
pointer++;
|
|
length_uri--;
|
|
|
|
/* Check first parameter */
|
|
|
|
if (!strcmp(command, "pan")) {
|
|
pointer = pointer + 3;
|
|
length_uri = length_uri - 3;
|
|
pan = 1;
|
|
if ((warningkill = sscanf(pointer, "%10[-0-9]", panvalue))){
|
|
pointer = pointer + strlen(panvalue);
|
|
length_uri = length_uri - strlen(panvalue);
|
|
}
|
|
}
|
|
else if (!strcmp(command, "tilt")) {
|
|
pointer = pointer + 4;
|
|
length_uri = length_uri - 4;
|
|
tilt = 1;
|
|
if ((warningkill = sscanf(pointer, "%10[-0-9]", tiltvalue))){
|
|
pointer = pointer + strlen(tiltvalue);
|
|
length_uri = length_uri - strlen(tiltvalue);
|
|
}
|
|
}
|
|
else if (!strcmp(command, "x")) {
|
|
pointer++;
|
|
length_uri--;
|
|
X = 1;
|
|
if ((warningkill = sscanf(pointer, "%10[-0-9]", x_value))){
|
|
pointer = pointer + strlen(x_value);
|
|
length_uri = length_uri - strlen(x_value);
|
|
}
|
|
}
|
|
else if (!strcmp(command, "y")) {
|
|
pointer++;
|
|
length_uri--;
|
|
Y = 1;
|
|
if ((warningkill = sscanf (pointer, "%10[-0-9]" , y_value))){
|
|
pointer = pointer + strlen(y_value);
|
|
length_uri = length_uri - strlen(y_value);
|
|
}
|
|
} else {
|
|
/* no valid syntax */
|
|
motion_log(LOG_WARNING, 0, "httpd debug race 2");
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_valid_syntax, NULL);
|
|
else
|
|
response_client(client_socket, not_valid_syntax_raw, NULL);
|
|
return 1;
|
|
}
|
|
|
|
|
|
/* first value check for error */
|
|
|
|
|
|
if ( !warningkill ) {
|
|
motion_log(LOG_WARNING, 0, "httpd debug race 3");
|
|
/* error value */
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, error_value, NULL);
|
|
else
|
|
response_client(client_socket, error_value_raw, NULL);
|
|
return 1;
|
|
}
|
|
|
|
|
|
|
|
/* Only one parameter (pan= ,tilt= ,x= ,y= ) */
|
|
if (length_uri == 0) {
|
|
if (pan) {
|
|
struct coord cent;
|
|
struct context *pancnt;
|
|
|
|
/* move pan */
|
|
|
|
pancnt = cnt[thread];
|
|
cent.width = pancnt->imgs.width;
|
|
cent.height = pancnt->imgs.height;
|
|
cent.y = 0;
|
|
cent.x = atoi(panvalue);
|
|
// Add the number of frame to skip for motion detection
|
|
cnt[thread]->moved = track_move(pancnt, pancnt->video_dev, ¢, &pancnt->imgs, 1);
|
|
if (cnt[thread]->moved) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"track set relative pan=%s<br>\n"
|
|
"<a href=/%d/track><- back</a>\n", panvalue, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"track set relative pan=%s\nDone\n", panvalue);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error in track action*/
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res, "<a href=/%d/track><- back</a>\n", thread);
|
|
response_client(client_socket, track_error, res);
|
|
}
|
|
else
|
|
response_client(client_socket, track_error_raw, NULL);
|
|
}
|
|
} else if (tilt) {
|
|
struct coord cent;
|
|
struct context *tiltcnt;
|
|
|
|
/* move tilt */
|
|
|
|
tiltcnt = cnt[thread];
|
|
cent.width = tiltcnt->imgs.width;
|
|
cent.height = tiltcnt->imgs.height;
|
|
cent.x = 0;
|
|
cent.y = atoi(tiltvalue);
|
|
// Add the number of frame to skip for motion detection
|
|
cnt[thread]->moved=track_move(tiltcnt, tiltcnt->video_dev, ¢, &tiltcnt->imgs, 1);
|
|
if (cnt[thread]->moved){
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"track set relative tilt=%s<br>\n"
|
|
"<a href=/%d/track><- back</a>\n", tiltvalue, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"track set relative tilt=%s\nDone\n",tiltvalue);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error in track action*/
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res,"<a href=/%d/track><- back</a>\n", thread);
|
|
response_client(client_socket, track_error, res);
|
|
}
|
|
else
|
|
response_client(client_socket, track_error_raw, NULL);
|
|
}
|
|
} else if (X){
|
|
/* X */
|
|
setcnt = cnt[thread];
|
|
// 1000 is out of range for pwc
|
|
cnt[thread]->moved = track_center(setcnt, setcnt->video_dev, 1, atoi(x_value), 1000);
|
|
if (cnt[thread]->moved) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"track set absolute x=%s<br>\n"
|
|
"<a href=/%d/track><- back</a>\n", x_value, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"track set absolute x=%s\nDone\n", x_value);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error in track action*/
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res,"<a href=/%d/track><- back</a>\n", thread);
|
|
response_client(client_socket, track_error, res);
|
|
}
|
|
else
|
|
response_client(client_socket, track_error_raw, NULL);
|
|
}
|
|
|
|
} else {
|
|
/* Y */
|
|
setcnt = cnt[thread];
|
|
// 1000 is out of range for pwc
|
|
cnt[thread]->moved = track_center(setcnt, setcnt->video_dev, 1, 1000, atoi(y_value));
|
|
if (cnt[thread]->moved) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"track set absolute y=%s<br>\n"
|
|
"<a href=/%d/track><- back</a>\n", y_value, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"track set absolute y=%s\nDone\n", y_value);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error in track action*/
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res,"<a href=/%d/track><- back</a>", thread);
|
|
response_client(client_socket, track_error, res);
|
|
}
|
|
else
|
|
response_client(client_socket, track_error_raw, NULL);
|
|
}
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
|
|
/* Check Second parameter */
|
|
|
|
warningkill = sscanf (pointer, "%c%256[a-z]" ,&question, command);
|
|
if ( ( question != '&' ) || (command[0] == '\0') ){
|
|
motion_log(LOG_WARNING, 0, "httpd debug race 4");
|
|
if ( strstr(pointer,"&")){
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, error_value, NULL);
|
|
else
|
|
response_client(client_socket, error_value_raw, NULL);
|
|
}
|
|
/* no valid syntax */
|
|
else{
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_valid_syntax, NULL);
|
|
else
|
|
response_client(client_socket, not_valid_syntax_raw, NULL);
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
pointer++;
|
|
length_uri--;
|
|
|
|
if (!strcmp(command, "pan")){
|
|
pointer = pointer + 3;
|
|
length_uri = length_uri - 3;
|
|
if ( (pan) || (!tilt) || (X) || (Y) ) {
|
|
motion_log(LOG_WARNING, 0, "httpd debug race 5");
|
|
/* no valid syntax */
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_valid_syntax, NULL);
|
|
else
|
|
response_client(client_socket, not_valid_syntax_raw, NULL);
|
|
return 1;
|
|
}
|
|
pan=2;
|
|
warningkill = sscanf (pointer, "%c%10[-0-9]" ,&question, panvalue);
|
|
}
|
|
else if (!strcmp(command, "tilt")) {
|
|
pointer = pointer + 4;
|
|
length_uri = length_uri - 4;
|
|
if ( (tilt) || (!pan) || (X) || (Y) ) {
|
|
/* no valid syntax */
|
|
motion_log(LOG_WARNING, 0, "httpd debug race 6");
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_valid_syntax, NULL);
|
|
else
|
|
response_client(client_socket, not_valid_syntax_raw, NULL);
|
|
return 1;
|
|
}
|
|
tilt = 2;
|
|
warningkill = sscanf (pointer, "%c%10[-0-9]" ,&question, tiltvalue);
|
|
}
|
|
else if (!strcmp(command, "x")) {
|
|
pointer++;
|
|
length_uri--;
|
|
if ( (X) || (!Y) || (pan) || (tilt) ) {
|
|
motion_log(LOG_WARNING, 0, "httpd debug race 7");
|
|
|
|
/* no valid syntax */
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_valid_syntax, NULL);
|
|
else
|
|
response_client(client_socket, not_valid_syntax_raw, NULL);
|
|
return 1;
|
|
}
|
|
X = 2;
|
|
warningkill = sscanf (pointer, "%c%10[-0-9]" ,&question, x_value);
|
|
}
|
|
else if (!strcmp(command, "y")) {
|
|
pointer++;
|
|
length_uri--;
|
|
if ( (Y) || (!X) || (pan) || (tilt) ){
|
|
motion_log(LOG_WARNING, 0, "httpd debug race 8");
|
|
/* no valid syntax */
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_valid_syntax, NULL);
|
|
else
|
|
response_client(client_socket, not_valid_syntax_raw, NULL);
|
|
return 1;
|
|
}
|
|
Y = 2;
|
|
warningkill = sscanf (pointer, "%c%10[-0-9]" ,&question, y_value);
|
|
} else {
|
|
motion_log(LOG_WARNING, 0, "httpd debug race 9");
|
|
/* no valid syntax */
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_valid_syntax, NULL);
|
|
else
|
|
response_client(client_socket, not_valid_syntax_raw, NULL);
|
|
return 1;
|
|
}
|
|
|
|
/* Second value check */
|
|
|
|
if ( ( warningkill < 2 ) && (question != '=') ) {
|
|
motion_log(LOG_WARNING, 0, "httpd debug race 10");
|
|
/* no valid syntax */
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_valid_syntax, NULL);
|
|
else
|
|
response_client(client_socket, not_valid_syntax_raw, NULL);
|
|
return 1;
|
|
}else if (( question == '=') && ( warningkill == 1)){
|
|
motion_log(LOG_WARNING, 0, "httpd debug race 11");
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, error_value, NULL);
|
|
else
|
|
response_client(client_socket, error_value_raw, NULL);
|
|
return 1;
|
|
}
|
|
|
|
|
|
if (pan == 2){
|
|
pointer = pointer + strlen(panvalue) + 1;
|
|
length_uri = length_uri - strlen(panvalue) - 1;
|
|
}
|
|
else if (tilt == 2){
|
|
pointer = pointer + strlen(tiltvalue) + 1;
|
|
length_uri = length_uri - strlen(tiltvalue) - 1;
|
|
}
|
|
else if (X == 2){
|
|
pointer = pointer + strlen(x_value) + 1;
|
|
length_uri = length_uri - strlen(x_value) - 1;
|
|
}
|
|
else{
|
|
pointer = pointer + strlen(y_value) + 1;
|
|
length_uri = length_uri - strlen(y_value) - 1;
|
|
}
|
|
|
|
|
|
|
|
if (length_uri != 0) {
|
|
motion_log(LOG_WARNING, 0, "httpd debug race 12");
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, error_value, NULL);
|
|
else
|
|
response_client(client_socket, error_value_raw, NULL);
|
|
return 1;
|
|
}
|
|
|
|
|
|
/* track set absolute ( x , y )*/
|
|
|
|
if ( X && Y ) {
|
|
setcnt = cnt[thread];
|
|
cnt[thread]->moved = track_center(setcnt, setcnt->video_dev, 1, atoi(x_value), atoi(y_value));
|
|
if (cnt[thread]->moved) {
|
|
if (cnt[0]->conf.control_html_output){
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"track set x=%s y=%s<br>\n"
|
|
"<a href=/%d/track><- back</a>\n", x_value, y_value, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"track set x=%s y=%s\nDone\n", x_value, y_value);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/*error in track action*/
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res,"<a href=/%d/track><- back</a>\n", thread);
|
|
response_client(client_socket, track_error, res);
|
|
}
|
|
else
|
|
response_client(client_socket, track_error_raw, NULL);
|
|
}
|
|
/* track set relative ( pan , tilt )*/
|
|
} else {
|
|
struct coord cent;
|
|
struct context *relativecnt;
|
|
|
|
/* move pan */
|
|
|
|
relativecnt = cnt[thread];
|
|
cent.width = relativecnt->imgs.width;
|
|
cent.height = relativecnt->imgs.height;
|
|
cent.y = 0;
|
|
cent.x = atoi(panvalue);
|
|
// Add the number of frame to skip for motion detection
|
|
cnt[thread]->moved = track_move(relativecnt, relativecnt->video_dev, ¢, &relativecnt->imgs, 1);
|
|
if (cnt[thread]->moved){
|
|
/* move tilt */
|
|
relativecnt = cnt[thread];
|
|
cent.width = relativecnt->imgs.width;
|
|
cent.height = relativecnt->imgs.height;
|
|
cent.x = 0;
|
|
cent.y = atoi(tiltvalue);
|
|
SLEEP(1,0);
|
|
cnt[thread]->moved = track_move(relativecnt, relativecnt->video_dev, ¢, &relativecnt->imgs, 1);
|
|
if (cnt[thread]->moved){
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"track pan=%s tilt=%s<br>\n"
|
|
"<a href=/%d/track><- back</a>\n", panvalue, tiltvalue, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"track pan=%s tilt=%s\nDone\n", panvalue, tiltvalue);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
return 1;
|
|
}
|
|
else{
|
|
/*error in track tilt*/
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res,"<a href=/%d/track><- back</a>\n", thread);
|
|
response_client(client_socket, track_error, res);
|
|
}else response_client(client_socket, track_error_raw, NULL);
|
|
}
|
|
}
|
|
|
|
/*error in track pan*/
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res,"<a href=/%d/track><- back</a>\n", thread);
|
|
response_client(client_socket, track_error, res);
|
|
} else
|
|
response_client(client_socket, track_error_raw, NULL);
|
|
}
|
|
} else if (length_uri == 0) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"<b>Thread %d</b><br>\n"
|
|
"<form action='set'>\n"
|
|
"Pan<input type=text name='pan' value=''>\n"
|
|
"Tilt<input type=text name='tilt' value=''>\n"
|
|
"<input type=submit value='set relative'>\n"
|
|
"</form>\n"
|
|
"<form action='set'>\n"
|
|
"X<input type=text name='x' value=''>\n"
|
|
"Y<input type=text name='y' value=''>\n"
|
|
"<input type=submit value='set absolute'>\n"
|
|
"</form>\n"
|
|
"<a href=/%d/track><- back</a>\n", thread, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"set needs a pan/tilt or x/y values\n");
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/* error not valid command */
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else if (!strcmp(command,"status")) {
|
|
pointer = pointer+6;
|
|
length_uri = length_uri-6;
|
|
if (length_uri==0) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
if (cnt[thread]->track.active)
|
|
sprintf(res,"<b>Thread %d</b><br>track auto enabled<br>\n",thread);
|
|
else
|
|
sprintf(res,"<b>Thread %d</b><br>track auto disabled<br>\n",thread);
|
|
send_template_ini_client(client_socket, ini_template);
|
|
send_template(client_socket, res);
|
|
sprintf(res, "<a href=/%d/track><- back</a>\n",thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
if (cnt[thread]->track.active)
|
|
sprintf(res,"Thread %d\n track auto enabled\nDone\n",thread);
|
|
else
|
|
sprintf(res,"Thread %d\n track auto disabled\nDone\n",thread);
|
|
send_template_ini_client_raw(client_socket);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
/* error not valid command */
|
|
if (cnt[0]->conf.control_html_output) {
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
}
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else if (!strcmp(command,"auto")) {
|
|
pointer = pointer + 4;
|
|
length_uri = length_uri - 4;
|
|
if ((question == '?') && (length_uri > 0)) {
|
|
char query[256] = {'\0'};
|
|
pointer++;
|
|
length_uri--;
|
|
/* value= */
|
|
|
|
warningkill = sscanf (pointer, "%256[a-z]%c",query,&question);
|
|
if ((question == '=') && (!strcmp(query,"value")) ) {
|
|
pointer = pointer + 6;
|
|
length_uri = length_uri - 6;
|
|
warningkill = sscanf (pointer, "%256[-0-9a-z]" , command);
|
|
if ((command!=NULL) && (strlen(command) > 0)) {
|
|
struct context *autocnt;
|
|
|
|
/* auto value=0|1|status*/
|
|
|
|
if (!strcmp(command,"status")) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
if (cnt[thread]->track.active)
|
|
sprintf(res, "<b>Thread %d</b><br>track auto enabled\n", thread);
|
|
else
|
|
sprintf(res, "<b>Thread %d</b><br>track auto disabled\n", thread);
|
|
send_template_ini_client(client_socket, ini_template);
|
|
send_template(client_socket, res);
|
|
sprintf(res,"<a href=/%d/track><- back</a>", thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
if (cnt[thread]->track.active)
|
|
sprintf(res, "Thread %d\n track auto enabled\nDone\n", thread);
|
|
else
|
|
sprintf(res, "Thread %d\n track auto disabled\nDone\n", thread);
|
|
send_template_ini_client_raw(client_socket);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
int active;
|
|
active = atoi(command);
|
|
if (active > -1 && active < 2) {
|
|
autocnt = cnt[thread];
|
|
autocnt->track.active = atoi(command);
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"track auto %s<br><a href=/%d/track><- back</a>",
|
|
command,thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"track auto %s\nDone\n",command);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
}
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
}
|
|
else if (length_uri == 0) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"<b>Thread %d</b>\n"
|
|
"<form action='auto'><select name='value'>\n"
|
|
"<option value='0'>Disable</option><option value='1'>Enable</option>\n"
|
|
"<option value='status'>status</option>\n"
|
|
"</select><input type=submit value='set'>\n"
|
|
"</form>\n"
|
|
"<a href=/%d/track><- back</a>\n", thread, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"auto needs a value 0,1 or status\n");
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
parses the action requested for motion ( config , action , detection , track ) and call
|
|
to action function if needed.
|
|
*/
|
|
|
|
static int handle_get(int client_socket, const char* url, void *userdata)
|
|
{
|
|
struct context **cnt=userdata;
|
|
if (*url == '/' ){
|
|
int i=0;
|
|
char *res=NULL;
|
|
res = malloc(2048);
|
|
|
|
/* get the number of threads */
|
|
while (cnt[++i]);
|
|
/* ROOT_URI -> GET / */
|
|
if (! (strcmp (url, "/")) ) {
|
|
int y=0;
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket,ini_template);
|
|
sprintf(res,"<b>Motion "VERSION" Running [%d] Threads</b><br>\n"
|
|
"<a href='/0/'>All</a><br>\n", i);
|
|
send_template(client_socket, res);
|
|
for (y=1; y<i; y++) {
|
|
sprintf(res,"<a href='/%d/'>Thread %d</a><br>\n", y, y);
|
|
send_template(client_socket, res);
|
|
}
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"Motion "VERSION" Running [%d] Threads\n0\n",i);
|
|
send_template_raw(client_socket, res);
|
|
for (y=1; y<i; y++) {
|
|
sprintf(res, "%d\n", y);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
}
|
|
}
|
|
else {
|
|
char command[256] = {'\0'};
|
|
char slash;
|
|
int thread = -1;
|
|
int length_uri = 0;
|
|
char *pointer = (char *)url;
|
|
|
|
length_uri = strlen(url);
|
|
/* Check for Thread number first -> GET /2 */
|
|
pointer++;
|
|
length_uri--;
|
|
warningkill = sscanf (pointer, "%i%c", &thread, &slash);
|
|
|
|
if ((thread != -1) && (thread < i)) {
|
|
/* thread_number found */
|
|
if (slash == '/') { /* slash found /2/ */
|
|
pointer = pointer + 2;
|
|
length_uri = length_uri - 2;
|
|
} else {
|
|
pointer++; /* /2 found */
|
|
length_uri--;
|
|
}
|
|
|
|
if (length_uri!=0) {
|
|
warningkill = sscanf (pointer, "%256[a-z]%c" , command , &slash);
|
|
|
|
/* config */
|
|
if (!strcmp(command,"config")) {
|
|
pointer = pointer + 6;
|
|
length_uri = length_uri - 6;
|
|
if (length_uri == 0) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"<b>Thread %d</b><br>\n"
|
|
"<a href=/%d/config/list>list</a><br>\n"
|
|
"<a href=/%d/config/write>write</a><br>\n"
|
|
"<a href=/%d/config/set>set</a><br>\n"
|
|
"<a href=/%d/config/get>get</a><br>\n"
|
|
"<a href=/%d/><- back</a>\n",
|
|
thread, thread, thread, thread, thread, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"Thread %d\nlist\nwrite\nset\nget\n", thread);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else if ((slash == '/') && (length_uri >= 4)) {
|
|
/*call config() */
|
|
pointer++;
|
|
length_uri--;
|
|
config(pointer, res, length_uri, thread, client_socket, cnt);
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
}
|
|
/* action */
|
|
else if (!strcmp(command,"action")) {
|
|
pointer = pointer + 6;
|
|
length_uri = length_uri - 6;
|
|
/* call action() */
|
|
if (length_uri == 0) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"<b>Thread %d</b><br>\n"
|
|
"<a href=/%d/action/makemovie>makemovie</a><br>\n"
|
|
"<a href=/%d/action/snapshot>snapshot</a><br>\n"
|
|
"<a href=/%d/action/restart>restart</a><br>\n"
|
|
"<a href=/%d/action/quit>quit</a><br>\n"
|
|
"<a href=/%d/><- back</a>\n",
|
|
thread,thread,thread,thread,thread,thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"Thread %d\nmakemovie\nsnapshot\nrestart\nquit\n", thread);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else if ((slash == '/') && (length_uri > 4)) {
|
|
int ret = 1;
|
|
pointer++;
|
|
length_uri--;
|
|
ret = action(pointer, res, length_uri, thread, client_socket, cnt);
|
|
free(res);
|
|
return ret;
|
|
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command,NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw,NULL);
|
|
}
|
|
}
|
|
/* detection */
|
|
else if (!strcmp(command,"detection")) {
|
|
pointer = pointer + 9;
|
|
length_uri = length_uri - 9;
|
|
if (length_uri == 0) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"<b>Thread %d</b><br>\n"
|
|
"<a href=/%d/detection/status>status</a><br>\n"
|
|
"<a href=/%d/detection/start>start</a><br>\n"
|
|
"<a href=/%d/detection/pause>pause</a><br>\n"
|
|
"<a href=/%d/><- back</a>\n",
|
|
thread, thread, thread, thread, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"Thread %d\nstatus\nstart\npause\n", thread);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
} else if ((slash == '/') && (length_uri > 5)) {
|
|
pointer++;
|
|
length_uri--;
|
|
/* call detection() */
|
|
detection(pointer, res, length_uri, thread, client_socket, cnt);
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_valid_command, NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
}
|
|
/* track */
|
|
else if (!strcmp(command,"track")) {
|
|
pointer = pointer + 5;
|
|
length_uri = length_uri - 5;
|
|
if (length_uri == 0) {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket, ini_template);
|
|
sprintf(res,"<b>Thread %d</b><br>\n"
|
|
"<a href=/%d/track/set>track set pan/tilt</a><br>\n"
|
|
"<a href=/%d/track/auto>track auto</a><br>\n"
|
|
"<a href=/%d/track/status>track status</a><br>\n"
|
|
"<a href=/%d/><- back</a>\n",
|
|
thread, thread, thread, thread, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"Thread %d\nset pan/tilt\nauto\nstatus\n", thread);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
}
|
|
else if ((slash == '/') && (length_uri >= 4)) {
|
|
pointer++;
|
|
length_uri--;
|
|
/* call track() */
|
|
if (cnt[thread]->track.type) {
|
|
track(pointer, res, length_uri, thread, client_socket, cnt);
|
|
} else {
|
|
/* error track not enable */
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res,"<a href=/%d/><- back</a>\n",thread);
|
|
response_client(client_socket, not_track,res);
|
|
}
|
|
else
|
|
response_client(client_socket, not_track_raw,NULL);
|
|
}
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res,"<a href=/%d/><- back</a>\n",thread);
|
|
response_client(client_socket, not_found_response_valid_command, res);
|
|
}
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res,"<a href=/%d/><- back</a>\n",thread);
|
|
response_client(client_socket, not_found_response_valid_command, res);
|
|
}
|
|
else
|
|
response_client(client_socket, not_found_response_valid_command_raw, NULL);
|
|
}
|
|
} else {
|
|
/* /thread_number/ requested */
|
|
if (cnt[0]->conf.control_html_output) {
|
|
send_template_ini_client(client_socket,ini_template);
|
|
sprintf(res,"<b>Thread %d</b><br>\n"
|
|
"<a href='/%d/config'>config</a><br>\n"
|
|
"<a href='/%d/action'>action</a><br>\n"
|
|
"<a href='/%d/detection'>detection</a><br>\n"
|
|
"<a href='/%d/track'>track</a><br>\n"
|
|
"<a href=/><- back</a>\n",
|
|
thread, thread, thread, thread, thread);
|
|
send_template(client_socket, res);
|
|
send_template_end_client(client_socket);
|
|
} else {
|
|
send_template_ini_client_raw(client_socket);
|
|
sprintf(res,"Thread %d\nconfig\naction\ndetection\ntrack\n", thread);
|
|
send_template_raw(client_socket, res);
|
|
}
|
|
}
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output) {
|
|
sprintf(res,"<a href=/><- back</a>\n");
|
|
response_client(client_socket, not_found_response_valid, res);
|
|
}
|
|
else
|
|
response_client(client_socket, not_found_response_valid_raw, NULL);
|
|
}
|
|
}
|
|
free(res);
|
|
} else {
|
|
if (cnt[0]->conf.control_html_output)
|
|
response_client(client_socket, not_found_response_template,NULL);
|
|
else
|
|
response_client(client_socket, not_found_response_template_raw,NULL);
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
/*
|
|
-TODO-
|
|
As usually web clients uses nonblocking connect/read
|
|
read_client should handle nonblocking sockets.
|
|
*/
|
|
|
|
static int read_client(int client_socket, void *userdata, char *auth)
|
|
{
|
|
int alive = 1;
|
|
int ret = 1;
|
|
char buffer[1024] = {'\0'};
|
|
int length = 1024;
|
|
struct context **cnt = userdata;
|
|
|
|
/* lock the mutex */
|
|
pthread_mutex_lock(&httpd_mutex);
|
|
|
|
while (alive)
|
|
{
|
|
int nread = 0, readb = -1;
|
|
|
|
nread = read (client_socket, buffer, length);
|
|
|
|
if (nread <= 0) {
|
|
motion_log(LOG_ERR, 1, "httpd First read");
|
|
pthread_mutex_unlock(&httpd_mutex);
|
|
return -1;
|
|
}
|
|
else {
|
|
char method[sizeof (buffer)];
|
|
char url[sizeof (buffer)];
|
|
char protocol[sizeof (buffer)];
|
|
char *authentication=NULL;
|
|
|
|
buffer[nread] = '\0';
|
|
|
|
warningkill = sscanf (buffer, "%s %s %s", method, url, protocol);
|
|
|
|
while ((strstr (buffer, "\r\n\r\n") == NULL) && (readb!=0) && (nread < length)){
|
|
readb = read (client_socket, buffer+nread, sizeof (buffer) - nread);
|
|
|
|
if (readb == -1){
|
|
nread = -1;
|
|
break;
|
|
}
|
|
|
|
nread +=readb;
|
|
|
|
if (nread > length) {
|
|
motion_log(LOG_ERR, 1, "httpd End buffer reached waiting for buffer ending");
|
|
break;
|
|
}
|
|
buffer[nread] = '\0';
|
|
}
|
|
|
|
/* Make sure the last read didn't fail. If it did, there's a
|
|
problem with the connection, so give up. */
|
|
if (nread == -1) {
|
|
motion_log(LOG_ERR, 1, "httpd READ");
|
|
pthread_mutex_unlock(&httpd_mutex);
|
|
return -1;
|
|
}
|
|
alive = 0;
|
|
|
|
/* Check Protocol */
|
|
if (strcmp (protocol, "HTTP/1.0") && strcmp (protocol, "HTTP/1.1")) {
|
|
/* We don't understand this protocol. Report a bad response. */
|
|
if (cnt[0]->conf.control_html_output)
|
|
warningkill = write (client_socket, bad_request_response, sizeof (bad_request_response));
|
|
else
|
|
warningkill = write (client_socket, bad_request_response_raw, sizeof (bad_request_response_raw));
|
|
|
|
pthread_mutex_unlock(&httpd_mutex);
|
|
return -1;
|
|
}
|
|
else if (strcmp (method, "GET")) {
|
|
/* This server only implements the GET method. If client
|
|
uses other method, report the failure. */
|
|
char response[1024];
|
|
if (cnt[0]->conf.control_html_output)
|
|
snprintf (response, sizeof (response),bad_method_response_template, method);
|
|
else
|
|
snprintf (response, sizeof (response),bad_method_response_template_raw, method);
|
|
warningkill = write (client_socket, response, strlen (response));
|
|
pthread_mutex_unlock(&httpd_mutex);
|
|
return -1;
|
|
} else if ( auth != NULL) {
|
|
if ( (authentication = strstr(buffer,"Basic")) ) {
|
|
char *end_auth = NULL;
|
|
authentication = authentication + 6;
|
|
|
|
if ( (end_auth = strstr(authentication,"\r\n")) ) {
|
|
authentication[end_auth - authentication] = '\0';
|
|
} else {
|
|
char response[1024];
|
|
snprintf (response, sizeof (response),request_auth_response_template, method);
|
|
warningkill = write (client_socket, response, strlen (response));
|
|
pthread_mutex_unlock(&httpd_mutex);
|
|
return -1;
|
|
}
|
|
|
|
if ( !check_authentication(auth, authentication,
|
|
strlen(cnt[0]->conf.control_authentication),
|
|
cnt[0]->conf.control_authentication)) {
|
|
char response[1024]={'\0'};
|
|
snprintf(response, sizeof (response), request_auth_response_template, method);
|
|
warningkill = write (client_socket, response, strlen (response));
|
|
pthread_mutex_unlock(&httpd_mutex);
|
|
return -1;
|
|
} else {
|
|
ret = handle_get (client_socket, url, cnt);
|
|
/* A valid auth request. Process it. */
|
|
}
|
|
} else {
|
|
// Resquest Authorithation
|
|
char response[1024]={'\0'};
|
|
snprintf (response, sizeof (response),request_auth_response_template, method);
|
|
warningkill = write (client_socket, response, strlen (response));
|
|
pthread_mutex_unlock(&httpd_mutex);
|
|
return -1;
|
|
}
|
|
} else {
|
|
ret=handle_get (client_socket, url, cnt);
|
|
/* A valid request. Process it. */
|
|
}
|
|
}
|
|
}
|
|
pthread_mutex_unlock(&httpd_mutex);
|
|
|
|
return ret;
|
|
}
|
|
|
|
|
|
/*
|
|
acceptnonblocking
|
|
|
|
This function waits timeout seconds for listen socket.
|
|
Returns :
|
|
-1 if the timeout expires or on accept error.
|
|
curfd (client socket) on accept success.
|
|
*/
|
|
|
|
static int acceptnonblocking(int serverfd, int timeout)
|
|
{
|
|
int curfd;
|
|
socklen_t namelen = sizeof(struct sockaddr_in);
|
|
struct sockaddr_in client;
|
|
struct timeval tm;
|
|
fd_set fds;
|
|
|
|
tm.tv_sec = timeout; /* Timeout in seconds */
|
|
tm.tv_usec = 0;
|
|
FD_ZERO(&fds);
|
|
FD_SET(serverfd,&fds);
|
|
|
|
if( select (serverfd + 1, &fds, NULL, NULL, &tm) > 0){
|
|
if(FD_ISSET(serverfd, &fds)) {
|
|
if((curfd = accept(serverfd, (struct sockaddr*)&client, &namelen))>0)
|
|
return(curfd);
|
|
}
|
|
}
|
|
|
|
return -1;
|
|
}
|
|
|
|
|
|
/*
|
|
Main function: Create the listening socket and waits client requests.
|
|
*/
|
|
|
|
void httpd_run(struct context **cnt)
|
|
{
|
|
int sd, client_socket_fd;
|
|
int client_sent_quit_message = 1, val=1;
|
|
int closehttpd = 0;
|
|
struct sockaddr_in servAddr;
|
|
struct sigaction act;
|
|
char *authentication = NULL;
|
|
|
|
/* Initialize the mutex */
|
|
pthread_mutex_init(&httpd_mutex, NULL);
|
|
|
|
|
|
/* set signal handlers TO IGNORE */
|
|
memset(&act,0,sizeof(act));
|
|
sigemptyset(&act.sa_mask);
|
|
act.sa_handler = SIG_IGN;
|
|
sigaction(SIGPIPE,&act,NULL);
|
|
sigaction(SIGCHLD,&act,NULL);
|
|
|
|
/* create socket */
|
|
sd = socket(AF_INET, SOCK_STREAM, 0);
|
|
if (sd<0) {
|
|
motion_log(LOG_ERR, 1, "httpd socket");
|
|
return;
|
|
}
|
|
|
|
/* bind server port */
|
|
servAddr.sin_family = AF_INET;
|
|
if (cnt[0]->conf.control_localhost)
|
|
servAddr.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
|
|
else
|
|
servAddr.sin_addr.s_addr = htonl(INADDR_ANY);
|
|
servAddr.sin_port = htons(cnt[0]->conf.control_port);
|
|
|
|
/* Reuse Address */
|
|
|
|
setsockopt(sd, SOL_SOCKET, SO_REUSEADDR, &val, sizeof( int ) ) ;
|
|
|
|
if (bind(sd, (struct sockaddr *) &servAddr, sizeof(servAddr))<0) {
|
|
motion_log(LOG_ERR, 1, "httpd bind()");
|
|
close(sd);
|
|
return;
|
|
}
|
|
|
|
if (listen(sd,5) == -1){
|
|
motion_log(LOG_ERR, 1, "httpd listen()");
|
|
close(sd);
|
|
return;
|
|
}
|
|
|
|
motion_log(LOG_DEBUG, 0, "motion-httpd/"VERSION" running, accepting connections");
|
|
motion_log(LOG_DEBUG, 0, "motion-httpd: waiting for data on port TCP %d", cnt[0]->conf.control_port);
|
|
|
|
if (cnt[0]->conf.control_authentication != NULL ) {
|
|
char *userpass = NULL;
|
|
size_t auth_size = strlen(cnt[0]->conf.control_authentication);
|
|
|
|
authentication = (char *) mymalloc(BASE64_LENGTH(auth_size) + 1);
|
|
userpass = mymalloc(auth_size + 4);
|
|
/* base64_encode can read 3 bytes after the end of the string, initialize it */
|
|
memset(userpass, 0, auth_size + 4);
|
|
strcpy(userpass, cnt[0]->conf.control_authentication);
|
|
base64_encode(userpass, authentication, auth_size);
|
|
free(userpass);
|
|
}
|
|
|
|
while ((client_sent_quit_message!=0) && (!closehttpd)) {
|
|
|
|
client_socket_fd = acceptnonblocking(sd, 1);
|
|
|
|
if (client_socket_fd<0) {
|
|
if (cnt[0]->finish){
|
|
motion_log(-1, 1, "httpd - Finishing");
|
|
closehttpd = 1;
|
|
}
|
|
} else {
|
|
/* Get the Client request */
|
|
client_sent_quit_message = read_client (client_socket_fd, cnt, authentication);
|
|
motion_log(-1, 1, "httpd - Read from client");
|
|
|
|
/* Close Connection */
|
|
if (client_socket_fd)
|
|
close(client_socket_fd);
|
|
}
|
|
|
|
}
|
|
|
|
if (authentication != NULL) free(authentication);
|
|
close(sd);
|
|
motion_log(LOG_DEBUG, 0, "httpd Closing");
|
|
pthread_mutex_destroy(&httpd_mutex);
|
|
}
|
|
|
|
void *motion_web_control(void *arg)
|
|
{
|
|
struct context **cnt=arg;
|
|
httpd_run(cnt);
|
|
pthread_exit(NULL);
|
|
}
|