openmv/usr/main.c
iabdalkader b0c4f8e844 Added USB OTG FS support
Added userspace libusb driver
Fixed some registers now QCIF/QQCIF resoultions are working
Updated CMSIS and STM32F4xx standard peripheral libraries
2013-11-30 04:23:22 +02:00

399 lines
12 KiB
C

#include <stdlib.h>
#include <unistd.h>
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <libusb.h>
#include <getopt.h>
#include <signal.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <sys/time.h>
#include <SDL/SDL.h>
#include <SDL/SDL_ttf.h>
#include "ov9650.h"
#define USB_VID (0x0483) /* vendor id */
#define USB_PID (0x5740) /* product id */
#define EP_IN (0x81) /* IN endpoint */
#define EP_OUT (0x01) /* OUT endpoint */
#define TIMEOUT (1000) /* I/O transfer timeout */
#define DEBUG_LEVEL (1) /* libusb debug level */
#define LOCK_SURFACE(surface) \
if (SDL_LockSurface(surface) < 0 ) { \
fprintf(stderr, "failed to lock surface - %s\n", SDL_GetError());\
return -1;\
}\
const char *optstring = "f:r:s:c:h";
const char *usage = "usage: openmv <args>\n" \
"-f set pixel format yuv422/rgb565/grayscale\n"\
"-r set frame rate 2/8/15/30/60\n"\
"-s set frame size QQVGA\n"\
"-c send command to camera SNAPSHOT/COLOR_TRACK\n"\
"-h print this message and exit\n";
libusb_device_handle *dev = NULL;
SDL_Surface *surface, *screen;
int stop = 0;
static void sig_hdlr(int signum, siginfo_t *siginfo, void *user)
{
switch (signum) {
case SIGINT:
stop =1;
}
}
const char *err_str(int err)
{
switch (err) {
case 0:
return "Success";
case LIBUSB_ERROR_TIMEOUT:
return "transfer timed out";
case LIBUSB_ERROR_PIPE:
return "endpoint halted";
case LIBUSB_ERROR_OVERFLOW:
return "overflow";
case LIBUSB_ERROR_NO_DEVICE:
return "device has been disconnected";
case LIBUSB_ERROR_NOT_FOUND:
return "the requested interface does not exist";
default:
return "other";
};
}
void cleanup(void)
{
libusb_close(dev);
libusb_exit(NULL);
SDL_FreeSurface(screen);
SDL_FreeSurface(surface);
SDL_Quit();
}
int bulk_xfr(int ep, uint8_t *buf, int len)
{
int ret;
if ((ret = libusb_bulk_transfer(dev, ep, buf, len, &len, TIMEOUT)) != 0) {
fprintf(stderr, "I/O error: %s offset: %d\n", err_str(ret), len);
return ret;
}
return len;
}
long get_time_ms()
{
static struct timeval timeval;
gettimeofday(&timeval, NULL);
return timeval.tv_sec * 1000 + (long) (timeval.tv_usec * 0.001f);
}
SDL_Surface *flip_surface(SDL_Surface *surface)
{
int x,rx,y,ry;
//Pointer to the soon to be flipped surface
SDL_Surface *flipped = NULL;
//If the image is color keyed
if (surface->flags & SDL_SRCCOLORKEY) {
flipped = SDL_CreateRGBSurface(SDL_SWSURFACE, surface->w, surface->h,
surface->format->BitsPerPixel, surface->format->Rmask, surface->format->Gmask, surface->format->Bmask, 0);
} else {
flipped = SDL_CreateRGBSurface(SDL_SWSURFACE, surface->w, surface->h,
surface->format->BitsPerPixel, surface->format->Rmask, surface->format->Gmask, surface->format->Bmask, 0);
}
//If the surface must be locked
if (SDL_MUSTLOCK(surface)) {
//Lock the surface
SDL_LockSurface( surface );
}
//Go through columns
for (x=0, rx=flipped->w-1; x<flipped->w; x++, rx--) {
//Go through rows
for (y=0, ry=flipped->h-1; y<flipped->h; y++, ry--) {
//Get pixel
Uint32 pixel = ((Uint32*)surface->pixels)[( y * surface->w ) + x];
((Uint32*)flipped->pixels)[( ry * surface->w ) + x] =pixel;
}
}
//Unlock surface
if(SDL_MUSTLOCK(surface)) {
SDL_UnlockSurface(surface);
}
//Copy color key
if (surface->flags & SDL_SRCCOLORKEY) {
SDL_SetColorKey(flipped, SDL_RLEACCEL | SDL_SRCCOLORKEY, surface->format->colorkey);
}
SDL_BlitSurface(flipped, NULL, surface, NULL);
SDL_FreeSurface(flipped);
return 0;
}
int main (int argc, char **argv)
{
char opt;
uint8_t cmd_buf[32];
/*sigaction struct*/
struct sigaction act = {
.sa_sigaction = sig_hdlr,
.sa_flags = SA_SIGINFO|SA_NOCLDSTOP,
};
enum ov9650_command ov9650_cmd = CMD_SNAPSHOT;
struct ov9650_handle ov9650 = {
.pixformat = PIXFORMAT_RGB565,
.framesize = FRAMESIZE_QQVGA,
.framerate = FRAMERATE_30FPS,
.frame_buffer = {160, 120, 2, {0}},
};
struct frame_buffer *fb = &ov9650.frame_buffer;
/*parse command line args*/
while ((opt = getopt(argc, argv, optstring)) > 0) {
switch (opt) {
case 'c':
if (strcmp(optarg, "SNAPSHOT")==0) {
ov9650_cmd = CMD_SNAPSHOT;
} else if (strcmp(optarg, "COLOR_TRACK")==0) {
ov9650_cmd = CMD_COLOR_TRACK;
} else if (strcmp(optarg, "FACE_DETECTION")==0) {
ov9650_cmd = CMD_FACE_DETECTION;
} else {
fprintf(stderr, "unsupported command <%s>\n%s\n", optarg, usage);
exit(1);
}
break;
case 'f':
if (strcmp(optarg, "yuv422")==0) {
fb->bpp =2;
ov9650.pixformat = PIXFORMAT_YUV422;
} else if (strcmp(optarg, "rgb565")==0) {
fb->bpp =2;
ov9650.pixformat = PIXFORMAT_RGB565;
} else if (strcmp(optarg, "grayscale")==0) {
fb->bpp =1;
ov9650.pixformat = PIXFORMAT_GRAYSCALE;
} else {
fprintf(stderr, "unsupported pixformat <%s>\n%s\n", optarg, usage);
exit(1);
}
break;
case 's':
if (strcmp(optarg, "QQCIF")==0) {
fb->width = 88;
fb->height = 72;
ov9650.framesize = FRAMESIZE_QQCIF;
} else if (strcmp(optarg, "QQVGA")==0) {
fb->width = 160;
fb->height = 120;
ov9650.framesize = FRAMESIZE_QQVGA;
} else if (strcmp(optarg, "QCIF")==0) {
fb->width = 176;
fb->height = 144;
ov9650.framesize = FRAMESIZE_QCIF;
} else {
fprintf(stderr, "unsupported framesize <%s>\n%s\n", optarg, usage);
exit(1);
}
break;
case 'r':
switch (atoi(optarg)) {
case 2:
ov9650.framerate=FRAMERATE_2FPS;
break;
case 8:
ov9650.framerate=FRAMERATE_8FPS;
break;
case 15:
ov9650.framerate=FRAMERATE_15FPS;
break;
case 30:
ov9650.framerate=FRAMERATE_30FPS;
break;
case 60:
ov9650.framerate=FRAMERATE_60FPS;
break;
default:
fprintf(stderr, "unsupported framerate <%s>\n%s\n", optarg, usage);
exit(1);
}
break;
case '?':
case 'h':
fprintf(stderr, "%s\n", usage);
exit(1);
}
}
/*init libusb*/
libusb_init(NULL);
/*set cleanup to be called at exit*/
atexit(cleanup);
/*install signal handlers*/
sigaction(SIGINT, &act, NULL);
libusb_set_debug(NULL, DEBUG_LEVEL); /*set debugging level*/
if ((dev = libusb_open_device_with_vid_pid(NULL, USB_VID, USB_PID)) == NULL){
fprintf(stderr, "Device could not be found.\n");
exit(1);
}
/* claim interace zero */
if (libusb_claim_interface(dev, 0) != 0) {
fprintf(stderr, "Failed to claim interface\n");
exit(1);
}
Uint32 rmask, gmask, bmask, amask;
#if (SDL_BYTEORDER == SDL_BIG_ENDIAN)
rmask = 0xFF000000; gmask = 0x00FF0000; bmask = 0x0000FF00; amask = 0x00000000;
#else
rmask = 0x000000FF; gmask = 0x0000FF00; bmask = 0x00FF0000; amask = 0x00000000;
#endif
/* Init SDL library */
if (SDL_Init(SDL_INIT_VIDEO)){
fprintf(stderr, "failed to initialize SDL_VIDEO - %s\n", SDL_GetError());
exit(1);
}
/* Init SDL TTF library */
if(TTF_Init()==-1) {
fprintf(stderr, "TTF_Init: %s\n", TTF_GetError());
exit(1);
}
if ((screen = SDL_SetVideoMode(fb->width, fb->height, 32, SDL_SWSURFACE)) == NULL) {
fprintf(stderr, "failed to set video mode - %s\n", SDL_GetError());
exit(1);
}
if ((surface = SDL_CreateRGBSurface(SDL_SWSURFACE,
fb->width, fb->height, 32, rmask, gmask, bmask, amask)) == NULL) {
fprintf(stderr, "failed to create rgb surface - %s\n", SDL_GetError());
exit(1);
}
// load font.ttf at size 16 into font
TTF_Font *font;
font=TTF_OpenFont("font.ttf", 12);
if(!font) {
fprintf(stderr, "TTF_OpenFontRW: %s\n", TTF_GetError());
exit(1);
}
libusb_reset_device(dev);
/* set pixelformat */
cmd_buf[0] = CMD_SET_PIXFORMAT;
cmd_buf[1] = ov9650.pixformat;
bulk_xfr(EP_OUT, cmd_buf, 2);
/* set framesize */
cmd_buf[0] = CMD_SET_FRAMESIZE;
cmd_buf[1] = ov9650.framesize;
bulk_xfr(EP_OUT, cmd_buf, 2);
/* set framerate */
cmd_buf[0] = CMD_SET_FRAMERATE;
cmd_buf[1] = ov9650.framerate;
bulk_xfr(EP_OUT, cmd_buf, 2);
sleep(1);
SDL_Event event;
long t_start, t_elapsed=0, t_total=0, frames=0;
/* allocate frame buffer */
fb->pixels = malloc(fb->width*fb->height*fb->bpp);
while(1) {
t_start = get_time_ms();
/* request frame */
cmd_buf[0] = ov9650_cmd;
bulk_xfr(EP_OUT, cmd_buf, 1);
int ret, len = 0;
int frame_size = (fb->width*fb->height*fb->bpp);
while (len < frame_size) {
ret = bulk_xfr(EP_IN, fb->pixels + len, frame_size-len);
if (stop || ret == LIBUSB_ERROR_PIPE) {
exit(0);
}
len += ret;
}
int i;
uint8_t *pixels = surface->pixels;
for (i=0; i<frame_size; i+=fb->bpp, pixels+=4) {
if (fb->bpp == 1) {
/* map grayscale to RGB888 */
pixels[0]=fb->pixels[i];
pixels[1]=fb->pixels[i];
pixels[2]=fb->pixels[i];
} else {
uint8_t p0 = fb->pixels[i];
uint8_t p1 = fb->pixels[i+1];
/* map RGB565 to RGB888 */
#if (SDL_BYTEORDER == SDL_BIG_ENDIAN)
pixels[0] = (uint8_t) (p1&0x1F) * 255/31;
pixels[1] = (uint8_t) (((p0&0x07)<<3) | (p1>>5)) * 255/63;
pixels[2] = (uint8_t) (p0>>3) * 255/31;
#else
pixels[0] = (uint8_t) (p0>>3) * 255/31;
pixels[1] = (uint8_t) (((p0&0x07)<<3) | (p1>>5)) * 255/63;
pixels[2] = (uint8_t) (p1&0x1F) * 255/31;
#endif
}
pixels[3]=0;
}
flip_surface(surface);
SDL_BlitSurface(surface, NULL, screen, NULL);
++frames;
t_elapsed = get_time_ms() - t_start;
t_total += t_elapsed;
char text_buf[64];
//printf("FPS %d\n", ((1000 /(t_total/frames))));
sprintf(text_buf, "FPS %.2f", 1000/(float)(t_total / frames));
SDL_Color fg = {255, 0, 0, 0};
SDL_Surface *text = TTF_RenderText_Solid(font, text_buf, fg);
SDL_Rect rect = {0, 0, 0, 0};
SDL_BlitSurface(text, NULL, screen, &rect);
SDL_FreeSurface(text);
/*flush*/
SDL_UpdateRect(screen, 0, 0, fb->width, fb->height);
SDL_PollEvent(&event);
if (event.type == SDL_QUIT) {
exit(0);
}
}
return 0;
}