Go: package main

import (
	"bufio"
	"container/list"
	"fmt"
	"os"
	"strconv"
	"strings"
)

func main() {
	io := NewIo()
	defer io.Flush()
	for {
		w, h := io.NextInt(), io.NextInt()
		if w == 0 {
			break
		}
		xWall := make([][]int, h)
		yWall := make([][]int, h)
		for i := 0; i < h; i++ {
			xWall[i], yWall[i] = make([]int, w), make([]int, w)
			for j := 0; j < w; j++ {
				xWall[i][j], yWall[i][j] = -1, -1
			}
		}
		for i := 0; i < h*2-1; i++ {
			if i%2 == 0 {
				for j := 0; j < w-1; j++ {
					xWall[i/2][j] = io.NextInt()
				}
			} else {
				for j := 0; j < w; j++ {
					yWall[i/2][j] = io.NextInt()
				}
			}
		}
		//io.Println(bfs(w, h, xWall, yWall))
		fmt.Println(bfs(w, h, xWall, yWall))
	}
}

type P struct {
	x, y int
}

func bfs(w, h int, x, y [][]int) int {
	d := make([][]int, h)
	for i := 0; i < h; i++ {
		d[i] = make([]int, w)
	}
	q := list.New()
	q.PushBack(P{0, 0})
	d[0][0] = 1

	for q.Len() != 0 {
		pos := q.Remove(q.Front()).(P)
		if pos.x == w-1 && pos.y == h-1 {
			break
		}
		if pos.x > 0 && x[pos.y][pos.x-1] == 0 && d[pos.y][pos.x-1] == 0 {
			d[pos.y][pos.x-1] = d[pos.y][pos.x] + 1
			q.PushBack(P{pos.x - 1, pos.y})
		}
		if pos.x < w-1 && x[pos.y][pos.x] == 0 && d[pos.y][pos.x+1] == 0 {
			d[pos.y][pos.x+1] = d[pos.y][pos.x] + 1
			q.PushBack(P{pos.x + 1, pos.y})
		}
		if pos.y > 0 && y[pos.y-1][pos.x] == 0 && d[pos.y-1][pos.x] == 0 {
			d[pos.y-1][pos.x] = d[pos.y][pos.x] + 1
			q.PushBack(P{pos.x, pos.y - 1})
		}
		if pos.y < h-1 && y[pos.y][pos.x] == 0 && d[pos.y+1][pos.x] == 0 {
			d[pos.y+1][pos.x] = d[pos.y][pos.x] + 1
			q.PushBack(P{pos.x, pos.y + 1})
		}
	}
	return d[h-1][w-1]
}

// I/O template
type Io struct {
	reader    *bufio.Reader
	writer    *bufio.Writer
	tokens    []string
	nextToken int
}

func NewIo() *Io {
	return &Io{
		reader: bufio.NewReader(os.Stdin),
		writer: bufio.NewWriter(os.Stdout),
	}
}

func (io *Io) Flush() {
	err := io.writer.Flush()
	if err != nil {
		panic(err)
	}
}

func (io *Io) NextLine() string {
	var buff []byte
	for {
		line, isPrefix, err := io.reader.ReadLine()
		if err != nil {
			panic(err)
		}
		buff = append(buff, line...)
		if !isPrefix {
			break
		}
	}
	return string(buff)
}

func (io *Io) Next() string {
	for io.nextToken >= len(io.tokens) {
		line := io.NextLine()
		io.tokens = strings.Fields(line)
		io.nextToken = 0
	}
	s := io.tokens[io.nextToken]
	io.nextToken++
	return s
}

func (io *Io) NextInt() int {
	i, err := strconv.Atoi(io.Next())
	if err != nil {
		panic(err)
	}
	return i
}

func (io *Io) NextFloat() float64 {
	i, err := strconv.ParseFloat(io.Next(), 64)
	if err != nil {
		panic(err)
	}
	return i
}

func (io *Io) Println(a ...interface{}) {
	fmt.Fprintln(io.writer, a...)
}

func (io *Io) Printf(format string, a ...interface{}) {
	fmt.Fprintf(io.writer, format, a...)
}

func (io *Io) PrintIntSlice(a []int) {
	b := []interface{}{}
	for _, x := range a {
		b = append(b, x)
	}
	io.Println(b...)
}

func (io *Io) PrintStringSlice(a []string) {
	b := []interface{}{}
	for _, x := range a {
		b = append(b, x)
	}
	io.Println(b...)
}

func Log(name string, value interface{}) {
	fmt.Fprintf(os.Stderr, "%s=%+v\n", name, value)
}

func ExampleIo() {
	io := NewIo()
	defer io.Flush()
	a := make([]int, 0, 3)
	a[0], a[1], a[2] = io.NextInt(), io.NextInt(), io.NextInt()
	io.Println(a)
	io.PrintIntSlice(a)
	Log("io", a)
}

C++: #include<bits/stdc++.h>
#define rep(i,n) for(int i=0; i<n; i++)
#define INF 1000000
using namespace std;
int dx[] = {1,0,-1,0};
int dy[] = {0,1,0,-1};
bool flag_table[40][40][4];
int table[40][40];
int ans,cnt,w,h;
typedef pair<int,int> P;
queue<P> que;
int bfs(){
    que.push(P(0,0));
    table[0][0] = 1;
    while(!que.empty()){
        P tmp = que.front();
        que.pop();
        if(tmp.first == h-1 && tmp.second == w-1) break;
        rep(i,4){
            int ny = tmp.first+dy[i];
            int nx = tmp.second+dx[i];
            if(ny < 0 || nx < 0 || ny >= h || nx >= w) continue;
            if(table[ny][nx] != -1 || flag_table[tmp.first][tmp.second][i] == true) continue;
            table[ny][nx] = table[tmp.first][tmp.second] + 1;
            que.push(P(ny,nx));
        }
    }
    return table[h-1][w-1];
}
int main(){
    while(cin >> w >> h){
        if(w == 0 && h == 0) break;
        memset(flag_table,false,sizeof(flag_table));
        memset(table,-1,sizeof(table));
        rep(i,h){
            rep(j,w-1){
                int n; cin >> n;
                if(n != 1) continue;
                flag_table[i][j][0] = true;
                flag_table[i][j+1][2] = true;
            }
            if(i == h-1) continue;
            rep(j,w){
                int n; cin >> n;
                if(n != 1) continue;
                flag_table[i][j][1] = true;
                flag_table[i+1][j][3] = true;
            }
        }
        if(bfs() == -1) cout << 0 << endl;
        else cout << bfs() << endl;
    }
}

C++: #include <bits/stdc++.h>
using namespace std;

struct cell{
  int l,r,u,d,dis;
  cell(int li, int ri, int ui, int di,int disi){
    l = li; r = ri; u = ui; d = di; dis = disi;
  }
};

typedef vector<vector<cell> > maze;
typedef pair<int,int> pii;

int dx[] = {-1,1,0,0}; // ?????????????????????
int dy[] = {0,0,1,-1};

void bfs(maze& m, int h, int w){
  
  queue<pii> q;
  q.push(pii(0,0));
  m[0][0].dis = 0;

  while(!q.empty()){
    int prex = q.front().first;
    int prey = q.front().second;

    q.pop();
    if(prex == w-1 && prey == h-1) break;

    for(int i=0; i<4; i++){
      int nx = prex + dx[i];
      int ny = prey + dy[i];
      if(nx >= w || nx < 0 || ny >= h || ny < 0) continue; // ????£?????¶???????
      if(i==0 and m[prey][prex].l == 1) continue; // ?£???????
      if(i==1 and m[prey][prex].r == 1) continue;
      if(i==2 and m[prey][prex].d == 1) continue;
      if(i==3 and m[prey][prex].u == 1) continue;
      if(m[ny][nx].dis != -1) continue; // ??¢?´¢??????
      
      // ?§??????????
      m[ny][nx].dis = m[prey][prex].dis + 1;
      q.push(pii(nx,ny));
     }
  }
}



int main(){
  
  while(1){
    int w,h;
    cin >> w >> h;
    if(!w and !h) break;

    maze m(h+1,vector<cell>(w+1,cell(0,0,0,0,-1)));

    // ?????????????????¨?????????
    for(int i=0; i<h; i++){
      for(int j=0; j<w; j++){
	if(i==0)
	  m[i][j].u = 1;
	if(i==h-1)
	  m[i][j].d = 1;
	if(j==0)
	  m[i][j].l = 1;
	if(j==w-1)
	  m[i][j].r = 1;
      }
    }

    // ??\?????????????§????
    for(int i=0; i<2*h-1; i++){
      if(i%2 == 0)
	for(int j=0; j<w-1; j++){ // ????????????
	  int x; cin >> x;
	  m[i/2][j].r = x;
	  m[i/2][j+1].l = x;
	}
      else
	for(int j=0; j<w; j++){ // ?¨??????????
	  int x; cin >> x;
	  m[i/2][j].d = x;
	  m[i/2+1][j].u = x;
	}
    }

    bfs(m,h,w);
    cout << m[h-1][w-1].dis+1 << endl;
  }

}